7.11 Overflow bij unstring

Er zijn twee situaties die bij een unstring-opdracht overflow veroorzaken. De eerste heeft te maken met de pointer; de tweede met het aantal resultaatvelden.

onthoud

Als het pointerveld bij het begin van de unstring kleiner is dan 1 of groter dan de lengte van het uitgangsveld, dan ontstaat overflow. Verder treedt overflow op als er te weinig velden zijn. Er zijn nog tekens over te brengen, maar alle velden na into zijn al behandeld.

Op een overflow-situatie kunnen we in een unstring-opdracht reageren. We kunnen ook aangeven wat er moet gebeuren als de unstring zonder overflow is beëindigd. Daarvoor bestaat not on overflow. Het unstring-statement sluiten we dan af met end-unstring.

    unstring datum 
        delimited by all "-" or "/" or space
    into 
        dag delimiter in scheiding1
        mnd delimiter in scheiding2
        jaar
    on overflow 
         display "datumveld onjuist ingedeeld"
    not on overflow
         move "ok" to datumstand
    end-unstring
  

Het kan gebeuren dat overflow optreedt, maar dat er geen on overflow is beschreven. In zo'n geval gaat de computer gewoon door met de volgende opdracht.

omslag leerboek

Serie: leerboeken informatica

Titel: Tijd voor COBOL 1

Auteur: Andree Hollander

naamlogo