MAINFRAME - TIP OF THE DAY :
Q. If there is a situation, where we need to code more than 255 steps in a JOB?
A. We need to split jcl into two jcls , at the end of the first jcl check the condition code and initiate the second jcl.
Programmers Voted for below topics. Please Vote for good Posts.
Thank You! for your feedback. Connecting to the server. Please Wait...
unless you use an edit mask, or display with sign trailing, you will always have numeric signed with an 'overprint' sign - i.e., the sign and the least significant digit will be combined.
change 01 B PIC S9(15)V.
to 01 B PIC -Z(15). <<<< to zero suppress with leading sign if negative
this is an edit mask
or 01 B PIC S9(15) SIGN TRAILING SEPARATE. <<<< no suppression, sign is trailing.
this is a numeric display field with trailing sign. 16 char.
an edit mask can be the receiving operand of a COMPUTE statement.
COMPUTE B = A * 3 _________________ Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum