Observações | Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "GRAVA_EV0" permitirá a customização da gravação da tabela EV0 (Historico de Transações).
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "GRAVA_EVC" permitirá a customização da gravação da tabela EVC (Retorno - DI).
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "GRAVA_SWP" permitirá a customização da gravação da tabela SWP (Processos LI).
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "GRAVA_SW6" permitirá a customização da gravação da tabela SW6 (Processos DI).
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "GERA_INI" permitirá a customização da geração do arquivo INI de integração para transmissão.
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "GERA_ARQUIVO" permitirá a customização da geração do arquivo XML/INI com as informações do processo para transmissão.
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "LEITURA_RETORNO" permitirá a customização da leitura do arquivo de retorno originado da transmissão.
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "MONTA_MENSAGEM" permitirá a customização da mensagem exibida ao final de cada processamento de lote.
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "VALIDA_REGISTRO" permitirá a customização da validação dos dados dos processos durante a geração de lote. Esta validação é efetuada atraves da variavel lRet.
Quando o ponto de entrada "EICDI100" estiver passando no parâmetro "Paramixb", o conteúdo "ALTERA_NUMERACAO" permitirá a customização da numeração automática de lote. Esta customização é efetuada atraves da variavel cLotAlt. |
|---|
Exemplos | User Function EICDI100()
Local cParam := If(Type("ParamIxb") = "A",ParamIxb[1],If(Type("ParamIxb") = "C",ParamIxb,""))
If cParam == "GRAVA_EV0"
MsgInfo("Entrou no ponto de entrada 'GRAVA_EV0'.")
EndIf
If cParam == "GRAVA_EVC"
MsgInfo("Entrou no ponto de entrada 'GRAVA_EVC'.")
EndIf
If cParam == "GRAVA_SWP"
MsgInfo("Entrou no ponto de entrada 'GRAVA_SWP'.")
EndIf
If cParam == "GRAVA_SW6"
MsgInfo("Entrou no ponto de entrada 'GRAVA_SW6'.")
EndIf
If cParam == "GERA_INI"
MsgInfo("Entrou no ponto de entrada 'GERA_INI'.")
EndIf
If cParam == "GERA_ARQUIVO"
MsgInfo("Entrou no ponto de entrada 'GERA_ARQUIVO'.")
EndIf
If cParam == "LEITURA_RETORNO"
MsgInfo("Entrou no ponto de entrada 'GERA_RETORNO'.")
EndIf
If cParam == "MONTA_MENSAGEM"
MsgInfo("Entrou no ponto de entrada 'MONTA_MENSAGEM'.")
EndIf
If cParam == "VALIDA_REGISTRO"
MsgInfo("Entrou no ponto de entrada 'VALIDA_REGISTRO'.")
lRet := .F.
EndIf
If cParam == "ALTERA_NUMERACAO"
MsgInfo("Entrou no ponto de entrada 'ALTERA_NUMERACAO'.")
cLoteAlt := "0000014"
EndIf
Return Nil |
|---|