×
Linguagem de Programação ADVPL
Perguntas Informar XML no arquivo CNAB
10 anos 2 semanas atrás #25994
por admin
Respondido por admin no tópico Informar XML no arquivo CNAB
No Cnab, arquivo de configuração na posição que deseja informar o xml coloque:
Posicione("SF2",1,xFilial("SF2")+SE1->E1_PREFIXO+SE1->E1_NUM,"F2_CHVNFE")
agora se não couber faça uma função e substitua:
U_ChvNfe()
User Function ChvNfe()
Local cRet := ''
Local aArea := GetArea()
If SF2->(dbSetOrder(1), dbSeek(xFilial("SF2")+SE1->E1_PREFIXO+SE1->E1_NUM+SE1->E1_CLIENTE+SE1->E1_LOJA))
cRet := SF2->F2_CHVNFE
Endif
RestArea(aArea)
Return cRet
Não testei, veja se funfa.
Posicione("SF2",1,xFilial("SF2")+SE1->E1_PREFIXO+SE1->E1_NUM,"F2_CHVNFE")
agora se não couber faça uma função e substitua:
U_ChvNfe()
User Function ChvNfe()
Local cRet := ''
Local aArea := GetArea()
If SF2->(dbSetOrder(1), dbSeek(xFilial("SF2")+SE1->E1_PREFIXO+SE1->E1_NUM+SE1->E1_CLIENTE+SE1->E1_LOJA))
cRet := SF2->F2_CHVNFE
Endif
RestArea(aArea)
Return cRet
Não testei, veja se funfa.
Tempo para a criação da página:0.101 segundos