Previous Topic: Restore the Screen at a BreakpointNext Topic: COBOL Like MOVE Command at a Breakpoint


Dynamically Acquire Main Storage at a Breakpoint

To dynamically acquire main storage when a program is at a breakpoint, enter:

CORE=GETM,L=len,CL=type,INIT=xx

L=len is mandatory. The value of len is the same as the one entered with the parameter LENGTH(...) in a CICS GETMAIN command. It could be a hexadecimal value or a decimal followed by the letter T.

CL=type is optional and specifies the type of storage to be acquired. CL=USER acquires user class storage and CL=TERM acquires terminal class storage (TIOA). If this parameter is omitted, CL=USER is assumed.

INIT=xx is optional. The hexadecimal digits xx specify the character used to initialize the storage area. The default is binary zeroes.

This command is equivalent to an EXEC CICS GETMAIN.

When a CORE=GETM command executes, CA InterTest for CICS displays the acquired area beginning with its eight byte Storage Accounting Area (SAA). The address of the acquired area must be saved in a register where the program expects to find it.

The SET command is useful to load the address. Note that if the address is placed in a COBOL BLL cell, the address must be adjusted up 8 bytes to point past the SAA. If a COBOL program has loaded the contents of the BLL cell into a register, the register must also be loaded.

Examples

The SET command is expressed as follows:

CORE+8=SET=BLL1
CORE=SET=REG6
CORE=SET='SSA POINTER'