>>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