O trecho abaixo, quando é usado os 15 digitos do numero da RPS que é permitido, ao passar nessa funcao, corta-se para 9.
Seria possivel comentarem tal função ?
with IdentificacaoRps do
begin
FieldByName('Numero').AsString := DFeUtil.FormatarNumeroDocumentoFiscal(Numero);
// FieldByName('Serie').AsString := Serie;
// FieldByName('Tipo').AsString := DFeUtil.SeSenao(Tipo = trRPS, '0','1');
end;
A ponto de deixa-la assim ? Deixar o numero do RPS do jeito que eu criei? sem corta-lo para 9 digitos
with IdentificacaoRps do
begin
FieldByName('Numero').AsString := Numero;
// FieldByName('Serie').AsString := Serie;
// FieldByName('Tipo').AsString := DFeUtil.SeSenao(Tipo = trRPS, '0','1');
end;
ACBrNFSeDANFSeFRDM.pas
ACBrNFSeDANFSeFRDM.pas