Como: |
Linguagens Disponíveis: Reporting
LJUST justifica à esquerda uma string de caracteres dentro de um campo. Todos os espaços à esquerda se tornam espaços à direita.
A função LJUST não terá qualquer efeito visível em um relatório que utiliza StyleSheets (SET STYLE=ON) a não ser que você centralize o item.
LJUST(length, source_string, output)
onde:
Inteiro
É o número de caracteres da source_string e output ou um campo que contém o comprimento.
Alfanumérico
É a string de caracteres a ser justificada ou um campo ou variável contendo a string.
Alfanumérico
É o nome do campo que contém o resultado ou o formato do valor de saída posto entre aspas simples.
A solicitação a seguir cria o campo XNAME no qual os sobrenomes não são justificados à esquerda. Em seguida, a função LJUST justifica à esquerda o campo XNAME e armazena o resultado em YNAME.
SET STYLE=OFF
DEFINE FILE EMPLOYEE
XNAME/A25=IF LAST_NAME EQ 'BLACKWOOD' THEN ' '|LAST_NAME ELSE
''|LAST_NAME;
YNAME/A25=LJUST(15, XNAME, 'A25');
END
TABLE FILE EMPLOYEE
PRINT LAST_NAME XNAME YNAME
END
A saída é:
LAST_NAME XNAME YNAME --------- ----- ----- STEVENS STEVENS STEVENS SMITH SMITH SMITH JONES JONES JONES SMITH SMITH SMITH BANNING BANNING BANNING IRVING IRVING IRVING ROMANS ROMANS ROMANS MCCOY MCCOY MCCOY BLACKWOOD BLACKWOOD BLACKWOOD MCKNIGHT MCKNIGHT MCKNIGHT GREENSPAN GREENSPAN GREENSPAN CROSS CROSS CROSS
Information Builders |