27.04.2013 Views

MVS Jan 2005.p65 - CBT Tape

MVS Jan 2005.p65 - CBT Tape

MVS Jan 2005.p65 - CBT Tape

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Address of the TCB area address.<br />

Address of the STAE option indicator. The STAE option<br />

indicator should be either STAE or NOSTAE. For specific<br />

details on the STAE option indicator, check out the DETACH<br />

macro parameter descriptions in the z/OS <strong>MVS</strong> Assembler<br />

Services Reference manual.<br />

Comments in the program source for ATTACH and DETACH<br />

provide more details on the function arguments.<br />

PROGRAM COMPILATION, LINKAGE, AND EXECUTION<br />

Included with this article are four programs. These are:<br />

The ATTACH() function Assembler program.<br />

The DETACH() function Assembler program.<br />

The TESTATT C program, which provides example usage<br />

of ATTACH() and DETACH().<br />

The ATTPGM1 Assembler program, which is attached by<br />

the TESTATT example program.<br />

ATTACH, DETACH, and ATTPGM1 can be assembled with a<br />

standard assembly job. Datasets SYS1.MACLIB,<br />

SYS1.MODGEN, and CEE.SCEEMAC should be included in<br />

the assembly job’s SYSLIB DD concatenation.<br />

The TESTATT C program should be compiled and prelinked<br />

as per normal procedures for these operations – be sure to<br />

specify the RENT option on the compile. Also, be sure to<br />

change all occurrences of [ to X'AD' and all occurrences of ]<br />

to X'BD' prior to running the compile.<br />

Below is a sample job that linkedits the ATTPGM1 and<br />

TESTATT programs to create executable modules:<br />

//IEWL EXEC PGM=HEWLHØ96,PARM='XREF,LIST,MAP,RENT'<br />

//SYSPRINT DD SYSOUT=*<br />

//OBJECT DD DSN=object.code.pds,DISP=SHR<br />

//SYSLIB DD DSN=CEE.SCEELKED,DISP=SHR<br />

//SYSLMOD DD DSN=load.library,DISP=SHR<br />

© 2005. Reproduction prohibited. Please inform Xephon of any infringement.<br />

33

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!