! *** PREDECLARED TYPES
     
      %IF %DECLARED ( %BASIC$QUADWORD_DECLARED ) = 0 %THEN
         RECORD BASIC$QUADWORD
            LONG FILL ( 2 )
         END RECORD
         %LET %BASIC$QUADWORD_DECLARED = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$OCTAWORD_DECLARED ) = 0 %THEN
         RECORD BASIC$OCTAWORD
            LONG FILL ( 4 )
         END RECORD
         %LET %BASIC$OCTAWORD_DECLARED = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$HFLOAT_AXP_DECLARED ) = 0 %THEN
         RECORD BASIC$HFLOAT_AXP
            LONG FILL ( 4 )
         END RECORD
         %LET %BASIC$HFLOAT_AXP_DECLARED = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$F_FLOATING_COMPLEX_DECL ) = 0 %THEN
         RECORD BASIC$F_FLOATING_COMPLEX
            SINGLE REAL_PART
            SINGLE IMAGINARY_PART
         END RECORD
         %LET %BASIC$F_FLOATING_COMPLEX_DECL = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$D_FLOATING_COMPLEX_DECL ) = 0 %THEN
         RECORD BASIC$D_FLOATING_COMPLEX
            DOUBLE REAL_PART
            DOUBLE IMAGINARY_PART
         END RECORD
         %LET %BASIC$D_FLOATING_COMPLEX_DECL = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$G_FLOATING_COMPLEX_DECL ) = 0 %THEN
         RECORD BASIC$G_FLOATING_COMPLEX
            GFLOAT REAL_PART
            GFLOAT IMAGINARY_PART
         END RECORD
         %LET %BASIC$G_FLOATING_COMPLEX_DECL = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$H_FLOAT_AXP_CMPLX_DCL ) = 0 %THEN
         RECORD BASIC$H_FLOATING_COMPLEX_AXP
            BASIC$HFLOAT_AXP REAL_PART
            BASIC$HFLOAT_AXP IMAGINARY_PART
         END RECORD
         %LET %BASIC$H_FLOAT_AXP_CMPLX_DCL = 1
      %END %IF
    
    
    ! 
    !  Send to Job Controller Service ($SNDJBC) definitions.
    ! 
    !  NOTE:  New items must always be added at the end so users will not have to relink.
    ! 
    ! 
    !  Function codes
    ! 
      DECLARE LONG CONSTANT SJC$_ABORT_JOB = 1  !  Abort current job in a queue
      DECLARE LONG CONSTANT SJC$_ADD_FILE = 2  !  Add a file to an open job
      DECLARE LONG CONSTANT SJC$_ALTER_JOB = 3  !  Alter parameters of a job
      DECLARE LONG CONSTANT SJC$_ALTER_QUEUE = 4  !  Alter parameters of a queue
      DECLARE LONG CONSTANT SJC$_ASSIGN_QUEUE = 5  !  Assign a logical queue to an execution queue
      DECLARE LONG CONSTANT SJC$_BATCH_CHECKPOINT = 6  !  Establish a checkpoint in a batch job
      DECLARE LONG CONSTANT SJC$_BATCH_SERVICE = 7  !  LOGINOUT communication
      DECLARE LONG CONSTANT SJC$_CLOSE_DELETE = 8  !  Close and delete an open job
      DECLARE LONG CONSTANT SJC$_CLOSE_JOB = 9  !  Close and enqueue an open job
      DECLARE LONG CONSTANT SJC$_CREATE_JOB = 10  !  Create an open job
      DECLARE LONG CONSTANT SJC$_CREATE_QUEUE = 11  !  Create a queue
      DECLARE LONG CONSTANT SJC$_DEASSIGN_QUEUE = 12  !  Deassign a logical queue
      DECLARE LONG CONSTANT SJC$_DEFINE_CHARACTERISTIC = 13  !  Create a characteristic definition
      DECLARE LONG CONSTANT SJC$_DEFINE_FORM = 14  !  Create a form definition
      DECLARE LONG CONSTANT SJC$_DELETE_CHARACTERISTIC = 15  !  Delete a characteristic definition
      DECLARE LONG CONSTANT SJC$_DELETE_FORM = 16  !  Delete a form definition
      DECLARE LONG CONSTANT SJC$_DELETE_JOB = 17  !  Delete a job
      DECLARE LONG CONSTANT SJC$_DELETE_QUEUE = 18  !  Delete a queue
      DECLARE LONG CONSTANT SJC$_ENTER_FILE = 19  !  Enter a single file job in a queue
      DECLARE LONG CONSTANT SJC$_MERGE_QUEUE = 20  !  Requeue all jobs in one queue to another
      DECLARE LONG CONSTANT SJC$_PAUSE_QUEUE = 21  !  Suspend processing from a queue
      DECLARE LONG CONSTANT SJC$_RESET_QUEUE = 22  !  Reset a queue
      DECLARE LONG CONSTANT SJC$_START_ACCOUNTING = 23  !  Start accounting manager
      DECLARE LONG CONSTANT SJC$_START_QUEUE = 24  !  Start processing from a queue	
      DECLARE LONG CONSTANT SJC$_START_QUEUE_MANAGER = 25  !  Start system job queue manager
      DECLARE LONG CONSTANT SJC$_STOP_ACCOUNTING = 26  !  Stop accounting manager
      DECLARE LONG CONSTANT SJC$_STOP_QUEUE = 27  !  Stop processing from a queue
      DECLARE LONG CONSTANT SJC$_STOP_QUEUE_MANAGER = 28  !  Stop system job queue manager
      DECLARE LONG CONSTANT SJC$_SYNCHRONIZE_JOB = 29  !  Synchronize with job completion
      DECLARE LONG CONSTANT SJC$_WRITE_ACCOUNTING = 30  !  Write user accounting record
      DECLARE LONG CONSTANT SJC$_CONTROL_DIAGNOSTICS = 31  !  Control diagnostic functions (for internal use only)
    !  (note this function code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_DELETE_QUEUE_MANAGER = 32  !  Remove all references to specified qmgr from shared master file
      DECLARE LONG CONSTANT SJC$_ALTER_FILE = 33  !  Modify the processing of a file within a job
      DECLARE LONG CONSTANT SJC$_STOP_ALL_QUEUES_ON_NODE = 34  !  Stop all batch/print job processing on the node
      DECLARE LONG CONSTANT SJC$_DISABLE_QUEUE = 35  !  Cause all QSIs on the queue to be inactive
      DECLARE LONG CONSTANT SJC$_ENABLE_QUEUE = 36  !  Allow disabled queue to be restarted
      DECLARE LONG CONSTANT SJC$_SYMBIONT_SERVICE = 37  !  Symbiont-Qman communication
      DECLARE LONG CONSTANT SJC$_JOBCTL_SERVICE = 38  !  Jobctl-Qman communication
      DECLARE LONG CONSTANT SJC$_ENABLE_AUTOSTART = 39  !  Start all AUTOSTART queues on node and allow queues to fail over to  &
 ! node
      DECLARE LONG CONSTANT SJC$_DISABLE_AUTOSTART = 40  !  Prevent AUTOSTART queues from failing over to this node
      DECLARE LONG CONSTANT SJC$_SHUTDOWN_NODE = 41  !  Perform orderly shutdown of queuing system on node.
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_42 = 42  !  Reserved for Digital use (name may change) Reserved by security see  &
 ! [qman]tables.req
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_43 = 43  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_44 = 44  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_45 = 45  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_46 = 46  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_47 = 47  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_48 = 48  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_49 = 49  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_FUNC_50 = 50  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$K_MIN_FUNC = 1  !  Minimum SNDJBC function code
      DECLARE LONG CONSTANT SJC$K_MAX_FUNC = 50  !  Maximum SNDJBC function code
    ! 
    !  Item codes
    ! 
      DECLARE LONG CONSTANT SJC$_ACCOUNTING_MESSAGE = 1  !  User accounting message
      DECLARE LONG CONSTANT SJC$_ACCOUNTING_TYPES = 2  !  Mask of accounting record types
      DECLARE LONG CONSTANT SJC$_AFTER_TIME = 3  !  Hold until time
      DECLARE LONG CONSTANT SJC$_NO_AFTER_TIME = 4
      DECLARE LONG CONSTANT SJC$_ALIGNMENT_MASK = 5  !  Mask alignment data
      DECLARE LONG CONSTANT SJC$_ALIGNMENT_PAGES = 6  !  Number of alignment pages
      DECLARE LONG CONSTANT SJC$_BASE_PRIORITY = 7  !  Batch process base priority
      DECLARE LONG CONSTANT SJC$_BATCH = 8  !  Batch queue
      DECLARE LONG CONSTANT SJC$_NO_BATCH = 9
      DECLARE LONG CONSTANT SJC$_BATCH_INPUT = 10  !  LOGINOUT communication   (Retired, see SERVICE_INPUT)
      DECLARE LONG CONSTANT SJC$_BATCH_OUTPUT = 11  !  For use by LOGINOUT (for internal use only)  (Retired, see SERVICE_OUTPUT)
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_CHARACTERISTIC_NAME = 12  !  Printer characteristic
      DECLARE LONG CONSTANT SJC$_CHARACTERISTIC_NUMBER = 13
      DECLARE LONG CONSTANT SJC$_NO_CHARACTERISTICS = 14
      DECLARE LONG CONSTANT SJC$_CHECKPOINT_DATA = 15  !  Batch checkpoint string
      DECLARE LONG CONSTANT SJC$_NO_CHECKPOINT_DATA = 16
      DECLARE LONG CONSTANT SJC$_CLI = 17   !  Batch process CLI
      DECLARE LONG CONSTANT SJC$_NO_CLI = 18
      DECLARE LONG CONSTANT SJC$_CPU_DEFAULT = 19  !  Default CPU time limit
      DECLARE LONG CONSTANT SJC$_NO_CPU_DEFAULT = 20
      DECLARE LONG CONSTANT SJC$_CPU_LIMIT = 21  !  Maximum CPU time limit
      DECLARE LONG CONSTANT SJC$_NO_CPU_LIMIT = 22
      DECLARE LONG CONSTANT SJC$_CREATE_START = 23  !  Start queue after creation
      DECLARE LONG CONSTANT SJC$_DELETE_FILE = 24  !  Delete file after processing
      DECLARE LONG CONSTANT SJC$_NO_DELETE_FILE = 25
      DECLARE LONG CONSTANT SJC$_DESTINATION_QUEUE = 26  !  Destination queue name
      DECLARE LONG CONSTANT SJC$_DEVICE_NAME = 27  !  Output device name
      DECLARE LONG CONSTANT SJC$_DOUBLE_SPACE = 28  !  Double space output
      DECLARE LONG CONSTANT SJC$_NO_DOUBLE_SPACE = 29
      DECLARE LONG CONSTANT SJC$_ENTRY_NUMBER = 30  !  Job entry number
      DECLARE LONG CONSTANT SJC$_ENTRY_NUMBER_OUTPUT = 31
      DECLARE LONG CONSTANT SJC$_FILE_BURST = 32  !  Print file burst page
      DECLARE LONG CONSTANT SJC$_FILE_BURST_ONE = 33
      DECLARE LONG CONSTANT SJC$_NO_FILE_BURST = 34
      DECLARE LONG CONSTANT SJC$_FILE_COPIES = 35  !  Print n copies of file
      DECLARE LONG CONSTANT SJC$_FILE_FLAG = 36  !  Print file flag page
      DECLARE LONG CONSTANT SJC$_FILE_FLAG_ONE = 37
      DECLARE LONG CONSTANT SJC$_NO_FILE_FLAG = 38
      DECLARE LONG CONSTANT SJC$_FILE_IDENTIFICATION = 39  !  DVI, FID, DID of file
      DECLARE LONG CONSTANT SJC$_FILE_SETUP_MODULES = 40  !  Device control modules for file
      DECLARE LONG CONSTANT SJC$_NO_FILE_SETUP_MODULES = 41
      DECLARE LONG CONSTANT SJC$_FILE_SPECIFICATION = 42  !  File specification of file
      DECLARE LONG CONSTANT SJC$_FILE_TRAILER = 43  !  Print file trailer page
      DECLARE LONG CONSTANT SJC$_FILE_TRAILER_ONE = 44
      DECLARE LONG CONSTANT SJC$_NO_FILE_TRAILER = 45
      DECLARE LONG CONSTANT SJC$_FIRST_PAGE = 46  !  Starting page number
      DECLARE LONG CONSTANT SJC$_NO_FIRST_PAGE = 47
      DECLARE LONG CONSTANT SJC$_FORM_DESCRIPTION = 48  !  Textual description of form
      DECLARE LONG CONSTANT SJC$_FORM_LENGTH = 49  !  Form length in lines
      DECLARE LONG CONSTANT SJC$_FORM_MARGIN_BOTTOM = 50  !  Form bottom margin in lines
      DECLARE LONG CONSTANT SJC$_FORM_MARGIN_LEFT = 51  !  Form left margin in characters
      DECLARE LONG CONSTANT SJC$_FORM_MARGIN_RIGHT = 52  !  Form right margin in characters
      DECLARE LONG CONSTANT SJC$_FORM_MARGIN_TOP = 53  !  Form top margin in lines
      DECLARE LONG CONSTANT SJC$_FORM_NAME = 54  !  Printer form
      DECLARE LONG CONSTANT SJC$_FORM_NUMBER = 55
      DECLARE LONG CONSTANT SJC$_FORM_SETUP_MODULES = 56  !  Device control modules for form
      DECLARE LONG CONSTANT SJC$_NO_FORM_SETUP_MODULES = 57
      DECLARE LONG CONSTANT SJC$_FORM_SHEET_FEED = 58  !  Form is sheet fed
      DECLARE LONG CONSTANT SJC$_NO_FORM_SHEET_FEED = 59
      DECLARE LONG CONSTANT SJC$_FORM_STOCK = 60  !  Stock name for form
      DECLARE LONG CONSTANT SJC$_FORM_TRUNCATE = 61  !  Truncate long lines
      DECLARE LONG CONSTANT SJC$_NO_FORM_TRUNCATE = 62
      DECLARE LONG CONSTANT SJC$_FORM_WIDTH = 63  !  Form width in characters
      DECLARE LONG CONSTANT SJC$_FORM_WRAP = 64  !  Wrap long lines
      DECLARE LONG CONSTANT SJC$_NO_FORM_WRAP = 65
      DECLARE LONG CONSTANT SJC$_GENERIC_QUEUE = 66  !  Queue is a generic queue
      DECLARE LONG CONSTANT SJC$_NO_GENERIC_QUEUE = 67
      DECLARE LONG CONSTANT SJC$_GENERIC_SELECTION = 68  !  Queue can take work from generic queue
      DECLARE LONG CONSTANT SJC$_NO_GENERIC_SELECTION = 69
      DECLARE LONG CONSTANT SJC$_GENERIC_TARGET = 70  !  Possible execution queue for generic queue
      DECLARE LONG CONSTANT SJC$_HOLD = 71  !  Place job on hold
      DECLARE LONG CONSTANT SJC$_NO_HOLD = 72
      DECLARE LONG CONSTANT SJC$_JOB_BURST = 73  !  Print job burst page
      DECLARE LONG CONSTANT SJC$_NO_JOB_BURST = 74
      DECLARE LONG CONSTANT SJC$_JOB_COPIES = 75  !  Print n copies of entire job
      DECLARE LONG CONSTANT SJC$_JOB_FLAG = 76  !  Print job flag page
      DECLARE LONG CONSTANT SJC$_NO_JOB_FLAG = 77
      DECLARE LONG CONSTANT SJC$_JOB_LIMIT = 78  !  Number of concurrent jobs
      DECLARE LONG CONSTANT SJC$_JOB_NAME = 79  !  Identifying name of job
      DECLARE LONG CONSTANT SJC$_JOB_RESET_MODULES = 80  !  Device control modules between jobs
      DECLARE LONG CONSTANT SJC$_NO_JOB_RESET_MODULES = 81
      DECLARE LONG CONSTANT SJC$_JOB_SIZE_MAXIMUM = 82  !  Largest job accepted by printer
      DECLARE LONG CONSTANT SJC$_NO_JOB_SIZE_MAXIMUM = 83
      DECLARE LONG CONSTANT SJC$_JOB_SIZE_MINIMUM = 84  !  Smallest job accepted by printer
      DECLARE LONG CONSTANT SJC$_NO_JOB_SIZE_MINIMUM = 85
      DECLARE LONG CONSTANT SJC$_JOB_SIZE_SCHEDULING = 86  !  Schedule printer queues by size
      DECLARE LONG CONSTANT SJC$_NO_JOB_SIZE_SCHEDULING = 87
      DECLARE LONG CONSTANT SJC$_JOB_STATUS_OUTPUT = 88  !  Status message for submitted job
      DECLARE LONG CONSTANT SJC$_JOB_TRAILER = 89  !  Print job trailer page
      DECLARE LONG CONSTANT SJC$_NO_JOB_TRAILER = 90
      DECLARE LONG CONSTANT SJC$_LAST_PAGE = 91  !  Ending page number
      DECLARE LONG CONSTANT SJC$_NO_LAST_PAGE = 92
      DECLARE LONG CONSTANT SJC$_LIBRARY_SPECIFICATION = 93  !  Filename of device control library
      DECLARE LONG CONSTANT SJC$_NO_LIBRARY_SPECIFICATION = 94
      DECLARE LONG CONSTANT SJC$_LOG_DELETE = 95  !  Delete log file
      DECLARE LONG CONSTANT SJC$_NO_LOG_DELETE = 96
      DECLARE LONG CONSTANT SJC$_LOG_QUEUE = 97  !  Log file's print queue
      DECLARE LONG CONSTANT SJC$_LOG_SPECIFICATION = 98  !  File specification of log file
      DECLARE LONG CONSTANT SJC$_NO_LOG_SPECIFICATION = 99
      DECLARE LONG CONSTANT SJC$_LOG_SPOOL = 100  !  Print log file
      DECLARE LONG CONSTANT SJC$_NO_LOG_SPOOL = 101
      DECLARE LONG CONSTANT SJC$_LOWERCASE = 102  !  Print on lowercase printer
      DECLARE LONG CONSTANT SJC$_NO_LOWERCASE = 103
      DECLARE LONG CONSTANT SJC$_NEW_VERSION = 104  !  Create new version of file
      DECLARE LONG CONSTANT SJC$_NEXT_JOB = 105  !  Resume at next job
      DECLARE LONG CONSTANT SJC$_NOTE = 106  !  Flag page note text
      DECLARE LONG CONSTANT SJC$_NO_NOTE = 107
      DECLARE LONG CONSTANT SJC$_NOTIFY = 108  !  Notify user on job completion
      DECLARE LONG CONSTANT SJC$_NO_NOTIFY = 109  !  Don't notify user on completion (for jobs)
    !  Don't notify user on interruption (for print queues)
      DECLARE LONG CONSTANT SJC$_OPERATOR_REQUEST = 110  !  Operator service text
      DECLARE LONG CONSTANT SJC$_NO_OPERATOR_REQUEST = 111
      DECLARE LONG CONSTANT SJC$_OWNER_UIC = 112  !  Queue owner UIC
      DECLARE LONG CONSTANT SJC$_PAGE_HEADER = 113  !  Print page headers
      DECLARE LONG CONSTANT SJC$_NO_PAGE_HEADER = 114
      DECLARE LONG CONSTANT SJC$_PAGE_SETUP_MODULES = 115  !  Device control modules for form page
      DECLARE LONG CONSTANT SJC$_NO_PAGE_SETUP_MODULES = 116
      DECLARE LONG CONSTANT SJC$_PAGINATE = 117  !  Paginate output with free form feeds
      DECLARE LONG CONSTANT SJC$_NO_PAGINATE = 118
      DECLARE LONG CONSTANT SJC$_PARAMETER_1 = 119  !  Batch job parameters
      DECLARE LONG CONSTANT SJC$_PARAMETER_2 = 120
      DECLARE LONG CONSTANT SJC$_PARAMETER_3 = 121
      DECLARE LONG CONSTANT SJC$_PARAMETER_4 = 122
      DECLARE LONG CONSTANT SJC$_PARAMETER_5 = 123
      DECLARE LONG CONSTANT SJC$_PARAMETER_6 = 124
      DECLARE LONG CONSTANT SJC$_PARAMETER_7 = 125
      DECLARE LONG CONSTANT SJC$_PARAMETER_8 = 126
      DECLARE LONG CONSTANT SJC$_NO_PARAMETERS = 127
      DECLARE LONG CONSTANT SJC$_PASSALL = 128  !  Print file passall
      DECLARE LONG CONSTANT SJC$_NO_PASSALL = 129
      DECLARE LONG CONSTANT SJC$_PRIORITY = 130  !  Job scheduling priority
      DECLARE LONG CONSTANT SJC$_PROCESSOR = 131  !  Filename of symbiont image
      DECLARE LONG CONSTANT SJC$_NO_PROCESSOR = 132
      DECLARE LONG CONSTANT SJC$_PROTECTION = 133  !  Queue protection mask
      DECLARE LONG CONSTANT SJC$_QUEUE = 134  !  Queue on which to operate
      DECLARE LONG CONSTANT SJC$_QUEUE_FILE_SPECIFICATION = 135  !  File specification of queue file
      DECLARE LONG CONSTANT SJC$_RELATIVE_PAGE = 136  !  Resume after forward or back space
      DECLARE LONG CONSTANT SJC$_REQUEUE = 137  !  Requeue job
      DECLARE LONG CONSTANT SJC$_RESTART = 138  !  Job can restart
      DECLARE LONG CONSTANT SJC$_NO_RESTART = 139
      DECLARE LONG CONSTANT SJC$_RETAIN_ALL_JOBS = 140  !  Retain completed jobs
      DECLARE LONG CONSTANT SJC$_RETAIN_ERROR_JOBS = 141
      DECLARE LONG CONSTANT SJC$_NO_RETAIN_JOBS = 142
      DECLARE LONG CONSTANT SJC$_SCSNODE_NAME = 143  !  Node name of execution node
      DECLARE LONG CONSTANT SJC$_SEARCH_STRING = 144  !  Resume after finding string
      DECLARE LONG CONSTANT SJC$_SWAP = 145  !  Swap batch processes
      DECLARE LONG CONSTANT SJC$_NO_SWAP = 146
      DECLARE LONG CONSTANT SJC$_TERMINAL = 147  !  Queue is a (generic) terminal queue
      DECLARE LONG CONSTANT SJC$_NO_TERMINAL = 148
      DECLARE LONG CONSTANT SJC$_TOP_OF_FILE = 149  !  Resume at top of file
      DECLARE LONG CONSTANT SJC$_USER_IDENTIFICATION = 150  !  Proxy user identification (not supported and is obsolete)
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_WSDEFAULT = 151  !  Working set default
      DECLARE LONG CONSTANT SJC$_NO_WSDEFAULT = 152
      DECLARE LONG CONSTANT SJC$_WSEXTENT = 153  !  Working set extent
      DECLARE LONG CONSTANT SJC$_NO_WSEXTENT = 154
      DECLARE LONG CONSTANT SJC$_WSQUOTA = 155  !  Working set quota
      DECLARE LONG CONSTANT SJC$_NO_WSQUOTA = 156
      DECLARE LONG CONSTANT SJC$_ACCOUNT_NAME = 157  !  Proxy account name (requires CMKRNL privilege)
      DECLARE LONG CONSTANT SJC$_UIC = 158  !  Proxy UIC (requires CMKRNL privilege)
      DECLARE LONG CONSTANT SJC$_USERNAME = 159  !  Proxy username (requires CMKRNL privilege)
      DECLARE LONG CONSTANT SJC$_BUFFER_COUNT = 160  !  Multibuffer count for queue file
      DECLARE LONG CONSTANT SJC$_EXTEND_QUANTITY = 161  !  Allocation and extend quantity for queue file
      DECLARE LONG CONSTANT SJC$_RECORD_BLOCKING = 162  !  Symbiont record blocking of output stream
      DECLARE LONG CONSTANT SJC$_NO_RECORD_BLOCKING = 163
      DECLARE LONG CONSTANT SJC$_QUEMAN_RESTART = 164  !  qualifier on SJC$_START_QUEUE_MANAGER, restart queue manager after an  &
 ! abort
      DECLARE LONG CONSTANT SJC$_NO_QUEMAN_RESTART = 165
      DECLARE LONG CONSTANT SJC$_DEFAULT_FORM_NAME = 166  !  Default queue form name
      DECLARE LONG CONSTANT SJC$_DEFAULT_FORM_NUMBER = 167  !  Default queue form number
      DECLARE LONG CONSTANT SJC$_SECURITY_CLASSIFICATION = 168  !  Used by SeVMS to specify security classification of the job
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_QUEUE_SUPPORT = 169  !  Queue Support Images
      DECLARE LONG CONSTANT SJC$_JOB_COMPLETION_STATUS = 170  !  Status of completed job - this buffer is used instead of IOSB  &
 ! when specified
      DECLARE LONG CONSTANT SJC$_DIAGNOSTIC_BUFFER_OUTPUT = 171  !  Job controller's in-memory diagnostic buffer (for internal  &
 ! use only)
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_OPEN_QUEUE = 172  !  Open queue - allow job submission
      DECLARE LONG CONSTANT SJC$_CLOSE_QUEUE = 173  !  Close queue - do not allow job submission
      DECLARE LONG CONSTANT SJC$_SERVER = 174  !  Server queue
      DECLARE LONG CONSTANT SJC$_PRINTER = 175  !  Printer queue
      DECLARE LONG CONSTANT SJC$_UPDATE_ORB = 176  !  Update ORB information in queue file (for internal use only)
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_NO_QUEUE_DESCRIPTION = 177  !  No queue description supplied
      DECLARE LONG CONSTANT SJC$_JOB_RETAIN = 178  !  Retain this job
      DECLARE LONG CONSTANT SJC$_JOB_ERROR_RETAIN = 179  !  Retain this job on error
      DECLARE LONG CONSTANT SJC$_JOB_DEFAULT_RETAIN = 180  !  Use queue's job retention setting
      DECLARE LONG CONSTANT SJC$_NOTIFY_ON_INTERRUPT = 181  !  Notify users if their print jobs are interrupted
      DECLARE LONG CONSTANT SJC$_NO_RAD = 182  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_ACCEPT_ALL_ATTRIBUTES = 183  !  Inhibits queue manager validation of QSI keywords
      DECLARE LONG CONSTANT SJC$_DIAGNOSTIC_FLAGS = 184  !  Diagnostic flags bitmask (for internal use only)
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_QUEUE_DESCRIPTION = 185  !  Queue description
      DECLARE LONG CONSTANT SJC$_CHECKPOINT_FREQUENCY = 186  !  Symbiont takes checkpoint at intervals of this many pages 
      DECLARE LONG CONSTANT SJC$_DISPLAY_USERNAME = 187  !  Used by DQS to pass a username to the remote system (symbol not  &
 ! renamed)
    !  (note this item code is intentionally not documented and reserved for Digital use)
      DECLARE LONG CONSTANT SJC$_FILE_NUMBER = 188  !  File sequence number within job
      DECLARE LONG CONSTANT SJC$_FILE_ATTRIBUTE = 189  !  "Keyword = (optional) value" for extensible attrib on file
      DECLARE LONG CONSTANT SJC$_JOB_ATTRIBUTE = 190  !  "Keyword = (optional) value" for extensible attrib on job
      DECLARE LONG CONSTANT SJC$_QUEUE_ATTRIBUTE = 191  !  "Keyword = (optional) value" for extensible attrib on queue
      DECLARE LONG CONSTANT SJC$_REMOVE_ATTRIBUTE = 192  !  Remove extensible attribs for queue, job, or file
      DECLARE LONG CONSTANT SJC$_QUEUE_MANAGER_NAME = 193  !  Queue manager process
      DECLARE LONG CONSTANT SJC$_QUEUE_MANAGER_NODES = 194  !  Failover list of nodes on which queue manager process may run
      DECLARE LONG CONSTANT SJC$_AUTOSTART_ON = 195  !  Node(s) (and for print queues, device(s)) on which queue can be auto  &
 ! started
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_196 = 196  !  Reserved for Digital use (name may change)  &
 ! SJC$_RESERVED_OUTPUT_196 to SJC$_RESERVED_OUTPUT_199
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_197 = 197  !  Reserved for Digital use (name may change)   reserved by security  &
 ! group.
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_198 = 198  !  Reserved for Digital use (name may change) see.
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_199 = 199  !  Reserved for Digital use (name may change)      [QMAN]Tables.req
      DECLARE LONG CONSTANT SJC$_SET_CONDITION_VECTOR = 200  !  QSI can alter job's completion status
      DECLARE LONG CONSTANT SJC$_NOTIFY_MESSAGE = 201  !  QSI Check Job can replace job completion 
    !  message sent to user
      DECLARE LONG CONSTANT SJC$_DEFINE_FILE_ATTRIBUTES = 202  !  Legal keywds for file submissions or alter_file's
      DECLARE LONG CONSTANT SJC$_DEFINE_JOB_ATTRIBUTES = 203  !  Legal keywds in oper'ns that create or alter jobs
      DECLARE LONG CONSTANT SJC$_DEFINE_QUEUE_ATTRIBUTES = 204  !  Legal keywords in operations that alter the queue
      DECLARE LONG CONSTANT SJC$_AGENT_PROFILE = 205  !  Security information
      DECLARE LONG CONSTANT SJC$_ADD_QUEUE_MANAGER = 206  !  Boolean item code telling sjc_start_queue_manager to add a new  &
 ! database
      DECLARE LONG CONSTANT SJC$_OUTSTANDING_JOBS = 207  !  Boolean item code telling queue manager to not delete outstanding  &
 ! open jobs
      DECLARE LONG CONSTANT SJC$_NO_INITIAL_FF = 208  !  To suppress initial form feed when the queue is started with INIT or  &
 ! START cmd
      DECLARE LONG CONSTANT SJC$_NO_NO_INITIAL_FF = 209
      DECLARE LONG CONSTANT SJC$_DELETE_FILE_ALWAYS = 210  !  delete file even if the job completes with a failure
      DECLARE LONG CONSTANT SJC$_NO_DELETE_FILE_ALWAYS = 211
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_212 = 212  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_213 = 213  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_214 = 214  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_215 = 215  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_216 = 216  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_217 = 217  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_218 = 218  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_219 = 219  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_220 = 220  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_221 = 221  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_222 = 222  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_223 = 223  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_224 = 224  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_225 = 225  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_226 = 226  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_227 = 227  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_228 = 228  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_229 = 229  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_230 = 230  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_231 = 231  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_232 = 232  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_233 = 233  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_BOOLEAN_234 = 234  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_JOB_RETAIN_TIME = 235  !  The time the job should be retained (delta or absolute)
      DECLARE LONG CONSTANT SJC$_MANAGER_ATTRIBUTE = 236  !  Any application specific queue manager attributes.
      DECLARE LONG CONSTANT SJC$_RAD = 237  !  RAD on which to run batch job.
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_238 = 238  !  Reserved for Digital use (name may change) items RESERVED_INPUT_238 
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_239 = 239  !  Reserved for Digital use (name may change)         to 
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_240 = 240  !  Reserved for Digital use (name may change)  SJC$_RESERVED_INPUT_241
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_241 = 241  !  Reserved for Digital use (name may change) reserved by security  &
 ! (see [QMAN]tables.req
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_242 = 242  !   Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_243 = 243  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_244 = 244  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_245 = 245  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_246 = 246  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_247 = 247  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_248 = 248  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_249 = 249  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_250 = 250  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_251 = 251  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_252 = 252  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_253 = 253  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_254 = 254  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$_RESERVED_OUTPUT_255 = 255  !  Reserved for Digital use (name may change)
      DECLARE LONG CONSTANT SJC$K_MIN_ITEM = 1  !  Minimum SNDJBC item code
      DECLARE LONG CONSTANT SJC$K_MAX_ITEM = 255  !  Maximum SNDJBC item code
      DECLARE LONG CONSTANT SJC$_CHARGE_CODE = 157  !  synonym for SJC$_ACCOUNT_NAME
      DECLARE LONG CONSTANT SJC$_RESERVED_INPUT_187 = 187  !  for DQS only
      DECLARE LONG CONSTANT SJC$_QUEUE_DIRECTORY = 135
    !  Disk ? directory for non-shared job queue database
      DECLARE LONG CONSTANT SJC$_SERVICE_INPUT = 10
      DECLARE LONG CONSTANT SJC$_SERVICE_OUTPUT = 11
    !  SERVICE item codes are used for communications with LOGINOUT, symbionts, and jobctl.
    ! 
    !  Subfields of ACCOUNTING_TYPES item code.  These definitions must track EXE$GL_ACMFLAGS.
    ! 
      DECLARE LONG CONSTANT SJC$M_ACCT_PROCESS = x'00000001'
      DECLARE LONG CONSTANT SJC$M_ACCT_IMAGE = x'00000002'
      DECLARE LONG CONSTANT SJC$M_ACCT_INTERACTIVE = x'00000004'
      DECLARE LONG CONSTANT SJC$M_ACCT_LOGIN_FAILURE = x'00000008'
      DECLARE LONG CONSTANT SJC$M_ACCT_SUBPROCESS = x'00000010'
      DECLARE LONG CONSTANT SJC$M_ACCT_DETACHED = x'00000020'
      DECLARE LONG CONSTANT SJC$M_ACCT_BATCH = x'00000040'
      DECLARE LONG CONSTANT SJC$M_ACCT_NETWORK = x'00000080'
      DECLARE LONG CONSTANT SJC$M_ACCT_PRINT = x'00000100'
      DECLARE LONG CONSTANT SJC$M_ACCT_MESSAGE = x'00000200'
      DECLARE LONG CONSTANT SJC$M_ACCT_ACM_FUNC = x'00000400'
      DECLARE LONG CONSTANT SJC$M_ACCT_ACM_SYS = x'00000800'
      DECLARE LONG CONSTANT SJC$M_ACCT_CCAENAB = x'00001000'
      DECLARE LONG CONSTANT SJC$M_ACCT_CCVENAB = x'00002000'
      DECLARE LONG CONSTANT SJC$S_ACCOUNTING_TYPES = 4
      record ACCOUNTING_TYPES
          !  Process termination
          !  Image termination
          !  Interactive processes
          !  Login failures
          !  Subprocesses
          !  Detached processes
          !  Batch processes
          !  Network processes
          !  Print job termination
          !  User messages
          !  Acm function
          !  System function
          !  Charge code accounting
          !  Charge code validation
         LONG ACCT_PROCESS_bits   ! COMMENT ADDED BY SDL - ACCT_PROCESS_bits contains bits ACCT_PROCESS through ACCT_UNUSED
      end record ACCOUNTING_TYPES
    
    ! 
    !  Subfields of DIAGNOSTIC_FLAGS item code.
    ! 
      DECLARE LONG CONSTANT SJC$M_DIAG_COPY_QF = x'00000001'
      DECLARE LONG CONSTANT SJC$M_DIAG_CREATE_MF = x'00000002'
      DECLARE LONG CONSTANT SJC$M_DIAG_CLOSE_MF = x'00000004'
      DECLARE LONG CONSTANT SJC$M_DIAG_OPEN_MF = x'00000008'
      DECLARE LONG CONSTANT SJC$M_DIAG_CLEAR_FLAGS = x'00000010'
      DECLARE LONG CONSTANT SJC$M_DIAG_LOG_ALL_TRANS = x'00000020'
      DECLARE LONG CONSTANT SJC$M_DIAG_JOURNAL_PUTS = x'00000040'
      DECLARE LONG CONSTANT SJC$M_DIAG_DUMP_DIAG_BUFFER = x'00000080'
      DECLARE LONG CONSTANT SJC$M_DIAG_INIT_DIAG_BUFFER = x'00000100'
      DECLARE LONG CONSTANT SJC$S_DIAGNOSTIC_FLAGS = 4
      record DIAGNOSTIC_FLAGS
          !  Make copy of the queue file
          !  Create new monitor log file and begin monitoring
          !  Stop monitoring and close monitor log file
          !  Open existing monitor log file and resume monitoring
          !  Clear monitoring flags in queue file header record
          !  Log read-only transactions in addition to basic monitoring
          !  Journal queue file $PUT operations in addition to basic monitoring
          !  Return contents of diagnostic buffer to caller
          !  Initialize diagnostic buffer and zero cumulative counters
         LONG DIAG_COPY_QF_bits   ! COMMENT ADDED BY SDL - DIAG_COPY_QF_bits contains bits DIAG_COPY_QF through DIAG_UNUSED
      end record DIAGNOSTIC_FLAGS