>>I'm trying to convert the following
>> pseudo code to run under COBOL

01  CHAR     PIC X(4)  VALUE 'CHAR'.

is incorrect.  When you define a character value
with a length less than 8 you need a trailing blank:

01  CHAR     PIC X(5)  VALUE 'CHAR '.

Gene Lynd


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to