Re: REXX and BPXWDYN

2009-07-17 Thread Neal Eckhardt
Thar helped a lot. Thanks

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: REXX and BPXWDYN

2009-07-17 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Neal Eckhardt
> Sent: Friday, July 17, 2009 10:11 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: REXX and BPXWDYN
> 
> I am trying to use BPXWDYN to do a dynamic allocation from REXX under 
> IRXJCL. I am getting a RC 20. How can I find out the actual 
> problem? Is there 
> any way to see S99ERROR and S99INFO?
> 
> Here is the statement:
> 
> IF BPXWDYN("ALLOC DD(OUT) DA('WORK.TAPE') NEW KEEP UNIT(TAPE) 
> REUSE") ¬= 0
>   THEN
> DO
>   SAY "Allocation failed RC =" RC
>   EXIT 8
> END
> 
> Thanks,
> Neal

The book is at:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB680/6.0

RC=20 means "invalid parameter list". Also in the book:


 Dynamic allocation provides message text for failed allocation requests.
 It is usually easier to use this message text rather than decode
 allocation return codes.

 BPXWDYN can return these messages to a REXX program. By default, the
 messages are returned in the S99MSG. stem. S99MSG.0 contains the number of
 messages and S99MSG.1 through S99MSG.n contain the message text.


http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB680/6.5


--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets®

9151 Boulevard 26 . N. Richland Hills . TX 76010
(817) 255-3225 phone . (817)-961-6183 cell
john.mck...@healthmarkets.com . www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets® is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA 
Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


REXX and BPXWDYN

2009-07-17 Thread Neal Eckhardt
I am trying to use BPXWDYN to do a dynamic allocation from REXX under 
IRXJCL. I am getting a RC 20. How can I find out the actual problem? Is there 
any way to see S99ERROR and S99INFO?

Here is the statement:

IF BPXWDYN("ALLOC DD(OUT) DA('WORK.TAPE') NEW KEEP UNIT(TAPE) 
REUSE") ¬= 0
  THEN
DO
  SAY "Allocation failed RC =" RC
  EXIT 8
END

Thanks,
Neal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html