...
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: FISENVNFE - Envio de NF-e
Descrição: Ponto de entrada executado logo após a transmissão da NF-e. Programa Fonte SPEDNFE.PRW Sintaxe FISENVNFE - Envio de NF-e ( [ aIdNFe ] ) --> Nill Parâmetros:
Retorno Nil() |
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#include "rwmake.ch" User Function FISENVNFE() Local aIdNfe := PARAMIXB Local cIdsNfe := "" Local nX := 0 If Len(aIdNfe) > 0 For nX := 1 To Len(aIdNfe) cIdsNfe += Iif( Len(aIdNfe[Nx]) > 0, Alltrim(aIdNfe[Nx][1]), "" ) If nX < Len(aIdNfe) cIdsNfe += " - " EndIf Next nX msgalert("Id da NF-e no TSS" + cIdsNfe ) Else msgalert("Transmissão da NF-e Falhou") EndIF Return Nil |