JUDSON ROSA Posted September 22, 2016 Report Share Posted September 22, 2016 Bom dia , pessoal o que pode estar errado na minha rotina para pagamento na NFCe, so consigo fazer uma forma , qaundo 2 da erro : O correto e para ser assim : -<pag> <tPag>01</tPag> // dinheiro <vPag>200.00</vPag> </pag> -<pag> <tPag>02</tPag> // cheque <vPag>43.75</vPag> </pag> E ESTA FAZENDO ASSIM: ********************************* -<pag> <tPag>01</tPag> // dinheiro <vPag>200.00</vPag> <tPag>02</tPag> // cheque <vPag>43.75</vPag> </pag> seGUE ROTINA: function loadpgto ( oNFe , WNOTA ) //Rotina usada para gerar as formas de pagamento do XML de envio ***************** dbselectarea("PGTO") dbseek(wnota) do while wnota=pgto->nota .and. !eof() form->(dbseek(pgto->cdfp)) lforma_nome := upper(alltrim(form->desc)) ltpag:="01" if "DINHEIRO" $ lforma_nome ltpag:="01" elseif "CHEQUE" $ lforma_nome ltpag:="02" elseif "CARTAO" $ lforma_nome ltpag:="03" elseif lforma_nome $ "FIADO | CREDIARIO" ltpag:="04" elseif lforma_nome $ "VALE ALIMENTACAO" ltpag:="10" elseif lforma_nome $ "VALE REFEICAO" ltpag:="11" elseif lforma_nome $ "VALE PRESENTE" ltpag:="12" elseif lforma_nome $ "VALE COMBUSTIVEL" ltpag:="13" else ltpag:="99" // OUTROS endif oItem := TVoNFePag() WITH OBJECT oItem // pagamentos :tPag := ltpag // forma de pagamento :vPag := pgto->valo // valor do pagamento END oNFe:AddItem( oItem ) pgto->( dbSkip() ) Enddo return( nil ) Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 22, 2016 Report Share Posted September 22, 2016 Dá alguma rejeição? Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted September 22, 2016 Author Report Share Posted September 22, 2016 sim da rejeição , devido ele nao criar um grupo para cada forma de pagamento , para cada forma tem que ter um grupo , ele ta criando td num mesmo grupo como relatei. veja: O correto e para ser assim : -<pag> <tPag>01</tPag> // dinheiro <vPag>200.00</vPag> </pag> -<pag> <tPag>02</tPag> // cheque <vPag>43.75</vPag> </pag> E ESTA FAZENDO ASSIM: ********************************* -<pag> <tPag>01</tPag> // dinheiro <vPag>200.00</vPag> <tPag>02</tPag> // cheque <vPag>43.75</vPag> </pag> to usando a classe do gilmer , alguem que usa passou por isso ???? Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 22, 2016 Report Share Posted September 22, 2016 Eu perguntei qual é a rejeição, qual é o numero dela ô!!! Não sei o que está acontecendo mas não estão mais me entendendo... kkkkkkkkkkkkkkkkkkkkkk Mira aqui, segues igual: http://www.flexdocs.com.br/guianfe/gerarNFe.pag.html Leia com calma, o apressado como crú...Né <Aferra>? aferra 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 22, 2016 Report Share Posted September 22, 2016 Dica Em caso de uso de mais de uma forma de pagamento, devemos gerar os grupos do pagamentos e concatena-los, exemplo de pagamento com parte em dinheiro e parte em cartão de crédito: <pag> <tPag>03</tPag> <vPag>100.00</vPag></pag><pag> <tPag>03</tPag> <vPag>100.00</vPag> <card> <CNPJ>12345678000123</CNPJ> <tBand>01</tBand> <cAut>12345</cAut> </card></pag> Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted September 22, 2016 Author Report Share Posted September 22, 2016 pois esse e o problema a classe nao esta gerando grupos quando tem mais de uma forma de pagamento segue o erro: VoNfeUtil - 21/09/2016 20:02:38 TVONFEUTIL2G:VALIDAXML ENVIASEFAZ 5505 - Erro: XML não atende a especificação do Schema XML: [nfe_v3.10.xsd] , analise a lista de erros: [1 - Linha:0001 Coluna:1916 Campo:[NIHIL] Conteúdo:[NIHIL] Erro:O elemento 'pag' no espaço para nome 'http://www.portalfiscal.inf.br/nfe' apresenta elemento filho 'tPag' no espaço para nome 'http://www.portalfiscal.inf.br/nfe' inválido. Lista de possíveis elementos esperados: 'card' no espaço para nome 'http://www.portalfiscal.inf.br/nfe'. ] - Total de Erros:1 1 - Linha:0001 Coluna:1916 Campo:[NIHIL] Conteúdo:[NIHIL] Erro:O elemento 'pag' no espaço para nome 'http://www.portalfiscal.inf.br/nfe' apresenta elemento filho 'tPag' no espaço para nome 'http://www.portalfiscal.inf.br/nfe' inválido. Lista de possíveis elementos esperados: 'card' no espaço para nome 'http://www.portalfiscal.inf.br/nfe'. so to usando 01 - dinheiro e 02 - cheque , nao to usando 03 - cartao Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 23, 2016 Report Share Posted September 23, 2016 Recomendo abrir um <Ticket> na FLEXDOCS, não é a classe do Gilmer e sim a Flexdocs, eu acho... Quote Link to comment Share on other sites More sharing options...
aferra Posted September 23, 2016 Report Share Posted September 23, 2016 mostre o method TVoNFePag() kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 23, 2016 Report Share Posted September 23, 2016 mostre o method TVoNFePag() Será kgada do Gilmer mesmo?? Pode ser... Quote Link to comment Share on other sites More sharing options...
aferra Posted September 23, 2016 Report Share Posted September 23, 2016 só quer ver e entender o processo, se olhar a função está correta, então pode ser sim a classe, duvido, porem não se pode descartar. agora kde a rosa kkkkkk kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 23, 2016 Report Share Posted September 23, 2016 KKKKKKKKKKKKKKKK, sumiu do skype também... kkkkkkkkkkkk, será??? kkkkkkkkkkkkkkkkk Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted September 23, 2016 Author Report Share Posted September 23, 2016 kkk , rosa tem espinhos viu rotinas : // NFCe CLASS TVoNFePag DATA tPag DATA vPag DATA CNPJ_Opc DATA tBand_Opc DAtA cAut_Opc ENDCLASS ***************************** METHOD AddItem( oItem ) CLASS TVoNFe2G local cID, axArray := {},nPos If oItem:Classname=="TVONFEPROD" cID := 'nItem="'+alltrim(str(len(::axItems)+1) ) +'"' aadd(::axItems, {cId,{} } ) aadd(::axItems[len(::axItems),2], {"prod" , ::StruProduto(oItem), 1 } ) aadd(::axItems[len(::axItems),2], {"imposto" , ::StruImpostos(oItem), 1 } ) aadd(::axItems[len(::axItems),2], {"infAdProd", TVoNFeItem():New("C", 0, 1,500,,,oItem:infAdProd )} ) ElseIf oItem:ClassName=="TVONFEREFNF" nPos:=ascan(::axNodes, {|x| x[1]=="ide" } ) if nPos!=0 Do Case Case ::nTipoRef==1 AAdd(::axNodes[nPos,2],{"NFref" , ::SetRefNfe(oItem) }) Case ::nTipoRef==2 AAdd(::axNodes[nPos,2],{"NFref" , ::SetrefNF(oItem) }) Case ::nTipoRef==3 AAdd(::axNodes[nPos,2],{"NFref" , ::SetrefECF(oItem) }) Case ::nTipoRef==4 AAdd(::axNodes[nPos,2],{"NFref" , ::SetrefNFP(oItem) }) EndCase Endif Else if ::cModeloDoc == "55" nPos:=ascan(::axNodes, {|x| x[1]=="cobr" } ) if nPos!=0 aadd(::axNodes[nPos,2], {"fat" , ::StruFatura(oItem) } ) aadd(::axNodes[nPos,2], {"dup" , ::StruDuplicata(oItem) } ) Endif Else nPos:=ascan(::axNodes, {|x| x[1]=="pag" } ) ***************** aqui os pagamentos if nPos!=0 aadd( ::axNodes[nPos][2], { "tPag", TVoNFeItem():new( "N", 1, 1, 02, ,,oItem:tPag ) } ) aadd( ::axNodes[nPos][2], { "vPag", TVoNFeItem():new( "N", 1, 15, , 02,,oItem:vPag ) } ) aadd( ::axNodes[nPos,2], { "card", ::StruCartao(oItem) } ) Endif Endif Endif Return( Nil ) Quote Link to comment Share on other sites More sharing options...
aferra Posted September 24, 2016 Report Share Posted September 24, 2016 provável não estar encontrando no array isso nPos:=ascan(::axNodes, {|x| x[1]=="pag" } ) ai teria que fazer testes, segunda tentamos algo. Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted September 24, 2016 Author Report Share Posted September 24, 2016 pois é , ja testei de todas as formas , e nao gera grupos de pagamentos , ok aguardo pela ajuda do amigo. bom final de semana Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted September 26, 2016 Author Report Share Posted September 26, 2016 bom dia , consegui resolver o problema do grupo de formas de pagamento , estava desatualizado a versão da classe . valeu pessoal. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 26, 2016 Report Share Posted September 26, 2016 o Alessandro acertou então? era kgada do Gilmer mesmo?? kkkkkkkkkkkkkkkkkkkkkkkkkkkk aferra 1 Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted September 26, 2016 Author Report Share Posted September 26, 2016 mais que bom que resolvemos . aferra 1 Quote Link to comment Share on other sites More sharing options...
Marca Posted October 4, 2016 Report Share Posted October 4, 2016 Somente pra efeito de informação. Existe este mesmo problema na classe pra quem tentar gerar nota fiscal de importação A parte onde são inseridas as adições tem o mesmo erro, não inclui as varias possíveis adições somente uma por produto. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.