COBOL er stadig en af de rigeste og mest elegante computer sprog på markedet. Bortset fra computerkraft og massive filhåndtering kapaciteter , har du fleksibiliteten i antal konverteringer og rapportering. Mange gange kan du nødt til at vise specifikke numeriske værdier output rapporter , filer eller skærmvisning felter som CICS . Utvivlsomt , vil du støde numeriske formater, der ikke vil vise korrekt som opbevaret og bliver nødt til at blive yderligere omdannes til et mere læsbart format. En af de mest almindelige er pakket decimal eller COMP -3 numerisk felt . Instruktioner
1
Identificer område (r ), du ønsker at konvertere i COBOL . For eksempel kan du have et felt , der læser ligner : " 05 PKD -field -01 pic S9 ( 5v99 ) comp -3 ". Dette er en underskrevet pakket decimal felt anvendes effektivt til beregninger , men ikke let kan aflæses i et display.
2
Gå til " Working -Storage sektion af programmet og oprette de mellemliggende felter vil nødt til at gøre det ønskede numeriske overgang som følger: oprette to numeriske felter " 05 ws - numerisk pic S9 ( 5v99 ) værdien nul , " og " 05 WS- display - numerisk pix x (8). "
< br > 3
Indsæt kode i programmet for at flytte indtastningsfeltet direkte ind i den første mellemliggende feltet " ws - numerisk . " Dette vil pakke comp - 3 tal til en zoneopdelt numerisk felt. til gengæld koden har nu flytte den første mellemliggende feltet i den anden, WS- display - numerisk . Denne sidste felt kan bruges til at vise antallet enten på en trykt form eller på en computerskærm.
4
kompilere programmet med de gemte ændringer og sørge for der er ingen fejl i kompileringen ved at kontrollere tilstanden koden .
5.
Kør kompileret version og verificere resultaterne .