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
 

 

Usage of IF condition while using IBM Debug tool

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools
View previous topic :: :: View next topic  
Author Message
aiswarya_suresh

New User


Joined: 24 Feb 2012
Posts: 2
Location: India

PostPosted: Fri Feb 24, 2012 12:06 pm    Post subject: Usage of IF condition while using IBM Debug tool
Reply with quote

I am using IBM Debug tool to debug a Cobol-DB2 program and my input is the database which is having so much of records. But I want to put a condition that will enable me to skip line-by line execution of first 2000 records and will show me directly the line by line execution of 2001 th record.

I know we can use IF condition to skip the execution, but I am not sure about the usage of the same. Can anyone help me?
Back to top
View user's profile Send private message

Ed Goodman

Active Member


Joined: 08 Jun 2011
Posts: 556
Location: USA

PostPosted: Fri Feb 24, 2012 10:22 pm    Post subject:
Reply with quote

If you can't figure it out using debug commands, you could add the if statement to the cobol program and put a break on THAT.
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 654
Location: Whitby, ON, Canada

PostPosted: Sat Feb 25, 2012 1:30 am    Post subject:
Reply with quote

My favourite way is to massage the input file. If all you care about is record 2001, then delete the first 2000 records in the file.

Failing that, you could try commands such as:

AT STATEMENT 20 WHEN (MYVAR = 25)
Back to top
View user's profile Send private message
aiswarya_suresh

New User


Joined: 24 Feb 2012
Posts: 2
Location: India

PostPosted: Tue Feb 28, 2012 11:14 am    Post subject:
Reply with quote

Thanks for your suggestions.. Let me try it out.
Back to top
View user's profile Send private message
satish kompella

New User


Joined: 22 Feb 2012
Posts: 4
Location: india

PostPosted: Tue Feb 28, 2012 5:37 pm    Post subject:
Reply with quote

you can try this



AT CHANGE <var-name>
PERFORM
IF <var-name> NOT = 'something' THEN
GO;
END-IF;
END-PERFORM;
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 -> IBM Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Need info on EIBCPOSN value in IBM FA... subratarec CICS 11 Wed Jul 12, 2017 3:45 pm
No new posts )SEL and )ENDSEL usage cvnlynn TSO/ISPF 4 Thu Jun 15, 2017 1:15 am
This topic is locked: you cannot edit posts or make replies. Need help on If condition continuatio... ashok_uddaraju CLIST & REXX 4 Fri May 19, 2017 8:55 am
No new posts Need inputs on Space requirement and... ashek15 IMS DB/DC 0 Sat Apr 01, 2017 8:26 am
No new posts Joinkeys with condition scdinesh DFSORT/ICETOOL 10 Tue Feb 14, 2017 12:20 am


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