Previous Topic: DUPLICATENext Topic: DELETE


MARK STATUS

PGM is the only VLS members that the MARK STATUS command affects are program object members. For the program executable object (type T) and symbol table (type J), the members are renamed so that the version number is changed to PRD.

This enables the runtime executor to locate the appropriate members in a system that was the target of the Transport Utility, when no Datadictionary entity-occurrence exists. This is necessary to support the command RUN xxxxxxxx VER PROD, otherwise, CA Ideal would have no means of determining which of the multiple versions of the object members were the production versions.

Example

Suppose that in SYS ACC, PGM UPDATE VER 005 is currently in PROD status, VER 006 is in TEST, and that VER 006 is to become the new PROD version. Before the MARK STATUS command, the following members exist in the object library (if you run a VLSUTIL LIBRARY listing, the member names are shown in strict collating sequence order, instead of the following order):

ACCUPDATE          PRDJA
ACCUPDATE          PRDTA
ACCUPDATE          PRDTB
ACCUPDATE          005VA
ACCUPDATE          006JA
ACCUPDATE          006TA
ACCUPDATE          006TB
ACCUPDATE          006VA
ACCUPDATE          007JA
ACCUPDATE          007TA
ACCUPDATE          007TB
ACCUPDATE          007VA

This program contains working data but no parameter data. We can determine this because there is a type V member (working data object) but no type Q member (parameter object). Also, the original MARK command for VER 005 changed only the names of the type J (symbol table) and T (executable object) members to reflect PRD instead of 005: The type V member was never changed. (A type Q member would not change either.)

In this example, only two members are shown for each executable object module, A and B. There can be more members (C, D, E, and so forth), but two is the minimum.

The following is now executed:

MARK STATUS PGM UPDATE VER 6 TO PROD

CA Ideal determines that there is an existing previous PROD version of the program by accessing the Datadictionary. After the above command is executed, the following members exist on the object library (if you run a VLSUTIL LIBRARY listing, the member names are shown in strict collating sequence order, instead of the following order):

ACCUPDATE        PRDJA
ACCUPDATE        PRDTA
ACCUPDATE        PRDTB
ACCUPDATE        006VA
ACCUPDATE        007JA
ACCUPDATE        007TA
ACCUPDATE        007TB
ACCUPDATE        007VA

All members for the old PROD version 005 were deleted (since CA Ideal determined from the Datadictionary that version 5 was the previous PROD version). The former 006 members were renamed to PRD since the command directed CA Ideal to mark version 6 to PROD status. Neither of the type V members (working data object) was affected by the MARK STATUS command. These members are used only at compilation time.