leandroaoa

pois é eu ja tentei de diversas forma ja passei ate como esta abaixo mas nada, se eu imprimir uma a uma da tudo certo, mas só que isso da um transtorno pro usuario imagina ele com 100 nota pra imprimir ter que ficar uma a uma vou dar uma estudada melhor nos fontes do acbr pra ver se tem como mudar isso mas acredito que não tem jeito mesmo não. obrigado pela ajuda. ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt := Trim(TMinhaClasse(ListView1.Items.SubItems.Objects[19]).nRegDPEC); ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.dhRecbto := strtodatetime(TMinhaClasse(ListView1.Items.SubItems.Objects[20]).DhRegDPEC);

aqui esta como estou fazendo dentro do meu sistema for i := 0 to ListView1.Items.Count - 1 do begin if ListView1.Items.Item.Checked then begin FormPrincipal.ACBrNFe1.NotasFiscais.LoadFromFile(diretorio+Trim(TMinhaClasse(ListView1.Items.SubItems.Objects[8]).chaveacesso)); ** Comentei aqui pois ja tenho o nro do registro e a data de registro salvo no banco de dados ** //if FormPrincipal.ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis = teDPEC then //begin //FormPrincipal.ACBrNFe1.WebServices.ConsultaDPEC.NFeChave := FormPrincipal.ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID; //FormPrincipal.ACBrNFe1.WebServices.ConsultaDPEC.Executar; FormPrincipal.ACBrNFe1.DANFE.ProtocoloNFe := Trim(TMinhaClasse(ListView1.Items.SubItems.Objects[19]).nRegDPEC)+' '+ Trim(TMinhaClasse(ListView1.Items.SubItems.Objects[20]).DhRegDPEC); ** aqui está passando os valores correto cada DANFE com o seu nro registro e data de registro ** showmessage(Trim(TMinhaClasse(ListView1.Items.SubItems.Objects[19]).nRegDPEC)); //FormPrincipal.ACBrNFe1.WebServices.ConsultaDPEC.nRegDPEC +' '+ DateTimeToStr(FormPrincipal.ACBrNFe1.WebServices.ConsultaDPEC.dhRegDPEC); //end; ListView1.Scroll(0,i); indice:=listview1.Items.Item.Index; ListView1.Items.Item.Checked := false; end; application.ProcessMessages; end; FormPrincipal.ACBrNFe1.NotasFiscais.Imprimir; na hora que imprimi todos os DANFES saem com o mesmo nro de registro e data registro...

Ola Angelo... o laço for eu faço no meu sistema, esse ai é o modelo que vem no demo do acbr, cada opendialog abre uma nota e passa os dados dela e ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID é referente a cada opendialog. seu eu fizer o mesmo processo ai com notas que foram enviadas no modo Normal da tudo certo. O unico problema mesmo é no modo DPEC

Bom dia meu problema é o seguinte. Quando vou emitir varios danfes de uma vez emitido em contigencia DPEC eles não alteram o numero do protocolo ficando assim o mesmo numero de protocolo e data/hora de autorizacao pra todos os danfes. Ja tentei ate no demo mas o problema continua o mesmo alguem ja passou por isso e conseguiu resolver? Utilizo o RAVECB. utilizei esse comando pra teste conforme segue : 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 := ACBrNFe1.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); OpenDialog1.Execute; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); OpenDialog1.Execute; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis = teDPEC then begin ACBrNFe1.WebServices.ConsultaDPEC.NFeChave := ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID; ACBrNFe1.WebServices.ConsultaDPEC.Executar; ACBrNFe1.DANFE.ProtocoloNFe := ACBrNFe1.WebServices.ConsultaDPEC.nRegDPEC +' '+ DateTimeToStr(ACBrNFe1.WebServices.ConsultaDPEC.dhRegDPEC); end; ACBrNFe1.NotasFiscais.Imprimir; end;

eu utilizo o campo, Outras despesas acessórias conforme manual de integracao

Bom dia a todos quando informo o local de entrega diferente do destinatario está saindo no cabecalho do campo LOCAL DE RETIRADA sendo o correto LOCAL DE ENTREGA

você pode utilizar a mesma tag da Insc. Estadual.: Dest.IE := a insc. estadual do produtor

no Windows 7 só funciona na versão ULTIMATE do mesmo no VISTA nunca testei

segue o link contendo as informacoes nescessarias http://www.fazenda.pr.gov.br/modules/no ... 00-da-NF-e