*COMDECK DBRDFDCLS
  
#**********************************************************************#
#                                                                      #
#     THE FOLLOWING DEFS ARE USED IN THE DBREC INTERFACE IN CDCS.  THEY#
#     DEFINE THE ALLOWABLE FILE TYPES (AREA OR JOURNAL LOG), THE SPOT  #
#     OPTIONS (DUMP AND LOAD), AND CONTROL STATEMENT CONSTANTS FOR THE #
#     DBREC JOB.                                                       #
#                                                                      #
#**********************************************************************#
  
      DEF DFDBRAREA #1#;           # FILE TYPE FOR AREA                #
      DEF DFDBRJLOG #0#;           # FILE TYPE FOR JOURNAL LOG         #
      DEF DFDBRLOAD #1#;           # SPOT OPTION = LOAD                #
      DEF DFDBRDUMP #0#;           # SPOT OPTION = DUMP                #
  
      DEF DFCTLINES #10#;          # MAX NUMBER OF DBREC JOB STATEMENTS#
      DEF DFCTLSIZE #09#;          # SIZE (WORDS) OF CONTROL STMT LINE #
  
#     THE FOLLOWING DEFS ARE USED IN FORMATTING THE DBREC CONTROL CARDS#
#     THE CONTROL CARD TEXT IS FOLLOWED BY ITS LENGTH (CHARACTERS).    #
  
#     THE FOLLOWING DEFS ARE SPECIFIC TO NOS/BE                        #
  
      DEF DFCTLJOB #"DBREC,T37777,MT1.   "#;
      DEF DFCTLJOBNT #"DBREC,T37777,NT1.   "#;
      DEF DFCTLJBL #20#;
      DEF DFCTLMXACL #60#;         # MAX LEN OF ACCTG DATA ON JOB CARD #
      DEF DFCTLACT #"ACCOUNT."#;
      DEF DFCTLACL #8#; 
      DEF DFCTLMNT #"MOUNT,SN="#; 
      DEF DFCTLMNL #9#; 
      DEF DFCTLSN #"SN="#;
      DEF DFCTLSNL #3#; 
      DEF DFCTLVSN #"VSN="#;
      DEF DFCTLVSL #4#; 
      DEF DFCTLATH #"ATTACH,MSTRDIR,"#; 
      DEF DFCTLATL #15#;
      DEF DFCTLID  #"ID="#; 
      DEF DFCTLIDL #3#; 
      DEF DFCTLMR #"MR=1."#;
      DEF DFCTLMRL #5#; 
  
#     THE FOLLOWING DEFS ARE SPECIFIC TO NOS                           #
  
      DEF DFCTLJBNOS #"DBREC,T37777."#; 
      DEF DFCTLJBNLG #13#;
      DEF DFCTLUSER #"USER,"#;
      DEF DFCTLUSLG #5#;
      DEF DFCTLCHG #"CHARGE,"#; 
      DEF DFCTLCHLG #7#;
      DEF DFCTLRES #"RESOURC,MT=1."#; 
      DEF DFCTLRESNT #"RESOURC,NT=1."#; 
      DEF DFCTLRSLG #13#; 
      DEF DFCTLRESDN #"RESOURC,"#;
      DEF DFCTLRDLG #8#;
      DEF DFCTLATNOS #"ATTACH,MSTRDIR="#; 
      DEF DFCTLATNLG #15#;
      DEF DFCTLUN #"UN="#;
      DEF DFCTLUNL #3#; 
      DEF DFCTLPN #"PN="#;
      DEF DFCTLPNL #3#; 
      DEF DFCTLDT #"R="#; 
      DEF DFCTLDTL #2#; 
      DEF DFCTLMER #"M=R."#;
      DEF DFCTLMERL #4#;
      DEF DFCTLGETCCL #"GET,"#; 
      DEF DFCTLGETLG #4#; 
  
  
#     THE FOLLOWING DEFS ARE COMMON TO NOS AND NOS/BE                  #
  
      DEF DFCTLPW #"PW="#;
      DEF DFCTLPWL #3#; 
      DEF DFCTLDBR #"DBREC,CD."#; 
      DEF DFCTLDBL #9#; 
      DEF DFCTLATTCCL #"ATTACH,"#;
      DEF DFCTLATTLG #7#; 
      DEF DFCTLJOBT #"T37777."#;
      DEF DFCTLJOBTL # 7 #; 
      DEF DFCTLEOR #"*EOR"#;
      DEF DFCTLERL #4#; 
      DEF DFCTLDBS #"SCHEMA NAME IS "#; 
      DEF DFCTLDSL #15#;
      DEF DFCTLDDD #"DUMP JOURNAL LOG NAME IS "#; 
      DEF DFCTLDDL #25#;
      DEF DFCTLEOF #"*EOF"#;
      DEF DFCTLEFL #4#; 
  
#     THE FOLLOWING DEFS DEFINE THE MAXIMUM LENGTH IN CHARACTERS FOR   #
#     CONTROL STATEMENT PARAMETERS FOR INSERTION PURPOSES.             #
  
  
      DEF DFMAXACLG #70#;          # MAX NBR CHARS FOR ACCTG (NOS/BE)  #
      DEF DFMAXACLGNOS #30#;       # MAX NBR CHARS FOR ACCTG (NOS)     #
      DEF DFMAXDTLG #3#;           # MAX NUMBER CHARS FOR DEVICE TYPE  #
      DEF DFMAXFMLG #7#;           # MAX NUMBER CHARS FOR FAMILY NAME  #
      DEF DFMAXJLLG #7#;           # MAX NUMBER CHARS FOR JOUR LOG NAME#
      DEF DFMAXPFLG #7#;           # MAX NUMBER CHARS FOR PFN          #
      DEF DFMAXPNLG #7#;           # MAX NUMBER CHARS FOR PACK NAME    #
      DEF DFMAXPWLG #7#;           # MAX NUMBER CHARS FOR PASSWORD     #
      DEF DFMAXSCLG #30#;          # MAX NUMBER CHARS FOR SCHEMA NAME  #
      DEF DFMAXSNLG #7#;           # MAX NUMBER CHARS FOR SET NAME     #
      DEF DFMAXVSLG #4#;           # MAX NUMBER CHARS FOR VSN          #
      DEF DFMAXUNLG #7#;           # MAX NUMBER CHARS FOR UN/ID        #
  
      DEF DFSPOTFIL #O"32323232320324000001"#;   # ZZZZZCT ROUTE FILE  #
                                   # RIGHTMOST 1 IS COMPLETION BIT     #
  
#**********************************************************************#
  
