This Natural profile parameter specifies a non-Natural back-end program which is to receive control after the termination of the Natural session.
| Possible settings | 1 - 8 characters | Non-Natural back-end program. |
|---|---|---|
| numeric value | Setting a numeric value, for example PROGRAM=0,
indicates "no back-end processing".
Note: |
|
| Default setting | none | |
| Dynamic specification | yes | This Natural profile parameter can also be set dynamically from
within a Natural program by calling the Natural subprogram
CMPGMSET, which is provided in the library
SYSEXTP.
|
| Specification within session | yes | |
| Application programming interface | USR4001N (for mainframes)
|
See SYSEXT - Natural Application Programming Interfaces in the Utilities documentation. |
USR6204N (for all platforms)
|
Notes:
PROGRAM parameter can be supplied with the
TERMINATE
statement.
In addition to back-end programs, the Natural CICS interface also
supports back-end transactions which may be specified via
RET=XXXX or
RTI=XXXX or
STR=XXXX instead of a program name,
with XXXX being a valid CICS
transaction ID.
RET=XXXX indicates that
control has to be passed to CICS together with a return transaction ID by a
CICS RETURN TRANSID ('XXXX')
command.
RTI=XXXX indicates that
control has to be passed to CICS with a return transaction ID by a CICS
RETURN TRANSID ('XXXX' IMMEDIATE)
command.
STR=XXXX indicates that a new
transaction has to be started by a CICS START TRANSID
('XXXX') TERMID (*INIT-ID), before
relinquishing control via a CICS RETURN command.
