Loading...
Select Version
&pagelevel(3)&pagelevel
There are two different exits for the MAREN function “modify catalod entry”:
the request exit allows the intended modification to be checked and rejected if necessary
the return exit only allows evaluations, since the modification has already taken place.
The following function names are possible when calling the exit for changing archive entries:
| LAFUNKNM | Action involved |
| CHECK | MAREN statement CHECK-TSOSCAT TYPE-OF-FILES=*FGG |
| CHECK1 | MARENADM statement CHECK-TSOSCAT TYPE-OF-FILES=*FGG |
| FREE | MARENADM statement FREE-VOLUMES |
| GET | MAREN statement EXPORT-VOLUME |
| GET1 | MARENADM statement EXPORT-VOLUME |
| RECEIVE | MARENADM statement IMPORT-VOLUME |
| INIT | MARENADM statement INITIALIZE-VOLUMES |
| MARARCHU | Program MARENADM.ARCHIVE |
| MARENFA2 | Modification of an catalog entry as a result of one of the ARCHIVE statements SAVE, EXPORT, POOL and PURGE. |
| MARENFA3 | Modification of an catalog entry as a result of one of the ARCHIVE statements SAVE/EXPORT. |
| MARENUCP | Modification of archive entries as a result of the automatic free tape allocation facility in certain cases. |
| MAREN0C1 | DMS-CLOSE |
| MAREN0E1 | DMS reel change |
| MAREN0E2 | DMS reel change |
| MAREN0NR | NDM device management |
| MAREN0NS | NDM device management |
| MAREN0O2 | DMS-OPEN |
| MODIFY | MAREN statement MODIFY-VOLUME-ATTRIBUTES |
| MODIFY1 | MARENADM statement MODIFY-VOLUME-ATTRIBUTES |
| MODTSET | MAREN statement MODIFY-TAPE-SET-ATTRIBUTES |
| MODTSET1 | MARENADM statement MODIFY-TAPE-SET-ATTRIBUTES |
| MOUNT | MAREN statement MOUNT-VOLUME |
| RETURN | MARENADM statement RETURN-VOLUMES |
| SECFREE | MARENADM statement SECURE-FREE-VOLUMES |
Passing parameters
The following information is passed to the write exits:
| Register 1 | A(parameter area) The parameter area comprises a word containing the address of the catalog entry. The individual catalog entry fields can be addressed symbolically via the dummy section MARENA. |
| Register 13 | A(save area) The save area provided by MAREN is 18 words long. |
| Register 14 | A(return) For returning directly to MAREN. |
| Register 15 | A(exit routine) Start address of the called exit routine. |
All other registers are set to “binary zero”.