Salve salve....
Ponto de entrada TM491CLI- ( Gera fatura com base nos paramentros selecionados)
TMSA491-TM491CLI- Código da Natureza para Faturamento Automático
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} TM491CLI
Código da Natureza para Faturamento Automático
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function TM491CLI()
Local cCodCli := ParamIXB[1] as character
Local cLojCli := ParamIXB[2] as character
Local cNat := ParamIXB[3] as character
Local cNatRod := ParamIXB[4] as character
Local cNatAer := ParamIXB[5] as character
Local cNatFlu := ParamIXB[6] as character
Local aDoctos := ParamIXB[7] as array
Local aNatCli := {} as array
aAdd( aNatCli, cNat ) //Natureza da Fatura (Generico)
aAdd( aNatCli, cNatRod ) //Natureza da Fatura Transporte Rodoviario
aAdd( aNatCli, cNatAer ) //Natureza da Fatura Transporte Aereo
aAdd( aNatCli, cNatFlu ) //Natureza da Fatura Transporte Fluvial
Return( aNatCli )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima