Erro apresentado na emissão NFCe "failed to parce", qrcode

Rene costa cabral · 20 Janeiro, 2020

Estou iniciando o desenvolvimento do NFCe e após a gerar o arquivo apresenta um erro "failed to parse" e não envia o NFCe, ja olhei em tópico anterior e a solução apresentada não resolveu meu problema, vou postar abaixo o XML e a imagem o erro apresentado, abaixo a sequencia que estou utilizando no desenvolvimento, o erro ocorre na etapa ACBrNFCe1.Enviar.

ACBrNFCe1.NotasFiscais.Clear;
with ACBrNFCe1.NotasFiscais.Add.NFe do
begin
Ide.natOp := 'VENDA';
Ide.indPag := ipVista;
Ide.modelo := 65;
Ide.serie := 1;
Ide.nNF := 1; // numero da nota
Ide.cNF := 1;
Ide.dEmi := date;
Ide.dSaiEnt := date;
Ide.hSaiEnt := now;
Ide.tpNF := tnSaida;
Ide.tpEmis := TpcnTipoEmissao(1); // verificar
Ide.tpAmb := taHomologacao; // Lembre-se de trocar esta variÃ¡vel quando for para ambiente de produÃ§Ã£o
Ide.cUF := 35; // verificar é o codigo do estado
Ide.cMunFG := 3549805;
Ide.finNFe := fnNormal;
Ide.tpImp := tiNFCe;
Ide.indFinal := cfConsumidorFinal;
Ide.indPres := pcPresencial;
Ide.verProc := '4.0.0.0';
//
Emit.CNPJCPF := '31973614000183';
Emit.IE := '647987785111';
Emit.xNome := 'COMAP COMERCIO DE AREIA E PEDRA SAO JOSE DO RIO PRETO EIRELI';
Emit.xFant := 'COMAP COMERCIO DE AREIA E PEDRA SAO JOSE DO RIO PRETO EIRELI';
Emit.EnderEmit.fone := '1732249154';
Emit.EnderEmit.CEP := 15092230;
Emit.EnderEmit.xLgr := 'ESTRADA ANTONIO JOSE MARTINS FILHO';
Emit.EnderEmit.nro := '300';
Emit.EnderEmit.xCpl := '';
Emit.EnderEmit.xBairro := 'ESTANCIA MATINHA';
Emit.EnderEmit.cMun := 3549805;
Emit.EnderEmit.xMun := 'SAO JOSE DO RIO PRETO';
Emit.EnderEmit.UF := 'SP';
Emit.enderEmit.cPais := 1058;
Emit.enderEmit.xPais := 'BRASIL';
Emit.IEST := '';
Emit.CRT := crtSimplesNacional;// (1-crtSimplesNacional, 2-crtSimplesExcessoReceita, 3-crtRegimeNormal)
//
Dest.CNPJCPF := '05481336000137';
Dest.ISUF := '';
Dest.xNome := 'D.J. COM. E LOCAÇÃO DE SOFTWARES LTDA - ME';
Dest.EnderDest.Fone := '1533243333';
Dest.EnderDest.CEP := 18270170;
Dest.EnderDest.xLgr := 'Rua Coronel Aureliano de Camargo';
Dest.EnderDest.nro := '973';
Dest.EnderDest.xCpl := '';
Dest.EnderDest.xBairro := 'Centro';
Dest.EnderDest.cMun := 3554003;
Dest.EnderDest.xMun := 'Tatuí';
Dest.EnderDest.UF := 'SP';
Dest.EnderDest.cPais := 1058;
Dest.EnderDest.xPais := 'BRASIL';
//
// Use os campos abaixo para informar o endereço de retirada quando for diferente do Remetente/Destinatário
//
Retirada.CNPJCPF := '';
Retirada.xLgr := '';
Retirada.nro := '';
Retirada.xCpl := '';
Retirada.xBairro := '';
Retirada.cMun := 0;
Retirada.xMun := '';
Retirada.UF := '';
//
// Use os campos abaixo para informar o endereço de entrega quando for diferente do Remetente/Destinatário
//
Entrega.CNPJCPF := '';
Entrega.xLgr := '';
Entrega.nro := '';
Entrega.xCpl := '';
Entrega.xBairro := '';
Entrega.cMun := 0;
Entrega.xMun := '';
Entrega.UF := '';
//
// Adicionando Produtos
//
with Det.New do
begin
Prod.nItem := 1; // Número sequencial, para cada item deve ser incrementado
Prod.cProd := '123456';
Prod.cEAN := '7896523206646';
Prod.xProd := 'Descrição do Produto';
Prod.NCM := '94051010'; // Tabela NCM disponível em http://www.receita.fazenda.gov.br/Aliquotas/DownloadArqTIPI.htm
Prod.EXTIPI := '';
Prod.CFOP := '5101';
Prod.uCom := 'PC';
Prod.qCom := 1;
Prod.vUnCom := 100;
Prod.vProd := 100;
Prod.cEANTrib := '7896523206646';
Prod.uTrib := 'PC';
Prod.qTrib := 1;
Prod.vUnTrib := 100;
Prod.vOutro := 0;
Prod.vFrete := 0;
Prod.vSeg := 0;
Prod.vDesc := 0;
Prod.CEST := '';
//
// Prod.infAdProd := 'Informação Adicional do Produto';
//
// lei da transparencia nos impostos
//
with Imposto do
begin
// lei da transparencia nos impostos
vTotTrib := (100*5)/100;

with ICMS do
begin
CSOSN := csosn102;
ICMS.orig := oeNacional;
ICMS.modBC := dbiValorOperacao;
ICMS.vBC := 0;
ICMS.pICMS := 0;
ICMS.vICMS := 0;
ICMS.modBCST := dbisMargemValorAgregado;
ICMS.pMVAST := 0;
ICMS.pRedBCST:= 0;
ICMS.vBCST := 0;
ICMS.pICMSST := 0;
ICMS.vICMSST := 0;
ICMS.pRedBC := 0;

// partilha do ICMS e fundo de probreza
with ICMSUFDest do
begin
vBCUFDest := 0.00;
pFCPUFDest := 0.00;
pICMSUFDest := 0.00;
pICMSInter := 0.00;
pICMSInterPart := 0.00;
vFCPUFDest := 0.00;
vICMSUFDest := 0.00;
vICMSUFRemet := 0.00;
end;
end;

with PIS do
begin
CST := pis04;
PIS.vBC := 0;
PIS.pPIS := 0;
PIS.vPIS := 0;

PIS.qBCProd := 0;
PIS.vAliqProd := 0;
PIS.vPIS := 0;
end;

with PISST do
begin
vBc := 0;
pPis := 0;
qBCProd := 0;
vAliqProd := 0;
vPIS := 0;
end;

with COFINS do
begin
CST := cof04;
COFINS.vBC := 0;
COFINS.pCOFINS := 0;
COFINS.vCOFINS := 0;

COFINS.qBCProd := 0;
COFINS.vAliqProd := 0;
end;

with COFINSST do
begin
vBC := 0;
pCOFINS := 0;
qBCProd := 0;
vAliqProd := 0;
vCOFINS := 0;
end;
end;
end;
//
// FIM PRODUTO
//
Total.ICMSTot.vBC := 0;
Total.ICMSTot.vICMS := 0;
Total.ICMSTot.vBCST := 0;
Total.ICMSTot.vST := 0;
Total.ICMSTot.vProd := 100;
Total.ICMSTot.vFrete := 0;
Total.ICMSTot.vSeg := 0;
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 := 100;
// partilha do icms e fundo de probreza
Total.ICMSTot.vFCPUFDest := 0.00;
Total.ICMSTot.vICMSUFDest := 0.00;
Total.ICMSTot.vICMSUFRemet := 0.00;
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.vBCRetPrev := 0;
Total.retTrib.vRetPrev := 0;

Transp.modFrete := mfSemFrete; // NFC-e não pode ter FRETE

with pag.New do
begin
tPag := fpDinheiro;
vPag := 100;
end;
infRespTec.CNPJ := '04802755000160';
infRespTec.xContato := 'RENE COSTA CABRAL';
infRespTec.email := '[email protected]';
infRespTec.fone := '1732249154';
end;
ACBrNFCe1.NotasFiscais.GerarNFe;
ACBrNFCe1.NotasFiscais.GravarXML(ExtractFilePath(Application.ExeName) + '\nfe\000001A.xml');
ACBrNFCe1.NotasFiscais.Assinar;
ACBrNFCe1.NotasFiscais.GravarXML(ExtractFilePath(Application.ExeName) + '\nfe\000001.xml');
ACBrNFCe1.Enviar(1,true);