Objetivo:

       Permite customizar os valores das variáveis de Condição de Pagamento e Natureza Financeira


Onde é usado?        

       É acionado antes de abrir a interface de perguntas para o lançamento do documento de entrada pela Central XML.

       O objetivo é poder preencher valores para as variáveis quando não houver dados Default do cadastro do fornecedor/cliente ( A2_COND/A1_COND , A2_NATUREZ/A1_NATUREZ )


Parâmetros enviados na chamada:


1 - ParamIxb[1]        - String - Tipo de Documento. Podendo ser N=Normal;D=Devolução;B=Beneficiamento;S=Serviço;I=Complemento ICMS;C=Complemento Preço;P=Complemento IPI

2 - ParamIxb[2] - String - Código Condição de Pagamento. É passado por referência.

3 - ParamIxb[3] - String - Código da Natureza. É passado por referência.


Exemplo de uso


#include 'protheus.ch'

#include 'parmtype.ch'



/*/{Protheus.doc} XMLCTE27

//TODO Ponto de entrada para editar valores de variáveis antes de abrir a tela de condições para lançamento de notas.

@author Marcelo Alberto Lauschner

@since 28/12/2019

@version 1.0

@return ${return}, ${return_description}


@type function

/*/

User function XMLCTE27()

               //{"T",@cCondicao,@cNatFin

       Local                cTipoNf                := ParamIxb[1] // Pode ser T/N/D/B/S/I/C

       Local                cInCond                := ParamIxb[2]

       Local                cInNatF                := ParamIxb[3]

       

       // As variáveis cInCond e cInNatF são passadas como parâmetro via Referência.

       

       If cTipoNf == "T"  // Frete sobre vendas

               cInCond                := "543"        

               cInNatF                := "2111001"

       ElseIf cTipoNf == "N"        // Nota Normal

               cInCond                := "543"        

               cInNatF                := "2111001"

       Endif

        

Return

Created with the Personal Edition of HelpNDoc: Easily create CHM Help documents