MVSFORUMS.com

sivafdms · Intermediate Joined: 29 May 2007 Posts: 165 Topics: 77

HI,

I have written a macro which will be a replacement of comand REPL .ZF .ZL MEMNAME.It is working fine for first time i.e.Open the member in view mode and run the macro for first time it goes fine but when i run the same for second time without getting out of member, it is not working. Could any one tell me why it behaving like this.

semigeezer · Posted: Sat Jul 25, 2009 10:53 am Post subject:

What does "not working?" and "behaving like this" mean? When asking for diagnosis of a problem, it is necessary to say more than "I have a problem, why?" what happens? Messages? Crashes? Codes? Trace data? ???

And I'll add that TSO COMPRESS is a local command so no one here will know how it works or what its side effects are.
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html.

sivafdms · Intermediate Joined: 29 May 2007 Posts: 165 Topics: 77

semigeezer,

I meant my rexx code is executing for second time. Like if i open a member in view mode to make some changes to save the member , i exceute my rexx code. It's save for first time, but when i try to save more changes without getting out of that member. But it not saving for second time.

Thanks,
Siva

Nic Clouston · Posted: Sun Jul 26, 2009 8:31 am Post subject:

Well, you could try turning Trace on and see what happens.

You could also put an EXIT statement at the end of the macro.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

arnold57 · Beginner Joined: 01 Oct 2004 Posts: 30 Topics: 0

Do you realize that since you used the NOPROCESS option, any changes you made on the screen will not be visible to the macro? That is, the data will be saved as it existed the last time you pressed Enter, not including any changes you made at the same time you entered your macro.

warp5 · Posted: Mon Aug 17, 2009 1:52 am Post subject:

Your RC processing is not correct as far as I know.
You should do something like this:
"ISREDIT SAVE"
src = rc

Then you can ask what the status of the src is anywhere after that.

s_shivaraj · Posted: Mon Aug 17, 2009 4:57 am Post subject:

sivafdms,
I used the same piece of code, just deleted few lines. It worked for me. Didnt face any issue

warp5 · Posted: Mon Aug 17, 2009 8:15 am Post subject:

I can see what you are doing, but if somebody tries to change your program that RC handling can easily get messed up. If I understand correctly you use the RC from two different sources, the RC from the save and the RC from the ISREDIT in your IF RC=0 THEN. Sure not easy to catch when you first fly over the routine.