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
No Answer is Posted For this Question
Be the First to Post Answer
Please explain with syntax and an example, the Inrec fields and Outrec build in sort.
How I sort the records in a file and copy the first 10 records to another file
If a field is declared as a comp-3 field and if we want to sort a dataset based on this field, then how will the sort card be??? e.g- if we want to sort by a field which is defined as a PIC X(5) then we will mention - sort fields=(1,5,ch,a). Likewise if a field is defined as PIC S9(10)COMP-3 then in this case how will the sort field be defined (because in this case a sign is also involved)???
Name the system library from which modules are retrieved at execution
how to increase the space of a dataset in instream procedure.
How can the disposition of sysout datasets be set for an entire jobstream?
whats SOC7?
Matching Logic in Jcl not in cobol.Could any one please answer this question
How can a jobs execution priority be modified?
What is the motivation behind coding class parameter in job statement?
How to skip first step of a job? Can we use COND on the first step?
How do you create a temporary dataset? Where will you use them?