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
 
Replacing values from specified locations in a dataset
Goto page Previous  1, 2
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
Author Message
MGIndaco

Moderator


Joined: 10 Mar 2005
Posts: 478
Location: Milan, Italy

PostPosted: Fri Oct 14, 2005 8:03 pm    Post subject:
Reply with quote

I suggest you to try with this form:
Code:
//SYSIN    DD *                                               
*SORT STATEMENT START AT POSITION 2                           
  OUTREC IFTHEN=(WHEN=(1,4,CH,EQ,C'0010',AND,8,4,CH,EQ,C'0020'),
    OVERLAY=(15:C'1201'))                                         


I hope in this.
Back to top
View user's profile Send private message
References
Frank Yaeger

DFSORT Moderator


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

PostPosted: Fri Oct 14, 2005 8:16 pm    Post subject:
Reply with quote

You can code DFSORT's WHEN condition with OR and AND operators in the same way you can code the INCLUDE condition with OR and AND operators. MGIndaco has shown the correct syntax using AND which assumes that you want to do the OVERLAY if both conditions are satisfied. If you want to do the OVERLAY if either condition is satisifed, you would use:

Code:

  OPTION COPY
  OUTREC IFTHEN=(WHEN=1,4,CH,EQ,C'0010',OR,8,4,CH,EQ,C'0020'),
     OVERLAY=(15:C'1201'))
/*


For complete details on the syntax of DFSORT's INCLUDE, OMIT and WHEN conditions, see:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/3.7?DT=20050222160456
Back to top
View user's profile Send private message
nickyboy

New User


Joined: 26 Aug 2005
Posts: 18

PostPosted: Mon Oct 17, 2005 3:41 pm    Post subject:
Reply with quote

Thanks Frank and MGIndaco for your repiles..This is exactly what I was looking for..

Nick..
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 HoursGoto page Previous  1, 2
Page 2 of 2