Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
INREC IFTHEN question

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SYNCSORT
View previous topic :: :: View next topic  
Author Message
knobi

New User


Joined: 16 Aug 2005
Posts: 53

PostPosted: Mon Apr 15, 2019 11:55 pm    Post subject: INREC IFTHEN question
Reply with quote

Using the IF below i noticed that after checking the position 71, it "exit" the if logic. I saw that i could use HIT=NEXT, but to me is unclear if it needs to be used at the end of every IFTHEN statement or only when i switch to the next position. Could someone with more experience using syncsort/icetool, comment on this ?

Code:

INREC IFTHEN=(WHEN=(71,01,SS,EQ,C'A'),OVERLAY(095:067,04,ZD,MUL,+10)),
      IFTHEN=(WHEN=(71,01,SS,EQ,C'B'),OVERLAY(095:067,04,ZD,MUL,+20)),

      IFTHEN=(WHEN=(77,01,SS,EQ,C'A'),OVERLAY(111:073,04,ZD,MUL,+10)),
      IFTHEN=(WHEN=(77,01,SS,EQ,C'B'),OVERLAY(111:073,04,ZD,MUL,+20)),

      IFTHEN=(WHEN=(83,01,SS,EQ,C'A'),OVERLAY(127:079,04,ZD,MUL,+10)),
      IFTHEN=(WHEN=(83,01,SS,EQ,C'B'),OVERLAY(127:079,04,ZD,MUL,+20))

Back to top
View user's profile Send private message

dneufarth

Active User


Joined: 27 Apr 2005
Posts: 299
Location: Cincinnati OH USA

PostPosted: Tue Apr 16, 2019 1:13 am    Post subject:
Reply with quote

http://ibmmainframes.com/about42538.html
Back to top
View user's profile Send private message
knobi

New User


Joined: 16 Aug 2005
Posts: 53

PostPosted: Tue Apr 16, 2019 1:34 am    Post subject:
Reply with quote

got it !! thank you !!
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 -> SYNCSORT All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts CICS Web Services configuration question SickPup404 CICS 6 Mon Nov 04, 2019 9:56 pm
No new posts User question - dbzTHEdinosaur SickPup404 General Talk & Fun Stuff 2 Mon Nov 04, 2019 9:47 pm
No new posts Blksize question darioits JCL & VSAM 11 Tue Sep 10, 2019 8:32 pm
No new posts DO we have alternate syntax for IFTHEN? useit Compuware & Other Tools 8 Wed May 29, 2019 3:50 pm
No new posts Total using INREC Log Thangavel DFSORT/ICETOOL 1 Sun Apr 14, 2019 12:25 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us