You can include Adabas Audit Data Retrieval in the standard IBM selection menu or in one of your installation's selection menus.
Modify the ISR@PRIM panel if you want to include Adabas Audit Data Retrieval in the standard IBM selection menu. The default primary selection menu can be found in one of the libraries concatenated under DD ISPPLIB in the TSO logon procedure.
The following describes how to include Adabas Audit Data Retrieval in an ISPF selection menu.
Instructions depend on how the product and BSA libraries are made available:
This example shows how to call Adabas Audit Data Retrieval if you have changed your TSO logon procedure accordingly:
)BODY
% IRM+ Adabas Audit Data Retrieval
...
)PROC
IRM,'PGM(BST00PRM) PARM(B97,PE97PRIM;B97ONEXI) NOCHECK'
The )BODY section contains the line that is displayed in the selection menu. It informs the ISPF user which option to select in order to call Adabas Audit Data Retrieval (here: IRM).
The corresponding )PROC section for option IRM calls the program BST00PRM. The following positional parameters are provided:
With VCI processing
To make Adabas Audit Data Retrieval process the entries in the VCI table, you must also provide the termination exit B97ONEXX as fourth positional parameter.
|
)BODY |
This example shows how to call Adabas Audit Data Retrieval using LIBDEF and the provided CLIST.
)BODY
% IRM+ Adabas Audit Data Retrieval
...
)PROC
IRM,'CMD(%B97CLIST) NOCHECK'
The )BODY section contains the line that is displayed in the selection menu. It informs the ISPF user which option to select in order to call Adabas Audit Data Retrieval (here: IRM).
The corresponding )PROC section for option IRM calls the CLIST.
To make it possible to select the Adabas Audit Data Retrieval online application directly from any valid ISPF selection menu at your installation using option n.n or =n.n, the selection menu that includes Adabas Audit Data Retrieval and all intermediate selection panels must support ZTRAIL handling.
To use standard ISPF ZTRAIL handling, add the following statement as the last statement in the )PROC section before the )END statement:
&ZTRAIL = .TRAIL
In order to use the variable .TRAIL correctly, a previous TRUNC command is required. See the IBM ISPF documentation for more detailed information.
Following is a sample selection panel for two Adabas Audit Data Retrieval subsystems.
+-------------------------------------------------------------------------+
|%Beta 97 ----------------------------------------------------------------|
|%Option ===>_ZCMD |
|% +USERID - &ZUSER |
|% +TIME - &ZTIME |
|% +TERMINAL - &ZTERM |
|% +PF KEYS - &ZKEYS |
|% |
|% System Type Version Execution Started Task |
|% ----------- ------- --------- ------------ |
|% 1+ Beta 97 Production (V7R2) LIBDEF (BETA97P) |
|% |
|% 2+ Beta 97 Test (V7R2) LIBDEF (B97TEST) |
|% |
|% |
|% |
|% |
|% |
|% |
|% |
|)INIT |
| .CURSOR = ZCMD |
|)PROC |
| &ZSEL = TRANS( TRUNC (&ZCMD,'.') |
| 1,'CMD(%BETA97P) NOCHECK' |
| 2,'CMD(%B97TEST) NOCHECK' |
| ' ',' ' |
| X,'EXIT' |
| *,'?' ) |
| &ZTRAIL = .TRAIL |
| VPUT (ZTRAIL) SHARED |
|)END |
+-------------------------------------------------------------------------+
You may want to create different entry panels for different user requirements. These entry panels should be based on the Adabas Audit Data Retrieval Primary Selection Menu.
To modify the Adabas Audit Data Retrieval Primary Selection Menu, please refer to the IBM brochure ISPF Dialog Manager Services. Save the customized selection menu under a new name. The second character in the panel ID must be the language identifier, for example, G for German. Instead of PE97PRIM, specify the name of your panel in the PARM field of program BST00PRM in the ISPF selection menu or the CLIST.
Alternatively, you can use the VCI table to specify different panels for different users. How to use the VCI table is described in the Adabas Audit Data Retrieval Administrator Guide.