*M*      AMRDEF  -  ASSIGN/MERGE RECORD DEFS
************************************************************************
*P*      NAME:    AMRDEF                                               *
*P*      PURPOSE:    TO PROVIDE A COMMON SET OF DEFINITIONS FOR        *
*P*               FIELDS IN THE ASSIGN/MERGE RECORD.  ALL PROGRAMS     *
*P*               WHICH READ OR WRITE THE A/M RECORD SHOULD USE        *
*P*               THE DEFS PROVIDED IN THIS MODULE TO PRECLUDE         *
*P*               PROGRAMMING CHANGES WHEN THE A/M RECORD FORMAT       *
*P*               CHANGES.                                             *
************************************************************************
*        ************
*        *   DEFS   *
*        ************
         DEF      AM:ORG            WORD ZERO
         DEF      AM:LNK            LINK TO 1ST PLIST ENTRY
         DEF      AM:CKSM           CHECKSUM OF SYSID+:AM+:AMLNK
         DEF      AM:NAME           NAME OF LAST LM LOADED
         DEF      AM:PASS           PASSWORD OF LAST LM LOADED
         DEF      AM:DATE           CREATION YEAR AND DAY
         DEF      AM:STDOP          STANDARD SETTING OF J:OPT
         DEF      AM:PRMAX          USER'S MAX PRIVILEGES
         DEF      AM:PRCUR          USER'S CURRENT PRIVILEGES
         DEF      AM:LOG            LOGON TIME IN MINUTES FROM MIDNITE
         DEF      AMH:BILL          BILLING RATE
         DEF      AM:XACC           EXTENDED ACCTING INFO
         DEF      AM:HED            LINK TO NEXT PLIST(SIZE OF HEADER)
         DEF      AM:END            MAXIMUM DISPLACEMENT FOR PLISTS
         DEF      AM:PRDC           PERM REMAINING RAD SPACE
         DEF      AM:PRDP           PERM REMAINING PACK SPACE
         ASECT
         ORG      0
AM:ORG   EQU    %+0
AM:LNK   EQU    %+1
AM:CKSM  EQU    %+2
AM:NAME  EQU    %+3
AM:PASS  EQU    %+6
AM:DATE  EQU    %+8
AM:STDOP EQU    %+9
AM:PRMAX EQU    %+10
AM:PRCUR EQU    %+11
AM:LOG   EQU    %+12
AMH:BILL EQU    HA(%+13)
AM:XACC  EQU    %+14
AM:PRDC  EQU    %+20
AM:PRDP  EQU    %+21
AM:HED   EQU    %+22
AM:END   EQU    %+511
         PAGE
************************************************************************
*D*      NAME:    AMRDEF                                               *
*D*      DESCRIPTION:     THIS MODULE PROVIDES A SET OF COMMON DEFS    *
*D*               FOR THE A/M RECORD.  ALL LABELS ARE WORD             *
*D*               DISPLACEMENTS FROM THE BEGINNING (WORD 0) OF THE     *
*D*               ASSIGN/MERGE RECORD.                                 *
************************************************************************
*D*             ---------------------------------------------
*D*  AM:        |POINTER TO AVAILABLE SPACE FOR PLIST       |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:LNK     |      LINK TO FIRST PLIST ENTRY            |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:CKSM    |  CHECKSUM OF SYSID + :AM + :AMLNK         |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:NAME    |NAME FOR LMN  (!RUN)           (BATCH)     |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*             |NAME FOR LMN  (!RUN)           (BATCH)     |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*             |NAME FOR LMN  (!RUN)           (BATCH)     |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:PASS    |PASSWORD FOR LMN (!RUN)        (BATCH)     |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*             |PASSWORD FOR LMN (!RUN)        (BATCH)     |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:DATE    |YEAR(BINARY)   (HW)  |DAY(JULIAN)   (HW)   |
*D*             ---------------------------------------------
         PAGE
*D*             ---------------------------------------------
*D*  AM:STDOP   | SAVED IMAGE OF USER'S STDOPT AT JOB STEP  |
*D*             |               (ONLINE)                    |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:PRMAX   |  MAX AUTHORIZED PRIVILEGES (FROM :USERS)  |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:PRCUR   |    SAVED IMAGE OF J:UPRIV                 |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:LOG     |LOGON TIME (MINUTES FROM MIDNIGHT)         |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AMH:BILL   |BILLING RATE   (HW)  |     (OPEN)          |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:XACC    |EXTENDED ACCOUNTING  (6 WORDS)             |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*    #20      |   PERMANENT REMAIN RAD SPACE ALLOC        |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*    #21      |   PERMANENT REMAIN DISK SPACE ALLOC       |
*D*             ---------------------------------------------
*D*             ---------------------------------------------
*D*  AM:HED     | LINK TO NEXT AM ENTRY                     |
*D*             ---------------------------------------------
*D*                                 .
*D*                                 .
*D*                                 .
*D*             ---------------------------------------------
*D*  AM:END     |     LAST PLIST AREA                       |
*D*             ---------------------------------------------
         PAGE
*D*      ************************************
*D*      *    PRIVILEGE BIT DEFINITIONS     *
*D*      * (AM:PRMAX, AM:PRCUR AND J:UPRIV) *
*D*      * FOR USE IN DUMP ANALYSIS ONLY    *
*D*      * BITS MUST BE USED VIA PROCS      *
*D*      ************************************
*D*
*D*
*D*           -------------------------------------
*D*  J:UPRIV  | 1 1 1 1| 2 2 2 2| 2 2 2 2| 2 2 3 3|
*D*  (2ND HW) | 6 7 8 9| 0 1 2 3| 4 5 6 7| 8 9 0 1|
*D*           -------------------------------------
*D*                                        | | | >PR:MS - M:SYS,M:MSTR
*D*                                        | | >PR:MM - MAX MEMORY
*D*                                        | >PR:SJ - SP. JIT ACCESS
*D*                                        >PR:PA - PROCESSOR ACCTING
         PAGE
*******   DELETE AFTER D00C ***************************
         REF      X1
         REF      X2
         REF      X4
         REF      X8
PR:MS    EQU      X1
PR:MM    EQU      X2
PR:SJ    EQU      X4
PR:PA    EQU      X8
         DEF      PR:MS
         DEF      PR:MM
         DEF      PR:SJ
         DEF      PR:PA
         END

