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
 
check nth row from a PS file

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

New User


Joined: 15 May 2007
Posts: 6
Location: VA

PostPosted: Fri Feb 19, 2016 5:31 pm    Post subject: check nth row from a PS file
Reply with quote

Hi Experts, I need help with the below scenario. Could you please let me know how this can be done through ICETOOL. Record length of the file is 200 and record format is VB.
Appreciate your help. Thank you.

I have below records in a file. I need to check 5th record(1:8) is </BEGIN> then if its satisfies the condition omit that row . If the 5h record is not </BEGIN> that then i need to ignore that.

INPUT
Code:
<?XML VERSION="1.0">                                             
<!DOCTYPE REPORT SYSTEM "HTTPS://XXX.XXXX.XX/XXX/XXX/XX"         
<Report xmlns="https://XXX.XXXX.XXX/XXX/XXX/XX"                   
<BEGINS>                                                         
</BEGIN>                                                         
<BEGIN ID="1234" DATE="2014-01-01"                               
</END>                                                             
</BEGIN>                                                         
<BEGIN ID="1235" DATE="2014-01-01"                               
</END>                                                           
</BEGIN>                                                           
<BEGIN ID="1235" DATE="2014-01-01"                               
</END>                                                           
<BEGINS></REP>                                                           ~


Output -

Code:
<?XML VERSION="1.0">                                             
<!DOCTYPE REPORT SYSTEM "HTTPS://XXX.XXXX.XX/XXX/XXX/XX"         
<Report xmlns="https://XXX.XXXX.XXX/XXX/XXX/XX"                   
<BEGINS>                                                         
<BEGIN ID="1234" DATE="2014-01-01"                               
</END>                                                             
</BEGIN>                                                         
<BEGIN ID="1235" DATE="2014-01-01"                               
</END>                                                           
</BEGIN>                                                           
<BEGIN ID="1235" DATE="2014-01-01"                               
</END>                                                           
<BEGINS></REP>                                                           ~


Coded
Back to top
View user's profile Send private message

kranthikumarb

Active User


Joined: 02 Jan 2009
Posts: 115
Location: Hyderabad

PostPosted: Fri Feb 19, 2016 6:22 pm    Post subject: Reply to: check nth row from a PS file
Reply with quote

Punch in sequence number using inrec overlay.
then omit condition if seq number = 5 and record starts with </begin>
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2237
Location: Hampshire, UK

PostPosted: Fri Feb 19, 2016 6:55 pm    Post subject:
Reply with quote

What have you got against using code tags to present your code/dta in a professional manner? Unless it is code you lose alignment and 'excess' spaces are removed by the web browser.
Coded for you this time (again).
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 How to place name of the file where t... danielgp89 SYNCSORT 18 Thu Oct 17, 2019 12:55 am
No new posts Need help in parsing record in VBA file guptae DFSORT/ICETOOL 4 Fri Oct 11, 2019 2:31 pm
No new posts What 'EF' in the CAFC command REGION,... vrkratheesh CICS 2 Wed Sep 18, 2019 4:52 pm
No new posts Can we pass the value of Symbolic par... Poha Eater JCL & VSAM 5 Thu Sep 05, 2019 2:21 pm
No new posts Search the strings present in ps file... Bhuvana Narasimhan All Other Mainframe Topics 8 Thu Aug 22, 2019 8:20 pm

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