Segue alterações pra Nf-s pro Municipio de Bagé-RS
pnfsConversao.pas
CodCidadeToCidade(const ACodigo: Integer): string;
...
4301602: Cidade := 'Bagé/RS';
...
end;
function CodCidadeToProvedor(const ACodigo: Integer): string;
...
4301602 // Bage/RS
: Provedor := 'WebISS';
...
end;
AcbrProvedorWebISS.pas
function TProvedorWebISS.GetConfigCidade(ACodigo,
AAmbiente: Integer): TConfigCidade;
...
4301602: ConfigCidade.CodigoURLs := 09; // Bage/RS
...
end;
function TProvedorWebISS.GetConfigURL(ACodigo: Integer): TConfigURL;
...
case ACodigo of
09: begin
ConfigURL.HomNomeCidade := 'bagers';
ConfigURL.ProNomeCidade := 'bagers';
end;
...
end
case ACodigo of
02,
03,
04,
08,
09: begin
ConfigURL.HomRecepcaoLoteRPS := 'https://www1.webiss.com.br/' + ConfigURL.HomNomeCidade + '_wsnfse_homolog/NfseServices.svc';
...
end;
function TProvedorWebISS.GetConfigCidade(ACodigo,
AAmbiente: Integer): TConfigCidade;
...
case ACodigo of
...
4301602: ConfigCidade.CodigoURLs := 09; // Bage/RS
end;
...
end;
