Previous Topic Next topic Print topic


CIC-LOAD

Load specified programs, tables, or maps from a library to main storage.
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)
Previous Topic Next topic Print topic