|
COBOL est toujours l'un des langages informatiques les plus riches et les plus élégantes sur le marché. Mis à part la puissance de calcul et des capacités énormes de gestion de fichiers , vous avez la possibilité de nombre de conversions et des rapports . Plusieurs fois, vous pouvez avoir besoin d'afficher les valeurs numériques spécifiques sur les rapports de production , des fichiers ou des champs d'affichage de l' écran comme CICS. Sans aucun doute, vous rencontrerez des formats numériques qui ne s'affichent pas correctement tel qu'il est stocké 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. Instructions
1 identifier le champ (s) que vous souhaitez convertir dans le code COBOL . Par exemple , vous pouvez avoir un champ qui lit ce type: "05 pkd -field- 01 pic S9 ( 5v99 ) comp -3. " Il s'agit d'un champ décimal condensé signé utilisé efficacement pour les calculs mais ne peut pas être lu facilement sur un écran .
2 Aller à la " WORKING-STORAGE SECTION 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 " 05 ws- numérique pic S9 ( 5v99 ) Valeur zéro » et « 05 ws -display- numérique pix x (8) ».
3 Insérer le code dans le programme pour déplacer le champ de saisie directement dans le premier champ intermédiaire " ws- numérique. " Cela va décompresser le nombre comp -3 dans un champ numérique zoné. a son tour, avoir le code maintenant passer le premier champ d' intermédiaire dans la seconde, ws- affichage numérique. Ce dernier champ peut être utilisé pour afficher le numéro soit sur un formulaire imprimé ou sur un écran d' ordinateur.
4 compiler le programme avec les modifications enregistrées et s'assurer qu'il n'y a pas d'erreurs dans la compilation en vérifiant le code de condition .
5 exécuter la version compilée et vérifier les résultats.
|
