Ir para conteúdo
  • Cadastre-se

newtongaucho

Membros
  • Total de ítens

    12
  • Registro em

  • Última visita

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

newtongaucho's Achievements

Apprentice

Apprentice (3/14)

  • First Post
  • Collaborator Rare
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

0

Reputação

  1. pessoal, teoricamente hoje seria o dia de inicio da NT 2015/001 mas no RS estou recebendo a inforação "TP EVENTO INVALIDO" e em SP esta apresentando erro de schema. existe alguém que teve a solicitação autorizada? (off) so para seguir o topic
  2. Preciso saber o endereço para consulta do Danfe em do Pará, alguém poderia me ajudar?
  3. Vou tentar atualizar.. Eu não estou usando a capcon e sim o openssl.. Vou atualizar os fontes vamos ver no que dah.. Obrigado a todos
  4. Oi Regis, a resposta é branca.. ou seja não retorna nada.. o XML que estou tentando enviar é o seguinte 31140733621384004610550010002141941755782910-NFe.xml
  5. Oi Regis, a resposta é branca.. ou seja não retorna nada.. o XML que estou tentando enviar esta em anexo.. valeu pela ajuda
  6. Caros, estou tentando enviar NF-e para MG em homologação mas não obtenho resposta. alguém tem uma luz do que pode ser?
  7. newtongaucho

    Nfc-E Nota Conjugada

    Pessoal, recentemente precisei fazer a NFC conjugada e encontrei alguns problemas que devemos corrigir todos os problemas estão nos arquivos PCNNFEW.pas. as alterações que fiz marquei com //newton procedure TNFeW.GerarTotalISSQNtot; begin if (nfe.Total.ISSQNtot.vServ > 0) or (nfe.Total.ISSQNtot.vBC > 0) or (nfe.Total.ISSQNtot.vISS > 0) or (nfe.Total.ISSQNtot.vPIS > 0) or (nfe.Total.ISSQNtot.vCOFINS > 0) then begin Gerador.wGrupo('ISSQNtot', 'W17'); Gerador.wCampo(tcDe2, 'W18', 'vServ ', 01, 15, 0, nfe.Total.ISSQNtot.vServ, DSC_VSERV); Gerador.wCampo(tcDe2, 'W19', 'vBC ', 01, 15, 0, nfe.Total.ISSQNtot.vBC, DSC_VBC); Gerador.wCampo(tcDe2, 'W20', 'vISS ', 01, 15, 0, nfe.Total.ISSQNtot.vISS, DSC_VISS); Gerador.wCampo(tcDe2, 'W21', 'vPIS ', 01, 15, 0, nfe.Total.ISSQNtot.vPIS, DSC_VPIS); Gerador.wCampo(tcDe2, 'W22', 'vCOFINS ', 01, 15, 0, nfe.Total.ISSQNtot.vCOFINS, DSC_VCOFINS); if nfe.infNFe.Versao >= 3.10 then begin //newton o manual esta errado, na realidade a DCompet deve ser no formato YYYY-MM-DD e não YYYYMMDD Gerador.wCampo(tcStr, 'W22a', 'dCompet ', 10, 10, 1, FormatDateTime('YYYY-MM-DD', nfe.Total.ISSQNtot.dCompet), DSC_DCOMPET); Gerador.wCampo(tcDe2, 'W22b', 'vDeducao ', 01, 15, 0, nfe.Total.ISSQNtot.vDeducao, DSC_VDEDUCAO); // Gerador.wCampo(tcDe2, 'W22c', 'vINSS ', 01, 15, 0, nfe.Total.ISSQNtot.vINSS, DSC_VINSS); // Gerador.wCampo(tcDe2, 'W22d', 'vIR ', 01, 15, 0, nfe.Total.ISSQNtot.vIR, DSC_VIR); // Gerador.wCampo(tcDe2, 'W22e', 'vCSLL ', 01, 15, 0, nfe.Total.ISSQNtot.vCSLL, DSC_VCSLL); Gerador.wCampo(tcDe2, 'W22c', 'vOutro ', 01, 15, 0, nfe.Total.ISSQNtot.vOutro, DSC_VOUTRODED); Gerador.wCampo(tcDe2, 'W22d', 'vDescIncond ', 01, 15, 0, nfe.Total.ISSQNtot.vDescIncond, DSC_VDESCINCOND); Gerador.wCampo(tcDe2, 'W22e', 'vDescCond ', 01, 15, 0, nfe.Total.ISSQNtot.vDescCond, DSC_VDESCCOND); // Gerador.wCampo(tcStr, 'W22i', 'indISSRet ', 01, 01, 1, indISSRetToStr( nfe.Total.ISSQNtot.indISSRet ) , DSC_INDISSRET); // Gerador.wCampo(tcStr, 'W22j', 'indISS ', 01, 01, 1, indISSToStr( nfe.Total.ISSQNtot.indISS ) , DSC_INDISS); // Gerador.wCampo(tcStr, 'W22k', 'cServico ', 01, 20, 0, nfe.Total.ISSQNtot.cServico , DSC_CSERVICO); // Gerador.wCampo(tcInt, 'W22l', 'cMun ', 01, 07, 0, nfe.Total.ISSQNtot.cMun, DSC_CMUN); // Gerador.wCampo(tcInt, 'W22m', 'cPais ', 01, 04, 0, nfe.Total.ISSQNtot.cPais, DSC_CPAIS); // Gerador.wCampo(tcStr, 'W22n', 'nProcesso ', 01, 30, 0, nfe.Total.ISSQNtot.nProcesso , DSC_NPROCESSO); // Italo Gerador.wCampo(tcDe2, 'W22f', 'vISSRet ', 01, 15, 0, nfe.Total.ISSQNtot.vISSRet, DSC_VISSRET); Gerador.wCampo(tcStr, 'W22g', 'cRegTrib ', 01, 01, 1, RegTribISSQNToStr( nfe.Total.ISSQNtot.cRegTrib ) , DSC_CREGTRIB); // Gerador.wCampo(tcStr, 'W22p', 'indIncentivo', 01, 01, 1, indIncentivoToStr( nfe.Total.ISSQNtot.indIncentivo ) , DSC_INDINCENTIVO); end; Gerador.wGrupo('/ISSQNtot'); end; end; Como na versão 3.1 não existe mais a obrigatoriedade da cSitTrib no ISSQN, devemos corrigir a rotina abaixo: procedure TNFeW.GerarDetImposto(const i: integer); // Rotina melhorada por // Newton Oliveira - > [email protected] begin Gerador.wGrupo('imposto', 'M01'); Gerador.wCampo(tcDe2, 'M02', 'vTotTrib ', 01, 15, 0, nfe.Det[i].Imposto.vTotTrib, DSC_VTOTTRIB); //newton o campo cSitTrib não é mais obrigatório na versõo 3.1 if nfe.Det[i].Imposto.ISSQN.cSitTrib <> ISSQNcSitTribVazio then begin (**)GerarDetImpostoISSQN(i); if NFe.infNFe.Versao >= 3 then (**)GerarDetImpostoIPI(i); end else begin //newton se tiver ISSQN não pode ter a tag ICMS. isto acontece no caso de NFC //conjugada if (nfe.Det[i].Imposto.ISSQN.vBC > 0) or (nfe.Det[i].Imposto.ISSQN.vAliq > 0) or (nfe.Det[i].Imposto.ISSQN.vISSQN > 0) or (nfe.Det[i].Imposto.ISSQN.cMunFG > 0) or (nfe.Det[i].Imposto.ISSQN.cListServ <> '') then begin (**)GerarDetImpostoISSQN(i); (**)GerarDetImpostoIPI(i); end else begin (**)GerarDetImpostoICMS(i); (**)GerarDetImpostoIPI(i); (**)GerarDetImpostoII(i); end; end; (**)GerarDetImpostoPIS(i); (**)GerarDetImpostoPISST(i); (**)GerarDetImpostoCOFINS(i); (**)GerarDetImpostoCOFINSST(i); Gerador.wGrupo('/imposto'); end;
  8. Estou tentando enviar o evento de cancelamento e esta retornando uma exceção com a mensagem em branco.. alguém ja passou por este problema?
  9. Pessoal, estou utilizando a versão do FastReport e em contingencia fsda, mas quando o componente gera o pdf a geração é feita sem um nome de arquivo somente com a extensão .pdf Alguém saberia me dar um luz a respeito?
  10. Pessoal, estou com um erro na tag de combustiveis(unit pcnNFeR), a Tag L120 esta pegando os valores errados. A geração da Tag L120 esta assim function TNFeR.LerXml: boolean; (* Grupo da TAG *) if Leitor.rExtrai(3, 'comb') <> '' then begin (*L102*)NFe.Det[i].Prod.comb.cProdANP := Leitor.rCampo(tcInt, 'cProdANP'); (*L103*)NFe.Det[i].Prod.comb.CODIF := Leitor.rCampo(tcEsp, 'CODIF'); (*L104*)NFe.Det[i].Prod.comb.qTemp := Leitor.rCampo(tcDe4, 'qTemp'); if Leitor.rExtrai(4, 'CIDE') <> '' then begin (*L106*)NFe.Det[i].Prod.comb.CIDE.qBCprod := Leitor.rCampo(tcDe4, 'qBCprod'); (*L107*)NFe.Det[i].Prod.comb.CIDE.vAliqProd := Leitor.rCampo(tcDe4, 'vAliqProd'); (*L108*)NFe.Det[i].Prod.comb.CIDE.vCIDE := Leitor.rCampo(tcDe2, 'vCIDE'); end; if Leitor.rExtrai(4, 'ICMSComb') <> '' then begin (*L110*)NFe.Det[i].Prod.comb.ICMS.vBCICMS := Leitor.rCampo(tcDe2, 'vBCICMS'); (*L111*)NFe.Det[i].Prod.comb.ICMS.vICMS := Leitor.rCampo(tcDe2, 'vICMS'); (*L112*)NFe.Det[i].Prod.comb.ICMS.vBCICMSST := Leitor.rCampo(tcDe2, 'vBCICMSST'); (*L113*)NFe.Det[i].Prod.comb.ICMS.vICMSST := Leitor.rCampo(tcDe2, 'vICMSST'); end; if Leitor.rExtrai(4, 'ICMSInter') <> '' then begin (*L115*)NFe.Det[i].Prod.comb.ICMSInter.vBCICMSSTDest := Leitor.rCampo(tcDe2, 'vBCICMSSTDest'); (*L116*)NFe.Det[i].Prod.comb.ICMSInter.vICMSSTDest := Leitor.rCampo(tcDe2, 'vICMSSTDest'); end; if Leitor.rExtrai(4, 'ICMSCons') <> '' then begin (*L118*)NFe.Det[i].Prod.comb.ICMSCons.vBCICMSSTCons := Leitor.rCampo(tcDe2, 'vBCICMSSTCons'); (*L119*)NFe.Det[i].Prod.comb.ICMSCons.vICMSSTCons := Leitor.rCampo(tcDe2, 'vICMSSTCons'); end; (*L120*)NFe.Det[i].Prod.comb.ICMSCons.UFcons := Leitor.rCampo(tcStr, 'UFcons'); end; e Deveria estar assim: (* Grupo da TAG *) if Leitor.rExtrai(3, 'comb') <> '' then begin (*L102*)NFe.Det[i].Prod.comb.cProdANP := Leitor.rCampo(tcInt, 'cProdANP'); (*L103*)NFe.Det[i].Prod.comb.CODIF := Leitor.rCampo(tcEsp, 'CODIF'); (*L104*)NFe.Det[i].Prod.comb.qTemp := Leitor.rCampo(tcDe4, 'qTemp'); (*L120*)NFe.Det[i].Prod.comb.ICMSCons.UFcons := Leitor.rCampo(tcStr, 'UFcons'); if Leitor.rExtrai(4, 'CIDE') <> '' then begin (*L106*)NFe.Det[i].Prod.comb.CIDE.qBCprod := Leitor.rCampo(tcDe4, 'qBCprod'); (*L107*)NFe.Det[i].Prod.comb.CIDE.vAliqProd := Leitor.rCampo(tcDe4, 'vAliqProd'); (*L108*)NFe.Det[i].Prod.comb.CIDE.vCIDE := Leitor.rCampo(tcDe2, 'vCIDE'); end; if Leitor.rExtrai(4, 'ICMSComb') <> '' then begin (*L110*)NFe.Det[i].Prod.comb.ICMS.vBCICMS := Leitor.rCampo(tcDe2, 'vBCICMS'); (*L111*)NFe.Det[i].Prod.comb.ICMS.vICMS := Leitor.rCampo(tcDe2, 'vICMS'); (*L112*)NFe.Det[i].Prod.comb.ICMS.vBCICMSST := Leitor.rCampo(tcDe2, 'vBCICMSST'); (*L113*)NFe.Det[i].Prod.comb.ICMS.vICMSST := Leitor.rCampo(tcDe2, 'vICMSST'); end; if Leitor.rExtrai(4, 'ICMSInter') <> '' then begin (*L115*)NFe.Det[i].Prod.comb.ICMSInter.vBCICMSSTDest := Leitor.rCampo(tcDe2, 'vBCICMSSTDest'); (*L116*)NFe.Det[i].Prod.comb.ICMSInter.vICMSSTDest := Leitor.rCampo(tcDe2, 'vICMSSTDest'); end; if Leitor.rExtrai(4, 'ICMSCons') <> '' then begin (*L118*)NFe.Det[i].Prod.comb.ICMSCons.vBCICMSSTCons := Leitor.rCampo(tcDe2, 'vBCICMSSTCons'); (*L119*)NFe.Det[i].Prod.comb.ICMSCons.vICMSSTCons := Leitor.rCampo(tcDe2, 'vICMSSTCons'); end; end;
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...