I would like to issue an RSCS QUERY LINKS and queue the results so I can spin
through the response looking for information. Here is a snippet from an
experimental REXX EXEC. The results from the query are displayed back at my
terminal and the @HowMany variable is always zero. Any ideas
/snip
Peter
-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf
Of Wandschneider, Scott
Sent: March 23, 2009 12:54
To: IBMVM@LISTSERV.UARK.EDU
Subject: RSCS Query
I would like to issue an RSCS QUERY LINKS and queue
...@infocrossing.com
Subject: RSCS Query
To: IBMVM@LISTSERV.UARK.EDU
I would like to issue an RSCS QUERY LINKS and queue the results so I can
spin through the response looking for information. Here is a snippet from an
experimental REXX EXEC. The results from the query are displayed back at my
Scott, try setting SMSG to IUCV before issuing the PIPE command:
CP SET SMSG IUCV
Wandschneider, Scott wrote:
I would like to issue an RSCS QUERY LINKS and queue the results so I can spin
through
the response looking for information. Here is a snippet from an experimental
REXX
EXEC
This could work, if
WAKEUP must be started before one issues the SMSG command to RSCS. So:
'WAKEUP +0 (IUCVMSG'
'CP SM RSCS QUERY
do forever
WAKEUP +wait (IUCVMSG QUIET
end
'WAKEUP RESET'
And, seconds1 = time(seconds)
should better be seconds1 = time('Seconds
-Original Message-
From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf
Of Wandschneider, Scott
Sent: Monday, March 23, 2009 11:54 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: RSCS Query
I would like to issue an RSCS QUERY LINKS and queue the results so I can spin
:53:58 -0700
From: scott.wandschnei...@infocrossing.com
Subject: RSCS Query
To: IBMVM@LISTSERV.UARK.EDU
I would like to issue an RSCS QUERY LINKS and queue the results so I can
spin through the response looking for information. Here is a snippet from an
experimental REXX EXEC. The results
Scott,
Try this:
/* REXX */
address COMMAND
CP SET MSG IUCV
PIPE (ENDCHAR ?) STARMSG *MSG CP SMSG RSCS QUERY LINKS ,
| specs 17-* 1, /* Drop the first 16 chars */
| STEM REC.,
| LITERAL +5 | DELAY,
| PIPESTOP
say HowMany rec.0
CP SET MSG
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: RSCS Query
This could work, if
WAKEUP must be started before one issues the SMSG command to RSCS. So:
'WAKEUP +0 (IUCVMSG'
'CP SM RSCS QUERY
do forever
WAKEUP +wait (IUCVMSG QUIET
end
'WAKEUP RESET'
And, seconds1 = time
the entire program or send it to individual requestors. It's 85
lines long.
Mark Wheeler
Date: Mon, 23 Mar 2009 14:42:00 -0700
From: james.stra...@dhl.com
Subject: Re: RSCS Query
To: IBMVM@LISTSERV.UARK.EDU
Scott,
Try this:
/* REXX */
address COMMAND
CP SET MSG IUCV
PIPE
10 matches
Mail list logo