Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagejava
themeMidnight
firstline1
#INCLUDE "PROTHEUS.CH"
 
User Function MT920PN()

Local l920Inclui   := aRotina[nOpcx][4] == 3 //Define se a operação é de inclusão

/*
	Lista de variáveis Private criadas no MATA920 que podem ser manipuladas pelo ponto de entrada e suas atribuições por padrão:

	cTipo  		:= If(l920Inclui,CriaVar("F2_TIPO")	    ,SF2->F2_TIPO)
	c920Nota 	:= If(l920Inclui,CriaVar("F2_DOC")		  ,SF2->F2_DOC)
	c920Serie	:= If(l920Inclui,CriaVar("F2_SERIE")	  ,SF2->F2_SERIE)
	d920Emis	:= If(l920Inclui,CriaVar("F2_EMISSAO")	,SF2->F2_EMISSAO)
	c920Client	:= If(l920Inclui,CriaVar("F2_CLIENTE")	,SF2->F2_CLIENTE)
	c920Loja	:= If(l920Inclui,CriaVar("F2_LOJA")	    ,SF2->F2_LOJA)
	c920Especi	:= If(l920Inclui,CriaVar("F2_ESPECIE")	,SF2->F2_ESPECIE)
	c920NFIni	:= If(l920Inclui,CriaVar("F2_DOC")		  ,SF2->F2_DOC)
	c920Vend	:= If(l920Inclui,CriaVar("F2_VEND1")	  ,SF2->F2_VEND1)		
	c920DecExpc920Moeda	:= Iif(cPaisLoc=="PTG",If(l920Inclui,CriaVar("F2_DECLEXPMOEDA")	  ,SF2->F2_DECLEXP),""MOEDA)
	c920Moedac920Taxa	:= If(l920Inclui,CriaVar("F2_MOEDATXMOEDA"),SF2->F2_MOEDATXMOEDA)
	c920Taxac920NFFim	:= If(l920Inclui,CriaVar("F2_TXMOEDADOC")    ,SF2->F2_TXMOEDANFORI)
 	c920Modal	:= If( !(cPaisLoc $ 'BRA|TRI'),If(l920Inclui,CriaVar("F2_NATUREZ"),SF2->F2_NATUREZ),"")  
	c920NFFimc920DecExp	:= Iif(cPaisLoc=="PTG",If(l920Inclui,CriaVar("F2_DOCDECLEXP")	,SF2->F2_NFORIDECLEXP),"") 
*/

      
Return


04. DEMAIS INFORMAÇÕES

...