Re: Testing for first non-blank character

[Malcolm Westley <mwestley@xxxxxx>]

The clock chimed 2:48 PM -0700 9/8/99 when Roger Boucher scribbled:
>Does anybody have a brilliant little piece of RPGIII code to test for the
>first non-blank character in a right-justified (sorry, JDE stuff) character
>field so that I can substring from that position to the end of the field?  I
>really don't want to use a data structure and test each character if I don't
>have to... I have my pride <g>.
>
>TIA
>
It's been awhile since I've used rpgiii, but I seemed to recall that the
CHECK opcode is available and will do exactly what you want.

hth,
Malcolm


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---