I thank you for your feedback, however, everyone can successfully do a dynamic allocation.
It’s actually the simplest function to execute. It requires a single parameter and, I suspect though haven’t tried, it can probably be done like this:
// EXEC PGM=BPXWDYN,PARM=’allocation parameters….’
However, try doing an INFO call.
Not quite as simple as doing an allocation request.
I have, since posting, been able to do everything I need to do from within an Easytrieve set of parameters.
Unfortunately, since the IBM calling convention does not identify the contents of register 0, Easytrieve support does not agree with me that R0 should be 0 on a call, so they have determined that their not passing R0 to BPXQDYN as zero does not constitute a bug.
When you try to do an INFO call, R0 needs to be passed with a value of zero in order for BPXWDYN to recognize the passed parameter format.
Each info field to be returned must be defined, in Easytrieve format, as a VARYING field whose definition must be large enough to receive the maximum value, not the actual value of the parameter and the value of the parameter must be terminated with a null or space. For example:
DEFINE INFOP1 W 47 A VALUE ‘INRTDSN ‘
Then, in the instructional parameters:
INFOP1.LENGTH = 45
Now the field, INFOP1, can be used in an INFO call to return the dataset name associated with a DD name.
(I did not show the complete calling sequence and parameters, sorry)
I ended up using a shell program which cleared R0 to zero and then passed the call on.
Works like a champ.
Thanks for your offer to help debug.
C-
Charles (Chuck) Hardee<mailto:Chuck.Hardee@ThermoFisher.com>
Senior Systems Engineer/Database Administration
EAS Information Technology<mailto:DBA%20Engineering%20-%20DB2_IDMS>
Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275
Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230
Chuck.Hardee@ThermoFisher.com<mailto:Chuck.Hardee@ThermoFisher.com> | www.thermofisher.com
WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this e-mail or the information herein by anyone other than the intended recipient, or an employee or agent of a system responsible for delivering the message to the intended recipient, is prohibited. If you are not the intended recipient, please inform the sender and delete all copies.