IKJIFRIF parameter list

The execute form of IKJIFRIF sets up a parameter list where register 1 points to the parameter list shown in Figure 1.

Upon return from the execute form of IKJIFRIF, the parameter list may contain error indicators. Error indicators include:

Register 15 and optionally the RETCODE parameter you specified
Abend code field in the parameter list
Reason code field in the parameter list
Service return code field in the parameter list
Service reason code field in the parameter list

Figure 1. Parameter list structure for IKJIFRIF (single user ID)

┌───────────┐
│Register 1 ├───┐
└───────────┘   │
                ↓
         Parameter List
  + 0  ┌────────────────────┐
       │ Address of UPT     │
  + 4  ├────────────────────┤
       │ Address of PSCB    │
  + 8  ├────────────────────┤         ADD - DEL - ALT Structure
       │ Address of ECT     │
  + C  ├────────────────────┤
       │ Address of userid  │    + 0 ┌───────────────┐
       │ or first userid in ├──────→ │ X'00000000'   │
       │ a chain of userids │    + 4 ├───────────────┴───────────────┐
  + 10 ├────────────────────┤        │ User ID                       │
       │ Requested function │    + C ├───────────────────────────────┤
       │ (ADD, DEL, or ALT) │        │ New user ID (only for ALT)    │
  + 14 ├────────────────────┤        └───────────────────────────────┘
       │ Abend code         │
  + 18 ├────────────────────┤
       │ Reason code        │
  + 1C ├────────────────────┤
       │ Service return code│
  + 20 ├────────────────────┤
       │ Service reason code│
       └────────────────────┘

Figure 1 shows, right to the parameter list, the organization of the storage area for a single directory entry. Multiple directory entries can be added, deleted, or changed in the broadcast data set with a single invocation of the IKJIFRIF macro instruction. Figure 2 shows the organization of the storage area for three directory entries.

Note that the address at offset X'C' in the parameter list (the address of a user ID or the first user ID in a chain of user IDs) needs to start on a fullword boundary in order for the IKJIFRIF macro to evaluate this structure. See the following examples.

Offset (Hex)	Number of bytes	Contents or meaning
0	4	For a single directory entry this must be X'00000000'. For a chain of user IDs this is a pointer to the next entry. Note that the last entry must be set to X'00000000'.
4	8	User ID n to be added, deleted, or changed.
C	8	New user ID n, if the ALT function of the IKJIFRIF macro is invoked.

Figure 2. Parameter list structure for IKJIFRIF (multiple directory entries)

       :                    :
       :                    :

  + 8  ├────────────────────┤         ADD - DEL - ALT Structure
       │ Address of ECT     │
  + C  ├────────────────────┤
       │ Address of userid  │    + 0 ┌───────────────┐
       │ or first userid in ├──────→ │ Next argument ├─────────────────┐
       │ a chain of userids │    + 4 ├───────────────┴───────────────┐ │
  + 10 ├────────────────────┤        │ User ID 1                     │ │
       │ Requested function │    + C ├───────────────────────────────┤ │
       │ (ADD, DEL, or ALT) │        │ New user ID 1 (ALT only)      │ │
  + 14 ├────────────────────┤        └───────────────────────────────┘ │
       │ Abend code         │                                          │
  + 18 ├────────────────────┤  ┌───────────────────────────────────────┘
       │ Reason code        │  │
  + 1C ├────────────────────┤  │ + 0 ┌───────────────┐
       │ Service return code│  └───→ │ Next argument ├─────────────────┐
  + 20 ├────────────────────┤    + 4 ├───────────────┴───────────────┐ │
       │ Service reason code│        │ User ID 2                     │ │
       └────────────────────┘    + C ├───────────────────────────────┤ │
                                     │ New user ID 2 (ALT only)      │ │
                                     └───────────────────────────────┘ │
                                                                       │
                               ┌───────────────────────────────────────┘
                               │
                               │ + 0 ┌───────────────┐
                               └───→ │ X'00000000'   │
                                 + 4 ├───────────────┴───────────────┐
                                     │ User ID 3                     │
                                 + C ├───────────────────────────────┤
                                     │ New user ID 3 (ALT only)      │
                                     └───────────────────────────────┘