Ponto de Entrada para Complementar o Cadastro de Fornecedor pela Central XML.



Parâmetros recebidos:


ParamIxb[1]        Vetor com os campos já alimentados a partir do XML.

ParamIxb[2]        Objeto XML da Tag InfCte:Emit ou InfNFe:Emit


#include 'protheus.ch'

#include 'parmtype.ch'



/*/{Protheus.doc} XMLCTE18

//TODO Ponto de Entrada da Central XML para adicionar campos na criação do cadastro de Fornecedor via Central XML

@author  Marcelo Alberto Lauschner

@since 15/11/2018

@version 1.0

@return aNaoExiste, Array com os campos que serão inseridos via ExecAuto do MATA020

@type User Function

/*/

User function XMLCTE19()

       

       Local        aNaoExiste        := ParamIxb[1]

       Local        oEmitente        := ParamIxb[2]

       Local        cA2NOME                := ' '

       Local        cA2COD                := Padr(' ',TamSX3("A2_COD")[1])

       // Exemplo de leitura de valores do xml para preenchimento de variáveis

       cA2NOME                := Padr(Transform(oEmitente:_xNome:TEXT,PesqPict("SA2","A2_NOME")),TamSX3("A2_NOME")[1])

               

       // Preenche os campos obrigatórios que não vem informação do XML

       Aadd(aNaoExiste,{"A2_NATUREZ"   ,"NORMAL"})

       Aadd(aNaoExiste,{"A2_EMAIL"     ,"sememail@dominio.com.br"})

       

Return aNaoExiste 



Obs: Se na rotina normal de cadastro de fornecedor, os campos de Código e Loja já são gerados automaticamente, não há necessidade de se passar valor para os campos A2_COD / A2_LOJA.

Caso contrário, se houver alguma regra específica da empresa para o sequenciamento dos códigos, esta regra deverá ser aplicada neste ponto de entrada.






Created with the Personal Edition of HelpNDoc: Free help authoring environment