Antony Moraes

Júlio sou novo,desculpe por minha ignorância sobre o dcu não entendi referente a qual dcu você está citando não entendi o que você disse .

Bom dia Júlio !!como seria essse dcu já compilado ?e pode me dar uma dica de como achar esse arquivos .fiz um testes formato um computador e instalei o delphi do zero e pus meu projeto e r e rodei mas continuei com a rejeição.

Estou com esse mesmo problema ja descomentei ja atualizei o shema e fis as alteraçoes no acbrnfenotasfiscais,pas mas continuocom a rejeiçao e o xml gera sem a tag.Alguem consegiu alguma soluçao?

Desculpe a pergunta .Se eu deletasse o arquivo acbrnfenotasfiscais.pas da pasta fontes o que deveria ocorrer com minha aplicação deveria gerar algum erro pois eu fiz o procedimento que relatei e a minha aplicação somente me gerou a rejeição que ja estava antes .

agnaldo jaz fiz o que vc me indicou fiz o pedido na secretaria de fazenda e coloquei ocsc mas mesmo assim persistiu a rejeição.

Estou enviando o xml que acabei de gerar e o meu acbrnfenotasfiscais.pas e o leiaut do shema e a alimentação do componete e esta: lerini; {$ifdef acbrnfeopenssl} acbrnfe1.configuracoes.certificados.getcertificado:=scertificado; acbrnfe1.configuracoes.certificados.senha:=ssenha; {$else} acbrnfe1.configuracoes.certificados.numeroserie:=sserie; {$endif} //Layout 3.10 acbrnfe1.Configuracoes.Geral.ModeloDF:=monfce; acbrnfe1.Configuracoes.Geral.VersaoDF:=ve310; //geral acbrnfe1.configuracoes.geral.formaemissao:=strtotpemis(ok,inttostr(sformas)); ACBrNFe1.Configuracoes.Geral.IdCSC := '000001'; ACBrNFe1.Configuracoes.Geral.CSC := ''; acbrnfe1.Configuracoes.WebServices.Salvar:=true; acbrnfe1.configuracoes.geral.salvar:=ssalvaarq; acbrnfe1.configuracoes.arquivos.pathsalvar:=slocalarq; acbrnfe1.configuracoes.geral.modelodf :=monfce; acbrnfe1.configuracoes.arquivos.PathSchemas:='C:\PDVLOPES\Debug\Win32\Schemas'; //webservices acbrnfe1.configuracoes.webservices.uf:=sufws; acbrnfe1.configuracoes.webservices.ambiente:=strtotpamb(ok,inttostr(sambiente)); acbrnfe1.configuracoes.webservices.visualizar:=true; acbrnfe1.configuracoes.webservices.proxyhost:=shost; acbrnfe1.configuracoes.webservices.proxyport:=sporta; acbrnfe1.configuracoes.webservices.proxyuser:=susuariows; acbrnfe1.configuracoes.webservices.proxypass:=senhaws; ACBrNFe1.Configuracoes.WebServices.Visualizar:=false; // if acbrnfe1.danfe <> nil then begin acbrnfe1.danfe.tipodanfe:=strtotpimp(ok,'1'); acbrnfe1.danfe.logo:=slogomarca; E estou assinando e enviando a nota assim: /COMANDOS PARA GRARAR XML DMDADOS.ACBrNFe1.NOTASFISCAIS.Assinar; DMDADOS.ACBRNFE1.NOTASFISCAIS.gravarxml('C:\PDVLOPES\XML\PENDENTE\'); edtarquivo.Text:=DMDADOS.ACBRNFE1.NOTASFISCAIS.items[0].nomearq; //Enviar begin dmdados.ACBrNFe1.notasfiscais.clear; dmdados.ACBrNFe1.NotasFiscais.loadfromfile(edtarquivo.text); dmdados.ACBrNFe1.NotasFiscais.Validar; dmdados.ACBrNFe1.Enviar(edtnumlote.text,false,true); if dmdados.CDSEMITENTEIMPRESSAO.TEXT='R' then BEGIN dmdados.ACBrNFe1.NotasFiscais.ImprimirResumido; END; if dmdados.CDSEMITENTEIMPRESSAO.TEXT='C' then BEGIN dmdados.ACBrNFe1.NotasFiscais.Imprimir; END; Mas o mesmo continuando gerando o XML sem a tag qr-code. ACBrNFeNotasFiscais.pas leiauteNFe_v3.10.xsd

Adelson.Fiz os procedimentos ACBrNFe1.Configuracoes.Geral.IdCSC := '000001'; ACBrNFe1.Configuracoes.Geral.CSC := ''; mas infelizmente não foi resolvido peguei o acbrnfenotasfiscais.pas e o leiaut do shema e tambem nada.Estou precupado pois estou com receio do dia 03/11/2015 que acontecera o mesmo no ambiente de produção.apos eu abrir o acbrnfenotasfiscais.pas pelo delphi e so descomenta e compila a aplicação ou necessito fazer algo mais?

Juliomar sim eu desconentei,recapitulando eu abro o acbrnfenotasfiscais.pás eu abro pelo delphi descomento e salvo o arquivo e apenas isso?se sim esse foi o procedimento que fiz.adelson eu alimebtei apenas com o idcsc o CSC posso deixar vazio assim como VC postou?

Fiz a alteração mas continua a rejeição ,desculpe pelo transtorno.mas teria outra forma que conseguisse fazer alguém mas esta com esse problema?

A shema nao resolveu mas a shema seria responsavel so pelo retorno ou para criação da nota ?porque no meu xml estou achando estranho que a tag qr code não gera.teria mas algum passo? Poderia verificar minha rotina para gerar o xml se esta correta pois ele esta gerando sem a tag segue abaixo: procedure TFrmFinalizarVendason.impressao; var achavenfe,arecibo,aprotocolo :string; anumitem:integer; begin edtdesconto.Enabled:=false; dmdados.atualizaconfiguracao; dmdados.CDSNFCE.Refresh; dmdados.CDSNFCE.Refresh; dmdados.CDSNFCE.Refresh; DMDADOS.CDSNFCE.INSERT; DMDADOS.CDSNFCE.Post; DMDADOS.CDSNFCE.ApplyUpdates(0) ; DMDADOS.CDSNFCE.Last; DMDADOS.ACBRNFE1.NOTASFISCAIS.CleaR; DMDADOS.CDSSEQUENCIA.REFRESH; DMDADOS.CDSSEQUENCIA.REFRESH; DMDADOS.CDSSEQUENCIA.REFRESH; DMDADOS.CDSSEQUENCIA.LAST; // with dmdados.acbrnfe1.notasfiscais.Add.nfe do begin ide.cnf := DMDADOS.CDSSEQUENCIACODVENDA.Value; ide.natop:= 'Venda de Mercadoria'; ide.indPag:=ipvista; ide.modelo:=65; ide.serie:=DMDADOS.CDSSERIEID.VALUE; ide.nnf:= dmdados.CDSSEQUENCIACODVENDA.Value; ide.dEmi:=now; ide.dSaiEnt:=now; Ide.hSaiEnt:=0; ide.tpnf:=tnsaida; if dmdados.CDSEMITENTEGAVETA.TEXT='H' then ide.tpamb := tahomologacao; if dmdados.CDSEMITENTEGAVETA.TEXT='P' then ide.tpamb := taPRODUCAO; ide.verProc:='PDVLopes2015'; ide.cuf:=DMDADOS.CDSEMITENTECODIGOUF.VALUE; ide.cmunfg:=strtoint(DMDADOS.CDSEMITENTECODIGOCIDADE.text); ide.finnfe:=fnnormal; ide.indFinal:=cfConsumidorFinal; ide.indPres:=pcPresencial; ide.tpImp:=tinfce; ide.cDV:=2; transp.modfrete:=mfsemfrete; //PAGAMENTOS apenas para NFC-e with pag.Add do begin if DBPAGAMENTO.TEXT='DINHEIRO'then BEGIN tPag := fpDinheiro; END; if DBPAGAMENTO.TEXT='FIADO'then BEGIN tPag := fpCHEQUE; END; begin if DBPAGAMENTO.TEXT='CARTAO' then BEGIN tPag := fpCARTAOCREDITO; END; if DBPAGAMENTO.TEXT='CIELO' then BEGIN tPag := fpCARTAOCREDITO; END; if DBPAGAMENTO.TEXT='GETNET' then BEGIN tPag := fpCARTAOCREDITO; END; if DBPAGAMENTO.TEXT='REDE' then BEGIN tPag := fpCARTAOCREDITO; END; begin if DBPAGAMENTO.TEXT= 'DEBITO' then BEGIN tPag := fpCARTAODEBITO; END; end; end; vPag :=TOTALFINAL;; end; //Emitente if DMDADOS.CDSEMITENTEREGIME.VALUE='SIMPLES' then EMIT.CRT:=CRTSIMPLESNACIONAL; if DMDADOS.CDSEMITENTEREGIME.VALUE='NORMAL' then EMIT.CRT:=CRTREGIMENORMAL; emit.CNPJCPF:=dmdados.CDSEMITENTECNPJ.text; EMIT.CNAE:=DMDADOS.CDSEMITENTECNAE.Text; emit.IE:=dmdados.CDSEMITENTEIE.text; emit.iest:='';; emit.xNome:=dmdados.CDSEMITENTEEMITENTE.text; emit.cnae:=dmdados.CDSEMITENTECNAE.text; emit.EnderEmit.xlgr:=dmdados.CDSEMITENTELOGADOURO.text; emit.enderemit.nro:=dmdados.CDSEMITENTENUMERO.text; emit.enderemit.xcpl:=dmdados.CDSEMITENTECOMPLEMENTO.text; emit.enderemit.xBairro:=dmdados.CDSEMITENTEBAIRRO.text; emit.EnderEmit.cMun:=strtoint(dmdados.cdsemitentecodigocidade.text); emit.enderemit.xMun:=dmdados.CDSEMITENTECIDADE.text; emit.enderemit.uf:=dmdados.CDSEMITENTEUF.text; emit.EnderEmit.CEP:=strtoint(dmdados.cdsemitentecep.text); emit.EnderEmit.fone:= dmdados.CDSEMITENTEFONE.text; emit.EnderEmit.cpais:=1058; emit.EnderEmit.xpais:='BRASIL'; //Destinatar if FRMPDV.EDIT2.TEXT <>'' then begin Dest.cnpjcpf:= dmdados.cdsclientecpf_cnpj_cliente.value; DEST.indIEDest:=inNaoContribuinte; DEST.idEstrangeiro:='0'; dest.xnome:=dmdados.cdsclienteNOME_CLIENTE.value; end; //Itens anumitem:=0; FRMPDV.cdsITENS.first; while not FRMPDV.cdsITENS.eof do begin inc(anumitem); with det.add do begin prod.nitem:=anumitem; prod.cprod:=frmpdv.cdsitensbarras.value; prod.cean:=''; if (dmdados.CDSEMITENTEGAVETA.TEXT='H') AND (anumitem=1 )then begin prod.xprod:= 'NOTA FISCAL EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL'; end else prod.xprod:=frmpdv.cdsitensproduto.value; if length(frmpdv.cdsitensNCM.TEXT) = 8 then begiN prod.ncm:=frmpdv.cdsitensNCM.value; end ELSE if length(frmpdv.cdsitensNCM.TEXT) <8 then BEGIN prod.ncm:='0'+frmpdv.cdsitensNCM.value; END; prod.extipi:=''; prod.cfop:=frmpdv.cdsitensCFOP.value; prod.ucom:=frmpdv.cdsitensUNIDADE.value; prod.ceantrib:=''; prod.utrib:=frmpdv.cdsitensUNIDADE.value; prod.qcom:=frmpdv.cdsitensquantidade.value; PROD.vProd:=frmpdv.cdsitenssubtotal.ASCURRENCY; prod.vUnCom:=frmpdv.cdsitensvalor.ASCURRENCY; prod.qtrib:=frmpdv.cdsitensquantidade.value; prod.vUnTrib:=frmpdv.cdsitensvalor.ASCURRENCY; with imposto do begin vTotTrib:= (frmpdv.cdsitensTOTALTRIBUTOS.asfloat) * (frmpdv.cdsitenssubtotal.ASfloat)/100; infadic.infCpl:='VALOR PAGO:'+'.R$'+EDTPAG.Text+'..'+LBTROCO.Caption+'....................'; end; //Condição de quantidade tributada //Tributos with imposto do begin with icms do //Origem if frmpdv.cdsitensORIGEM.value ='0' then begin icms.orig:=oenacional; end; if frmpdv.cdsitensORIGEM.value ='1' then begin icms.orig:=oeEstrangeiraImportacaoDireta; end; if frmpdv.cdsitensORIGEM.value ='2' then begin icms.orig:=oeEstrangeiraAdquiridaBrasil; end; if frmpdv.cdsitensORIGEM.value ='3' then begin icms.orig:=oeNacionalConteudoImportacaoSuperior40; end; if frmpdv.cdsitensORIGEM.value ='4' then begin icms.orig:=oeNacionalProcessosBasicos; end; if frmpdv.cdsitensORIGEM.value ='5' then begin icms.orig:=oeNacionalConteudoImportacaoInferiorIgual40; end; if frmpdv.cdsitensORIGEM.value ='6' then begin icms.orig:=oeEstrangeiraImportacaoDiretaSemSimilar; end; if frmpdv.cdsitensORIGEM.value='7' then begin icms.orig:=oeEstrangeiraAdquiridaBrasilSemSimilar; end; //Regime Normal //CST Tributado integralmente if frmpdv.cdsitensCST.value ='0'then begin icms.cst:=cst00; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.asfloat/100; end; if frmpdv.cdsitensCST.value ='10' then begin icms.cst:=cst10; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; end; if frmpdv.cdsitensCST.value ='20'then begin icms.cst:=cst20; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; ICMS.pRedBC:=0; end; if frmpdv.cdsitensCST.value ='30' then begin icms.cst:=cst30; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat* frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; end; if frmpdv.cdsitensCST.value ='40'then begin icms.cst:=cst40; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; end; if frmpdv.cdsitensCST.value ='41'then begin icms.cst:=cst41; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; end; if frmpdv.cdsitensCST.value ='50'then begin icms.cst:=cst50; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; end; //CST Tributado substituição tributária if frmpdv.cdsitensCST.value='51' then begin icms.cst:=csT51; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; ICMS.pRedBCst:=0; END; //CST Tributado substituição tributária if frmpdv.cdsitensCST.value ='60' then begin icms.cst:=csT60; icms.vBCSTRet:=0; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100; icms.vICMSSTRet:=0; end; if frmpdv.cdsitensCST.value='70' then begin icms.cst:=cst70; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; end; if frmpdv.cdsitensCST.value ='90' then begin icms.cst:=cst90; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; icms.predbc:=0; end; //Simples Nacional if frmpdv.cdsitensCST.value='101'then begin icms.pCredSN:=0; icms.CSOSN:=csosn101; icms.vCredICMSSN:=0; end; if frmpdv.cdsitensCST.value ='102'then begin icms.CSOSN:=csosn102; end; if frmpdv.cdsitensCST.value ='103'then begin icms.CSOSN:=csosn103; end; if frmpdv.cdsitensCST.value ='300'then begin icms.CSOSN:=csosn300; end; if frmpdv.cdsitensCST.value ='400'then begin icms.CSOSN:=csosn400; end; if frmpdv.cdsitensCST.value ='201'then begin icms.CSOSN:=csosn201; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; icms.pCredSN:=0; icms.vCredICMSSN:=0; end; if frmpdv.cdsitensCST.value='202'then begin icms.CSOSN:=csosn202; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; end; if frmpdv.cdsitensCST.value ='203'then begin icms.CSOSN:=csosn203; icms.modbcst:=dbismargemvaloragregado; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.Asfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; end; if frmpdv.cdsitensCST.value ='500' then begin icms.vBCSTRet:=0; icms.vICMSSTRet:=0; icms.CSOSN:=csosn500; end; if frmpdv.cdsitensCST.value ='900' then begin icms.CSOSN:=csosn900; icms.modbc:=dbivaloroperacao; icms.vbc:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100; icms.picms:=frmpdv.cdsitensICMS.aSfloat; icms.vicms:=frmpdv.cdsitenssubtotal.Asfloat* frmpdv.cdsitensbase.Asfloat/100 * frmpdv.cdsitensICMS.aSfloat/100; icms.modbcst:=dbismargemvaloragregado; icms.pmvast:=frmpdv.cdsitenstmva.ASfloat; icms.predbcst:=0; icms.vbcst:=FRMPDV.Cdsitenssubtotal.ASfloat * frmpdv.cdsitenstmva.ASfloat/100; icms.picmsst:=frmpdv.Cdsitenstoalticmsst.ASfloat; icms.vicmsst:=frmpdv.cdsitenssubtotal.Asfloat * frmpdv.cdsitenstmva.ASfloat/100 * frmpdv.cdsitensaliqst.ASfloat/100; icms.predbc:=0; icms.pCredSN:=0; icms.vCredICMSSN:=0; end; //Serviços with issqn do begin vbc:=0; valiq:=0; vissqn:=0; cmunfg:= 0; clistserv:=''; end; end; end; frmpdv.cdsitens.next; end; // INFORMAÇÕES fINAIS total.icmstot.vBC:=strtofloat(frmpdv.Cdsitenstotalbaseicms.text); total.icmstot.vICMS:=STRTOFLOAT(frmpdv.CdsitenSICMSTOT.TEXT); total.ICMSTot.vbcst:=strtofloat(frmpdv.Cdsitenstotalbasest.text); total.ICMSTot.vST:=strtofloat(frmpdv.Cdsitenstoalticmsst.text); total.ICMSTot.vprod:=totalfinal; total.ICMSTot.vdesc:=0; total.ICMSTot.vii:=0; total.ICMSTot.vipi:=0; total.ICMSTot.vpis:=0; total.ICMSTot.vcofins:=0; total.ICMSTot.voutro:=0; total.ICMSTot.vnf:=totalfinal; Total.ICMSTot.vTotTrib := strtofloat(frmpdv.cdsitenstotTRIB.text); // total.ISSQNtot.vServ:=0; total.ISSQNtot.vbc:=0; total.ISSQNtot.viss:=0; total.ISSQNtot.vpis:=0; total.ISSQNtot.vcofins:=0; // total.retTrib.vRetPIS:=0; total.retTrib.vRetcofins:=0; total.retTrib.vRetcsll:=0; total.retTrib.vbcirrf:=0; total.retTrib.virrf:=0; total.retTrib.vRetprev:=0; end; //COMANDOS PARA GRARAR XML DMDADOS.ACBrNFe1.NOTASFISCAIS.Assinar; DMDADOS.ACBRNFE1.NOTASFISCAIS.gravarxml('C:\PDVLOPES\XML\PENDENTE\'); edtarquivo.Text:=DMDADOS.ACBRNFE1.NOTASFISCAIS.items[0].nomearq; //Enviar begin dmdados.ACBrNFe1.notasfiscais.clear; dmdados.ACBrNFe1.NotasFiscais.loadfromfile(edtarquivo.text); dmdados.ACBrNFe1.NotasFiscais.Validar; dmdados.ACBrNFe1.Enviar(edtnumlote.text,false); if dmdados.CDSEMITENTEIMPRESSAO.TEXT='R' then BEGIN dmdados.ACBrNFe1.NotasFiscais.ImprimirResumido; END; if dmdados.CDSEMITENTEIMPRESSAO.TEXT='C' then BEGIN dmdados.ACBrNFe1.NotasFiscais.Imprimir; END; // achavenfe :=dmdados.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].chNFe; aprotocolo :=dmdados.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt; arecibo :=dmdados.ACBrNFe1.WebServices.Retorno.nferetorno.nrec; //Gravar Chave dmdados.CDSNFCE.Refresh; dmdados.CDSNFCE.Refresh; dmdados.CDSNFCE.Refresh; DMDADOS.CDSNFCE.Last; //gaveta BEGIN DMDADOS.CDSSEQUENCIA.Edit; DMDADOS.CDSSEQUENCIANUMERO.AsFloat:=DMDADOS.CDSSEQUENCIANUMERO.ASFLOAT+1; DMDADOS.CDSSEQUENCIACODVENDA.TEXT:=DMDADOS.CDSSEQUENCIANUMERO.TEXT; DMDADOS.CDSSEQUENCIACODVENDA.TEXT:=DMDADOS.CDSSEQUENCIANUMERO.TEXT; DMDADOS.CDSSEQUENCIA.POST; DMDADOS.CDSSEQUENCIA.APPLYUPDATES(0); gaveta; close; END; end; end;

Bom dia!!Fiz as alterações mas continuo com a mesma rejeição e o xml esta gerando sem a tag Qrcode e insupl segue a baixo as modificações que fiz na alimentação do componente: procedure TDMDados.atualizaconfiguracao; var ok: boolean; begin lerini; {$ifdef acbrnfeopenssl} acbrnfe1.configuracoes.certificados.getcertificado:=scertificado; acbrnfe1.configuracoes.certificados.senha:=ssenha; {$else} acbrnfe1.configuracoes.certificados.numeroserie:=sserie; {$endif} //Layout 3.10 acbrnfe1.Configuracoes.Geral.ModeloDF:=monfce; acbrnfe1.Configuracoes.Geral.VersaoDF:=ve310; //geral acbrnfe1.configuracoes.geral.formaemissao:=strtotpemis(ok,inttostr(sformas)); acbrnfe1.configuracoes.geral.salvar:=ssalvaarq; acbrnfe1.configuracoes.arquivos.pathsalvar:=slocalarq; acbrnfe1.configuracoes.geral.modelodf :=monfce; acbrnfe1.configuracoes.arquivos.PathSchemas:='C:\PDVLOPES\Debug\Win32\Schemas'; //webservices acbrnfe1.configuracoes.webservices.uf:=sufws; acbrnfe1.configuracoes.webservices.ambiente:=strtotpamb(ok,inttostr(sambiente)); acbrnfe1.configuracoes.webservices.visualizar:=true; acbrnfe1.configuracoes.webservices.proxyhost:=shost; acbrnfe1.configuracoes.webservices.proxyport:=sporta; acbrnfe1.configuracoes.webservices.proxyuser:=susuariows; acbrnfe1.configuracoes.webservices.proxypass:=senhaws; ACBrNFe1.Configuracoes.WebServices.Visualizar:=false; segue com esta saindo meu xml continua sem a tag qrcode <?xml version="1.0" encoding="UTF-8" ?> - <NFe xmlns="http://www.portalfiscal.inf.br/nfe"> - <infNFe versao="3.10" Id="NFe33151017465134000180650020000000471000000470"> - <ide> <cUF>33</cUF> <cNF>00000047</cNF> <natOp>Venda de Mercadoria</natOp> <indPag>0</indPag> <mod>65</mod> <serie>2</serie> <nNF>47</nNF> <dhEmi>2015-10-05T11:07:10-03:00</dhEmi> <tpNF>1</tpNF> <idDest>1</idDest> <cMunFG>3304904</cMunFG> <tpImp>4</tpImp> <tpEmis>1</tpEmis> <cDV>0</cDV> <tpAmb>2</tpAmb> <finNFe>1</finNFe> <indFinal>1</indFinal> <indPres>1</indPres> <procEmi>0</procEmi> <verProc>PDVLopes2015</verProc> </ide> - <emit> <CNPJ>17465134000180</CNPJ> <xNome>PLUS CARNES ALIMENTOS LTDA</xNome> - <enderEmit> <xLgr>RUA FRANCISCO PORTELA</xLgr> <nro>151</nro> <xCpl>E151SOBRADO</xCpl> <xBairro>PARAISO</xBairro> <cMun>3304904</cMun> <xMun>SAOGONCALO</xMun> <UF>RJ</UF> <CEP>24435001</CEP> <cPais>1058</cPais> <xPais>BRASIL</xPais> <fone>2126053499</fone> </enderEmit> <IE>79844888</IE> <CRT>3</CRT> </emit> - <det nItem="1"> - <prod> <cProd>7896799510010</cProd> <cEAN /> <xProd>NOTA FISCAL EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xProd> <NCM>20082010</NCM> <CFOP>5405</CFOP> <uCom>un</uCom> <qCom>1.0000</qCom> <vUnCom>7.2900000000</vUnCom> <vProd>7.29</vProd> <cEANTrib /> <uTrib>un</uTrib> <qTrib>1.0000</qTrib> <vUnTrib>7.2900000000</vUnTrib> <indTot>1</indTot> </prod> - <imposto> <vTotTrib>1.49</vTotTrib> - <ICMS> - <ICMS60> <orig>0</orig> <CST>60</CST> </ICMS60> </ICMS> </imposto> </det> - <total> - <ICMSTot> <vBC>0.00</vBC> <vICMS>0.00</vICMS> <vICMSDeson>0.00</vICMSDeson> <vBCST>0.00</vBCST> <vST>0.00</vST> <vProd>7.29</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>7.29</vNF> <vTotTrib>1.49</vTotTrib> </ICMSTot> </total> - <transp> <modFrete>9</modFrete> </transp> - <pag> <tPag>01</tPag> <vPag>7.29</vPag> </pag> - <infAdic> <infCpl>VALOR PAGO:.R$7,29..TROCO: R$ 0,00....................</infCpl> </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="#NFe33151017465134000180650020000000471000000470"> - <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>/ZR+SbJE3zNINbhh7x7XSGT6aMM=</DigestValue> </Reference> </SignedInfo> <SignatureValue>mW9xY5kLlQsGhhwS8RG8RlchtkVrv+sKpgO6MNhC32V/KChHjvcsEBwFQamDPeorVbqpLXsrmG5EUchmOTOuB+VZR5WcBJj4wTSAupJl4oVh+JONd8mGRZ+HV9UWahNpz5e8Wo6dtsEVr5LljI4esVckt9M9Bi3u+b4ujeKxtqIZG7omZRMom5hx9oiwggOiqS0U8Nn2wLmWkSK7rm/HvoNrB1AdIgEqzbZ5NFAEtRj6Zyi5FPA+y+WTFgHgJ8vwjWsVjN2TBpE5Pvno6r2Ddr5y1KaKR6m25MjwQX+EvrAttm4lb6XG8yPuwQ/9YPhZmRXV9/Yhk4YhX5Z6gwaIZw==</SignatureValue> - <KeyInfo> - <X509Data> <X509Certificate>MIIHjTCCBXWgAwIBAgIEAMm7+DANBgkqhkiG9w0BAQsFADCBiTELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxNjA0BgNVBAsTLVNlY3JldGFyaWEgZGEgUmVjZWl0YSBGZWRlcmFsIGRvIEJyYXNpbCAtIFJGQjEtMCsGA1UEAxMkQXV0b3JpZGFkZSBDZXJ0aWZpY2Fkb3JhIFNFUlBST1JGQnY0MB4XDTE1MDYwMTE2NDMxNloXDTE2MDUzMTE2NDMxNlowgeQxCzAJBgNVBAYTAkJSMQswCQYDVQQIEwJSSjEUMBIGA1UEBxMLU0FPIEdPTkNBTE8xEzARBgNVBAoTCklDUC1CcmFzaWwxNjA0BgNVBAsTLVNlY3JldGFyaWEgZGEgUmVjZWl0YSBGZWRlcmFsIGRvIEJyYXNpbCAtIFJGQjEZMBcGA1UECxMQQVJCUkNFUlRJRklDQURPUzEWMBQGA1UECxMNUkZCIGUtQ05QSiBBMTEyMDAGA1UEAxMpUExVUyBDQVJORVMgQUxJTUVOVE9TIExUREE6MTc0NjUxMzQwMDAxODAwggEiMA0GCSqGSIb3DQEBAQUAA4IBDwAwggEKAoIBAQC/GFhhXaw42Gz8aOvGn6cJ9Z85IXAHYXhAy9XkBKpqGPJGc+DXpyP89JmMx+oEttJIwJl+mk7pVqafL1xKCBTCcApjIgEuL4W3vs5D/o44C7m62y59evbxHV9pInfPJpYagnC7iPAPmkZhfis0nEWdnYgS32XFPDPPY3fFWcoVYQvA46FECYzRQdv1+zafVFxrmBmXTUizhQgDdLrZ4zPDNej4sk+/9k+Fopb7Py3sYM1cFtUQ25BLZBOR95ZdnZXv+11c3HD3Wf2jWDOf8xGuWfFb6N5W7HBnBFhsE1/ShM8wpVJPqebycdUu5a7uIDDNZImtcjNh4pjNk7bdR0l/AgMBAAGjggKeMIICmjAfBgNVHSMEGDAWgBQwCiwMuDcr4PbaAv6AgmeWmFQZOzBbBgNVHSAEVDBSMFAGBmBMAQIBCjBGMEQGCCsGAQUFBwIBFjhodHRwOi8vcmVwb3NpdG9yaW8uc2VycHJvLmdvdi5ici9kb2NzL2RwY2Fjc2VycHJvcmZiLnBkZjCB0QYDVR0fBIHJMIHGMDygOqA4hjZodHRwOi8vcmVwb3NpdG9yaW8uc2VycHJvLmdvdi5ici9sY3IvYWNzZXJwcm9yZmJ2NC5jcmwwPqA8oDqGOGh0dHA6Ly9jZXJ0aWZpY2Fkb3MyLnNlcnByby5nb3YuYnIvbGNyL2Fjc2VycHJvcmZidjQuY3JsMEagRKBChkBodHRwOi8vcmVwb3NpdG9yaW8uaWNwYnJhc2lsLmdvdi5ici9sY3Ivc2VycHJvL2Fjc2VycHJvcmZidjQuY3JsMFYGCCsGAQUFBwEBBEowSDBGBggrBgEFBQcwAoY6aHR0cDovL3JlcG9zaXRvcmlvLnNlcnByby5nb3YuYnIvY2FkZWlhcy9hY3NlcnByb3JmYnY0LnA3YjCBvgYDVR0RBIG2MIGzoD0GBWBMAQMEoDQEMjExMDIxOTU3MDczMDcxODg3NTkwMDAwMDAwMDAwMDAwMDAwMDA2MzE3MTc3MUlGUFJKoCYGBWBMAQMCoB0EG0FMRkVMSVRPIEJFWkVSUkEgREUgTUVORVpFU6AZBgVgTAEDA6AQBA4xNzQ2NTEzNDAwMDE4MKAXBgVgTAEDB6AOBAwwMDAwMDAwMDAwMDCBFmNhcmljcmlzMzVAaG90bWFpbC5jb20wDgYDVR0PAQH/BAQDAgXgMB0GA1UdJQQWMBQGCCsGAQUFBwMEBggrBgEFBQcDAjANBgkqhkiG9w0BAQsFAAOCAgEACnV3z4iyv71q7scHlijhc7gR4dTcZnZF2oEe/4GYHGDmln8qcw80FbMU5va3nkwTziwxnB8IRR1fm5ZUI4YcJTX+6nGSiMIDjAAk21mCHCJ8W5/a+9h3CX6eePJt79iaci5Uv3oFU5ku4oJ2DiplaLgkUe/Nm9pfkMOcLGgSNfNithJRBpaqoP4bP2UnRX7iPybvvnrVsWgTrMardKAvtiwdJOglWyjDp0iBlYO0rIBVDuo79y2BGqHedrEhl9T6HaQtMNcidbpDARP49N4xHUuRXDst0fjVA4SiMH+b5UDFcYOvHQWhJROjpIvtbYPFrfromXW4V5bhkZXWRbea3Qe5EwT9RLeXdRFftHsQzPl7SovUO8cv+RvLapxcSrKlh0Z5K5AQEX/xgr2OnSIR3hzQMlHlvxojBWCEmCUBs1xxkGoVxQ+12/tE4vUPpYThLSyTn/l35HBcaUW7FIgB/e2Vv5qtS4v6SNr6dqv0xX2FFLr3lThJBHFrfpuSX2DpYbVzeVoYEAxLGc3qoHXfElwQvfhwNJurAgU2HSCwUbnqMlHw/GrEcSiwaC2+dlVfA/12Eyxdmg7Sn8TJjvC1DGSlZNfhErLW+SVFaUoePEV4kq748jLAB9yUKmk4sp6U3B1djILS79lpq6fWvXoLamqhff1dYd2n2EJX4RBqFAk=</X509Certificate> </X509Data> </KeyInfo> </Signature> </NFe>

JA alimentei a opcção dos shemas mas não obitive exito.Segue o meu acbrnfenotasfiscais.pas e abaixo esta como estou alimento o componente: procedure TDMDados.atualizaconfiguracao; var ok: boolean; begin lerini; {$ifdef acbrnfeopenssl} acbrnfe1.configuracoes.certificados.getcertificado:=scertificado; acbrnfe1.configuracoes.certificados.senha:=ssenha; {$else} acbrnfe1.configuracoes.certificados.numeroserie:=sserie; {$endif} //Layout 3.10 acbrnfe1.Configuracoes.Geral.ModeloDF:=monfce; acbrnfe1.Configuracoes.Geral.VersaoDF:=ve310; //geral acbrnfe1.configuracoes.geral.formaemissao:=strtotpemis(ok,inttostr(sformas)); acbrnfe1.configuracoes.geral.salvar:=ssalvaarq; acbrnfe1.configuracoes.arquivos.pathsalvar:=slocalarq; //webservices acbrnfe1.configuracoes.webservices.uf:=sufws; acbrnfe1.configuracoes.webservices.ambiente:=strtotpamb(ok,inttostr(sambiente)); acbrnfe1.configuracoes.webservices.visualizar:=true; acbrnfe1.configuracoes.webservices.proxyhost:=shost; acbrnfe1.configuracoes.webservices.proxyport:=sporta; acbrnfe1.configuracoes.webservices.proxyuser:=susuariows; acbrnfe1.configuracoes.webservices.proxypass:=senhaws; ACBrNFe1.Configuracoes.WebServices.Visualizar:=false; // if acbrnfe1.danfe <> nil then begin acbrnfe1.danfe.tipodanfe:=strtotpimp(ok,'1'); acbrnfe1.danfe.logo:=slogomarca; ACBrNFeNotasFiscais.pas

Bom dia!!Baixei os shemas mas a xml continua sem a tag algnaldo.so recapitulando eu preciso descomentar o trecho do arquivo C:\Acbr\Fontes\ACBrDFe\ACBrNFe\acbrnfenotasfiscais.pas e depois e so pegar is shemas atualizado e colocar na pasta da minha aplicaçao,e ja tendo o componente acbrnfe adicionado no meu form e so compilar a minha aplicação e so isso?pois estes foram os procedimentos realizados por mim .apos descomentar preciso compilar o acbr novamente ?preciso remover o pacote da library patchs ou e so descomentar?não consegui a solução.

pelo que vi o xml esta sendo gerado sem a tag segue em anexo.mas acredito que o erro seja na hora do envio.Onde encontro os shemas atualizados se forem o que estão na pasta do acbr eu ja coloquei os de la na aplicação. 33151017465134000180650020000000471000000470-nfe.xml

Boa noite !!Fiz o procedimento de Descomentar a unit notasfiscais no acbr mas continuo recebendo a rejeição no meu projeto sou novo com acbr e não estou conseguindo a solução apos descomentar o acbr notasfiscais preciso fazer o que? tem algum outro procedimento ?tenho que compilar novamente ?acbrnotasfiscais ficou assim: \\ var XMLAss: String; ArqXML: String; Leitor: TLeitor; i: Integer; begin if NaoEstaVazio(FXMLAssinado) then exit; ArqXML := GerarXML; // XML já deve estar em UTF8, para poder ser assinado // ArqXML := ConverteXMLtoUTF8(ArqXML); FXMLOriginal := ArqXML; with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do begin XMLAss := SSL.Assinar(ArqXML, 'NFe', 'infNFe'); FXMLAssinado := XMLAss; FXMLOriginal := XMLAss; // Remove header, pois podem existir várias Notas no XML // //TODO: Verificar se precisa //XMLAss := StringReplace(XMLAss, '<' + ENCODING_UTF8_STD + '>', '', [rfReplaceAll]); //XMLAss := StringReplace(XMLAss, '<' + XML_V01 + '>', '', [rfReplaceAll]); Leitor := TLeitor.Create; try leitor.Grupo := XMLAss; NFe.signature.URI := Leitor.rAtributo('Reference URI='); NFe.signature.DigestValue := Leitor.rCampo(tcStr, 'DigestValue'); NFe.signature.SignatureValue := Leitor.rCampo(tcStr, 'SignatureValue'); NFe.signature.X509Certificate := Leitor.rCampo(tcStr, 'X509Certificate'); finally Leitor.Free; end; //*********************************************************************************** // Atenção o código comentado abaixo não pode ser excluido pois será descomentado // quando as alterações no XML definidas em NT 2015/002 versão 1.00 entrar em vigor. // Homologação: 01/10/2015 // Produção: 03/11/2015 //*********************************************************************************** // Gera o QR-Code para adicionar no XML antes de ser validado e salvo // somente para a NFC-e. if Configuracoes.Geral.ModeloDF = moNFCe then begin with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do begin NFe.infNFeSupl.qrCode := GetURLQRCode(NFe.Ide.cUF, NFe.Ide.tpAmb, onlyNumber(NFe.infNFe.ID), NFe.Dest.CNPJCPF, NFe.Ide.dEmi, NFe.Total.ICMSTot.vNF, NFe.Total.ICMSTot.vICMS, NFe.signature.DigestValue); end; i := pos('<Signature ', XMLAss); XMLAss := Copy(XMLAss, 1, i -1) + '<infNFeSupl>' + '<qrCode>' + '<![CDATA[' + NFe.infNFeSupl.qrCode + ']]>' + '</qrCode>' + '</infNFeSupl>' + Copy(XMLAss, i, length(XMLAss)); end; FXMLAssinado := XMLAss; ; if Configuracoes.Arquivos.Salvar then begin if NaoEstaVazio(NomeArq) then Gravar(NomeArq, XMLAss) else Gravar(CalcularNomeArquivoCompleto(), XMLAss); end; end; end;\\

Ok!!desculpe já criei um novo!!

Obrigado Juliomar realmente eram as Dlls !! Poderia me ajudar em mas uma duvida estou me deparando com a rejeição por falta de qr-code no xml,verifiquei a linha descomentada no acbr mas gostaria de saber como fazer para comentala estou meio perdio ,coloquei abaixo do total.rettrib.me desculpe mas sou novo com acbr. total.retTrib.vRetcsll:=0; total.retTrib.vbcirrf:=0; total.retTrib.virrf:=0; total.retTrib.vRetprev:=0; // Gera o QR-Code para adicionar no XML antes de ser validado e salvo // somente para a NFC-e. infNFeSupl.qrCode := GetURLQRCode(Ide.cUF, Ide.tpAmb, onlyNumber(infNFe.ID), Dest.CNPJCPF, Ide.dEmi, Total.ICMSTot.vNF, Total.ICMSTot.vICMS, signature.DigestValue); end;

Bom dia!!Estou com duvídas sobre onde comentar a linha do qr-code em meu projeto pois estou me deparando com a rejeição da Nfc-e em homologação.me perdoem pela minha estupidez mas sou novo com acbr,seria esta a maneira correta? total.ISSQNtot.viss:=0; total.ISSQNtot.vpis:=0; total.ISSQNtot.vcofins:=0; // total.retTrib.vRetPIS:=0; total.retTrib.vRetcofins:=0; total.retTrib.vRetcsll:=0; total.retTrib.vbcirrf:=0; total.retTrib.virrf:=0; total.retTrib.vRetprev:=0; // Gera o QR-Code para adicionar no XML antes de ser validado e salvo // somente para a NFC-e. infNFeSupl.qrCode := GetURLQRCode(Ide.cUF, Ide.tpAmb, onlyNumber(infNFe.ID), Dest.CNPJCPF, Ide.dEmi, Total.ICMSTot.vNF, Total.ICMSTot.vICMS, signature.DigestValue); end;

Bom dia!!,fiz todos os procedimentos para atualizar do trunk1 para o 2, inclusive a remoca do trunk1 mas infelizmente sempre que abro delphi ele não inicializa alguns pacotes acbr como o acbr_nfe.bpl .aparece a seguinte mensagem falha na inicialização do aplicativo devido a configuração lado a lado incorreta mesmo formatando meu pc e instalando tudo do zero sempre caio neste mesmo problema.Poderia me ajudar.

Bom dia!! Alguém poderia me ajudar em relação a declarar o primeiro item desta maneira no acbr?

Julio obrigado pela dica!!Consegui encontrar o recurso que me recomendou segue comando para quem necessitar :ACBrNFe.Configuracoes.WebServices.Visualizar:=false;

Desculpe a minha ignorância Julio mas poderia me dizer onde fica este recurso ?

Desculpe !!! Existe alguma maneira de enviar xml para o sefaz utilizando o acbr sem que necessite que o usuário clique no botão ok pra confirmar retorno de lote recebido status 103 e 104?

BOA NOITE!!ESTOU A POUCO TEMPO TRABALHANDO COM DELPHI MEU PROJETO JA EMITE NFCE ONLINE E OFFLINE,MAS ESTOU TENTANDO IMPLEMENTAR UM FUNÇÃO QUE ENVIE AUTOMATICAMENTE AS XML EM CONTINGENCIA ASSIM QUE A INTERNET RETORNE ,ALGUEM JA FEZ ESSE PROCEDIMENTO TENHO ALGO EM MENTE MAS GOSTARIA DE SABER SE EXISTE ALGUMA MANEIRA DE QUANDO ENVIAR O XML EM LOTE DE NÃO APRESENTAR A MENSAGEM DE RETORNO DE LOTE ENVIADO.POIS TODA VEZ QUE ENVIO A XML PELO ACBR PEDE AO USUARIO QUE DE UM OK PARA O RETORNO STATUS 103 E OUTRO OK PARA O STATUS 104 DE LOTE RECEBIDO,EXISTE ALGUMA MANEIRA DE NÃO SOLICITAR QUE O USUARIO DE OK NA MESAGEM DE LOTE RECEBIDO ?DESDE JA AGRADEÇO PELA A ATENÇÃO!!