Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

problem with VPUT / VGET !!

190 views
Skip to first unread message

karthick I

unread,
May 13, 2003, 12:51:50 PM5/13/03
to
Hi listers,
Me again !! ... Can anyone help me out with this VGET and VPUT??...
I tried using this VPUT to pass a variable to a macro, but i get a RC of 8
and the VGET (written in the macro) apparently gets a null value and hence
the macro abends.
Infact sometime back it worked well, but now its not .. I have no idea
why....

This is how the lines are
i get the values for word1 and dsn frm the user

/*****rexx********/
address ispexec
"VPUT ("WORD1") SHARED"
"EDIT DATASET('"dsn"') MACRO(MAC1)"
EXIT

The macro is like this
.......
address ispexec
"VGET ("word1") SHARED"
address isredit "FIND "word1" FIRST"
........
........

Is there any way by which we can clear the buffer or somthing so that i can
start executing the macro afresh.!!??

Thank you all

Karthick.I
---------------------------------------------

Unless expressly stated to the contrary, the views expressed in this email
are not necessarily the views of National Grid Transco plc or any of its
subsidiaries or affiliates (Group Companies), and the Group Companies,
their directors, officers and employees make no representation and accept
no liability for its accuracy or completeness.

This e-mail, and any attachments are strictly confidential and intended for
the addressee(s) only. The content may also contain legal, professional or
other privileged information. If you are not the intended recipient, please
notify the sender immediately and then delete the e-mail and any
attachments. You should not disclose, copy or take any action in reliance
on this transmission.

You may report the matter by calling us on + 44(0) 1455 230999

Please ensure you have adequate virus protection before you open or detach
any documents from this transmission. The Group Companies do not accept
any liability for viruses. An e-mail reply to this address may be subject
to monitoring for operational reasons or lawful business practices.

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LIST...@VM.MARIST.EDU with the message: INFO TSO-REXX

Mosley, George

unread,
May 13, 2003, 1:12:35 PM5/13/03
to
I believe you have too many quotes.

Try:

"VPUT (WORD1) SHARED" and "VGET (WORD1) SHARED"

GEM

Jeff Byrum

unread,
May 13, 2003, 1:13:33 PM5/13/03
to
Karthick:

I believe you want to remove the quotation marks from the variables.

Instead of:

"VPUT ("WORD1") SHARED"

try:

"VPUT (WORD1) SHARED"

...and same for the VGET.

HTH,
Jeff

Binyamin Dissen

unread,
May 13, 2003, 1:14:30 PM5/13/03
to
On Tue, 13 May 2003 17:50:17 +0100 karthick I
<karthick.i...@UKTRANSCO.COM> wrote:

:> Me again !! ... Can anyone help me out with this VGET and VPUT??...


:>I tried using this VPUT to pass a variable to a macro, but i get a RC of 8
:>and the VGET (written in the macro) apparently gets a null value and hence
:>the macro abends.
:>Infact sometime back it worked well, but now its not .. I have no idea
:>why....

:>This is how the lines are
:>i get the values for word1 and dsn frm the user

:>/*****rexx********/
:>address ispexec
:> "VPUT ("WORD1") SHARED"
:> "EDIT DATASET('"dsn"') MACRO(MAC1)"
:>EXIT

:>The macro is like this
:>.......
:>address ispexec
:>"VGET ("word1") SHARED"
:>address isredit "FIND "word1" FIRST"

I don't like the fact that you are letting WORD1 be resolved.

If WORD1 is not used in calling REXX it should work as it will have the
default value of its name, but I somehow suspect that you are assigning a
value to WORD1 in the calling REXX otherwise it would always have the same
value.

--
Binyamin Dissen <bdi...@dissensoftware.com>
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel

Lionel Dyck

unread,
May 13, 2003, 1:20:12 PM5/13/03
to
This works for me:

Initial exec that does edit:

/* rexx */
address ispexec
testvar = "ABC DEF" sysvar('sysuid') date()
"Vput (testvar) shared"
"Edit dataset(jcl.cntl($job)) macro(mac1)"

The edit macro that is called:

/* rexx */
address isredit
"Macro"
address ispexec "Vget (testvar) shared"
say testvar

hope this helps

--------------------------------------------------------------------
Lionel B. Dyck, Systems Software Lead
Kaiser Permanente Information Technology
25 N. Via Monte Ave
Walnut Creek, Ca 94598

Phone: (925) 926-5332 (tie line 8/473-5332)
E-Mail: Lionel...@kp.org
Sametime: (use Lotus Notes address)
AIM: lbdyck

karthick I <karthick.i...@UKTRANSCO.COM>
Sent by: TSO REXX Discussion List <TSO-...@VM.MARIST.EDU>
05/13/2003 09:50 AM
Please respond to
TSO REXX Discussion List <TSO-...@VM.MARIST.EDU>


To
TSO-...@VM.MARIST.EDU
cc

Subject
[TSO-REXX] problem with VPUT / VGET !!

karthick I

unread,
May 14, 2003, 4:57:10 AM5/14/03
to
..oh how silly of me... yup it works fine now...

thanx guyss..

Regards,
Karthick.I
---------------------------------------------

Jeff Byrum
<Jeff.Byrum@ASG.C
OM> To: TSO-...@VM.MARIST.EDU
Sent by: TSO REXX cc:
Discussion List Subject: Re: problem with VPUT / VGET !!
<TSO-...@VM.MARI
ST.EDU>


13/05/03 18:07


Please respond to
TSO REXX
Discussion List


Karthick:

I believe you want to remove the quotation marks from the variables.

Instead of:

"VPUT ("WORD1") SHARED"

try:

"VPUT (WORD1) SHARED"

...and same for the VGET.

HTH,
Jeff


0 new messages