PCKOUT : Ecrire un nombre condensé de longueur variable

La fonction PCKOUT écrit un nombre condensé de longueur variable à un fichier d'extrait. Lorsqu'une requête enregistre un nombre condensé dans un fichier d'extrait, elle écrit généralement le nombre comme un champ à 8 ou à 16 octets, quel que soit le format. A l'aide de PCKOUT, vous pouvez modifier la longueur du champ pour contenir entre 1 et 16 octets.

Syntaxe : Ecrire un nombre condensé de longueur variable

PCKOUT(in_value, length, output)

où :

in_value

Numérique

est le champ d'entrée qui contient les valeurs. Il peut être condensé, entier, au format de vigule flottante de simple ou double précision. S'il n'est pas en format entier, il est arrondi au chiffre entier le plus proche.

length

Numérique

est la longueur de la valeur de sortie, de 1 à 16 octets.

output

Alphanumérique

est le champ qui contient le résultat, ou le format de la valeur de sortie entre guillemets simples. La fonction retourne le champ au format alphanumérique, même si celui-ci contient des données condensées.

Haut de page

Exemple : Ecrire un nombre condensé de longueur variable

PCKOUT convertit le champ CURR_SAL à un champ condensé à 5 octets ; le résultat est stocké dans SHORT_SAL :

DEFINE FILE EMPLOYEE
SHORT_SAL/A5 = PCKOUT(CURR_SAL, 5, SHORT_SAL);
END
TABLE FILE EMPLOYEE
PRINT LAST_NAME SHORT_SAL HIRE_DATE
ON TABLE SAVE
END

Le fichier d'extraction résultant est :

 NUMBER OF RECORDS IN TABLE=       12 LINES=     12 
 
ALPHANUMERIC  RECORD  NAMED  SAVE 
FIELDNAME                          ALIAS         FORMAT          LENGTH 
LAST_NAME                          LN            A15               15 
SHORT_SAL                                        A5                 5 
HIRE_DATE                          HDT           I6YMD              6 
TOTAL                                                              26