what if any ,is the syntax error in the following piece of code
01 B PIC A(7)
02 C PIC 9(4)
........
IF(B NUMERIC)
ADD 10 TO C
a.the condition in the if statement is wrong
b.noting is wrong
c.because C is initialised.ADD 10 TO C is wrong
d.both B and C shoud have same size.
Answer Posted / dimpy19
"B (ALPHABETIC)" did not have a valid type for the specified class condition. T
nformational Warning Error Severe Terminating
WORKING-STORAGE SECTION.
01 B PIC A(7) VALUE '1'.
01 C PIC 9(4) VALUE 2.
PROCEDURE DIVISION.
IF(B NUMERIC)
ADD 10 TO C.
STOP RUN.
| Is This Answer Correct ? | 4 Yes | 0 No |
Post New Answer View All Answers
Why block size is multiple of lrecl in jcl?
Which dd parameters are required?
Explain how can the disposition of sysout datasets be set for an entire jobstream?
how can the same proc be re-used and called by many jobs?
What are steplib and joblib? What for they are used?
what is DSN parameter and DISP parameter is used for?
what is use of dcb parameter in dd statement?
what is DD statement is used in JCL?
How dummy is used in jcl?
What is one line to pass PARM from JCL to COBOL?
what are the types of abends that occur on job failure? And explain the possible causes of these
Is their any set of rules for dd? Explain.
How can a stopped job be started again?
WORKING-STORAGE SECTION. 01 GROSS-PAY. 05 BASIC-PAY PIC 9(5). 05 ALLOWENCES PIC 9(3). PROCEDURE DIVISION. MOVE 1000 TO BASIC-PAY. MOVE 250 TO ALLOWENCES. DISPLAY GROSS-PAY. STOP RUN. 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
What is the maximum length of a single line of jcl?