This document contains the rules that apply when you use a Natural shared nucleus, which is possible in Batch mode, under the TP monitors TIAM and/or UTM.
The following topic is covered:
Concerning UTM, see also Several Applications with one Common Natural in the Natural TP Monitor Interfaces documentation.
With a Natural shared nucleus under BS2000/OSD, the rules given below apply:
The shared Natural nucleus is linked without the corresponding reentrant parts of the batch, TIAM and UTM drivers (these modules must be linked to the front-end part of the corresponding application).
Example: The name of the shared Natural nucleus is
NATSHARE.
/EXEC $TSOSLNK MOD NATSHARE,XREF=YES,MAP=Y,XDSEC=Y,SORT=Y LINK-SYMBOLS *KEEP INCLUDE NATINV,libname . . INCLUDE NATURAL,libname . . INCLUDE NATLAST,libname BIND /SETSW ON=1 LIB NATURAL.USER.MOD,BOTH PAR O=Y ADDR *OMF END /SETSW OFF=1
Batch, TIAM and UTM application-specific Natural parameter modules
are also linked to the front-end part of the corresponding application. In
addition, the shared Natural nucleus can contain a common Natural parameter
module, for example, for CSTATIC entries. The name chosen for the
linked Natural nucleus is also identical with the name of the global common
memory pool into which Natural is loaded. This name is to be used as operand
for the following keyword parameters:
NUCNAME |
in the macros NAMBS2, NAMTIAM and
NATUTM |
NAME |
in CMPSTART and
ADDON (BS2STUB)
|
Example:
NRTSTART NAMTIAM CODE=FRONT,
NUCNAME=NATSHARE
PARMODE=(31,ABOVE),
.
.
NUTFRONT NATUTM APPLNAM=NATUTM,
.
.
NUCNAME=NATSHARE
PARMODE=(31,ABOVE)
The shared Natural nucleus is started by the program
CMPSTART.
Example:
/EXEC (CMPSTART,NATURAL.MOD) NAME=NATSHARE,SIZE=2MB,POSI=ABOVE,ADDR=250,SCOP=GLOBAL PFIX=YES,LIBR=NATURAL.USER.MOD
The link to the shared Natural nucleus is created in the batch, TIAM
or UTM applications through the generation of the macro
BS2STUB; refer to
CMPSTART
Program.
Example:
NRTSTUB BS2STUB PARMOD=31,PROGMOD=ANY
ADDON NAME=NATSHARE,
STAT=GLOBAL
NUTSTUB BS2STUB PARMOD=31,PROGMOD=ANY
ADDON NAME=NATSHARE,
STAT=GLOBAL
The front-end part of the applications must contain the reentrant part
of the corresponding driver (NAMBS2 CODE=RENT, NAMTIAM
CODE=RENT or NURENT).
Front-end Part of NAMTIAM:
/EXEC $TSOSLNK /* Front part of NAMTIAM PROG NATURAL,LOADPT=X'1000000',XREF=YES TRAITS RMODE=ANY,AMODE=31 INCLUDE NRTSTART,libname /* Front part of NAMTIAM INCLUDE NRTRENT,libname /* Reentrant part of NAMTIAM INCLUDE NRTSTUB,libname /* BS2STUB INCLUDE NRTPARM,libname /* Natural Parameter Module
UTM Front-end Part:
/EXEC $TSOSLNK /* UTM Front-end part PROG NUTvrs,FILENAM=NATUTM,LOADPT=X'1000000',XREF=YES TRAITS RMODE=ANY,AMODE=31 INCLUDE KDCNUT,libname /* UTM KDCROOT INCLUDE NUTSTART,libname /* NATUTM INCLUDE NUTRENT,libname /* NURENT INCLUDE NUTSTUB,libname /* BS2STUB INCLUDE NUTPARM,libname /* Natural Parameter Module INCLUDE SWPPARM,libname /* Swap Pool Parameter Module
where libname is the name of
the library and vrs stands for version,
release and system maintenance level of the product.
