Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Is there an INFIL command like the OUTFIL?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Tue Dec 05, 2006 2:22 am    Post subject: Is there an INFIL command like the OUTFIL?
Reply with quote

Is there an INFIL command like the OUTFIL, with INREC, INCLUDE and OMIT for multiple input files?

Currently I need separate job steps to reformat each input file into a common format and then another step to sort/process the reformated files concatenated together. If I could use INFIL with a separate INREC for each input file I could do this all in 1 step.
Back to top
View user's profile Send private message

Hritam

New User


Joined: 27 Jun 2005
Posts: 36
Location: India

PostPosted: Tue Dec 05, 2006 3:21 am    Post subject:
Reply with quote

Douglas,
Please mention your requirements with more details, with its Input and expected output file structure.
Yes, I think the solution you are looking for can be acheived by Icetool but with more details it will be easier to provide the solution.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


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

PostPosted: Tue Dec 05, 2006 3:39 am    Post subject:
Reply with quote

Quote:
Is there an INFIL command like the OUTFIL, with INREC, INCLUDE and OMIT for multiple input files?


No, there isn't.

You can do what you want in one step with DFSORT's ICETOOL, but not in one pass.

If you want more help, indicate the RECFM and LRECL of each input file
and show your current job with the separate steps.
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Wed Dec 06, 2006 4:48 am    Post subject: Re: Is there an INFIL command like the OUTFIL?
Reply with quote

Currently I use multiple sort steps something like this:

Code:

//STEP10  EXEC PGM=SORT
//SORTIN    DD DSN= ... FILE 1,DISP=SHR        (FB/200)
//SORTOUT   DD DSN= ... FILE 1A, . . .
//             DCB=(RECFM=FB,DSORG=PS,LRECL=100,BLKSIZE=0)
//SYSOUT    DD SYSOUT=*
//SYSIN     DD *
  SORT FIELDS=COPY
  INCLUDE COND=(195,2,EQ,C'AB'),FORMAT=CH
  INREC FIELDS=(1:50,10,11:100,89,100:C'1')
/*
//***************************************************
//STEP20  EXEC PGM=SORT
//SORTIN    DD DSN= ... FILE 2,DISP=SHR        (FB/300)
//SORTOUT   DD DSN= ... FILE 2A, . . .
//             DCB=(RECFM=FB,DSORG=PS,LRECL=100,BLKSIZE=0)
//SYSOUT    DD SYSOUT=*
//SYSIN     DD *
  SORT FIELDS=COPY
  OMIT COND=(50,2,EQ,C'DE'),FORMAT=CH
  INREC FIELDS=(1:60,10,11:210,89,100:C'2')
/*
//***************************************************
//STEP30  EXEC PGM=SORT
//SORTIN    DD DSN= ... FILE 1A,DISP=SHR        (FB/100)
//          DD DSN= ... FILE 2A,DISP=SHR        (FB/100)
//SORTOUT   DD DSN= ... FILE 3, . . .
//             DCB=(RECFM=FB,DSORG=PS,LRECL=100,BLKSIZE=0)
//SYSOUT    DD SYSOUT=*
//SYSIN     DD *
  SORT FIELDS=(1,10,CH,A)
  SUM  FIELDS=NONE
/*


I have more than 2 input files but I use sort to reformat each each input file similar to this.
It would be nice if we could do this in one step instead of 3, with an INFIL with an INREC for each input file.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


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

PostPosted: Wed Dec 06, 2006 5:21 am    Post subject:
Reply with quote

Oh, I see. Since the two input files have different LRECLs, you'd like to be able to use INFIL to reformat them for the sort/sum.

You can, of course, do this in one step with ICETOOL (COPY operator, COPY operator, ..., SORT operator). What I think you really want though is to be able to do it in one pass with INFIL and that function isn't available.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 7 Fri Nov 18, 2016 1:48 pm
No new posts SDSF Command Avtrix CLIST & REXX 4 Fri Sep 30, 2016 11:13 am
No new posts How to find a CICS resource used in C... Arunkumar Chandrasekaran CICS 8 Thu Sep 29, 2016 1:45 pm
No new posts COMPARE command sivatechdrive TSO/ISPF 7 Fri Sep 16, 2016 4:31 pm
No new posts I am unable to use SWAPBAR ON command... mrsidhu12 TSO/ISPF 3 Thu Sep 01, 2016 1:10 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us