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
What is a Proc ? why do we go for a Proc ? What are the types of procs?Can we have nesting in Procs ?
Write a jcl to execute a job by 7 a.m on Jan 20,1986 ?
how to concatenate datasets
How to get the last but one duplicate record of the file using Sort?
how to resolve sb37,sd37 se37 abends
Explain about LMOPEN -
How can I write the joblog in the spool on normal end of a job step and direct the joblog to a dataset only if the step abends?
Is it possiable to use a gdg in the INCLUDE statement in a SORT jcl? I am using this because I want to change the condition with out changing the jcl. Please provide with a sample code.
Explain about LMGET�read a logical record from a data set
How to pass values in jcl to cobol?
Mainframes gets a text file that contains the name of the file. Now using JCL i want to locate that file name in the mainframe system and perform further processing. Please tell how to proceed
how to create gdg with out using idcams utility