Adding leading zeroes in jcl

In this Mainframe Forum - You can post your queries on JCL, OS/390 JCL, MVS JCL, z/OS JCL, JES2 & JES3

Moderators: Frank Yaeger, DikDude, Moderator Group

Post Reply
Arati Kabra
Member
Posts: 1
Joined: Wed Sep 30, 2015 1:42 pm

Adding leading zeroes in jcl

Post by Arati Kabra » Wed Sep 30, 2015 1:51 pm

Hi,

I am working with a fixed width file. I have one field with length 10. But sometimes data in that field can be less than 10 digits. In that case, I want
that filed to be padded with zeroes at left. Can anyone please help me.

Below is code snippet:
if 623/10 NE BLANKS THEN
ANALYZE 623/10
IF ANALEN lt '00010' Then

endif

William Collins
Active Member
Posts: 732
Joined: Thu May 24, 2012 4:07 am

Post by William Collins » Wed Sep 30, 2015 6:45 pm

And what language is that?

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others