reij

Boa Noite amigos tenho uma duvida que é a seguinte Tenho um manifestador de notas fiscais então criei uma rotina que faz manifestação em massa ela funciona muito bem so que tenho visto que manifesto no máximo 20 nfes por vez, então vem a pergunta xiste um limite de manifestação? posso manifetar algo de 100 ou duzentas noas por vez? desde ja grato pela ajuda

estava funcionando até agora apouco porem retorno o mesmo erro se alguém tentar fazer algum tipo de consulta em outro aplicativo vai dar erro vai dar erro no nsu por isso a pergunta a sintaxe acima não recupera o ultimo nsu não?

boa tarde a todos como se captura o ultimo nsu estou tentando assim mais esta dando erro ultNSU := '0'; ultNSU := dm.ACBrNFe1.WebServices.ConsNFeDest.retConsNFeDest.ultNSU; DM.empresa2.Edit; dm.empresa2ULTNSU.AsString := ultNSU; DM.empresa2.ApplyUpdates(0); mais ta dando esse erro consumo indevido deve ser utilizado o ultimo nsu nas solicitações subsequentes..... Desde ja grato pela ajuda

acabei de atualizar e continua dando o mesmo erro |Não to entendendo mais nada olha o xmlgerado e continua dando falha noschema xml <?xml version="1.0" encoding="UTF-8"?><consMDFeNaoEnc xmlns="http://www.portalfiscal.inf.br/mdfe" versao="1.00"><tpAmb>2</tpAmb><xServ>CONSULTAR NÃO ENCERRADOS</xServ><CNPJ>11164248000104</CNPJ></consMDFeNaoEnc> o problema do texto não acentuado foi resolvido porem o erro persiste alguem teria alguma ideia de como resolver

mesmo erro Ítalo

boa tarde a todos estou precisando da ajuda dos amigos pra sabero que estou fazendo de errado nessa sintaxe pq sempre da o erro falha no schema xml ACBrMDFe1.Manifestos.Clear; ACBrMDFe1.Configuracoes.Geral.RetirarAcentos := False; ACBrMDFe1.ConsultarMDFeNaoEnc(dm.EmpresaCNPJ.AsString); desde ja grato pela ajuda

ja resolvi muito obrigado atodos

ele simplesmente não recebe nenhum tipo de rodado e se colocar um so sem as estruturas condicionais funciona por falar nisso ele tem um typecast me ensina como usa-lo pq assim não vou precisar da estrutura condicional if..then..else

Gente alguém sabe dizer porque ta acontecendo este erro // TpcteTipoRodado = (trNaoAplicavel, trTruck, trToco, trCavaloMecanico, trVAN, trUtilitario, trOutros); // Para o MDF-e não utilizar o trNaoAplicavel. dm.PesqGeral.Close; dm.sqlPesqGeral.CommandText := 'SELECT * FROM VEICULOS WHERE CODVEIC = :PVU'; dm.SqlPesqGeral.Params.ParamByName('PVU').AsInteger :=ManifCOD_VEICULO.AsInteger; dm.PesqGeral.Open; if dm.PesqGeral.FieldByName('TIPO_VEIC').AsString = 'K' then Begin rodo.veicTracao.tpRod := trTruck; End else if dm.PesqGeral.FieldByName('TIPO_VEIC').AsString = 'T' then // Begin //trTruck, trToco, trCavaloMecanico, trVAN, trUtilitario, trOutros rodo.veicTracao.tpRod := trToco; // End // else if dm.PesqGeral.FieldByName('TIPO_VEIC').AsString = 'C' then // Begin rodo.veicTracao.tpRod := trCavaloMecanico; // End // else if dm.PesqGeral.FieldByName('TIPO_VEIC').AsString = 'V' then // Begin rodo.veicTracao.tpRod := trVAN; // End // else if dm.PesqGeral.FieldByName('TIPO_VEIC').AsString = 'U' then // Begin rodo.veicTracao.tpRod := trUtilitario; // End // else if dm.PesqGeral.FieldByName('TIPO_VEIC').AsString = 'O' then // Begin rodo.veicTracao.tpRod := trOutros; // End; o componente não consegue gravar estes valores de jeito nenhum joga sempre pra 00 e ai não existe tipo de rodado não aplicável pra mdfe alguém teria alguma idceia de como resolver isto desde ja grato pela ajuda

ja resolvi esta questão gente o que ta pegando agora é o seguinte no final da operação da erro dizendo que o caminho da arquivo de impressão não esta associado e quando tento setar o caminho no componente do fastreport da accessviolation alguem teria alguma ideia de como resolver isto estou usando o seattle

bom dia a todos estou tendo o seguinte problema ao gerar cte -<infDoc> -<infMunDescarga> <cMunDescarga>1702109</cMunDescarga> <xMunDescarga>ARAGUAINA</xMunDescarga> -<infNFe> <chNFe>17110606971716000112550010000000071000000070</chNFe> -<infUnidTransp> <tpUnidTransp>1</tpUnidTransp> <idUnidTransp>MVC0001</idUnidTransp> </infUnidTransp> </infNFe> -<infNFe> <chNFe>17110606971716000112550010000000071000000070</chNFe> -<infUnidTransp> <tpUnidTransp>2</tpUnidTransp> <idUnidTransp>MVC0011</idUnidTransp> </infUnidTransp> </infNFe> </infMunDescarga> </infDoc> como vcs podem ver ele esta gerando a mesma chave tanto para rodotração como para rodoreboque gostaria de saber dos amigos como isso funciona o veiculo é um carreta scania portanto qual das 2 unidades devem setar as chaves nfe desde ja grato pela ajuda

Gente alguém tem como me tirar uma duvida estou com o seguinte cenario empresa que transporta = empresa dona do veiculo com sede em tocantins emitente = empresa dona do veiculo com sede em tocantins remetente = fornecedor em goiás destinatário = a própria empresa que transporta ou outra do grupo no estado de tocantins então! origem mercadoria = goias destino mercadoria = tocantins empresa emitente cte = tocantins destinatário = tocantins recebedor = tocantins cte com tipo de emissão normal=0 estou usando o cfop 5353 ou 6353 o sistema me diz pra usar 5932 ou 6932 se usar 5932 da cfop invalidopra operação se usar 6932 da cnpj emitente não cadstrado e agora qual cnpj usar?

Boa tarde a todos estou comum pequeno problema na hora de assinar a cte ta sempre me retornando este erro Numero dce Série do Certificado digital não especificado e tenho as seguintes configurações procedure TF_FormCte.configuracoes; begin dm.empresa.Locate('CODEMP', F_Principal.lblcod.Caption,[]); Dm.Acbrcte1.conhecimentos.Clear;//tentaiva de resolver o problema if dm.empresaTP_AMB_NFE.AsString = '1' then begin dm.ACBrCte1.Configuracoes.WebServices.Ambiente := taProducao; end else if dm.empresaTP_AMB_NFE.AsString = '2' then begin dm.ACBrCte1.Configuracoes.WebServices.Ambiente := taHomologacao; end; //=======salva ou não salva if dm.empresaSALVA_XML.AsString = 'S' then begin dm.ACBrCTe1.Configuracoes.Geral.Salvar := True; end else if dm.empresaSALVA_XML.AsString = 'N' then begin dm.ACBrCTe1.Configuracoes.Geral.Salvar := False; end; //=======fimde salva ou não salva dm.ACBrCTe1.Configuracoes.Certificados.Senha := trim(dm.EmpresaSENHA_CERT.AsString); dm.ACBrCTe1.Configuracoes.Certificados.NumeroSerie := trim(dm.EmpresaNUMSERIE_CERT.AsString);*********************** dm.ACBrCTe1.Configuracoes.Arquivos.PathSalvar := dm.EmpresaCAMINHOXML.AsString; dm.ACBrCTe1.Configuracoes.WebServices.UF := dm.EmpresaUF_WEBSERVER.AsString; dm.ACBrCTe1.Configuracoes.WebServices.ProxyHost := dm.EmpresaHOST_PROXY.AsString; dm.ACBrCTe1.Configuracoes.WebServices.ProxyPort := dm.EmpresaPORTA_PROXY.AsString; dm.ACBrCTe1.Configuracoes.WebServices.ProxyUser := dm.EmpresaUSER_PROXY.AsString; dm.ACBrCTe1.Configuracoes.WebServices.ProxyPass := dm.EmpresaSENHA_PROXY.AsString; end; e para gerar e assinar o cte uso esse comando procedure TF_FormCte.btnGerarClick(Sender: TObject); var vAux : String; begin configuracoes; vaux := IntToStr(dm.CteNUM_CTE.AsInteger); ACBrCTe1.Conhecimentos.Clear; GerarCTe(vAux); ACBrCTe1.Conhecimentos.Assinar;//o erro ocorre aqui ACBrCTe1.Conhecimentos.Items[0].GravarXML; desde já gratopela ajuda end;

Gente ta dando erro de index out of bounds nessa rotina var mensagem : Tstrings; Assunto,Endereco : string; begin inherited; try ACBrCTe1.Conhecimentos.Clear; // ACBrCTe1.Conhecimentos.LoadFromFile('C:\AdminDfe\Xml\teste.xml'); Assunto:= 'enviando Email teste'; Mensagem:=TstringList.Create; endereco:= dbedit28.text; mensagem.Add('Cte Emitida'); Assunto := 'Email Teste'; ACBrMail1.Host := DbEdit15.Text; ACBrMail1.Port := DbEdit27.Text; ACBrMail1.Username := dbedit28.Text; ACBrMail1.Password := dm.EmpresaSENHA_EMAIL_EMIT.AsString; ACBrMail1.From := dbedit28.Text; ACBrMail1.SetSSL := true;//cbEmailSSL.Checked; ACBrMail1.ReadingConfirmation := False; ACBrMail1.UseThread := False; ACBrCTe1.Conhecimentos.Items[0].EnviarEmail(endereco , Assunto , mensagem , False //Enviar PDF junto , nil //Lista com emails que serão enviado cópias - TStrings , nil // Lista de anexos - TStrings ); mensagem.Free; showmessage('Email enviado com sucesso'); except on e: exception do begin showmessage('Erro ao enviar e-mail, verifique endereço ou configurações'+#13+ e.Message); end; end; end; alguém teria alguma ideia do que pode estar errado Desde ja grato pela ajuda

obrigado regys vou verificar, e esfregar isto nas fuças do sujeito(rsrsrsrs) valeu mesmo

Bom dia a todos presto serviço para uma rede de postos que sua sistema da empresa Rezende sistemas que hoje pertence a linx e constatei que hoje 11/02/2015 a rede que presto serviço ainda usa layout contendo somente o valor total dos impostos e não a discriminação dos impostos federais, estaduais e municipais, porém ao entrar em contato com o suporte os caras simplesmente não sabiam nada de nada do assunto pediram pra que eu entre em contato com o depto fiscal da empresa e ao entrar em contato com o funcionário ele simplesmente falou que não tinha muito problema que poderia continuar dessa forma que poderia simplesmente afixar cartazes se fosse o caso porem no manual diz que no dia 03/02/2015 nem os cartazes seriam mais permitido, ja cansei de falar com ele sobre isso porque mandei o link do site do regys falando sobre o assunto e o manual de olho no imposto em anexo e mesmo assim ele esta se apegando a um texto do diário oficial onde não tem nem prazo de vigência da lei alguem sbe de alguma coisa que seja definitiva sobre o caso seja nota no diario oficial ou portaria nas sefaz estaduais porque não pretendo levar esta discussão inutil a frente, quero matar esta historia agora porque estamos correndo riscos de sermos multado pelo menos penso assim e quero nos resguardar deta situação Regys gostaria muito da sua opinião uma vez que o funcionário veio com o diário oficial número 192 de 06/10/2014 que fala sobre a disposição de cartazes no estabelecimento o que vc me diz sobre o caso desde ja grato pela ajuda

tinha um cliente que dava esse tipo de pau direto ele usava email do yahoo então criei um email no gmail pra ele usar este envio de nots fiscais e nunca mais deu problemas

Gente muito obrigado pela ideia, problema resolvido e a solução foi basicamente deletar tudo que tivesse a ver com acbr e reinstalar e compilar tudo junto com a pasta nova do acbr veio também a pasta nova de schemas eque repassei pro cliente e funcionou graças a Deus. obrigado mesmo aos amigos pela ajuda

uai o Cadastro especifico no inss não é usado basicamente pra obras, aqui na empresa que trabalho tem uma cei ativa no momento para a construção de um posto novo

e fazendo analize dos outros xml descobri que o arquivo .pro-rec.xml esta em branco alguém pode me dar um a ideia do que pode ser este problema

<?xml version="1.0"?> -<NFe xmlns="http://www.portalfiscal.inf.br/nfe"> -<infNFe Id="NFe17140806971716000112550010000012081000012065" versao="2.00"> -<ide> <cUF>17</cUF> <cNF>00001206</cNF> <natOp>Venda de mercadoria adquirida ou recebida de terceiros</natOp> <indPag>1</indPag> <mod>55</mod> <serie>1</serie> <nNF>1208</nNF> <dEmi>2014-08-23</dEmi> <dSaiEnt>2014-08-23</dSaiEnt> <hSaiEnt>09:51:18</hSaiEnt> <tpNF>1</tpNF> <cMunFG>1702109</cMunFG> <tpImp>1</tpImp> <tpEmis>1</tpEmis> <cDV>5</cDV> <tpAmb>1</tpAmb> <finNFe>1</finNFe> <procEmi>0</procEmi> <verProc>1.0.0.0</verProc> </ide> -<emit> <CNPJ>06971716000112</CNPJ> <xNome>MARCOS A. DE OLIVERA CIA LTDA</xNome> <xFant>NORTE MAQUINAS</xFant> -<enderEmit> <xLgr>AVENIDA CONEGO JOAO LIMA</xLgr> <nro>961</nro> <xBairro>VILA ROSARIO</xBairro> <cMun>1702109</cMun> <xMun>ARAGUAINA</xMun> <UF>TO</UF> <CEP>77823010</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> <fone>6334111474</fone> </enderEmit> <IE>293812675</IE> <CRT>1</CRT> </emit> -<dest> <CPF>43450911600</CPF> <xNome>MARIA DE LOURDES NEVES ADRIANO</xNome> -<enderDest> <xLgr>FAZENDA FLOR DAMATO TO 164 A ESQUERDA 6 KM</xLgr> <nro>S/N</nro> <xBairro>ZANA RURAL</xBairro> <cMun>1703883</cMun> <xMun>CARMOLaNDIA</xMun> <UF>TO</UF> <CEP>77840000</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> <fone>6392498121</fone> </enderDest> <IE/> </dest> -<det nItem="1"> -<prod> <cProd>242</cProd> <cEAN/> <xProd>ROLAMENTO MS 281/288/395</xProd> <NCM>84821090</NCM> <CFOP>5102</CFOP> <uCom>PC</uCom> <qCom>2.0000</qCom> <vUnCom>26.0000000000</vUnCom> <vProd>52.00</vProd> <cEANTrib/> <uTrib>PC</uTrib> <qTrib>2.0000</qTrib> <vUnTrib>26.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>16.42</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="2"> -<prod> <cProd>1184</cProd> <cEAN/> <xProd>JOGO DE JUNTA MS 08 STIHL</xProd> <NCM>84849000</NCM> <CFOP>5102</CFOP> <uCom>PC</uCom> <qCom>1.0000</qCom> <vUnCom>25.0000000000</vUnCom> <vProd>25.00</vProd> <cEANTrib/> <uTrib>PC</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>25.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>7.89</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="3"> -<prod> <cProd>1192</cProd> <cEAN/> <xProd>RETENTOR 15X35X7 MS 08 STIHL</xProd> <NCM>40169300</NCM> <CFOP>5102</CFOP> <uCom>PC</uCom> <qCom>2.0000</qCom> <vUnCom>10.0000000000</vUnCom> <vProd>20.00</vProd> <cEANTrib/> <uTrib>PC</uTrib> <qTrib>2.0000</qTrib> <vUnTrib>10.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>10.44</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="4"> -<prod> <cProd>371</cProd> <cEAN/> <xProd>FILTRO DE GAS LAN MS 038/066/051/360 STIHIL</xProd> <NCM>84212990</NCM> <CFOP>5102</CFOP> <uCom>PC</uCom> <qCom>1.0000</qCom> <vUnCom>10.0000000000</vUnCom> <vProd>10.00</vProd> <cEANTrib/> <uTrib>PC</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>10.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>2.63</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="5"> -<prod> <cProd>582</cProd> <cEAN/> <xProd>POLIA DE PARTIDA NYLON MS 08/051/NOVAS</xProd> <NCM>84835010</NCM> <CFOP>5102</CFOP> <uCom>PC</uCom> <qCom>1.0000</qCom> <vUnCom>12.0000000000</vUnCom> <vProd>12.00</vProd> <cEANTrib/> <uTrib>PC</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>12.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>3.79</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="6"> -<prod> <cProd>1844</cProd> <cEAN/> <xProd>VIRABREQUIM ALFAERRE MS 08/P-835/P-840 VIPECAS</xProd> <NCM>84831019</NCM> <CFOP>5102</CFOP> <uCom>UND</uCom> <qCom>1.0000</qCom> <vUnCom>198.0000000000</vUnCom> <vProd>198.00</vProd> <cEANTrib/> <uTrib>UND</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>198.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>55.59</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="7"> -<prod> <cProd>646</cProd> <cEAN/> <xProd>SILENCIOSO SURDINA MS 08</xProd> <NCM>84679100</NCM> <CFOP>5102</CFOP> <uCom>PC</uCom> <qCom>1.0000</qCom> <vUnCom>33.0000000000</vUnCom> <vProd>33.00</vProd> <cEANTrib/> <uTrib>PC</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>33.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>9.84</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<det nItem="8"> -<prod> <cProd>1309</cProd> <cEAN/> <xProd>CILINDRO CPL DIAM 47MM MS 08 STIHL</xProd> <NCM>84099190</NCM> <CFOP>5102</CFOP> <uCom>UND</uCom> <qCom>1.0000</qCom> <vUnCom>200.0000000000</vUnCom> <vProd>200.00</vProd> <cEANTrib/> <uTrib>UND</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>200.0000000000</vUnTrib> <indTot>1</indTot> </prod> -<imposto> <vTotTrib>57.04</vTotTrib> -<ICMS> -<ICMSSN102> <orig>0</orig> <CSOSN>102</CSOSN> </ICMSSN102> </ICMS> -<IPI> <cEnq>999</cEnq> -<IPITrib> <CST>99</CST> <vBC>0.00</vBC> <pIPI>0.00</pIPI> <vIPI>0.00</vIPI> </IPITrib> </IPI> -<PIS> -<PISOutr> <CST>99</CST> <vBC>0.00</vBC> <pPIS>0.00</pPIS> <vPIS>0.00</vPIS> </PISOutr> </PIS> -<COFINS> -<COFINSOutr> <CST>99</CST> <vBC>0.00</vBC> <pCOFINS>0.00</pCOFINS> <vCOFINS>0.00</vCOFINS> </COFINSOutr> </COFINS> </imposto> </det> -<total> -<ICMSTot> <vBC>0.00</vBC> <vICMS>0.00</vICMS> <vBCST>0.00</vBCST> <vST>0.00</vST> <vProd>550.00</vProd> <vFrete>0.00</vFrete> <vSeg>0.00</vSeg> <vDesc>0.00</vDesc> <vII>0.00</vII> <vIPI>0.00</vIPI> <vPIS>0.00</vPIS> <vCOFINS>0.00</vCOFINS> <vOutro>0.00</vOutro> <vNF>550.00</vNF> <vTotTrib>163.67</vTotTrib> </ICMSTot> </total> -<transp> <modFrete>0</modFrete> -<vol> <qVol>0</qVol> </vol> </transp> -<cobr> -<dup> <nDup>1976/1</nDup> <dVenc>2014-08-23</dVenc> <vDup>550.00</vDup> </dup> </cobr> -<infAdic> <infCpl>Valor aprox. dos Tributos R$ 163,67(29,75%)Fonte IBPT</infCpl> -<obsCont xCampo="ObsCont"> <xTexto>texto</xTexto> </obsCont> -<obsFisco xCampo="ObsFisco"> <xTexto>Empresa Optante pelo simples nao Transfere Credito de ICMS</xTexto> </obsFisco> </infAdic> </infNFe> -<Signature xmlns="http://www.w3.org/2000/09/xmldsig#"> -<SignedInfo> <CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> <SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/> -<Reference URI="#NFe17140806971716000112550010000012081000012065"> -<Transforms> <Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/> <Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> </Transforms> <DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/> <DigestValue>outu6QNCAXJ2MLOuEIYJODy7/Fg=</DigestValue> </Reference> </SignedInfo> <SignatureValue>LRiclFXcvBvyijRMnDbSq6xbSmnxEbLVcHoZRM9yXpV/uOoKCEgfx/2FFgIRP0v3rjyuzUHhmI0s/sgvDGcxdlCSKojlt59fjqBdGFb3OpVFdlnj81RGmO8JgxbjbzJlrz0oFl2wvFa5HiKFYQxWVKP1wFBkJwezr8U7tWQZO2c6roijjgw/Q9D8I/un4x4CTXv8bJLmhAAW8v8BxHPucjXKl7BOCTXjd9QwfhMx5LJtMii2sMJ0zbot/G+zJBMXySgI7buzAn7x9RyiPuUv+F7Es7vEvC9VZ2Z598Jr0sHPtEF0MbfcQ9nOBudeNfxWgMgUGwns16kG5vAIptqZcA==</SignatureValue> -<KeyInfo> -<X509Data> <X509Certificate>MIIIBzCCBe+gAwIBAgIIfC7yC+AbgxAwDQYJKoZIhvcNAQELBQAwdTELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxNjA0BgNVBAsTLVNlY3JldGFyaWEgZGEgUmVjZWl0YSBGZWRlcmFsIGRvIEJyYXNpbCAtIFJGQjEZMBcGA1UEAxMQQUMgU0VSQVNBIFJGQiB2MjAeFw0xNDA1MTIxNTAwMDBaFw0xNzA1MTExNTAwMDBaMIHjMQswCQYDVQQGEwJCUjELMAkGA1UECBMCVE8xEjAQBgNVBAcTCUFSQUdVQUlOQTETMBEGA1UEChMKSUNQLUJyYXNpbDE2MDQGA1UECxMtU2VjcmV0YXJpYSBkYSBSZWNlaXRhIEZlZGVyYWwgZG8gQnJhc2lsIC0gUkZCMRYwFAYDVQQLEw1SRkIgZS1DTlBKIEEzMRIwEAYDVQQLEwlBUiBBR1VJQVIxOjA4BgNVBAMTMU1BUkNPUyBBIERFIE9MSVZFSVJBIEUgQ0lBIExUREEgTUU6MDY5NzE3MTYwMDAxMTIwggEiMA0GCSqGSIb3DQEBAQUAA4IBDwAwggEKAoIBAQC5Dc4DkrwF8BnmBpfR1se9HJuXGjKqTEMTJeadJIKwfmZTABjWOyJv1vhUNd/71ATncZauqt/OI4aXF1hThwJywky9g4hSn2OYuPi0aVVv6uIfxecKQkW6JJTe7efXmtS5fr/92Qg+lJjXRqvhzLAHkNJLAKzwpRQ7C4+10nAr9opK8o3MQhrnk7YNLiphMvlo8jwEYZfCZ0K82g2rbZlQicUgYTFa/5lyB+Tqc2QW7z7KWT36X+d3GiauA3JwGZfpCU9QFK/ulDPcgI7a7nWRQdAE1omm91S7tiw1gm7ZP1No3X4htMcamuI0LcnHsXSQPdNFnI3rsL5Ma5oRdfwLAgMBAAGjggMqMIIDJjCBmQYIKwYBBQUHAQEEgYwwgYkwSAYIKwYBBQUHMAKGPGh0dHA6Ly93d3cuY2VydGlmaWNhZG9kaWdpdGFsLmNvbS5ici9jYWRlaWFzL3NlcmFzYXJmYnYyLnA3YjA9BggrBgEFBQcwAYYxaHR0cDovL29jc3AuY2VydGlmaWNhZG9kaWdpdGFsLmNvbS5ici9zZXJhc2FyZmJ2MjAJBgNVHRMEAjAAMB8GA1UdIwQYMBaAFLKgxD1GnnzIhWwIHhAylGVGcEFzMHEGA1UdIARqMGgwZgYGYEwBAgMKMFwwWgYIKwYBBQUHAgEWTmh0dHA6Ly9wdWJsaWNhY2FvLmNlcnRpZmljYWRvZGlnaXRhbC5jb20uYnIvcmVwb3NpdG9yaW8vZHBjL2RlY2xhcmFjYW8tcmZiLnBkZjCB8wYDVR0fBIHrMIHoMEqgSKBGhkRodHRwOi8vd3d3LmNlcnRpZmljYWRvZGlnaXRhbC5jb20uYnIvcmVwb3NpdG9yaW8vbGNyL3NlcmFzYXJmYnYyLmNybDBEoEKgQIY+aHR0cDovL2xjci5jZXJ0aWZpY2Fkb3MuY29tLmJyL3JlcG9zaXRvcmlvL2xjci9zZXJhc2FyZmJ2Mi5jcmwwVKBSoFCGTmh0dHA6Ly9yZXBvc2l0b3Jpby5pY3BicmFzaWwuZ292LmJyL2xjci9TZXJhc2EvcmVwb3NpdG9yaW8vbGNyL3NlcmFzYXJmYnYyLmNybDAOBgNVHQ8BAf8EBAMCBeAwHQYDVR0lBBYwFAYIKwYBBQUHAwIGCCsGAQUFBwMEMIHDBgNVHREEgbswgbiBHE5PUlRFTUFRVUlOQVNAQlJUVVJCTy5DT00uQlKgJQYFYEwBAwKgHBMaTUFSQ09TIEFOVE9OSU8gREUgT0xJVkVJUkGgGQYFYEwBAwOgEBMOMDY5NzE3MTYwMDAxMTKgPQYFYEwBAwSgNBMyMTgwNDE5NjEyMTkzMDg1NjE3MjAwMDAwMDAwMDAwMDAwMDAwMDAxMjIxNDIxU1NQR0+gFwYFYEwBAwegDhMMMDAwMDAwMDAwMDAwMA0GCSqGSIb3DQEBCwUAA4ICAQB0bLe/Esyd1mmwz+ZIXpf3j/FZQKo5IRPTaxIlTiCunBelF4jjdh3+qLHBdpyDEtLYzSzWaQ1DInmwXDqUmuEaA6MhE3emmvNYhnCYujYJGgh+Yujf7WOG0fYBY43MythXwjUwxGdWrmkUVd6ZlqdxLLuVrKvKpdzgd5S5L9xITKKL8Wdr057enJb6n6GQpTZ7gHzqFNAHFQS8hkpyxfgJmijwVOwZdmsChMZLXIMqvKgy+si3Gpwo8xz3PEDcQv1GGp8coX+vvEXLox5j9+OQeXnmPiGgvLkA5bq8VQ3zu5SypUh51t2LgZxYKeMcc2K0zD/nx2YLPxnVj8O88poNRm2E03IaZ1eMMVF0g81Sir5kn41AuCld2N2C73sGoDV2+5WGFo/PGl57BBAhVHBWDO8dhcBfqsLw0rZNx6FCIAULrmEaRinGsu92+Q5G+70vwxp3rKrngAw3trCkwq2zfpLRXA9IWXN26e00NItWvAw8NMPPKfowDaSvueoUx/dhI/YxMxZFAIbK+X+3UketjLa3Lv3q5CeDaEr/cth1EBBk52fGIwOVvILx4muPniITZb8p3FJjqmpLbbWIOo8YWrmiy4KsnBBNtQEDD5ZsPT29dbzRfzBlHaqehEQIi3ao34OTguQ1acg4hajq8yFyFhJPZSUeVJw3OjPGvuPWbw==</X509Certificate> </X509Data> </KeyInfo> </Signature> </NFe>

meu problma é que da a mensagem de erro ao enviar e não envia nota fiscal, queria saber porque não esta enviando

Não Regis ta só vindo a mensagem de erro ao enviar nfe e não da retorno nenhum(que alias é uma mensagem que eu mesmo configurei mais não mostra o porque de não poder ser enviada)

desculpe é envio de nota fiscal eletrônica e sempre funcionou muito bem so que agora ta dando esse erro e não sei mais o que fazer para resolver pq não me da mensagem nenhuma de erro

pessoal alguém pode me dar tenho uma rotina de envio de email que sempre funcionou sem problemas mais agora ta me dando somente a mensagem de erro que configurei e o e.message não me retorna nada não sei mais o que fazer a sintaxe é a seguinte procedure TF_NFE.btntransmitirClick(Sender: TObject); var aChaveNfe, aRecibo, aProtocolo, Vnumlote, aimpr : String; vlote, vnumnota, sit : string; ps: integer; begin vlote := ''; vnumnota := ''; F_dmm.LoteNfe.Insert; f_dmm.LoteNfeNUMLOTE.AsInteger := F_dmm.inc_gen('GEN_LOTENFE_ID'); vNumLote := IntToStr(F_dmm.inc_gen('GEN_LOTENFE_ID')); f_dmm.LoteNfeDATAENVIO.AsDateTime := now; vlote := Vnumlote; vnumnota := IntToStr(f_nfe.CNfeNUMNOTA.AsInteger); // if CNfePATH_XML.AsString = '' then begin ShowMessage('Não existe arquivo xml assciado a esta noa'); Abort; end; vlote := FiltraNumero(vlote); if vlote = '' then begin ShowMessage('É necessário informar o numero do lote!'); Abort; end; try aChaveNfe := ''; aProtocolo := ''; aRecibo := ''; aimpr := ''; ps := null; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(CNfePATH_XML.AsString); // ACBrNFe1.DANFE.TipoDANFE := StrToTpImp(ok,'1'); // 1 = Retrato ACBrNFe1.Enviar(StrToInt(vlote)); // salva o retorno da nfe aChaveNfe := ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].chNFe; aProtocolo := ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt; aRecibo := ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec; aimpr := 'S'; ps := ACBrNFe1.WebServices.Retorno.cStat; // grava chave NFe if aChaveNfe <> '' then begin GravaChaveNFEPedido(aChaveNfe, aRecibo, aProtocolo, IntToStr(CNfeNUMNOTA.AsInteger), 'S','A', ps); end else begin showmessage('Chave Nfe em Branco') end; except on e: exception do begin ShowMessage('Erro ao enviar a NFe.Verifique! '+E.Message );//essa mensagem de erro é exibida no retorno so que o e: message vem vazio não sei mais o que fazer para pegar a mensagem de erro end; end; btnlocalizarClick(NIL); if CNfeCLI_EMAIL.AsString <> '' then begin EnviaEmmailNfe; end else showmessage('Este Cliente não possue email cadastrado, cadastre o email e depois envie pelo menu rotinas - enviar nfe por email') end; desde ja grato pela ajuda