GARANTIR DESCONTO

Fórum Assistente de importação de dados #352616

28/01/2008

0

Delphi

Estou desenvolvendo um importador de dados;

Tenho um campo Estado na tabela de destino que recebe valores (Ativo/Inativo)

Mas na tabela de origem esses valores podem estar de outra forma, cmo 0/1

Alguém tem alguma ideia de como eu Identificar na hora da importação que 1 deve ser ativo e 0 inativo?

Lembrando que esses valores podem ser de outros valores (Active/Inactive) (Sim/Não)


Luiz_aquino

Luiz_aquino

Responder

Posts

28/01/2008

Aroldo Zanela

Colega,


Existem diversas opções como: abstract factory, mapeamento, sobrecarga, etc.
Vou colocar um exemplo de overload que poderá ajudar no desenvolvimento de seu ETL:

function Situacao(Valor: Integer): string; overload;
function Situacao(Valor: Boolean): string; overload;
function Situacao(Valor: string): string; overload;

var
  Form1: TForm1;

implementation

{$R *.dfm}

function Situacao(Valor: Integer): string; overload;
const opcoes: array[0..1] of string =  (´inativo´,´ativo´);
begin
Result := opcoes[Valor];
end;

function Situacao(Valor: Boolean): string; overload;
const opcoes: array[0..1] of string =  (´inativo´,´ativo´);
begin
Result := opcoes[Integer(Valor)];
end;

function Situacao(Valor: string): string; overload;
const opcoes: array[0..1] of string =  (´inativo´,´ativo´);
begin
{Seu código}
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(Situacao(true));
end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar