I guess there's not __really__ any __need__ for this. But it's been perculating
in my "back brain" for a while. To create an ADDRESS IDCAMS environment for
REXX. I know we can do IDCAMS commands in REXX by doing an ADDRESS TSO and
using the TSO commands. That works well. But it occurs to me, being in a CPU
poor environment, that perhaps having an ADDRESS IDCAMS environment available
for use in IRXJCL and UNIX REXX might be of some use. The biggest problem is
"how do I run an APF authorized IDCAMS command from a non-APF authorized
environment?". TSO does this in a "scary" way by having a parallel TCB
structure where APF authorized code runs in a separate TCB environment and uses
STATUS STOP to suspend processing in the non-APF structure when an APF program,
such as IDCAMS, is running.
The thought of trying to duplicate this feat is scary to me. But, being the
weirdo that I am, it occurs to me that I can write an IDCAMS front end program
__in UNIX__ which is marked as APF authorized. There would be something like
RC=AMSCALLS('ON') similar to the RC=ISFCALLS('on') and RC=SYSCALLS('on'). This
AMSCALLS would do a spawn of the UNIX program. It would also set up a pair of
anonymous pipes so that the REXX environment could send commands to the AMS
process and receive the output back. The APF UNIX program would set up things
and invoke IDCAMS with ATTACHX and set pointers to subroutines which direct
IDCAMS' I/O to SYSIN and SYSPRINT via the pipes back to the REXX environment.
This should be secure since IDCAMS would be running in a separate address space
from the REXX program itself.
I'm just not sure it if is worth bothering with. Using UNIX REXX, I can do an
ADDRESS TSO which spawns a TSO address space and do other TSO commands in
addition to IDCAMS commands.
Just "blue skying", I guess.
Might even be able to use that same process to do IDCAMS commands from a UNIX
shell. But, in z/OS 1.12, the tsocmd command works fairly well.
--
John McKown
Systems Engineer IV
IT
Administrative Services Group
HealthMarkets(r)
9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone *
[email protected] * 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(r) is the brand name for products underwritten and issued by the
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance
Company(r), 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 [email protected] with the message: INFO IBM-MAIN
