Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref

Author Message
RamsIBM

New User

Joined: 08 Jan 2007
Posts: 53
Location: Chennai

 Posted: Fri Sep 05, 2008 3:40 am    Post subject: Perform Condtion check Hi, PERFORM VARYING I FROM 1 BY 1 UNTIL I >20 or num(i) equal to zero IF num (I) =234 Perform AAA. End-if End-perform in the above perform i am checking ' num(i) equal to zero' will it work My requirement is I want check the occurance of num varaible equal to zero then come out of perform

dick scherrer

Site Director

Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

 Posted: Fri Sep 05, 2008 4:13 am    Post subject: Hello, It will probably if you re-post your question. . . As posted, this is not clear. Are "I" and "i" supposed to be the same variable? If you are incrementing I by one and you leave the routine when it is greater than 20, the test for 234 makes no sense. . . Ignore this - my brain went on break. . d What does the array look like? Unless intialized to some non-zero value, all of the "num"s will be zero (or an 0c7 is lilely). Please post an example that is workable, not just some syntax that might compile. On the bright side, you can probably do what you want once the definition is clear
RamsIBM

New User

Joined: 08 Jan 2007
Posts: 53
Location: Chennai

 Posted: Fri Sep 05, 2008 4:29 am    Post subject: Hi, Thanks your for your reply. I just provided sample code not a actual code from my program I and i both are same. 'If you are incrementing I by one and you leave the routine when it is greater than 20, the test for 234 makes no sense. . . ' I am checking num(i) =234 not i =234. Please ignore. d My basic doubt is, in perform shall I check num(I) equal to zero. since i can check my program only intergration test so before putting this logic i need to confirm with you guys.
RamsIBM

New User

Joined: 08 Jan 2007
Posts: 53
Location: Chennai

 Posted: Fri Sep 05, 2008 4:47 am    Post subject: Thanks I got the answer...
dick scherrer

Site Director

Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

 Posted: Fri Sep 05, 2008 4:56 am    Post subject: Reply to: Perform Condtion check Good to hear you have an answer - thanks for the follow-up d
 All times are GMT + 6 Hours
 Page 1 of 1

Search our Forum:

 Topic Author Forum Replies Posted Similar Topics Submit JCL to INTRDR and check the st... srajendran2 COBOL Programming 6 Sat Jun 16, 2018 1:30 am GDG gen check using REXX raghuraman123 CLIST & REXX 6 Wed Apr 18, 2018 9:18 pm How syntax check at Bind time is diff... Poha Eater DB2 5 Wed Mar 21, 2018 9:16 pm ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm Check if any Detail records and extra... V S Amarendra Reddy SYNCSORT 19 Mon May 08, 2017 8:54 pm

 © 2003-2017 IBM MAINFRAME Software Support Division
 Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us