SJMCHKZ

         SJMCHKZ MF=D
***************************************************************
* ,SJMCHKZ': DATA FOR THE INTERFACE  ,JOIN-CMD'.              *
*-------------------------------------------------------------*
* THE FOLLOWING DATA IS TRANSFERRED:                          *
*  | ID | DATA  | ID | DATA  | ....  | END_ID |               *
*                                                             *
* THE 1-BYTE IDS AND THE IMPLICIT LENGTHS (WITH THE ID IN     *
* EACH CASE) ARE DEFINED HERE: ID = KZ IN NAMES               *
***************************************************************
*
***************************************************************
* 1. ID FOR THE ,USER PART' OF THE ,JOIN RECORD'.             *
***************************************************************
*                  RECORD KEY
SJKZUSR    EQU   1             ,USERID'
SJKZUSRL   EQU   9
*
*                  GROUP
SJKZGRP    EQU   2             ,GROUP='
SJKZGRPL   EQU   9
*
*                  PASSWORD /PASSWORD OPERATIONS
SJKZPAS    EQU   3             ,PASS='
SJKZPASL   EQU   18            L=(ID,ENCR-ID,PSWORD1,PSWORD2)
SJKZPNO    EQU   0               ENCR-ID: DO NOT ENCRYPT,
SJKZPEN    EQU   1                        ENCRYPT.
*
SJKZECM    EQU   4             -FREE-
*
SJKZPSW    EQU   5             ,PSWORD='
SJKZPWN    EQU   1             TRANSFER VALUES.
SJKZPWM    EQU   2
SJKZPWY    EQU   3
SJKZPSWL   EQU   2
*
*                  SEVER/LOCK INDIKATOR
SJKZSVR    EQU   6             ,LOCK='
SJKZVRY    EQU   1             TRANSFER VALUE
SJKZSVRL   EQU   2
*
*                  PRIMARY CATALOG BLOCK NUMBER
SJKZPBN    EQU   7             ,PBN'
SJKZPBNL   EQU   3
*

*                  DEFAULT CATID
SJKZDPS    EQU   8             ,DEF-PUBSET='
SJKZDPSL   EQU   5
*
SJKZUPC    EQU   9             ,USER PRIVILEGE CODE'
SJKZADMN   EQU   1             TRANSFER VALUES
SJKZNUSR   EQU   2
SJKZUPCL   EQU   2
*
SJKZTPR    EQU   10            ,TESTPRIV='
SJKZPRY    EQU   1
SJKZPRN    EQU   2
SJKZTPRL   EQU   4             L=(ID,AID1,AID2,Y/N)
*
SJKZCST    EQU   11            ,CSTMP-MAC='
SJKZCSY    EQU   1
SJKZCSN    EQU   2
SJKZCSTL   EQU   2
*
SJKZADT    EQU   12            ,AUDIT='
SJKZADY    EQU   1
SJKZADN    EQU   2
SJKZADTL   EQU   2
*
SJKZENF    EQU   13            ,ENF='       EXTENDED IN V11
SJKZEFY    EQU   1                     DOES NOT MATCH VALUE STORED
SJKZEFN    EQU   2                     IN USER RECORD.
SJKZEFT    EQU   3
SJKZENFL   EQU   2
*
SJKZTPI    EQU   14            ,TPIGNORE='
SJKZTPIL   EQU   2
*
SJKZUSS    EQU   15            ,USER SWITCHES'
SJKZUSSL   EQU   13            L=(KZ,ON-SW,OFF-SW,INV-SW)
*
*                  RESOURCES (USER TEIL)
SJKZADR    EQU   16            ,ADDRSPACE='
SJKZADRL   EQU   3
*
SJKZPUBS   EQU   17            ,PUBSPACE=' OR SPACE-LIMIT
SJKZPUBL   EQU   5
*
SJKZSUS    EQU   19            ,SPACE-USED'
SJKZSUSL   EQU   5
*
SJKZRPG    EQU   20            ,RES-PAGES='
SJKZRPGL   EQU   3

*
SJKZMAR    EQU   21            ,MAX-ACC-REC='
SJKZMARL   EQU   3
*
*                  MESSAGE HANDLING
SJKZMSG    EQU   22            ,MESSAGE SEARCH='
SJKZTSK    EQU   1
SJKZALL    EQU   2
SJKZMSGL   EQU   2
*
SJKZDML    EQU   23            ,DEF-MSG-LAN='
SJKZDMLL   EQU   2
*
*                  MAILING ADDRESS/ COMMAND FILE NAME
SJKZMAL    EQU   24            ,MAIL='
SJKZMALL   EQU   65
*
SJKZCMF    EQU   25            ,COMMANDS='  NEW: PROFILE ID
SJKZCMFL   EQU   55
*
***************************************************************
* EXTENSIONS IN V11: QUOTA, TUNING MEASURES                   *
*                       EXTENDED HOST CODE.                   *
***************************************************************
*
SJKZTSL    EQU   35            ,TEMP-SPACE-LIMIT='
SJKZTSLL   EQU    5
*
SJKZTSU    EQU   36            ,TEMP SPACE USED'
SJKZTSUL   EQU    5
*
SJKZFLI    EQU   37            ,FILE-LIMIT='
SJKZFLIL   EQU    5
*
SJKZFLA    EQU   38            ,FILE AMOUNT'
SJKZFLAL   EQU    5
*
SJKZJVL    EQU   39            ,JV-LIMIT='
SJKZJVLL   EQU    5
*
SJKZJVA    EQU   40            ,JV AMOUNT'
SJKZJVAL   EQU    5
*
SJKZXHC    EQU   41            ,EXTENDED-HOST-CODE='
SJKZXHCL   EQU    9
*
SJKZDTR    EQU   42            ,DMS-TUNING-RESOURCES='
SJKZDTRN   EQU    1                NONE

SJKZDTRP   EQU    2                PAGEABLE
SJKZDTRR   EQU    3                RESIDENT
SJKZDTRL   EQU    2
*
SJKZPAL    EQU   44            ,'PHYSICAL-ALLOCATION='  :* V12.0
SJKZPAN    EQU   1
SJKZPAA    EQU   2
SJKZPALL   EQU   2
*
SJKZHAS    EQU   45            ,HIGH-AVAILABLE-SPACE=' :* V12.0
SJKZHASL   EQU   5
*
SJKZS1U    EQU   46            ,S1_LEVEL_USED'         :* V12.0
SJKZS1UL   EQU   5
*
SJKZS2U    EQU   47            ,S2_LEVEL_USED'         :* V12.0
SJKZS2UL   EQU   5
*
SJKZHAU    EQU   48            ,'HARDWARE-AUDIT'         :* V13.0
SJKZHAA    EQU   1
SJKZHAN    EQU   2
SJKZHAUL   EQU   2
*
SJKZLAU    EQU   49            ,'LINKAGE-AUDIT'          :* V13.0
SJKZLAA    EQU   1
SJKZLAN    EQU   2
SJKZLAUL   EQU   2
*
*
***************************************************************
* 2. ID FOR THE ,ACCOUNT PART' OF THE ,JOIN RECORD'.          *
*-------------------------------------------------------------*
* - WHEN MODIFYING AN EXISTING ACCOUNT NUMBER, THE DATA       *
*   ITEMS ARE PASSED INDIVIDUALLY. THIS MODIFICATION DATA     *
*   REFERS TO THE ACCOUNT NUMBER IN ,SJKZACT'!                *
***************************************************************
*
*                  ACCOUNT-SPECIFIC PRIVILEGES
SJKZACT    EQU   26            ,ACCOUNT='
SJKZACTL   EQU   9
*
SJKZNTL    EQU   27            ,NTL='
SJKZNTY    EQU   1
SJKZNTN    EQU   2
SJKZNTLL   EQU   2
*
SJKZEXP    EQU   28            ,EXPRESS='
SJKZEXY    EQU   1

SJKZEXN    EQU   2
SJKZEXPL   EQU   2
*
SJKZINH    EQU   29            ,INHD='
SJKZINY    EQU   1
SJKZINN    EQU   2
SJKZINHL   EQU   2
*
SJKZTTY    EQU   30            ,TTYPL='
SJKZTSTD   EQU   1
SJKZTTP    EQU   2
SJKZTSYS   EQU   3
SJKZTTYL   EQU   2
*
*                  ACCOUNT-SPECIFIC RESOURCES
SJKZTIM    EQU   31            ,TIME='
SJKZTIML   EQU   5
*
SJKZPRI    EQU   32            ,PRIORITY='
SJKZPRIL   EQU   2
*
SJKZCLA    EQU   33            ,CLASS='
SJKZCLAL   EQU   2
*
SJKZPOS    EQU   43            ,POSIX='                :* V11.2 POSIX
SJKZPOY    EQU   1
SJKZPON    EQU   2
SJKZPOSL   EQU   2
*
SJKZDEL    EQU   34            ,DEL='
SJKZDELL   EQU   81            (ALWAYS WHOLE AREA)
*
SJKZMAX    EQU   49            FOR QUERIES, MAXIMUM VALUE
*
SJKZEOF    EQU   255