View previous topic :: View next topic |
Author |
Message |
hareshh Beginner
Joined: 13 Dec 2006 Posts: 16 Topics: 0
|
Posted: Thu Feb 01, 2007 3:22 am Post subject: |
|
|
Hi Kiran,
If above didn't work then how about Compiling with the NOOPT compiler option?
Try it
Regards,
Haresh. |
|
Back to top |
|
 |
vak255 Intermediate

Joined: 10 Sep 2004 Posts: 384 Topics: 79
|
Posted: Thu Feb 01, 2007 2:06 pm Post subject: |
|
|
Sure, i will try and will let you know. How do you say that Noopt is going to solve this issue. |
|
Back to top |
|
 |
slade Intermediate
Joined: 07 Feb 2003 Posts: 266 Topics: 1 Location: Edison, NJ USA
|
Posted: Mon Feb 19, 2007 12:19 pm Post subject: |
|
|
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 |
|
 |
vak255 Intermediate

Joined: 10 Sep 2004 Posts: 384 Topics: 79
|
Posted: Mon Feb 19, 2007 3:28 pm Post subject: |
|
|
Thanks guys for all your help and support. I have changed some logic and its working fine now, |
|
Back to top |
|
 |
slade Intermediate
Joined: 07 Feb 2003 Posts: 266 Topics: 1 Location: Edison, NJ USA
|
Posted: Mon Feb 19, 2007 4:43 pm Post subject: |
|
|
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 |
|
 |
vak255 Intermediate

Joined: 10 Sep 2004 Posts: 384 Topics: 79
|
Posted: Thu Feb 22, 2007 7:04 pm Post subject: |
|
|
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 |
|
 |
|
|