Objetivo:

       Permite customizar a gravação de dados na tabela CONDORXML durante a importação dos XMLs.  


Onde é usado?        

       É acionado depois de gravar os dados na tabela CONDORXML durante a leitura de XMLs de Modelo 55,57 e 67.


Parâmetros enviados na chamada:


1 - ParamIxb[1]        - String - "55", "57" ou "67" conforme o tipo de Documento que está sendo gravado.

2 - ParamIxb[2] - Objeto XML  - oEmitente

3 - ParamIxb[3] - Objeto XML - oDestino  




#include 'protheus.ch'

#include 'parmtype.ch'

/*/{Protheus.doc} XMLCTE28

Ponto de Entrada da Central XML - Permite alterar os dados da gravação da Tabela CONDORXML - Durante importação dos XMLs

@type Function

@version 12.1.25

@author Marcelo Alberto Lauschner

@since 22/03/2020

@return Nil

/*/

User function XMLCTE28()


    Local   aAreaOld    := GetArea()

    Local   cTipDoc     := ParamIxb[1]

    Local   oEmitente   := ParamIxb[2]

    Local   oDestino    := ParamIxb[3]


    If cTipDoc == "55" // Modelo NF-e

        If Type("oEmitente:_CNPJ") <> "U"

            If oEmitente:_CNPJ:TEXT == "99999999999999"

                RecLock("CONDORXML",.F.)

                CONDORXML->XML_NOMEMT                := "("+oEmitente:_CNPJ:TEXT+") " + oEmitente:_xNome:TEXT // Nome emitente

                MsUnLock()

            Endif

        Endif

    Endif


    RestArea(aAreaOld)


Return Nil

Created with the Personal Edition of HelpNDoc: Easy CHM and documentation editor