FTOA : Convertir un nombre à un format alphanumérique

La fonction FTOA convertit un nombre jusqu'à 16 chiffres de long d'un format numérique en format alphanumérique. Elle conserve les décimales du nombre et justifie à droite celui-ci à l'aide d'espaces incorporés. Vous pouvez aussi ajouter des options pour modifier un certain nombre converti par FTOA.

Lors de l'utilisation de FTOA pour convertir un nombre contenant des décimales à une chaîne de caractères, vous devez spécifier un format alphanumérique suffisamment grand pour accueillir à la fois le nombre entier et les décimales de celui-ci. Par exemple, le format D12.2 est converti à A14. Si le format de sortie n'est pas assez grand, les décimales sont tronquées.

Syntaxe : Convertir un nombre au format alphanumérique

FTOA(number, '(format)', output)

où :

number

Numérique F ou D (virgule flottante de simple précision et double précision)

est le nombre à convertir, ou le champ qui contient le numéro.

format

Alphanumérique

Le format du nombre à convertir entre parenthèses. Seule la virgule flottante de simple précision et double précision sont prises en charge. Inclure toutes les options de modification que vous voulez voir apparaître dans la sortie. Le format D (virgule flottante en double précision) fournit automatiquement les virgules.

Si vous utilisez un nom de champ pour cet argument, précisez le nom sans les guillemets ou parenthèses. Si vous spécifiez un format, le format doit être encadrée de parenthèses.

output

Alphanumérique

est le champ qui contient le résultat, ou le format de la valeur de sortie entre guillemets simples. La longueur de cet argument doit être plus grande que la longueur du nombre et doit prendre en considération les options d'édition et signes négatifs possibles.

Haut de page

Exemple : Convertir un format numérique à un format alphanumérique

FTOA convertit le champ GROSS en virgule flottante de double précision au format alphanumérique et le résultat est stocké dans ALPHA_GROSS :

TABLE FILE EMPLOYEE
PRINT GROSS AND COMPUTE
ALPHA_GROSS/A15 = FTOA(GROSS, '(D12.2)', ALPHA_GROSS);
BY HIGHEST 1 PAY_DATE NOPRINT
BY LAST_NAME
WHERE (GROSS GT 800) AND (GROSS LT 2300);
END

La sortie est :

LAST_NAME  GROSS       ALPHA_GROSS 
---------  -----       ----------- 
BLACKWOOD  $1,815.00      1,815.00 
CROSS      $2,255.00      2,255.00 
IRVING     $2,238.50      2,238.50 
JONES      $1,540.00      1,540.00 
MCKNIGHT   $1,342.00      1,342.00 
ROMANS     $1,760.00      1,760.00 
SMITH      $1,100.00      1,100.00 
STEVENS      $916.67        916.67