MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Control not going to next perform
Goto page Previous  1, 2
 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
hareshh
Beginner


Joined: 13 Dec 2006
Posts: 16
Topics: 0

PostPosted: Thu Feb 01, 2007 3:22 am    Post subject: Reply with quote

Hi Kiran,

If above didn't work then how about Compiling with the NOOPT compiler option?

Try it Exclamation

Regards,
Haresh.
Back to top
View user's profile Send private message
vak255
Intermediate


Joined: 10 Sep 2004
Posts: 384
Topics: 79

PostPosted: Thu Feb 01, 2007 2:06 pm    Post subject: Reply with quote

Sure, i will try and will let you know. How do you say that Noopt is going to solve this issue.
Back to top
View user's profile Send private message
slade
Intermediate


Joined: 07 Feb 2003
Posts: 266
Topics: 1
Location: Edison, NJ USA

PostPosted: Mon Feb 19, 2007 12:19 pm    Post subject: Reply with quote

Vak,

Why don't you include displays as below.

If none print T009-CD doesn't contain 12.

If here2 doesn't print there's a problem in A1000-etc

If here3 doesn't print there's a problem in 3600-etc

Code:
IF T009-CD = 12
   Display ' I am here1'             
   PERFORM A1000-PROCESS                               
     UNTIL HOLD-CC-GRP NOT = T20-BT-CC-GRP
        OR EXTRACT-EOF                             
   Display ' I am here2'                             
   PERFORM 3600-WRITE-DETL-CUST-IIR     
   Display ' I am here3'           
ELSE         
     CONTINUE 
END-IF

_________________
Regards, Jack.

"A problem well stated is a problem half solved" -- Charles F. Kettering
Back to top
View user's profile Send private message
vak255
Intermediate


Joined: 10 Sep 2004
Posts: 384
Topics: 79

PostPosted: Mon Feb 19, 2007 3:28 pm    Post subject: Reply with quote

Thanks guys for all your help and support. I have changed some logic and its working fine now,
Back to top
View user's profile Send private message
slade
Intermediate


Joined: 07 Feb 2003
Posts: 266
Topics: 1
Location: Edison, NJ USA

PostPosted: Mon Feb 19, 2007 4:43 pm    Post subject: Reply with quote

Hi Kian,

It would be nice to tell us what you did to get it working.
_________________
Regards, Jack.

"A problem well stated is a problem half solved" -- Charles F. Kettering
Back to top
View user's profile Send private message
vak255
Intermediate


Joined: 10 Sep 2004
Posts: 384
Topics: 79

PostPosted: Thu Feb 22, 2007 7:04 pm    Post subject: Reply with quote

slade,

I don't have a solution to the original problem, it still exist. Now the complete requirement have changed and I have rewritten the program thats why I could not post you all the details.

Please don't misunderstand.

Thanks for your time.

Now I don't have access to mainframe to update you. sure i will post u asap.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Goto page Previous  1, 2
Page 2 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group