We hebben tot nu toe vele vormen gezien om getallen op te maken. We regelden de opmaak via speciale tekens in de picture-string. Blank when zero is een vorm van opmaak die los staat van de picture-string. Het is aparte clausule die we bij een elementair veld kunnen schrijven. De naam zegt al wat de clausule doet: als het betrokken veld de waarde nul krijgt, dan moeten er alleen spaties komen.
We mogen blank when zero schrijven achter een opgemaakt veld of achter een veld met alleen negens. In dat laatste geval valt zo'n veld door de toevoeging blank when zero in de categorie numeriek-opgemaakt. Denk er nog eens aan dat je met zo'n veld niet mag rekenen!
01 te-betalen pic Fzz9.99, blank when zero. 01 schatting pic 99, blank when zero.
De clausule blank when zero heeft alleen effect als de waarde nul is. In alle overige gevallen gelden de regels van de picture-string. Blank when zero is niet toegestaan bij een picture-string waarin een of meer sterretjes voorkomen.
Hier volgen enkele move-opdrachten. Na de opdracht staat wat de inhoud van het resultaatveld is geworden.
inhoud
move 123.45 to te-betalen F123.45
move zero to te-betalen (zes spaties)
move 0 to schatting (twee spaties)
move +10 to schatting 10
Serie: leerboeken informatica
Titel: Tijd voor COBOL 2
Auteur: Andree Hollander
