WVAX-11 Bliss-32 V4.0-742 3-Apr-1984 16:47:10SJXDELETV1.1-25$11M$ALIGN $BIN$$DESC$BYTE$BYTES$CALFIP$DELETE $DESCRIPTOR $FAB_DECL $FAB_INIT $FCS_BLOCKS$FIELD$FIELD_SET_SIZE$IAS $IOB$FIELDS_1 $IOB$FIELDS_2 $IOB$FILLER0 $IOB$FILLER1 $IOB$FILLER2 $IOB$FILLER3 $IOB$FILLER4 $IOB$FILLER5 $IOB$FILLER6 $IOB$FILLER7 $IOB$FILLER8 $IOB$FILLER9$IOSB $IOSB$FIELDS $ITR_RMS_CALL $NAM_DECL$OVERLAY$RMS_BITFLD_INI $RMS_BITS $RMS_CALL$RMS_CODFLD_INI $RMS_ERASE$RMS_OR$RMS_PTR$RMS_VALFLD_INI$RSTS$RT11 $STR$$DESC $STR$COPY_OPT $STR$DECLARE$STR$DELIMITER $STR$FUNCTION$STR$LOCAL_INIT $STR$OPTIONS $STR$PATTERN $STR$STATUS $STR$STRING $STR$STR_DESC $STR$TARGET $STR_COPY$STR_DESCRIPTOR $STR_FORMAT $STR_SCAN $SUB_FIELD $T10_CLOSE $T10_ERROR $T10_LOOKUP$T10_LOOK_ARGS $T10_OPEN$T10_OPEN_ARGS $T10_RELEASE $T10_RENAME $T20_DELF $T20_GTJFN $T20_RLJFN$TOPS10$TOPS20$VMS $X20_ASCIZ$XPO$$KEY_TEST $XPO$$PAREN$XPO$1ST_ACTUAL$XPO$2ND_ACTUAL $XPO$ACTION $XPO$ARG1 $XPO$ARG2 $XPO$ARG3 $XPO$BIN_DESC $XPO$BIN_LEN $XPO$BITS$XPO$BITS_BYTE$XPO$BIT_INDEX$XPO$COMP_CODE $XPO$DEFAULT $XPO$DESC$XPO$DESCRIPTOR$XPO$EX_ROUTINE $XPO$FIELD$XPO$FIRST_$FIELD$XPO$FULL_BASED$XPO$FULL_INDEX $XPO$FUNCTION $XPO$INTERNAL$XPO$KEY_CHECK $XPO$KEY_OK $XPO$KEY_TEST$XPO$KEY_WORDS$XPO$MAIN_BLOCK $XPO$MAX_BIT$XPO$MAX_FULLWD$XPO$PAREN_TEST $XPO$SET_SIZE$XPO$SHOW_FIELD$XPO$SHOW_INFO $XPO$SHOW_LIT$XPO$SHOW_NUMB $XPO$STATUS$XPO$SYS_IDENT$XPO$UNIT_INDEX$XPO$VMS_DESCRIPTOR$XPO_ACTION_RTN$XPO_BUILD_SPEC $XPO_GET_MEM $XPO_IDENT $XPO_IF_NOT$XPO_IOB$XPO_MAIN_BEGIN $XPO_MAIN_END$XPO_PARSE_SPEC $XPO_PSECTS $XPO_QUIT$XPO_SPEC_BLOCK $XPO_STATUS $XPO_SYS_TEST$XPO_VALID_IOB $XPO_ZAP_IOB $XRSTS_FIRQB$XRT_LOOK_ARGS BAD_DEVICE BAD_LENGTH BAD_LOGICBAD_SPECBAD_TYPEBLISS16BLISS32BLISS36BLISS36CBOUNDEDCHANNELCHANNEL_ASSIGN CHANNEL_OPEN CHARACTERSDEVICEDLNFQDYNAMICDYNAMIC_BOUNDEDDYNAMIC_VARYINGF$DSPTF$EFNF$ERRF$LUNFAB FAB$B_BID FAB$B_BKS FAB$B_BLN FAB$B_DNS FAB$B_FAC FAB$B_FNS FAB$B_FSZ FAB$B_ORG FAB$B_RAT FAB$B_RFM FAB$B_RTV FAB$B_SHR FAB$C_BID FAB$C_BLN FAB$C_VAR FAB$L_ALQ FAB$L_CTX FAB$L_DNA FAB$L_FNA FAB$L_FOP FAB$L_JNL FAB$L_MRN FAB$L_NAM FAB$L_STS FAB$L_STV FAB$L_XAB FAB$M_GET FAB$W_BLS FAB$W_DEQ FAB$W_GBC FAB$W_MRSFAILUREFAILURE_ACTION FCS$K_BLK_LEN FCS$Z_DS_DESC FCS$Z_FDB FCS_BLOCKSFDBFDB$ FILE_NAME FILE_PARSE FILE_SPEC FILE_TYPEFILLFIXED FOREGROUNDFQCLUSFQFUNFQIOSTSFQJOBFQMODEFQNENTFQPFLGFQPROTFQSIZFQSIZMFREE_MEMFULLWORD FULLWORDSGET_MEMGJ_OLDGJ_SHTINDEXIOBIOB$A_ASSOC_IOBIOB$A_BACK_TYPEIOB$A_BUFFER_CB IOB$A_DATA IOB$A_DEFAULT IOB$A_FCS_FDBIOB$A_FILE_SPEC IOB$A_OUTPUT IOB$A_PROMPT IOB$A_RELATED IOB$A_RMS_FAB IOB$A_RMS_RAB IOB$A_RSTS_CB IOB$A_STRINGIOB$B_FUNCTION IOB$B_LEVEL IOB$B_VERSIONIOB$G_2ND_CODEIOB$G_BLK_SIZEIOB$G_COMP_CODEIOB$G_CURR_POSIOB$G_NEXT_POSIOB$G_REC_SIZEIOB$G_SEQ_NUMBIOB$G_USER_CODE IOB$H_CHANNELIOB$H_FULLWORDS IOB$H_LENGTHIOB$H_PAGE_NUMB IOB$H_STRING IOB$H_UNITS IOB$K_LENGTH IOB$T_CONCAT IOB$T_DATAIOB$T_RESULTANT IOB$T_STRING IOB$V_APPENDIOB$V_ATTRIBUTEIOB$V_AUTO_CONC IOB$V_BINARYIOB$V_CH_ASSIGN IOB$V_CLOSEDIOB$V_CONC_SPEC IOB$V_EOF IOB$V_INPUTIOB$V_MAX_VERSI IOB$V_OPEN IOB$V_OPTIONS IOB$V_OUTPUTIOB$V_OVERWRITE IOB$V_RANDOM IOB$V_RECORDIOB$V_REMEMBERIOB$V_SEQUENCED IOB$V_STATUS IOB$V_STREAMIOB$V_TEMPORARYIOB$V_TERMINAL IOB$Z_CREATED IOB$Z_REVISED IOB$Z_USER IOSB$B_COLUMN IOSB$B_LINE IOSB$B_TERM1 IOSB$B_TERM2IOSB$H_IO_COUNT IOSB$H_LINES IOSB$H_STATUSIOSB$H_TERM_LEN IOSB$K_LENGTH IOSB$L_DEPENDIO_ERRORIS$SUC JFN_OR_ERRORKEYWORD LONG_RELATIVE LOOK$H_STATUSLOOK$K_ARG_LEN LOOK$T_DEVICE LOOK$T_EXT LOOK$T_NAME LOOK$T_NAME1 LOOK$T_TYPE LOOKUP_ARGS MAIN_BLOCK MAX_FILE_SPEC NAM$B_RSL NAM$B_RSS NAM$C_BLN NAM$L_RSA NAME_BLOCKNONORMAL NO_CHANNEL NO_DELETENO_FILEOPEN$K_ARG_LEN OPEN$T_DEVICE OPEN_ARGS PRIMARY_CODER0RESULT RESULTANTRESULTANT_SPEC RT_ERR_EMTSECONDARY_CODE SPEC_BLOCK SPEC_PARSESTATIC STR$A_POINTER STR$B_CLASS STR$B_DTYPE STR$H_LENGTH STR$H_MAXLEN STR$H_PFXLEN STR$K_B_BLN STR$K_CLASS_DSTR$K_CLASS_DB STR$K_CLASS_FSTR$K_CLASS_XT STR$K_DTYPE_T STR$K_FIND STR$K_F_BLN STR$K_SPAN STR$K_STOPSTR$M_NO_FREE_TSTR$M_REMAINDER STR$M_TARGETSTRINGSUCCESS_ACTION SYS$ERASEUNITSVARYINGX10$ASCII_6BITX10$CHAN_ASSIGN X10$CLEANUPX10$ENTER_LOOKUP X20$ERRORX20$K_MAX_SPEC XPO$ALLOC_MEM XPO$A_ADDRESS XPO$B_CLASS XPO$B_DTYPE XPO$CHANNELS XPO$DELETE XPO$H_LENGTH XPO$H_MAXLEN XPO$H_PFXLEN XPO$K_CLASS_DXPO$K_CLASS_DBXPO$K_DONT_FILLXPO$K_DTYPE_BUXPO$K_IO XPO$K_LEVELXPO$K_MAX_CHAN XPO$K_S_BLN XPO$K_VERSION XPO$RMS_ERROR XPO$RMS_PARSE XPO$T_DEVICEXPO$T_FILE_NAMEXPO$T_FILE_TYPE XPO$VALID_IOB XPO$ZAP_IOB XPO$_BAD_IOBXPO$_BAD_IO_OPTXPO$_BAD_LENGTHXPO$_BAD_LOGIC XPO$_BAD_RSLT XPO$_BAD_SPEC XPO$_FREE_MEM XPO$_GET_MEM XPO$_NORMALXPO$_NO_CONCAT XPO$_OPENXPORT_TEMPORARY XRST$ERRORXRST$SPEC_SETUP XRSX$CLEANUPXRSX$DSPT_SETUPXRSX$EVENT_FLAG XRSX$IO_ERRORXRSX$RSLT_FIXUPXRSX$SPEC_SETUP XRSX$XOPENXRT$ASCII_RAD50XRT$CHK_BACKGRD XRT$FETCHXST$COPYXST$SCANYES*&DISK$USER02:[XPORT.VMSGEN]XDELET.BLI;1+l)%DISK$USER02:[XPORT.VMSGEN]XPORT.L32;1*&DISK$USER02:[XPORT.VMSGEN]XPOSYS.L32;1   E  F  G    '  (  E F G   ' (    u o x u E F G   ' (    u o x u      ' (    u  o  x  u    ($DISK$USER02:[XPORT.VMSGEN]XVMS.R32;1&"SYS$SYSROOT:[SYSLIB]STARLET.L32;30    ] ^ U g f \  q\ $\   q q  Y Y Y   & Y &!    [  T  S k S      k  K  L  p   K ^ U L U p K ! "  j $ K L S  m p m p                  S k      k      K ^ U L U p K ! "  $ K L S  m p m p              "    S k      k      K ^ U L U p K ! "  $ K L S  m p m p               ' ] ^ U ^ U  & & ^ U       g ^ f U   )    S k      k      K ^ U L U p K ! "  $ K L S  m p m p            g ^ f U  )    S k      k      K ^ U L U p K ! "  $ K L S  m p m p            g ^ f U     S k      k      K ^ U L U p K ! "  $ K L S  m p m p            g ^ f U ' ] ^ U ^ U  & & ^ U       g ^ f U     S k      k      K ^ U L U p K ! "  $ K L S  m p m p            g ^ f U  )    S k      k      K ^ U L U p K ! "  $ K L S  m p m p            g ^ f U  )    S k      k      K ^ U L U p K ! "  $ K L S  m p m p            g ^ f U!   0    i   1 l 2 i !     7 1 { 7   b a d c  e zy             k v   l]F  'w ?  @            ! L                                                                 !         /  x _ t e ? > > V  E > > U  ? E0  > > K  > > J  > > I  > > V  > > K  @ > > J   > > I   > > 9  K  D  D  D    ]  T  > >  J  D  D  D    ]  P  > > K  @ |   V              7    7   Z ~  > |  ? V E V   > > y       E V   '8  / ` Y  / / Z - U  - W - X / / [ a  b I  b  b  b  b  b  b  b  b  b  b  b   ' 1 ,, +  c   b  I  d > > H  a      H `    c      a  H `   c   _ h   h N          `   O L K J I M N V L K J I K  T  _ s J   Q   Q   S  K T J   Q   Q   S  L I I O     L N M N K s J   Q   Q   S  I O     L R M R h  J  7 V L K J I 2 > > H     b  I  d0   I    c        b  b  b    c   _     N  O L K J I M N V  L    I  K  T  _ s J   Q   Q   S       Q Q S R      I O     L N M N K s J   Q   Q   S  I O     L R M R h 7 V L K J I .  > > H    3     3  1      W     1 , 1            > >        E V     } > ? / =   { 6 s    |  v z    F   |  ~ b  |  < >  > = a  L  I >   >   |  d   / | <   / ; / ( ; / , / + A   / ; / ( :  :   @    7   | 8 y  :   @      B   6 C f % s  H B C |   C   C % e  % |     % B   % e  % |  7   | 8 y  D           6   4 C 6 > > Q  > > P       E V   v  't    b  b  b  b  b  b  b  b  b  b  b   ' X O L K J I M N V L K J I 3 X  w m j i h Q  P  c P  _    w m j i h   m m  m j  j i  q h  h   n  m o m R  s q p O  n R o X J Q X M X L r    X In gnX                                          ~           > > Q   '   %    &                               $            "                                                    8 >  ? V E V          3   6   5    '#  ! ^      2    '5    > > D   *    b  b  b  b  b  b  b  b  b  b  b   '   b  I  d       2 a      H `    c      a  H `   c   _ h   h N          `   O L K J I M N V L K J I K  T  _ s J   Q   Q   S  K T J   Q   Q   S  L I I O     L N M N K s J   Q   Q   S  I O     L R M R   2 7 2   b  I  d > > D  4 a      H `    c      a  H `   c   _ h   h N          `   O L K J I M N V L K J I K  T  _ s J   Q   Q   S  K T J   Q   Q   S  L I I O     L N M N K s J   Q   Q   S  I O     L R M R   4 7 4 V L K J I         3        L K T J  Q  Q  S I   ) V L K J I   `  L L ) L K ) K J  Q  Q  S I ) I   `  M ) L N L  Q Q S  M N N > > D    3 4    n 2      4 > > D                                                > >   D  D  D    ]           9 >           ? V E V       n   >                  E V   y    G }     |    G |   |  v t   A     |  ~                       G         |  @ @    $       |   | 8  y     |   |                            |   | 8 y     }   { 6   | 6   } 6  |  s    |  v z    F   |  ~  ) /    I  L / *   I  L / -   I  L / .   / * |   v  v | 9 k  k            / D | ; D | #   7   | 8 y  k   7   r M   <  =        > > > V     v  |  ~  > > > V  / -   I  L / .   / * |   v  v | 9 k  k