I have below requirement to do
I have to compare IN-VAR1 with W-VAR2(which can have multiple values).
05 IN-VAR1 PIC X(01) VALUE 'Z'.
05 W-VAR1 PIC X(01) VALUE 'A',
IF IN-VAR1 IS NOT EQUAL TO W-VAR1 THEN
DISPLAY 'IN-VAR1 IS NOT IN W-VAR1'
DISPLAY 'IN-VAR1 IS IN W-VAR1'
I wrote the above cobol program but it is giving me below compilation error.
IGYDS1089-S "'B'" was invalid. Scanning was resumed at the next area "A" item
could anyone suggest me how to solve this?