Jump to content
Fivewin Brasil

tag Pag na nfce com erro


JUDSON ROSA

Recommended Posts

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 )
 

 

Link to comment
Share on other sites

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 ????

Link to comment
Share on other sites

	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>
	

Link to comment
Share on other sites

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  

Link to comment
Share on other sites

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 )

 

 

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...