Hetosoft Sistemas

O Cliente meu min mostrou um detalher, ele usar a opcao imprimir DANFE so que mirou para um xml de entrada um fornecedor dele, e saio a logmarca dele , ele imprimil a nota de entrada pos tinha somido a que veio com a mercadoria, pos o vendedor tava la para comfeir 3 produtos que veio errado, e vimos a logmarca dele na nota, resumindo como façor para quando quando o CNPJ da nota for diferente da Cliente, nao usar o Logo Marca ?

Existe Carta de Correção Eletrônica para para CT-e ACBRCTE ?

ja resolvir, mais vamos lar, no teste 7 pre homologacao clisitef pede para vc coloca data de vencimento invalida e depois cancela transacao, neste momento de cancelar a transacao em vem de aperta ESC apertei Alt+C pois coloquei &Cancelar no botao cancelar, ai trava tudo , mais tirei o &Cancelar e resolvir.

Tecla ALT fixada quando cancel em form ObterCampo, a tecla fica tipo pressionada, quando clico no botão #Cancel blz, mais quando apert alt+c a tecla alt fica pressionada e nada funciona, e a tecla ta ok o teclado é novo e já troquei de teclado alguém já passou por isso ?

NFS-e de Varzea Grande - MT Erro nao foi possivel carregar o arquivo Signature xmlns http//www.w3.org/2000/09/xmldsing SignedInfo canonicalizationMethod agorithm = http//www.w3.org/tr/2001/rec-xml-c14n-20010315 quando eu Gerar e Enviar NFSe sabendo que modifiquei o GerarNFSe(vNumRPS); ACBrNFSe1.NotasFiscais.Clear; with ACBrNFSe1 do begin NotasFiscais.NumeroLote:='0001'; with NotasFiscais.Add.NFSe do begin IdentificacaoRps.Numero := FormatFloat('#########0', StrToInt(NumNFSe)); // Para o provedor ISS.NET em ambiente de Homologação mudar a série para '8' IdentificacaoRps.Serie := '8'; // TnfseTipoRPS = ( trRPS, trNFConjugada, trCupom ); IdentificacaoRps.Tipo := trRPS; DataEmissao := Date; // TnfseNaturezaOperacao = ( noTributacaoNoMunicipio, noTributacaoForaMunicipio, noIsencao, noImune, noSuspensaDecisaoJudicial, noSuspensaProcedimentoAdministrativo ); NaturezaOperacao := noTributacaoNoMunicipio; // NaturezaOperacao := noTributacaoNoMunicipio51; // TnfseRegimeEspecialTributacao = ( retNenhum, retMicroempresaMunicipal, retEstimativa, retSociedadeProfissionais, retCooperativa, retMicroempresarioIndividual, retMicroempresarioEmpresaPP ); // RegimeEspecialTributacao := retNenhum; RegimeEspecialTributacao := retMicroempresaMunicipal; // TnfseSimNao = ( snSim, snNao ); OptanteSimplesNacional := snSim; // TnfseSimNao = ( snSim, snNao ); IncentivadorCultural := snSim; // TnfseSimNao = ( snSim, snNao ); // snSim = Ambiente de Produção // snNao = Ambiente de Homologação Producao := snNao; // TnfseStatusRPS = ( srNormal, srCancelado ); Status := srNormal; (* Usando quando o RPS for substituir outro RpsSubstituido.Numero := FormatFloat('#########0', i); RpsSubstituido.Serie := 'UNICA'; // TnfseTipoRPS = ( trRPS, trNFConjugada, trCupom ); RpsSubstituido.Tipo := trRPS; *) Servico.Valores.ValorServicos := 100.00; Servico.Valores.ValorDeducoes := 0.00; Servico.Valores.ValorPis := 0.00; Servico.Valores.ValorCofins := 0.00; Servico.Valores.ValorInss := 0.00; Servico.Valores.ValorIr := 0.00; Servico.Valores.ValorCsll := 0.00; // TnfseSituacaoTributaria = ( stRetencao, stNormal, stSubstituicao ); // stRetencao = snSim // stNormal = snNao Servico.Valores.IssRetido := stNormal; Servico.Valores.OutrasRetencoes := 0.00; Servico.Valores.DescontoIncondicionado := 0.00; Servico.Valores.DescontoCondicionado := 0.00; Servico.Valores.BaseCalculo := Servico.Valores.ValorServicos - Servico.Valores.ValorDeducoes - Servico.Valores.DescontoIncondicionado; Servico.Valores.Aliquota := 0.02; if Servico.Valores.IssRetido = stNormal then begin ValorISS := Servico.Valores.BaseCalculo * Servico.Valores.Aliquota; // A função RoundTo5 é usada para arredondar valores, sendo que o segundo // parametro se refere ao numero de casas decimais. // exemplos: RoundTo5(50.532, -2) ==> 50.53 // exemplos: RoundTo5(50.535, -2) ==> 50.54 // exemplos: RoundTo5(50.536, -2) ==> 50.54 Servico.Valores.ValorIss := RoundTo5(ValorISS, -2); Servico.Valores.ValorIssRetido := 0.00; end else begin ValorISS := Servico.Valores.BaseCalculo * Servico.Valores.Aliquota; Servico.Valores.ValorIss := 0.00; Servico.Valores.ValorIssRetido := RoundTo5(ValorISS, -2); end; Servico.Valores.ValorLiquidoNfse := Servico.Valores.ValorServicos - Servico.Valores.ValorPis - Servico.Valores.ValorCofins - Servico.Valores.ValorInss - Servico.Valores.ValorIr - Servico.Valores.ValorCsll - Servico.Valores.OutrasRetencoes - Servico.Valores.ValorIssRetido - Servico.Valores.DescontoIncondicionado - Servico.Valores.DescontoCondicionado; Servico.ItemListaServico := '1.05'; //'01.07'; // Para o provedor ISS.NET em ambiente de Homologação // o Codigo CNAE tem que ser '6511102' Servico.CodigoCnae := '6511102'; Servico.CodigoTributacaoMunicipio := '118879'; //Servico.CodigoCnae := '6202300'; // Informação Opcional //Servico.CodigoTributacaoMunicipio := '7221400'; //'118879'; Servico.Discriminacao := 'Aluguel de SoftWare'; //'discriminacao'; // Para o provedor ISS.NET em ambiente de Homologação // o Codigo do Municipio tem que ser '999' //Servico.CodigoMunicipio := edtCodCidade.Text; Servico.CodigoMunicipio :='999'; // Informar A Exigibilidade ISS para fintelISS [1/2/3/4/5/6/7] Servico.ExigibilidadeISS := exiExigivel; // Informar para Saatri Servico.CodigoPais := 1058; // Brasil Servico.MunicipioIncidencia := StrToIntDef(edtCodCidade.Text, 0); with Servico.ItemServico.Add do begin Descricao := 'SERVICO 1'; Quantidade := 1; ValorUnitario := 15.00; end; Prestador.Cnpj := edtEmitCNPJ.Text; Prestador.InscricaoMunicipal := edtEmitIM.Text; // Para o provedor ISSDigital deve-se informar também: Prestador.Senha := 'senha'; Prestador.FraseSecreta := 'frase secreta'; Prestador.cUF := 33; Tomador.IdentificacaoTomador.CpfCnpj := '03953552000102'; Tomador.IdentificacaoTomador.InscricaoMunicipal := '20370'; Tomador.RazaoSocial := 'NERY E ANDRADE NERY LTDA - ME'; Tomador.Endereco.Endereco := 'RUA PRINCIPAL'; Tomador.Endereco.Numero := '100'; Tomador.Endereco.Complemento := 'APTO 11'; Tomador.Endereco.Bairro := 'CENTRO'; Tomador.Endereco.CodigoMunicipio := edtCodCidade.Text; Tomador.Endereco.UF := edtEmitUF.Text; Tomador.Endereco.CEP := edtEmitCEP.Text; Tomador.Contato.Telefone := '1122223333'; Tomador.Contato.Email := '[email protected]'; (* Usando quando houver um intermediario na prestação do serviço IntermediarioServico.RazaoSocial := 'razao'; IntermediarioServico.CpfCnpj := '00000000000'; IntermediarioServico.InscricaoMunicipal := '12547478'; *) (* Usando quando o serviço for uma obra ConstrucaoCivil.CodigoObra := '88888'; ConstrucaoCivil.Art := '433'; *) end; end;

valeu, so a ultima peguntinha, cada ves que eu faço uma Consulta NFe Destinadas cria um 20130404001921-con-nfe-dest 20130404001928-nfe-dest como façor para saber o nome do ultimo xml gerado, para eu excluir quanto termina a consutla, ex: delete(20130404001921-con-nfe-dest.xml) e quando o 20130404001928-nfe-dest nao tive documento eu tambem deletar, cara brigadao....

como façor para pega via codigo o ultimo nsu quando retorna pela funcao: na aba menu Log ACBrNFe1.ConsultaNFeDest(CNPJ, StrToIndicadorNFe(ok,indNFe), StrToIndicadorEmissor(ok,IndEmi), UltNSu); Versão : 1.01 Ambiente : 1 Versão Aplicativo : 1.0.0 Status Código : 137 Status Descrição : Nenhum documento localizado para o destinatario Recebimento : 03/04/2013 18:12:24 Ind. Continuação : 1 Último NSU : 6719854850 -------------------------- Outra pegunta estou tentando Consulta NFe Destinadas ja to tentando 28x,.... ufa retornou um nota, retConsNFeDest versao="1.01" xmlns="http://www.portalfiscal.inf.br/nfe"><tpAmb>1</tpAmb><verAplic>1.0.0</verAplic><cStat>138</cStat><xMotivo>Documento localizado para o destinatario</xMotivo><dhResp>2013-04-03T18:29:10</dhResp><indCont>1</indCont><ultNSU>6720021453</ultNSU>-<ret>-<resNFe NSU="6719980439"><chNFe>51130303766015000153550010004939081039908197</chNFe><CNPJ>03766015000153</CNPJ><xNome>Medrar Com. de Prod. Alim. Ltda</xNome><IE>131938010</IE><dEmi>2013-03-19</dEmi><tpNF>1</tpNF><vNF>113.95</vNF><digVal>Gf4AFIdUUJWY7o8/rY3nXI2xxeE=</digVal><dhRecbto>2013-03-19T17:46:11</dhRecbto><cSitNFe>1</cSitNFe><cSitConf>0</cSitConf></resNFe></ret></retConsNFeDest> mais sabendo que esta nota é do dia 19/03/2013 sabendo que ja teve mais 40 notas depois desta data, toda vez que clico em Consulta NFe Destinadas, e coloco o ultimo NSU, vem a mesna nota do dia 19/03/2013 o pode ta acontecendo ? RESOLVIDO, Veio repedido mais agora ta vindo uma por uma, por DATA, se tiver 2 na mesma da ai sim vem 2 no xml de retorno, EU PESANVA que vim tudo de vez, mais como pega os dados que ta no XML ?

Mais vc usa como, so queria um exemplo pra ver que estou no caminho certo?

Mais deu pra entender ?

sim delpji 7, e ja uso o acbrnfe,a questao quando tem conexao remota e é A3, so o servidor pode fazer nf-e as conecxoe nao, quando é A1 blz, e a maiorias do meus cliente usa A3, blz abrir o demo acbrtcp coloqei servidor , porta 3436, la em repsota coloquei NFe.StatusServico; conecrtar telnet localhost 3434 mais so isso, es a questao , tem exemplo de como usar ACBrTCP para acbnfemonitor, percebi que esotu voando na maionese, nao sei como comerca a nao ser a esplicacao acima , que deu certo a opcao status e imprimir danfe. A FUNCAO QUE EU FIZ function TForm_NFEM.EnviarComandoNFEM(Comando: string; numeroNota:string): Boolean; var Size :integer ; SL : TStrings; I:integer; begin EDIT1.Text:=Comando; EDIT2.Text:=''; Memo1.Clear ; Statusbar1.Panels[1].Text := 'Aguarde Enviando Comando ! ' + 'Tempo Inicial '+timetostr(time); if DM.Client_MERCADO_PISNFEM_INDY.Text = 'True' then begin TCP.WriteLn(Comando+sLineBreak+'.'+sLineBreak); //--> writln para enviar dados... Size := TCP.ReadInteger; Memo1.Lines.Add(TCP.ReadLn(#3,-1,Size)); end else begin fSocket.SendString(Comando+sLineBreak+'.'+sLineBreak ); Memo1.Lines.Add( fSocket.RecvTerminated(100000, #3) ); end; Statusbar1.Panels[1].Text := Statusbar1.Panels[1].Text +' Tempo Final :'+timetostr(time); if Copy(Memo1.Text,0,2) = 'OK' then begin Result:=True; Edit2.Text:='OK'; end else begin Result:=False; Edit2.Text:='ERRO'; end; RespostaNFe0; if Copy(Memo1.Text,0,29) = 'OK: Lote recebido com sucesso' then begin if RespostaNFe(numeroNota)=True then Result:=True else Result:=False; end; ----------------------------------------------- EnviarComandoNFEM('NFE.StatusServico', ''); ----------------------------------------------- OpenDialog1.Title := 'Selecione a NFE'; OpenDialog1.DefaultExt := '*-nfe.XML'; OpenDialog1.Filter := 'Arquivos NFE (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := 'C:\Controles_SQL\NFe\EnvioDeResposta'; if OpenDialog1.Execute then begin if ConectarNFEM=True then EnviarComandoNFEM('NFE.ImprimirDanfe('+OpenDialog1.FileName+')', ''); end; ---------------------------------------------------------------------------- O Crjiar nota da dando erro mais o importa e sabe que esotu no caminho certo ou nao? --------------------------------------------------------------------------------- var cTextoIni,cTextoIni2,vNumLote,vAux:string; begin Atualizar_MERCADO_PIS; try {Numero da Nota} vAux:=DM12.Client_NotaFiscalNUMERO.Text;// {Numero do Lote} vNumLote:='1';//edtLoteNFe.Text; except MessageDlg('Número da Nota ou Lote Inválido !',mtWarning,[mbOK],0); Exit; end; cTextoIni:= '[identificacao]'+ 'NaturezaOperacao='+Form_NotaFiscal.DBLookupComboBox2.Text+''+ 'Modelo=55'+ 'Serie=1'+ 'Codigo='+vAux+''+ 'Numero='+vAux+''+ 'Serie=1'+ 'Emissao='+DM12.Client_NotaFiscalC_EMISSAO.Text+''+ 'Saida='+DM12.Client_NotaFiscalC_ENTREGA.Text+''+ 'Tipo=1'+ 'FormaPag=0'+ 'Finalidade=0'+ '[Emitente]'+ 'CNPJ='+DM.Client_MERCADO_PISCNPJ.Text+''+ 'IE='+DM.Client_MERCADO_PISESCRICAO.Text+''+ 'Razao='+DM.Client_MERCADO_PISRASAO.Text+''+ 'Fantasia='+DM.Client_MERCADO_PISFANTASIA.Text+''+ 'Fone='+DM.Client_MERCADO_PISTEL.Text+''+ 'CEP='+DM.Client_MERCADO_PISCEP.Text+''+ 'Logradouro='+DM.Client_MERCADO_PISENDERECO_SPED.Text+''+ 'Numero='+DM.Client_MERCADO_PISNUMERO.Text+''+ 'Complemento='+ 'Bairro='+DM.Client_MERCADO_PISBAIRRO.Text+''+ 'CidadeCod='+DM.Client_MERCADO_PISMUNICIPIOIBGE.Text+''+ 'Cidade='+DM.Client_MERCADO_PISCIDADE.Text+''+ 'UF=MT'+ 'PaisCod=1058'+ 'Pais=BRASIL'+ '[Destinatario]'+ 'CNPJ='+DM12.Client_NotaFiscalC_CNPJ.Text+''+ 'IE='+DM12.Client_NotaFiscalC_IE.Text+''+ 'ISUF='+ 'NomeRazao='+DM12.Client_NotaFiscalC_RAZAO.Text+''+ 'Fone='+DM12.Client_NotaFiscalC_FONE.Text+''+ 'CEP='+DM12.Client_NotaFiscalC_CEP.Text+''+ 'Logradouro='+DM12.Client_NotaFiscalC_ENDERECO.Text+''+ 'Numero='+DM12.Client_NotaFiscalC_NUMERO.Text+''+ 'Complemento='+ 'Bairro='+DM12.Client_NotaFiscalC_BAIRRO.Text+''+ 'CidadeCod='+DM12.Client_NotaFiscalC_MUNICIPIOIBGE.Text+''+ 'Cidade='+DM12.Client_NotaFiscalC_MUNICIPIO.Text+''+ 'UF=MT'+ 'PaisCod=1058'+ 'Pais=BRASIL'; if DM12.Client_ProdutoCODIGOTRIBUTADO.Text<>'' then begin DM12.Client_Produto.First; while not DM12.Client_Produto.Eof do begin cTextoIni2:= '[Produto'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'CFOP='+DM12.Client_ProdutoCFOP.Text+''+ 'Codigo='+pchar( DM12.Client_ProdutoCODIGO.Text )+''+ 'Descricao='+DM12.Client_ProdutoPRODUTOS.Text+''+ 'EAN='+ 'NCM='+Copy(DM12.Client_ProdutoCODIGOTRIBUTADO.Text,01,08)+''+ 'Unidade='+DM12.Client_ProdutoUNID.Text+''+ 'Quantidade='+DM12.Client_ProdutoQUANT.text+''+ 'ValorUnitario='+DM12.Client_ProdutoVALOR.text+''+ 'ValorTotal='+DM12.Client_ProdutoTOTAL.text+''+ 'ValorDesconto='+DM12.Client_ProdutoDESCONTO.text+''+ 'NumeroDI='+ 'DataRegistroDI='+ 'LocalDesembaraco='+ 'UFDesembaraco='+ 'DataDesembaraco='+ 'CodigoExportador='+ '[LADI001'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'NumeroAdicao='+ 'CodigoFrabricante='+ 'DescontoADI'+ '[iCMS'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'CST='+DM12.Client_ProdutoST.Text+''+ 'Origem='+ 'Modalidade='+ 'ValorBase='+ 'Aliquota='+ 'Valor='+ 'ModalidadeST='+ 'PercentualMargemST='+ 'PercentualReducaoST='+ 'ValorBaseST='+ 'AliquotaST='+ 'ValorST='+ 'PercentualReducao='+ '[iPI'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'CST='+ 'ClasseEnquadramento='+ 'CNPJProdutor='+ 'CodigoSeloIPI='+ 'QuantidadeSelos='+ 'CodigoEnquadramento='+ 'ValorBase='+ 'Quantidade='+ 'ValorUnidade='+ 'Aliquota='+ 'Valor'+ '[iI'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'ValorBase='+ 'ValorDespAduaneiras='+ 'ValorII='+ 'ValorIOF='+ '[PIS'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'CST='+ 'ValorBase='+ 'Aliquota='+ 'Valor='+ 'Quantidade='+ 'TipoCalculo='+ '[PISST'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'ValorBase='+ 'AliquotaPerc='+ 'Quantidade='+ 'AliquotaValor='+ 'ValorPISST='+ '[COFINS'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'CST='+ 'ValorBase='+ 'Aliquota='+ 'Valor='+ 'TipoCalculo='+ 'Quantidade='+ '[COFINSST'+FormatFloat('000',StrToFloat(DM12.Client_ProdutoNUMERO.Text))+']'+ 'ValorBase='+ 'AliquotaPerc='+ 'Quantidade='+ 'AliquotaValor='+ 'ValorCOFINSST='; cTextoIni:=cTextoIni+cTextoIni2; DM12.Client_Produto.Next; end; end else begin MessageDlg('Verifique os produtos sem NCM o Campo é obrigatório !',mtWarning,[mbOK],0); Exit; end; cTextoIni:=cTextoIni+ '[Total]'+ 'BaseICMS='+DM12.Client_NotaFiscalF_VALOR1.Text+''+ 'ValorICMS='+DM12.Client_NotaFiscalF_VALOR2.Text+''+ 'ValorProduto='+DM12.Client_NotaFiscalF_VALOR5.Text+''+ 'BaseICMSSubstituicao='+DM12.Client_NotaFiscalF_VALOR3.Text+''+ 'ValorICMSSubstituicao='+DM12.Client_NotaFiscalF_VALOR4.Text+''+ 'ValorFrete='+DM12.Client_NotaFiscalF_VALOR6.Text+''+ 'ValorSeguro='+DM12.Client_NotaFiscalF_VALOR7.Text+''+ 'ValorDesconto='+DM12.Client_NotaFiscalDESCONTO.Text+''+ 'ValorII='+ 'ValorIPI='+ 'ValorPIS='+ 'ValorCOFINS='+ 'ValorOutrasDespesas='+DM12.Client_NotaFiscalF_VALOR8.Text+''+ 'ValorNota='+DM12.Client_NotaFiscalF_VALO10 .Text+''+ '[Transportador]'+ 'FretePorConta='+ 'CnpjCpf='+ 'NomeRazao='+ 'IE='+ 'Endereco='+ 'Cidade='+ 'UF='+ 'ValorServico='+ 'ValorBase='+ 'Aliquota='+ 'Valor='+ 'CFOP='+ 'CidadeCod='+ 'Placa='+ 'UFPlaca='+ 'RNTC='+ '[Volume001]'+ 'Quantidade='+ 'Especie='+ 'Marca='+ 'Numeracao='+ 'PesoLiquido='+ 'PesoBruto='+ '[Fatura]'+ 'Numero='+ 'ValorOriginal='+ 'ValorDesconto='+ 'ValorLiquido='+ '[Duplicata001]'+ 'Numero='+ 'DataVencimento='+ 'Valor='+ '[DadosAdicionais]'+ 'Complemento='+ '[infAdic001]'+ 'Campo='+ 'Texto='; //cTextoIni:='NFe.CriarEnviarNFe('+cTextoIni+','+vNumLote+',[0])'; cTextoIni:='NFe.CriarEnviarNFe('+cTextoIni+','+vNumLote+',[0])'; if ConectarNFEM=True then EnviarComandoNFEM( cTextoIni , '');

blz vamos lar, o que eu achei no pdf ou ajuda, foi isso: Modo TCP/IP: Abra uma conexão Socket com a máquina onde o ACBrNFeMonitor está instalado, na porta configurada no ACBrNFeMonitor. (Você deve conhecer o IP da máquina) Verifique se o FireWall de ambas as máquinas permite o trafego de dados nessa porta. Envie e Receba os comandos usando a sintaxe do ACBr (veja abaixo) Todo comando enviado para o ACBrNFeMonitor dever ser concluido com CR+LF+'.'+CR+LF ou #13+#10+#46+#13+#10 Toda resposta do ACBrNFeMonitor para a aplicação comercial será encerrada com o caracter ETX, #3 ou chr(3) xemplo: Configure o ACBrNFeMonitor para trabalhar com TCP/IP porta 3434 (poderia ser qualquer porta)... Re-inicie o ACBrNFeMonitor No Prompt do DOS do Windows, na mesma máquina onde o ACBrNFeMonitor está sendo executado, digite: TELNET localhost 3434 para quem nunca mecheu em conexao Socket, como eu, nao entendir porra nenhuma do que esta acima, mais concordo com opnioes acima é so pesquisar, estao vim em outro luga outro forum os seguinte comnado para socket. if indy = true the TCP.WriteLn(Comando+sLineBreak+'.'+sLineBreak); //--> writln para enviar dados... Size := TCP.ReadInteger; Memo1.Lines.Add(TCP.ReadLn(#3,-1,Size)); if indy = false the fSocket.SendString(Comando+sLineBreak+'.'+sLineBreak ); Memo1.Lines.Add( fSocket.RecvTerminated(100000, #3) ); ai fis alguns ajusti para saber que deu certo ou nao, pegando as primeira lentras do memo, if Copy(Memo1.Text,0,2) = 'OK' then begin Result:=True; Edit2.Text:='OK'; end else begin Result:=False; Edit2.Text:='ERRO'; end; tem alguma coisa que eu possa muda, ou estou fazando tudo errado. era so isso que eu queria , descupem que eu pedi d+.

se for o PDF ou arquivo de ajuda eu nao achei e tambem nao achei o topico do isaque.

Leu o CHM que vem junto no SVN. por favor onde fica , em que pasta ?

estou querendo usar ACBrNFeMonitor mais estou com duvidas vi os comando para o acbrnfemonitor Sintaxe: NFe.StatusServico; Exemplo: NFe.StatusServico; mais como enviar para o acbrnfemonitor , e saber a resposta, nao entedir muito ?

O CT-e mudou o cancelamento iqual o NF-e ou nao?

O ACBrNFeDanfeRV tem no topo o canhoto para data e assinatura do cliente, o ACBrNFeDanfeQR nao tem ? ou eu nao conseguir configurar direito ?

Existe um tutorial falando o que cada componente faz ou um resumo , exemplo o: ACBrAAC1 ACBrEAD1 ACBrInStore1 ACBrNFPws1 obrigado !

BLZ, mais em que evento eu faço isso ?

no programa do sefaz baixo normal, 104 notas. o cnpj é de mato grosso, tenho que colocar webservice de MT ou SP(ja que o servido desta operacao e de sp) opa, é a primeira ves que min retorna Versão : 1.01 Ambiente : 1 Versão Aplicativo : 1.0.0 Status Código : 138 Status Descrição : Documento localizado para o destinatario Recebimento : 28/03/2013 17:55:11 Ind. Continuação : 1 Último NSU : 6677009784 Mais cade o documento ? procurei na pasta (Salvar arquivbos de envioe resposta) c:\acbrnfe\ mais na achei nada, tentei IMPRIMIR EVENTO deu erro quando localizei o arquivo c:\acbrnfe\20130328165529-con-nfe-dest.xml o que devo fazxer?

deixa queto, to vendo que acbr - Consulta NFe Destinadas - ainda nao ta ok, depois eu implanto no meu sistema blz.

sim , no demo acbrnfe2, no clique da opcao Consulta NFe Destinadas. os dados estao correto cnpj,0.0.ultimonsu. normaol iqual hotem, so que hoje esta aparecendo este erro.

agora da dando um erro assim, tela de erro em blanco com um botao de OK. estranho né, o devo fazer, sera que preciso atualizar o acbr de novo ?

desculpa, nao tinha visto.

opa desculpa, nao tinha visto a resposta. eu tentei 8 vezes , CNPJ, 0 , 0 . e ultimo nsu da consulta Último NSU : 6658729325 Último NSU : 6659229325 Último NSU : 6659729325 Último NSU : 6660229325 Último NSU : 6660729325 Último NSU : 6661229325 Último NSU : 6661729325 Último NSU : 6662229325 Último NSU : 6662729325 Versão : 1.01 Ambiente : 1 Versão Aplicativo : 1.0.0 Status Código : 137 Status Descrição : Nenhum documento localizado para o destinatario Recebimento : 25/03/2013 18:26:44 Ind. Continuação : 1 Último NSU : 6662729325 mais sempre min retorna esta messagem, mais existe venda sim , cnpj de um mercado do meu primo. O que devo fazer ?

baixa a atualizacao nova do acbrnfe e vi a opcao Consulta NFe Destinadas mais nao baixa as informacoes da nota para o manisfetsto, aviso é nao existe nota para esse destinatario, mais existe e coloquei a opcao: (*veja NT 2012/002 pág. 11 para identificar os valores possíveis Último NSU recebido pela Empresa. Caso seja informado com zero, ou com um NSU muito antigo, a consulta retornará unicamente as notas fiscais que tenham sido recepcionadas nos últimos 15 dias.*) ultNSU := '0'; if not(InputQuery('WebServices Consulta NFe Destinadas', 'Último NSU recebido pela Empresa', ultNSU)) then exit; ACBrNFe1.ConsultaNFeDest(CNPJ, StrToIndicadorNFe(ok,0), StrToIndicadorEmissor(ok,0), ultNSU=0); e se eu usar o soft Espiao=NF-e ele visualiza? nao ta pronto ainda essa opcao Consulta NFe Destinadas ?