How can I get the ACFNRSCR and ACFNRULE panels to use our company UID string?

Document ID : KB000026871
Last Modified Date : 14/02/2018
Show Technical Document Details

Question:

How can I get the ACFNRSCR and ACFNRULE panels to use our company UID string?

Description

If the ISPF ACFNRULE panel is being used to change a rule line and the LOGONID field is specified instead of the UID, the generated UID in the new rule line may be incorrect. The CLISTs will need to be modified to reflect the correct format of the UID string.

Solution

A usermod must be applied to change the construction of the UID in the CLISTs for the two panels (ACFNRUL# for dataset rules and ACFNRSC# for resource rules).

The UID string is delivered in the CLISTS as:

    COMPANY(*) SITE(*) LEVEL(*) JOBFUNC(**) 

You will need to modify this to conform to your company's standards.

For example, if your UID string contained DIV (1 character) DEPT (4 characters) JOBF (3 characters) RESV (5 characters) and then followed by the logonid

You would update the clists as follows - please ensure that the line numbers are correct in your version of the clists.

    ++USERMOD (xxxxxxxx).
    ++VER (Z038) FMID(CX19000).     ?-----Change FMID as necessary for your ACF2 release.
    ++MACUPD(ACFNRSC#)DISTLIB(CX190CLD).
    ./ CHANGE NAME=ACFNRSC#
    /* COMPANY(*) SITE(*) LEVEL(*) JOBFUNC(**)         */        00020000      ?-- comment out existing UID structure
    DIV(*) DEPT(****) JOBF(***) SUBF(***) RESV(*****)           00020010      ?--Set masked values for user fields 
    /* SET &UID = &STR(&COMPANY&SITE&LEVEL&JOBFUNC&LID) */       00880000      ?--Comment out existing UID definition
    SET &UID = &STR(&DIV&DEPT&JOBF&SUBF&RESV&LID)             00880010      ?--Define your site's UID structure
    ./ ENDUP 
    ++MACUPD (ACFNRUL#)  DISTLIB(CX190CLD).
    ./ CHANGE NAME=ACFNRUL#
    /* COMPANY(*) SITE(*) LEVEL(*) JOBFUNC(**) */                00020002
    DIV(*) DEPT(****) JOBF(***) SUBF(***) RESV(*****)           00020010      ?--Set masked values for user fields
    /* SET &UID = &STR(&COMPANY&SITE&LEVEL&JOBFUNC&LID) */       02090002      ?--Comment out existing UID definition
    SET &UID = &STR(&DIV&DEPT&JOBF&SUBF&RESV&LID)             02090100      ?--Define your site's UID structure
    ./ ENDUP

With this modification in place, the clist would substitute the correct number of asterisks (*) so that the LOGONID, that you specified in the panel, will be at the correct offset of the UID string.