CIC-LOAD

Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.

Target:

CICS

Syntax:

CIC-LOAD PROGRAM(name) [SET(linkdataname)]
... [LENGTH(dataarea)]|[FLENGTH(dataarea)]
... [ENTRY(pointref)]
... [HOLD] [ERROR(errorpara)]

Parameter:

ENTRY (`pointref`)	BLL cell containing program address after the LOAD operation.
ERROR (`errorpara`)	User-defined error routine to perform when an abnormal condition occurs.
FLENGTH (`value`)	Specify length as a full word value.
HOLD	Hold loaded module in main storage until a CIC-RELEASE call executes.
LENGTH (`value`)	Maximum length of data; can be a literal (LINK or XCTL only) or COBOL data name defined as S9(04)COMP. Can also be a partial length (XCTL only).
PROGRAM (`name`)	Name of module to load into main storage; can be a literal or COBOL data name (maximum 8 characters).
SET(link dataname)	01-level Linkage Section data area identical to the `linkdataname` in the associated TP-LINKAGE call.

Example:

Load table TAXTAB into main storage; perform user-defined error routine ERROR-PARA when an error occurs; store the address at which the module was loaded in Linkage Section data area TAX-TABLE-AREA; and store the length of the loaded module in Working-Storage data area TAX-LEN.

CIC-LOAD PROGRAM('TAXTAB')
... SET(TAX-TABLE-AREA) LENGTH(TAX-LEN)
... ERROR(ERROR-PARA)