import.css=/download/attachments/327912/newLayout.css

Ponto-de-Entrada: FISENVNFE - Envio de NF-e


Abrangências:Microsiga Protheus 12
Versões:Microsiga Protheus 12
Compatível Países:Brasil
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Português (Brasil)


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:



Nome

Tipo

Descrição

Default

Obrigatório

Referência

aIdNFe

Array of Record

ID de identificação da NF-e, junto ao TSS.










Retorno
Nil
#include "rwmake.ch"

User Function FISENVNFE()

Local aIdNfe 	:= PARAMIXB[1]
Local cIdsNfe	:= ""
Local nX		:= 0

    If Len(aIdNfe) > 0

        For nX := 1 To Len(aIdNfe)
            cIdsNfe	+= aIdNfe[Nx]
            If nX < Len(aIdNfe)
                cIdsNfe += " - "
            EndIf
        Next nX	    
        msgalert("Id(s) da(s) NF-e no TSS: " + cIdsNfe )

    Else

        msgalert("Transmissão da NF-e Falhou")

    EndIf

Return Nil