Natural in Batch Mode under BS2000/OSD

This document contains special considerations that refer to Natural in batch mode under the operating system BS2000/OSD.

The section covers the following topics:

• Files and System Files Used by Natural in BS2000/OSD Batch Mode

• Keyword Parameters

• BS2000/OSD Job Variables

See also Natural under BS2000/OSD Batch Mode Error Messages.

For considerations that refer to Natural in batch mode generally, see:

• Adabas Data Sets

• Sort Data Sets

• Subtasking Session Support for Batch Mode Environments

Files and System Files Used by Natural in BS2000/OSD Batch Mode

The following optional sequential files or system files are used during a Natural under BS2000/OSD batch mode session:

CMPRMIN - Dynamic Parameter File

CMPRMIN can be used as dynamic parameter file if the system files SYSIPT or SYSDTA shall not be used or are not available to Natural. The parameter file must be of FCBTYPE SAM.

All input records from CMPRMIN are concatenated into one parameter string. Trailing blanks at the end of each record are truncated; no commas are inserted.

For further information on reading dynamic parameters, see the keyword parameter DYNPAR for macro NAMBS2 (see DYNPAR=FILE).

SYSIPT - Dynamic Parameter System File

The system file SYSIPT can be used as dynamic parameter file.

All input records from SYSIPT are concatenated into one parameter string. Only the first 72 positions of each SYSIPT record are significant. Trailing blanks at the end of each record are truncated; no commas are inserted.

For further information on reading dynamic parameters, see the keyword parameter DYNPAR for macro NAMBS2.

SYSDTA - Dynamic Parameter System File

The system file SYSDTA can be used as dynamic parameter file.

All input records from SYSDTA are concatenated into one parameter string. Trailing blanks at the end of each record are truncated; no commas are inserted.

Anmerkung:
If SYSDTA is assigned to SYSCMD, the parameter input has to be closed off by an /EOF command to separate it from succeeding primary input data.

For further information on reading dynamic parameters, see the keyword parameter DYNPAR for macro NAMBS2 (see DYNPAR=FILE).

SYSDTA - Primary Input

The system file SYSDTA is used as the primary input file that contains Natural commands, Natural source programs, and (optionally) data to be read by INPUT statements during the execution of Natural programs.

The number of characters actually processed per line is determined by the current setting of the profile/session parameter SL. This setting applies for both source statement and execution time input data. This enables identification or sequence numbers to be placed in the rightmost columns of every record, if desired.

SYSOUT, SYSLST - Primary Report Output

The system files SYSOUT or SYSLST are used for the primary output report, resulting from DISPLAY, PRINT and WRITE statements in a Natural program.

The actually used system file depends on the value for the keyword parameter WRITE in the assembly of the reentrant part of the Natural batch driver.

The system files SYSOUT or SYLST are also used as optional report output for dynamic parameters. If the profile parameter PLOG is set to ON, all dynamic profile parameters are written to the same destination as the primary report output.

SYSLSTnn - Optional Report Output for Natural Tracing

If profile parameter ETRACE is set to ON, all trace output is written to this file during the session.

Depending on the value for the keyword parameter TRACE in the assembly of the reentrant part of the Natural batch driver, one of the alternate SYSLST system files SYLST01 - SYSLST99 is used as destination for the trace records.

Pnn - Additional Reports 01-31

Pnn is used for each additional report referenced by any Natural program compiled or executed during the session. nn must be a two-digit decimal number in the range 01-31, corresponding to the report number used in a DISPLAY, PRINT and WRITE statement.

Instead of Pnn, any other link names may be used by setting the keyword subparameter DEST of profile parameter PRINT to an appropriate value, for example:

PRINT=((nn),...,DEST=PRNTnn)

Wnn - Natural Work Files 01-32

Wnn is used for each Natural work file referenced by any Natural program compiled or executed during the session. nn must be a two-digit decimal number in the range 01 - 32, corresponding to the number used in a READ WORK FILE or WRITE WORK FILE statement.

Instead of Wnn, any other link names may be used by setting the subparameter DEST of profile parameter WORK to an appropriate value, for example:

WORK=((nn),...,DEST=WRKnn)

Keyword Parameters

The Natural BS2000/OSD batch mode driver is generated by assembling the macro NAMBS2. For the control of conditional assembly of the driver modules, the following keyword parameters are available:

ADACOM | ADDBUFF | APPLNAM | CODE | DELETE | DYNPAR | ILCS | JV | LF | LINK | LINK2/LINK3/LINK4 | NUCNAME | PARMOD | REQMLOC | SYSDTA | TERM | TIMESTMP | TRACE | USERID | WRITE

ADACOM

This parameter applies to the generation of the environment-dependent nucleus. It determines which Adabas link module is to be used.

Possible values:

In any case a resolve to the Adabas module library has to be given in the linkage step for the environment-dependent nucleus.

ADDBUFF

This parameter applies to the generation of the non-reentrant part.

It determines the additional number of pages for the terminal I/O buffer.

Possible values:

APPLNAM

This parameter applies to the generation of the non-reentrant part.

Possible values:

CODE

This parameter applies to the generation of both the non-reentrant part and the reentrant part.

It determines which part of the Natural BS2000/OSD interface is to be generated.

Possible values:

DELETE

This parameter applies to the generation of the reentrant part.

Possible values:

DYNPAR

This parameter applies to the generation of the non-reentrant part.

Possible values:

/LOGON
/SYSFILE SYSDTA=(SYSCMD)
/EXEC NATBAT
/EOF * Null dynamic parameters
LOGON SYSEXTP
L * *
FIN
/LOGOFF

/FILE NAT.PARAMS,LINK=CMPRMIN

ILCS

This parameter applies to the generation of the reentrant part.

Possible values:

INCLUDE IT0SL#,SYSLNK.CRTE.010
RESOLVE,SYSLNK.CRTE.010

INCLUDE IT0INITS,SYSLNK.ILCS
RESOLVE,SYSLNK.ILCS

JV

This parameter applies to the generation of the non-reentrant part.

Possible values:

LF

This parameter applies to the generation of the non-reentrant part.

With this parameter, you specify the control character to be used for line advance when printing on the local printer.

Possible values:

LINK

This parameter applies to the generation of the non-reentrant part.

Possible values:

A "TABLE" macro call is performed for the specified programs and modules, which enters their load addresses into the dynamic loader's link table. It is therefore not necessary to dynamically load these programs when they are called by Natural programs. For dynamically loaded programs, only the load library needs to be defined in the Natural parameter module.

Example:

LINK=PROG1
LINK=(PROG1,PROG2,MODUL111)

LINK2/LINK3/LINK4

These parameters apply to the generation of the non-reentrant part.

The parameters LINK2, LINK3 and LINK4 are an extension of the LINK parameter. Since an operand definition cannot be longer than 127 characters (including parentheses), these parameters are provided for cases where the operand of parameter LINK would be too long.

Possible values:

Examples:

NAMBS2 LINK=(PROG1,PROG2,...),
LINK2=(PROG54,...)
NAMBS2 LINK=(PROG1,PROG2,PROG3,PROG4)

NUCNAME

This parameter applies to the generation of the non-reentrant part.

With this parameter, you specify the name of the bounded, reentrant Natural module. You must use this name for the Natural pool and load information in macro ADDON (macro ADDON assembles BS2STUB).

Possible values:

PARMOD

This parameter applies to the generation of both the non-reentrant part and the reentrant part.

Possible values:

The first part of this parameter (nn) is used to define an addressing mode (24-bit or 31-bit mode) for the Natural BS2000/OSD application.

31-bit mode is required if the Natural buffer pool, the reentrant part of the Natural BS2000/OSD application, Adabas or the Adabas Fast Path pool is located above 16 MB.

The second part of this parameter (loc) is used to define the location of the Natural environment-dependent nucleus (see the Installation documentation). If you load the environment-dependent nucleus, this must be defined in the environment-dependent nucleus link procedure as follows:

LOADPT=*XS

or

LOADPT=X'address'

Example:

/EXEC TSOLINK
PROG NATvrs,FILENAM=NATvrs,LOADPT=*XS,...
TRAITS RMODE=ANY,AMODE=31
INCLUDE....
/* PARMOD=(nn,loc) MUST BE IDENTICAL IN THE NON-REENTRANT AND REENTRANT PARTS

vrs represents the relevant product version (see also Version in the Glossary).

REQMLOC

This parameter applies to the generation of both the non-reentrant part and reentrant part in 31-bit mode (PARMOD=31).

This parameter determines where the requested Natural work areas are to be allocated by the system using request memory.

Possible values:

The REQMLOC parameter corresponds to the LOC parameter of the BS2000/OSD system macro REQM.

SYSDTA

This parameter applies for the generation of the non-reentrant part.

Possible values:

TERM

This parameter applies to the generation of the non-reentrant part.

Possible values:

TIMESTMP

This parameter applies to the generation of the non-reentrant part.

It determines the time base for all system variables and time stamps derived from the machine time.

Possible values:

TRACE

This parameter applies to the generation of the reentrant part.

With this parameter, you specify the number of a trace file and the maximum length of a trace print record.

Possible values:

If any external Natural trace function is active, the trace records will be written to SYSLSTnn. In this case, the Natural batch mode driver creates the following trace file:

Example:

NATURAL.TRACE.BTCH.TTTT,SPACE=(30,3)
SYSFILE SYSLSTnn=Natural.TRACE.BTCH.TTTT
/* TTTT is the task sequence number

Before the Natural batch mode session is terminated, the trace file will be closed as follows:

SYSFILE SYSLSTnn=(PRIMARY)

USERID

This parameter applies to the generation of the non-reentrant part.

Possible values:

WRITE

This parameter applies to the generation of both the non-reentrant and the reentrant part.

This parameter defines the destination of the output produced by Natural.

Possible values:

BS2000/OSD Job Variables

The Natural batch mode driver uses the BS2000/OSD facility "Job Variables" to pass return codes to the user or to subsequent jobs (steps). The return codes are created either by Natural itself (in the range 1 to 31) or by the Natural application if a TERMINATE statement is used with the condition-code option (the range to be used is 32 to 256).

The job variable which is to contain the return code has to be declared using the link name *NATB2JV. The support of job variables depends on the setting of the SET parameter &JV in the Natural BS2000/OSD batch mode driver NATBS2.

Example:

/LOGON
/DCLJV NATBJV,LINK=*NATB2JV
/EXEC NATnnnB
*TERMCC
/LOGOFF

To assign Return Code 36 to NATBJV, the Natural program TERMCC could be coded as follows:

ASSIGN CC(N8) = 36
TERMINATE CC
END