...
...
Descripción: | O Ponto El punto de | Entrada entrada A140IDOC | é utilizado para manipular o número e a série da NFe importada por meio do TOTVS Colaboraçãose utiliza para manejar el número y la serie de la e-Fact importado por medio del TOTVS Colaboración. | ||||||||||||||||||||||||
Eventos: | O Ponto de Entrada é executado ao processar a importação de uma NFe por meio do TOTVS Colaboração. | El punto de entrada se ejecuta al procesar la importación de una e-Fact por medio del TOTVS Colaboración. | |||||||||||||||||||||||||
Programa fuentePrograma Fonte: | MATA140I.PRW | Parâmetros||||||||||||||||||||||||||
Parámetros: | PARAMIXB[1]: String | , contendo o número do que contiene el número del documento. | , contendo a série do con la serie del documento. | , contendo o código do fornecedorque contiene el código del proveedor. | , contendo a loja do fornecedorque contiene la tienda del proveedor. | ||||||||||||||||||||||
RetornoDevolución: | Array "aRet" de 4 posições, no seguinte posiciones, en el siguiente formato: Nome
Série do Documento
Loja do Fornecedor |
Obs.: Ao retornar o código do fornecedor é obrigatório retornar a lojaAl devolver el código del proveedor es obligatorio devolver la tienda. |
...
Ejemplo:
#Include 'Protheus.ch'
User Function A140IDOC()
Local cDoc := PARAMIXB[1]
Local cSerie := PARAMIXB[2]
Local cCodFor := PARAMIXB[3]
Local cLojaFor := PARAMIXB[4]
Local aRet := {}
If cCodFor == "F000459" .And. cLojaFor == "01"
aAdd(aRet,cDoc)
aAdd(aRet,"AZB")
aAdd(aRet,cCodFor)
aAdd(aRet,cLojaFor)
Else
aAdd(aRet,cDoc)
aAdd(aRet,cSerie)
aAdd(aRet,cCodFor)
aAdd(aRet,cLojaFor)
EndIf
Return aRet