Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Regarding SORT using INREC and OUTREC?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
Author Message
subramanianup
Warnings : 1

New User


Joined: 18 May 2005
Posts: 37
Location: Bangalore, INDIA

PostPosted: Mon Feb 06, 2006 5:32 pm    Post subject: Regarding SORT using INREC and OUTREC?
Reply with quote

If the columns in the input are like ACCNO, NAME, BALANCE. How can we create a output file in the format NAME, ACCNO , BALANCE?
Back to top
View user's profile Send private message
References
fixdoubts

Active User


Joined: 21 Oct 2005
Posts: 52

PostPosted: Mon Feb 06, 2006 5:57 pm    Post subject:
Reply with quote

Hi,

Man you should give the field length rather then the names.

Okay lets take 1-10 as ACCNO
11-30 as NAME
31-40 as BALANCE

For a sort your sysin should be

Code:

SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(11,20,1,10,31,10)
/*


Your out put file will have its NAME,ACCNO,BALANCE

Regards,
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 4684
Location: San Jose, CA

PostPosted: Mon Feb 06, 2006 9:27 pm    Post subject:
Reply with quote

Or using DFSORT symbols:

Code:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SYMNAMES DD *
ACCNO,1,10
NAME,*,20
BALANCE,*,10
/*
//SORTIN DD DSN=...  input file
//SORTOUT DD DSN=...  output file
//SYSIN    DD    *
  OPTION COPY
  OUTREC FIELDS=(NAME,ACCNO,BALANCE)
/*
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1