COBOL est toujours l`un des plus riches et les plus élégantes langages informatiques sur le marché. Mis à part la puissance de calcul et massives des capacités de gestion des fichiers, vous avez la possibilité de conversions et des rapports numériques. Plusieurs fois, vous pouvez avoir besoin d`afficher des valeurs numériques spécifiques sur les rapports de sortie, des fichiers ou des champs d`affichage de l`écran comme CICS. Sans aucun doute, vous rencontrerez des formats numériques qui ne seront pas afficher correctement comme stockés et devront encore être converti en un format plus lisible. Une des plus courantes est le décimal condensé ou COMP-3 champ numérique.
Identifier le champ (s) que vous souhaitez convertir dans le code COBOL. Par exemple, vous pouvez avoir un champ qui lit similaire à: "05 pkd-terrain-01 pic s9 (5v99) comp-3." Ceci est un signé, emballé champ décimal utilisé efficacement pour les calculs, mais ne peut pas être lu facilement dans un affichage.
Allez à la "Section de travail Stockage du programme et mettre en place les champs intermédiaires, vous aurez besoin pour faire la transition numérique souhaitée comme suit: créer deux champs numériques "s9 pic 05 ws-numérique (5v99) la valeur zéro," et "pix x numérique ws-affichage-05 (8)."
Insérer un code dans le programme pour déplacer le champ d`entrée directement dans la première zone intermédiaire "ws-numériques." Cela va décompresser le nombre comp-3 dans un champ numérique zonée. À son tour, ont le code maintenant déplacer le premier champ intermédiaire dans le second, ws-affichage numérique. Ce dernier champ peut être utilisé pour afficher le numéro soit sur une forme imprimée ou sur un écran d`ordinateur.
Compiler le programme avec les modifications enregistrées et assurez-vous qu`il n`y a aucune erreur dans la compilation en vérifiant le code de condition.
Exécutez la version compilée et vérifier les résultats.
