[RESOLVIDO] Listar a string de um campo integer da tabela

Prezados, saudações..

Existe alguns campos de tabela do datasul, que no banco é gravado como integer e quando executa um disp ele mostra as strings, pois possui view-as (Exemplo: campo emitente.ind-cre-cli). Ai você quer pegar as strings para jogar em um relatório ou um campo.

Para não fazer varios ifs assign ou case, pode ser usado:

def var situacao as char.

for each emitente no-lock where cod-emit = 999.
assign situacao = {adinc/i10ad098.i 4 emitente.ind-cre-cli} .
end.

com isso, não precisa ficar fazendo nem, if emitente.ind-cre-cli = 1 then ... e não precisa ficar fazendo, case emitente.ind-cre-cli: when 1 ...

Espero que ajude.

Abraços

Kenny Rogers