Previous Topic: Exit OperationNext Topic: TDF to TDF

Setups for Different Types of Moves › CA-Telon Moves › Member Existence Exit › Exit Performance

Exit Performance

You can improve performance for the CA‑Telon member existence exit by preallocating the CA‑Telon TDF in your JCL (LOGON proc) or in the CLIST used to invoke CA‑PanAPT and specifying an exit parameter in the Library Code definition.

For example, you can add the following statement to your JCL to preallocate the CA‑Telon TDF:

//TESTTDF DD DISP=SHR,DSN=your.telon.testtdf

You can also allocate the TDF by adding the following TSO command to the beginning of your APT CLIST:

alloc f(testtdf) da('your.telon.testtdf') shr

In addition, you should add a TSO command to the end of your APT CLIST to deallocate the TDF:

free f(testtdf)

You must make sure that the ddname and dsname match those specified for the test TDF in the Library Code definition.

After you have set up the allocation for the appropriate TDF, you can modify the Library Code definition.

If you modify a user's LOGON PROC, that user must logon again before the change is effective. Similarly, if you modify the APT CLIST, users must exit CA‑PanAPT and reenter to make the allocation changes effective. On the other hand, as soon as you update the Library Code definition, the changes are effective for all users.

After you have verified that the TDF is preallocated, you can change the Library Code definition to take advantage of the preallocation. On the Library Code Maintenance ‑ General Info. panel, specify the Edit exit program name as APAS0226 and the first 12 characters of the parameter as PREALLOCATED. If you specify PREALLOCATED but the TDF is not already allocated, the exit indicates that the member was not found and writes a message that the TDF could not be opened.

If you specify exit APAS0226 without a parameter, the exit allocates the TDF at the beginning of its processing and deallocates it at the end, regardless of whether the TDF has been allocated previously. If the TDF was preallocated and the exit attempts to allocate it again, the allocation fails and the exit indicates that the member was not found and writes a message that the TDF could not be allocated.