Segue correção que tive que fazer no arquivo Fontes\PCN2\pcnNFeW.pas
procedure TNFeW.GerarIdeNFref;
var
i: Integer;
begin
// Gera TAGs se NÃO for uma NFe referência
for i := 0 to nfe.ide.NFref.Count - 1 do
begin
Gerador.wGrupo('NFref', IfThen(nfe.infNFe.Versao >= 3, 'BA', 'B12a'));
//Gerador.wGrupo('NFref', 'B12a');
if nfe.ide.NFref[i].refNFe <> '' then (**)GerarIdeNFrerefNFe(i);
if nfe.Ide.NFref[i].RefNF.nNF > 0 then (**)GerarIdeNFrefRefNF(i);
if nfe.ide.NFref[i].RefNFP.nNF > 0 then (**)GerarRefNFP(i);
if nfe.ide.NFref[i].refCTe <> '' then (**)GerarIdeNFrerefCTe(i);
if nfe.ide.NFref[i].RefECF.nCOO <> '' then (**)GerarRefECF(i);
Gerador.wGrupo('/NFref');
end;
if nfe.ide.NFref.Count > 500 then
Gerador.wAlerta(IfThen(nfe.infNFe.Versao >= 3, 'BA', 'B12a'), 'NFref', DSC_QNF, ERR_MSG_MAIOR_MAXIMO + '500');
//Gerador.wAlerta('B12a', 'NFref', DSC_QNF, ERR_MSG_MAIOR_MAXIMO + '500');
end;
Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.