Author: Rohit Umarjikar
Posted: Thu Sep 08, 2016 3:01 am (GMT 5.5)
Please,never do that to someone who is helping you.
tested sample and modify per what you need because you poorly stated the requirement( Missing the offsets which is most important if you wanted handy solution),
Bill, feel free to modify or advise on this approach.
_________________
Regards,
Rohit Umarjikar
"Knowledge is knowing that a tomato is a fruit, but Wisdom is knowing not to put it in a fruit salad."![icon_razz.gif]()
Posted: Thu Sep 08, 2016 3:01 am (GMT 5.5)
Quote: |
Sorry Rohit for misquoting you. I don't mean to |
tested sample and modify per what you need because you poorly stated the requirement( Missing the offsets which is most important if you wanted handy solution),
Code: |
SORT FIELDS=COPY INREC IFTHEN=(WHEN=INIT,OVERLAY=(20:C'20',16,2,13,2,10,2)), IFTHEN=(WHEN=(1,6,CH,EQ,C'PART A'),OVERLAY=(30:20,8,Y4T, SUBDAYS,+1,TOGREG=Y4T)) OUTREC IFTHEN=(WHEN=(1,6,CH,EQ,C'PART A'),OVERLAY=(10:36,2, C'/',34,2,C'/',32,2)), IFOUTLEN=17 |
Bill, feel free to modify or advise on this approach.
_________________
Regards,
Rohit Umarjikar
"Knowledge is knowing that a tomato is a fruit, but Wisdom is knowing not to put it in a fruit salad."
