FREEMAIN64

Release storage that was acquired by using a GETMAIN or GETMAIN64 request or by using a LOAD command for a program, map, or table that is defined with RELOAD=YES. This command is for use only in non-Language Environment® (LE) AMODE(64) assembler application programs.

See Assembler language programming restrictions and requirements.

FREEMAIN64

Condition: INVREQ

This command is threadsafe.

Description

FREEMAIN64 releases the following storage:

Main storage that was acquired by a GETMAIN or GETMAIN64 command that is issued by the application.
Main storage that was acquired by a LOAD command for a program, map, or table that is defined with RELOAD=YES.

If the task that acquired the storage or loaded the program does not release it, CICS® releases the storage at task end, except for in the following situations:

The GETMAIN or GETMAIN64 command is specified the SHARED option. The storage remains allocated until another task issues a FREEMAIN or FREEMAIN64 request to release it.
The program is defined with RELOAD=YES. The storage remains allocated until another task issues a FREEMAIN or FREEMAIN64 request to release it.
The program is defined with RELOAD=NO but was loaded with the HOLD option. The program remains available until it is released by another task.

If a program is running under a task that is defined with TASKDATAKEY(USER) on the TRANSACTION resource definition, do not explicitly use FREEMAIN or FREEMAIN64 but allow the storage to be freed as part of the task termination.

Note: In the first two situations listed, using FREEMAIN64 might create inter-transaction affinities that adversely affect the use of dynamic transaction routing. For more information about transaction affinities, see Affinity.

You can release CICS-key storage from a program only if it is being executed in CICS-key. If the storage was obtained from CICS-key storage, and the program that issues the FREEMAIN64 request is in user-key, an INVREQ condition occurs with a RESP2 value of 2.

Options

DATA(data-area64)

Specifies the data area of main storage to be released.

In assembler, data-area64 must be a relocatable expression that is a data reference.

The length of storage that is released is the length that was obtained by the original request and not necessarily the length of the data area.

DATAPOINTER(ptr-value64)

Specifies the address of the main storage to be released, as a 64-bit pointer reference. This storage can be storage that was acquired by a previous GETMAIN or GETMAIN64 request. For example, a 64-bit pointer reference to an area of 31-bit storage can be specified.

The length of storage that is released is the length that was obtained by the original request.

Conditions

16 INVREQ

RESP2 values:

1: The storage that is specified by the DATA or DATAPOINTER parameter is not storage that is acquired by a GETMAIN or GETMAIN64 command.
2: The storage area that is specified by the DATA or DATAPOINTER parameter is in CICS-key storage, and the program that issues the FREEMAIN64 command is in user-key.
3: The storage area that is specified by the DATA or DATAPOINTER parameter is maintained by CICS, and any FREEMAIN request that attempts to release CICS-maintained storage areas is rejected.

Examples: Assembler

The following example releases storage by using the DATA option.

WORKAREA   DS   CL100
  .
  .
           EXEC CICS GETMAIN64 SET(9) FLENGTH(1048576)
           USING  WORKAREA,9
           EXEC CICS FREEMAIN64 DATA(WORKAREA)

The following example releases storage by using the DATAPOINTER option.

WORKAREA  DS   CL100
  .
          EXEC CICS GETMAIN SET(9) LENGTH(100)
          USING  WORKAREA,9
  .
  .
          DROP   9
  .
          EXEC CICS FREEMAIN64 DATAPOINTER(9)