MVSFORUMS.com

emadhubabu · Beginner Joined: 03 Sep 2005 Posts: 13 Topics: 6

HI,

I have a Flat File. Need to add 3 char sequence number before each record.

Please suggest me a JCL, with out using ICE TOOL

Thanks
Maddy

emadhubabu · Beginner Joined: 03 Sep 2005 Posts: 13 Topics: 6

to make it clear.

I/p file:
REC01
REC02
REC03
REC04

Expected O/p:
001REC01
002REC02
003REC03
004REC04

Nic Clouston · Posted: Tue May 13, 2008 8:28 am Post subject:

Do you know what JCL is? It cannot do what you want. It tells the OS what programs to run, in what sequence and what files those programs need plus some other information. What you are looking for is, possibly a utility program (but why exclude ICETOOL?) or even a quick Rexx program or Easytrieve solution.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

Frank Yaeger · Posted: Tue May 13, 2008 9:43 am Post subject:

Maddy,

You can use a DFSORT job like the following to do what you asked for. You didn't give the RECFM and LRECL of the input file, so I assumed it's RECFM=FB and LRECL=5. You can change the job appropriately for other attributes.

emadhubabu · Beginner Joined: 03 Sep 2005 Posts: 13 Topics: 6

HI Frank Yaeger,
I was able to do that in simple SORT too.

OUTREC = ( SEQNUM,3,ZD,4:5)

Frank Yaeger · Posted: Wed May 14, 2008 10:04 am Post subject:

emadhubabu,

There's no such thing as "simple SORT". You're either using DFSORT, Syncsort or CA-Sort.