Pessoal identifiquei um erro na unit pnfsNFSeW refente ao provedor proISSIntel.
Alteração unit pnfsNFSeW
procedure TNFSeW.GerarTomador;
Antes
case Provedor of
profintelISS,
proGinfes,
proThema,
proProdemge,
proBetim,
proWebISS,
proGovBR,
proBetha: begin
Gerador.wCampoNFSe(tcStr, '#43', 'CodigoMunicipio', 7, 7, 0, SomenteNumeros(NFSe.Tomador.Endereco.CodigoMunicipio), '');
Gerador.wCampoNFSe(tcStr, '#44', 'Uf ', 2, 2, 0, NFSe.Tomador.Endereco.UF, '');
end;
else begin
Gerador.wCampoNFSe(tcStr, '#43', 'Cidade', 007, 007, 0, SomenteNumeros(NFSe.Tomador.Endereco.CodigoMunicipio), '');
Gerador.wCampoNFSe(tcStr, '#44', 'Estado', 002, 002, 0, NFSe.Tomador.Endereco.UF, '');
end;
end;
depois
case Provedor of
profintelISS,
--->proISSIntel,
proGinfes,
proThema,
proProdemge,
proBetim,
proWebISS,
proGovBR,
proBetha: begin
Gerador.wCampoNFSe(tcStr, '#43', 'CodigoMunicipio', 7, 7, 0, SomenteNumeros(NFSe.Tomador.Endereco.CodigoMunicipio), '');
Gerador.wCampoNFSe(tcStr, '#44', 'Uf ', 2, 2, 0, NFSe.Tomador.Endereco.UF, '');
end;
else begin
Gerador.wCampoNFSe(tcStr, '#43', 'Cidade', 007, 007, 0, SomenteNumeros(NFSe.Tomador.Endereco.CodigoMunicipio), '');
Gerador.wCampoNFSe(tcStr, '#44', 'Estado', 002, 002, 0, NFSe.Tomador.Endereco.UF, '');
end;
end;
Fico no Aguardo