COBOL è ancora una delle lingue più ricche e più elegante per computer sul mercato. A parte la potenza di calcolo e massicce capacità di gestione dei file , si ha la flessibilità di conversioni di numero e di reporting . Molte volte può essere necessario per visualizzare i valori numerici specifici sui rapporti di output , file o campi di visualizzazione dello schermo , come CICS . Indubbiamente , si incontrano i formati numerici che non sarà visualizzato correttamente come immagazzinato e dovranno essere ulteriormente convertito in un formato più leggibile . Uno dei più comuni è il decimale compresso o campo numerico COMP -3 . Istruzioni
1
identificare il campo ( s ) che si desidera convertire il codice COBOL . Ad esempio , si può avere un campo che legge simile a : "05 PKD - campo - 01 pic S9 ( 5v99 ) comp - 3 . " Questa è una firma , campo decimale compresso utilizzato in modo efficiente per i calcoli , ma non può essere facilmente leggere in un display .
2
Vai " WORKING-STORAGE SECTION del programma e impostare i campi intermedi voi volontà bisogno di fare la transizione numerico desiderato: creare due campi numerici " 05 ws - numerico pic S9 ( 5v99 ) zero " e " 05 ws -display- numerico pix x ( 8) . "
3
Inserisci il codice nel programma per spostare il campo di immissione direttamente nel primo campo intermediario "ws - numerico . " Questo sarà scompattare il numero comp -3 in un campo numerico a zone . a sua volta, ha il codice ora muoversi il primo campo intermediario nella seconda, ws -display- numerico . Quest'ultimo campo può essere utilizzato per visualizzare il numero sia su supporto cartaceo o su uno schermo di computer .
4
compilare il programma con le modifiche salvate e assicurarsi che non vi siano errori nella compilazione controllando il codice di condizione .
5
eseguire la versione compilata e verificare i risultati.