BITSON : Déterminer si un octet est activé ou non

La fonction BITSON évalue l'état d'activation d'un octet spécifique dans une chaîne de caractères afin de déterminer si il est activé ou non. Si l'octet est activé (ON), BITSON renvoie la valeur 1, sinon, elle renvoie la valeur 0. Cette fonction est utile dans l'interprétation des données à perforation multiples, où chaque perforation apporte un élément d'information.

Syntaxe : Déterminer si un octet est activé ou non

BITSON(bitnumber, source_string, output)

où :

bitnumber

Entier

est le numéro du bit à évaluer en comptant du bit de gauche de la chaîne de caractères.

source_string

Alphanumérique

est une chaîne de caractères à évaluer encadrée par des guillemets simples, ou un champ contenant celle-ci. La chaîne de caractères est en multiples blocs de huit bits.

output

Entier

est le champ qui contient le résultat, ou le format de la valeur de sortie entre guillemets simples.

Haut de page

Exemple : Evaluer un bit dans un champ

BITSON évalue le 24ième octet de LAST_NAME; le résultat est stocké dans BIT_24 :

TABLE FILE EMPLOYEE
PRINT LAST_NAME AND COMPUTE
BIT_24/I1 = BITSON(24, LAST_NAME, BIT_24);
WHERE DEPARTMENT EQ 'MIS';
END

La sortie est :

LAST_NAME        BIT_24
---------        ------
SMITH                 1
JONES                 1
MCCOY                 1
BLACKWOOD             1
GREENSPAN             1
CROSS                 0