{ The total amount of space the queue file application attributes may take
{ is given by jmc$max_qfile_appl_attr_size.  This space may be
{ divided into 1 through 10 "hunks" of application attributes,
{ as the application writer desires, but the total of these "hunks" can
{ never be more than jmc$max_qfile_appl_attr_size.

{ Writers of applications should be aware that these attributes
{ will not be preserved if the queue file is transferred via QTF
{ over a non-VE relay, e.g. via a NOS or VAX system.

  CONST
    jmc$max_qfile_appl_attr_size = 10000;

  CONST
    jmc$max_number_of_appl_attr = 10;

  TYPE
    jmt$qfile_appl_attr_size = 0 .. jmc$max_qfile_appl_attr_size;

  TYPE
    jmt$qfile_application_attrs = record
      size: jmt$qfile_appl_attr_size,
      attributes_p: ^cell,
    recend;

