Naturezas de Operação - Retorno de Variavel Suprimida

[Diogo Loff]

Na versão atual de ACBrNFSeXConversao foi removido o retorno do OK booleano da função StrToNaturezaOperacao

 

function StrToNaturezaOperacao(out ok: boolean; const s: string): TnfseNaturezaOperacao;
var
  idx: TnfseNaturezaOperacao;
begin
  for idx:= Low(TNaturezaOperacaoArrayStrings) to High(TNaturezaOperacaoArrayStrings) do
  begin
    if (TNaturezaOperacaoArrayStrings[idx] = s) then
    begin
      ok := True;
      Result := idx;
      exit;
    end;
  end;

  ok := False;
  raise EACBrException.CreateFmt('Valor string inválido para TnfseNaturezaOperacao: %s', [s]);
end;

Eu por exemplo uso para checagem no meu sistema e parou de funcionar, pois foi removido, o retorno e passou a dar sempre retorno falso.

Acima a correção e anexo o fonte atualizado.

ACBrNFSeXConversao.pas