initializing a stem variable

Harrington, Mark

unread,

Mar 31, 2003, 5:51:44 PM3/31/03

to

Hi all,
dang,
we just recently talked about this, but I just cant seem to
remember.

I want to reinitialize a stem variable so i can reuse it with new data.
is it xxx.0 = 0 ? or just xxx. = ''? or what

grateful as always

Mark H.

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

Jeff Byrum

unread,

Mar 31, 2003, 6:53:22 PM3/31/03

to

You got it right:

xxx. = ''

Or, you can use:

DROP xxx.

Jeff

Moyeen A Khan

unread,

Mar 31, 2003, 7:13:43 PM3/31/03

to

It is xxx.='' or if you want to default to a value then xxx.=default_value

x.0 will give you the total number of stems

"Harrington, Mark"
<MHarrington@MEDNE To: TSO-...@VM.MARIST.EDU
T.UCLA.EDU> cc:
Sent by: TSO REXX Subject: initializing a stem variable
Discussion List
<TSO-...@VM.MARIS
T.EDU>

03/31/2003 05:49
PM
Please respond to
TSO REXX
Discussion List

Harrington, Mark

unread,

Mar 31, 2003, 7:44:33 PM3/31/03

to

thanks all i got it !

Frank Clarke

unread,

Mar 31, 2003, 8:13:15 PM3/31/03

to

On 31 Mar 2003 14:51:44 -0800, MHarr...@MEDNET.UCLA.EDU
(Harrington, Mark) wrote:
<9A248CFB6388D51198C60002A513071CEADA2C@MEDMAIL9>

> I want to reinitialize a stem variable so i can reuse it with new data.
> is it xxx.0 = 0 ? or just xxx. = ''? or what

xxx. = 0

Seibert, Dave

unread,

Apr 1, 2003, 11:01:10 AM4/1/03

to

>It is xxx.='' or if you want to default to a value then xxx.=default_value

>>>> x.0 will give you the total number of stems

This x.0 assignment doesn't happen universally. Execio and outtrap and
other functions do set the stemname.0 variable to contain a count of the
elements of the stem.

But normal stem processing does not.
By convention, most of the tools and functions I write do so. Many others
do also, I believe.
But that is additional code that must be written.
E.g.:

do i=1 to 10;
x.i= 100/i;
end;

say x.0

>> X.0

David Seibert
Compuware Corporation Database Product Architect
Dave.S...@compuware.com

The contents of this e-mail are intended for the named addressee only. It
contains information that may be confidential. Unless you are the named
addressee or an authorized designee, you may not copy or use it, or disclose
it to anyone else. If you received it in error please notify us immediately
and then destroy it.

Walls, Lucious G.

unread,

Apr 1, 2003, 1:01:58 PM4/1/03

to

Hello List:

I'm familiar with the Execio command but not the Outtrap command. The book
I'm using to learn how to create REXX procedures, 'MVS TSO, Commands and
Procedures, by Doug Lowe', doesn't even mention the Outtrap command. Will
someone describe the Outtrap command and provide a good example? I'd also
appreciate it if someone would recommend a more comprehensive book on REXX
procedures that I could purchase.

Thanks,
Lucious Walls
SPAWAR ITC (Washington)
asi...@bupers.navy.mil
703-693-3036 DSN 223-3036

-----Original Message-----
From: Seibert, Dave [mailto:Dave_S...@COMPUWARE.COM]
Sent: Tuesday, April 01, 2003 11:01 AM
To: TSO-...@VM.MARIST.EDU
Subject: Re: initializing a stem variable

Harrington, Mark

unread,

Apr 1, 2003, 1:09:43 PM4/1/03

to

oh boy, now you've done it !

you better hope that you have at least 30 mb of e-mail available ! :)

CALL OUTTRAP "JCL."
"LISTDS 'xxxx.PROD.xxxx ' MEMBERS"
CALL OUTTRAP "OFF"

this traps the member names in the pds and puts them in a stem variable
called "jcl."
you can then access these member names in the stem variable with an index.
ex: jcl.1 = mcj013
jcl.2 = mcj014
jcl.3 = mcj015

this is just one example of how to use outtrap.
book manager should tell you more

Jeff Byrum

unread,

Apr 1, 2003, 1:10:20 PM4/1/03

to

Lucious:

Here's an example that will get a list of all the members in a PDS into a
compound variable. Basically what OUTTRAP does is redirect the lines of
text that would normally go to your terminal to the compound variable:

DSN = data.set.name
xxx. = '' /* Clear array */
X = OUTTRAP('xxx.')
Address TSO "LISTDS '"DSN"' MEMBERS" /* Get dir list */
X = OUTTRAP('OFF')
Do i = 7 to xxx.0
MEMNAME = STRIP(SUBSTR(xxx.i,3,8))
If MEMNAME = '' then /* continued ALIAS info */
Iterate
/* handle member name */
End i

If you just issue the command "TSO LISTDS data.set.name MEMBERS" (for a real
dataset) you'll see why the above loop starts with the 7th line.

Jeff

Glenn Walko

unread,

Apr 1, 2003, 2:51:25 PM4/1/03

to

Try these sites. The first one is the IBM Library Reader for Windows.
The second one is the IBM BookManager® BookServer Library where
you can search for REXX manuals.

http://www-1.ibm.com/support/docview.wss?rs=0&org=SW&doc=4000232&loc=en_us&loc=en-us

http://publibfp.boulder.ibm.com/cgi-bin/bookmgr/FINDBOOK?filter=rexx

>>> ASI...@BUPERS.NAVY.MIL 04/01/2003 11:01:32 AM >>>
Hello List:

say x.0

>> X.0

This electronic mail transmission may contain confidential information and is intended only for the person(s) named. Any use, copying or disclosure by any other person is strictly prohibited. If you have received this transmission in error, please notify the sender via e-mail.

Walls, Lucious G.

unread,

Apr 1, 2003, 3:41:40 PM4/1/03

to

Thanks everyone that provided information on the Outtrap function. I'm now
very familiar with how it functions. And thanks Glenn for providing the web
sites for the IBM Library Reader for Windows and for the IBM BookManager®
BookServer Library. I've already gone to these sites and found some very
useful information.

-----Original Message-----
From: Glenn Walko [mailto:GWA...@OPPENHEIMERFUNDS.COM]
Sent: Tuesday, April 01, 2003 1:14 PM
To: TSO-...@VM.MARIST.EDU
Subject: Re: initializing a stem variable

in...@desaubin.net

unread,

Apr 8, 2003, 5:42:45 PM4/8/03

to

DROP XXX.

"Frank Clarke" <ni...@mindspring.com> schreef in bericht
news:tsph8vko5n6j72kcr...@4ax.com...