Update selected fields of the directory entry for a PDSE program object using the DESERV UPDATE function. This lets the caller update selected fields of the PMAR. The caller must supply a DCB that is open for output or update. The caller must also supply a DESL that points to the list of SMDEs to be updated. The DESL can be processed in sequence and a code can indicate successful and unsuccessful update. The SMDE (as produced by the GET function) contains the MLT and concatenation number of the member as well as an item number. These fields will be used to find the correct directory record to be updated. The DESL_NAME_PTR is ignored. The caller should issue a DESERV GET function call to obtain the SMDEs; modify the SMDEs as required; and issue a DESERV UPDATE function call to pass the updated DESL.

The UPDATE function does not affect the directory entry imbedded in the program object. This has implications for a binder inclusion of a PDSE program object as a sequential file. The binder can use the directory entry in the program object rather than the one in the directory.

You can update the fields in Figure 1.

PMAR_RENT      1 BIT    Reenterable
PMAR_REUS      1 BIT    Reusable
PMAR_TEST      1 BIT    Module to be tested - TSO TEST
PMAR_LOAD      1 BIT    Only loadable
PMAR_EXEC      1 BIT    Executable
PMAR_PAGA      1 BIT    Page alignment is required
PMAR_XSSI      1 BIT    SSI information present
PMAR_XAPF      1 BIT    APF information present
PMAR_RMOD      1 BIT    RMODE is ANY.
PMAR_AAMD      2 BITS   Alias entry point addressing mode. If B’00’,
                        AMODE is 24. If B’10’, AMODE is 31. If B’11’, AMODE is ANY.
PMAR_MAMD      2 BITS   Main entry point addressing mode. If B’00’, AMODE is 24.
                         If B’10’, AMODE is 31. If B’11’, AMODE is ANY.
PMAR_AC        BYTE     APF authorization code
PMAR_EPM       WORD     Main entry point offset
PMAR_EPA       WORD     This entry point offset
PMAR_SSI       32 BITS  SSI information
PMARL_PRIM     1 BIT    FETCHOPT PRIME option
topRL_PACK     1 BIT    FETCHOPT PACK option

If any field other than PMAR_EPA or PMAR_AAMD is updated, this update becomes effective for all entry point names. If PMAR_EPA or PMAR_AAMD are updated, these updates only affect the entry point represented by the input SMDE.

The UPDATE function does not affect connections established by other DE services invocations.