Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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: 658
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 Mainframe scheduling tool ddhar Compuware & Other Tools 2 Wed Sep 27, 2017 12:48 am
No new posts File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am
No new posts BUILD OUTFIL based on condition other... balaji81_k DFSORT/ICETOOL 13 Fri Sep 08, 2017 11:06 pm
No new posts DATAFIX tool jzhardy DB2 0 Wed Aug 09, 2017 9:13 am
No new posts Need info on EIBCPOSN value in IBM FA... subratarec CICS 11 Wed Jul 12, 2017 3:45 pm

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