C*************************************************************************
C
C                             UAFDEF.INC
C
C        AUTHOR
C          JONATHAN C. BAKER
C        DATE
C          10 JANUARY 1990
C        PURPOSE
C          CREATE STRUCTURE FOR UAF RECORD
C        DESCRIPTION
C          THIS IS AN INCLUDE FILE USED TO DEFINE THE UAF RECORD TO
C          BE INCLUDED WITHIN VARIOUS ROUTINES
C
C        LOCAL GLOSSARY
C          MAX_USERS  : MAXIMUM ALLOWED USERS
C          NUM_USERS  : NUMBER OF USERS IN UAF RECORD
C          USER       : ARRAY OF USERNAMES
C          ACCOUNT    : ARRAY OF ACCOUNTS
C
C        PARAMETERS
C
         INTEGER*4    MAX_USERS
         PARAMETER    (MAX_USERS = 5000)
C
C        STRUCTURES
C
         STRUCTURE  /UAF/
           INTEGER      NUM_USERS
           CHARACTER*12 USER(MAX_USERS)
           CHARACTER*32 ACCOUNT(MAX_USERS)
         END STRUCTURE
C
C        RECORDS
C
         RECORD  /UAF/  UAF
C
C        END OF INCLUDE FILE
C
C****************************************************************************