Quantcast
Channel: Visual COBOL
Viewing all articles
Browse latest Browse all 5819

Forum Post: RE: Boolean functions

$
0
0
Michael, Thanks for that. I know about 88 levels. To use an 88 level I have to do:    01  w-flag pic x.      88  wc-ok value "y" false "n".    call "validformat" using w-data w-flag.    if wc-ok then ... Or:    01  w-flag pic x.      88  wc-ok value "y" false "n".    move  validformat(w-data) to w-flag.    if wc-ok then ... I have to: 1) create a data item for the purpose; 2) type 2 lines. That's both more work and less clear than:    if validformat(w-data) then ... Preaching to the converted I guess. Leigh.

Viewing all articles
Browse latest Browse all 5819

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>