% VAX-11 Librarian V03-00"HkH!uv 5 5   PRINT_FILE_INFO&RMSERROR)*RMSPROT*~ RMS_ERR_INFO+RMS_INTERFACE_2M@RMS_INTERFACE_3O2RMS_INTERFACE_4R`RMS_INTERFACE_5WlRMS_INTERFACE_6_RMS_INTERFACE_7bRMS_INTERFACE_IO_1k&RMS_INTERFACE_IO_2pWl ADDR_RETURN+AID_+ALLOCATE_INTERNAL+ALLOCATION_QUANTITY_+ALN_+ ALN_DEF.$.+ALQ_+AOP_+ AOP_DEF.$.+AOP_M_+ ARG_PROCESSOR+ ASYNC_ERROR_+ ASYNC_ERR_+ASYNC_SUCCESS_+ ASYNC_SUC_+BDT_+BDT_V_+BINTIM_+BKS_+BKT_+BKZ_+ BLOCK_SIZE_+BLS_+BUCKET__+CDT_+CDT_V_+DAN_+DATA_AREA_NUMBER_+DATA_FILL_SIZE_ PRINT_FILE_INFO)*PROTECTION_ANALYZERE_& RMSIF_DUPDEF&RMSIF_FATALERR& RMSIF_MNEM& RMSIF_NONSARG&RMSIF_NOSUCHXAB+ RMS_ALLDEF+ RMS_ALLOW_AST+ RMS_AUTO_ASTk& RMS_BLKREADk& RMS_BLKWRITEb RMS_CLOSEb RMS_CLOSEOUTb RMS_CONNECT+ RMS_CREATE+ RMS_DATDEFk& RMS_DELETEk&RMS_DISCONNECT+ RMS_DISPLAYk& RMS_ENTERk& RMS_ERASEb RMS_EXTEND+ RMS_FABDEFk&RMS_FINDk& RMS_FINDKEYbRMS_GETb RMS_GETDIR*~ RMS_GETERRMSG RMS_RABDEFBUCKET_EDT_V_ FILE_SHARING_ KEY_ MBF_ PRFX_DEFS3.$.PROTECTION_ANALYZERRECORD_FILE_ADDRESS_ RMSIF_BADTIME RMS_ENTER RMS_GETERRMSG RMS_RABDEF SETFNSUC_UNRECOVERABLE_ERRORXABRDT_Wl PROT_RETURN+PRO_+PRO_M_+PSZ_+RABCTX_+ RABS_FAB_+ RAB_CONTEXT_+RAC_+ RAC_DEF.$.+RAC_V_+RAT_+ RAT_DEF.$.+RAT_M_+RBF_+RDT_+RDT_RDT_+ RDT_RDT_V_+RDT_RVN_+RDT_V_+RECORD_ACCESS_+RECORD_ATTRIBUTES_+RECORD_BUFFER_+RECORD_BUFFER_SIZE_+RECORD_FILE_ADDRESS_ RMSIF_BADIFI&RMSIF_BADINFID& RMSIF_BADNUM&RMSIF_BADSTRNG& RMSIF_BADTIME+ BUCKET_SIZE_+CDT_+CDT_V_WlCVT_PRO_TO_ASCII+DAN_+DATA_AREA_NUMBER_+DATA_FILL_SIZE_+ DATA_TYPE_bDEALLOCATE_INTERNALWl DECIDE_DSCR+DEFAULT_EXTENSION_QUANTITY_+DEFAULT_FILE_NAME_+DEFAULT_NAME_ADDRESS_+DEFAULT_NAME_SIZE_+DEQ__ DEV_DEF.$.+DFL_+DNA_+DNM_+DNS_Wl DSCR_RETURNR`DSCR_STRNGS_PROCESSOR+DTP_+ DTP_DEF.$.+DTP_V_+EDT_+EDT_V_CTION_ANALYZERf+ ENABLE_AST.$+ERROR_+ERR_+ESA_+ESS_+EXPANDED_STRING_ADDRESS_+EXPANDED_STRING_SIZE_+FABCTX_+ FAB_CONTEXT_+FAC_+ FAC_DEF.$.+FAC_M_+FILE_+ FILE_ACCESS_+ FILE_NAME_+FILE_NAME_ADDRESS_+FILE_NAME_SIZE_+ FILE_OPTIONS_+FILE_ORGANIZATION_+ FILE_SHARING_+FILL_FCB+FIND_XAB+FIXED_AREA_SIZE_+FLG_+ FLG_DEF.$.+FLG_M_ PRINT_FILE_INFO)*PROTECTION_ANALYZERo+FILL_FCB+FIND_XAB+FIXED_AREA_SIZE_+FLG_+ FLG_DEF.$.+FLG_M_+FNA_+FNM_+FNS_+FOP_+ FOP_DEF.$.+FOP_M_+FSZ_+GBC_+GLOBAL_BUFFER_COUNT_+GRP_+ HOLD_AST.$+IAN_+IFI_+IFL_+INDEX_AREA_NUMBER_+INDEX_FILL_SIZE_b IOFN_DEFS.$.+KBF_+KEY_KEY_BUFFER_SIZE_+KEY_NAME_ADDRESS_+KEY_OF_REFERENCE_ PRINT_FILE_INFO)*PROTECTION_ANALYZER+ KEY_BUFFER_+KEY_BUFFER_SIZE_+KEY_NAME_ADDRESS_+KEY_OF_REFERENCE_+KEY_OPTIONS_FLAG_+ KEY_POSITION_+ KEY_SIZE_+KNM_+KRF_+KSZ_+LAN_+LINKUP+LOC_+LOWEST_LEVEL_AREA_NUMBER_+MAKE_FCB+MAKE_XABM@ MASK_BUILDERWl MASK_RETURN+MAXIMUM_RECORD_NUMBER_+MAXIMUM_RECORD_SIZE_+MBC_+MBF_MTACC_+MULTIBLOCK_COUNT_+MULTIBUFFER_COUNT_ PRINT_FILE_INFO)*PROTECTION_ANALYZERr+MBM_+MRN_+MRS_+MTACC_+MULTIBLOCK_COUNT_+MULTIBUFFER_COUNT_+NULL_KEY_VALUE_+NUL_WlNUMERICAL_RETURNR`NUMERICAL_STRNGS_PROCESSOR+ORG_+ ORG_DEF.$.+ORG_V_R`PAC.$M@PARAMETER_ANALYZERR`PARM_ERROR_CHECKER.$+PBF_+POS_O2 PRFX_DEFS.$._ PRFX_DEFS2.$._ PRFX_DEFS3.$.FOO2PROCESS_STRING_ARGS+PROLOG_+PROMPT_BUFFER_+PROMPT_BUFFER_SIZE_)*PROTECTION_ANALYZER+RECORD_FORMAT_+RECORD_HEADER_BUFFER_+RECORD_OPTIONS_+REFERENCE_NUMBER_+REF_+RELATED_FILE_NAM_+RESULTANT_STRING_ADDRESS_+RESULTANT_STRING_SIZE_+RETRIEVAL_WINDOW_SIZE_+RFA_+RFI_+RFM_+ RFM_DEF.$.+RFM_V_+RHB_+RLF_&RMSIF$_FACILITY&RMSIF_ARGNOTALL& RMSIF_BADIFI&RMSIF_BADINFID& RMSIF_BADNUM&RMSIF_BADSTRNG& RMSIF_BADTIMEp+ RMS_RDTDEFbRMS_READk& RMS_RELEASEk& RMS_REMOVEk& RMS_RENAME+RMS_RESTORE_DATAk& RMS_REWINDk& RMS_SEARCHb RMS_SPACE+RMS_STORE_DATAk& RMS_TRUNCATEk& RMS_UPDATEk&RMS_WAITb RMS_WRITE+ROP_+ ROP_DEF.$.+ROP_M_+RSA_+RSS_+RSZ_+RTV_+RVN_WlSETAREA_bSETFN SETUP_ASYNC.$+SHR_+ SHR_DEF.$.+SHR_M_+SIZ_M@ SKIP_BLANKSO2STR_+SUCCESS_+SUC_ORM@ UPSHIFT.$+ USER_BUFFER_+USER_BUFFER_SIZE_+USZ_M@ VALUE_BUILDERM@VALUE_BUILDER_NOSIGNALWl VALUE_RETURN+VOL__WILDCARD_DEFS.$.+XABALL_+XABALQ_+XABDAT_+XABDEQ_+XABPRO_+XABRDT_ PRINT_FILE_INFOO2PROCESS_STRING_ARGS+PROLOG_+PROMPT_BUFFER_+PROMPT_BUFFER_SIZE_)*PROTECTION_ANALYZERb RMS_GETKEYb RMS_GETRFAk& RMS_GETSEQb RMS_GETVFCWlRMS_INFOWl RMS_INFO_PAS+ RMS_KEYDEF+ RMS_NAMDEF+RMS_OPENk& RMS_PARSE+ RMS_PRODEFbRMS_PUT*~ RMS_PUTERRMSGb RMS_PUTKEYk& RMS_PUTSEQb RMS_PUTVFC+ RMS_RABDEFWl TBL_SCANNERb TEST_ASYNC.$+ TEST_IFI.$+TIMEOUT_Wl TIME_RETURN+TMO_WlTRANSLATE_TO_ASCII+UBF_+UIC_+UNRECOVERABLE_ERRORk& RMS_ERASEb RMS_EXTEND+ RMS_FABDEFk&RMS_FINDk& RMS_FINDKEYk& RMS_FLUSHk&RMS_FREEbRMS_GETb RMS_GETDIR*~ RMS_GETERRMSGWlSETKRF_+ SETUP_ASYNC.$+SHR_+ SHR_DEF.$.+SHR_M_+SIZ_M@ SKIP_BLANKSO2STR_+SUCCESS_+SUC_!1@H01:PRINT_FILE_INFO0114-Dec-1983 22:3014-Dec-1983 22:30VAX-11 FORTRAN V3.4-56PRINT_FILE_INFOP hO\W)]X,#-L Nsys$error rat=cr;fop=mxv- -$ F I L E I N F O R M A T I O N D I S P L A Y  -File: ) --- )) = ) = ) = ) #) = )) = ) = P242f DD FNM_@O"O RMS_CREATE@P  $( ,(0$4,8PPP<P4f#^@PP@Q0QQFAB status wordFAB status valuRAB status wordRAB status valuMax rec # Max rec size# of Blocks Key size Last IO File access File type File options Record format Sharing Record access Record OptionsQ   PRINT_FILE_INFOPN[˸lk<FNM_P^XDIFI_P^\T RMS_CREATE^PPd RMS_PUTERRMSGFOR$STOPkl LIB$MOVC5$޼ˈ˄RMS_INFO˸`~ FOR$ENCODE_MF FOR$IO_END RMS_PUTSEQ RMS_PUTSEQSTR$TRIM  RMS_PUTSEQ RMS_PUTSEQSTR$TRIM˸~ FOR$ENCODE_MFPP,0, FOR$IO_T_DS PP484 FOR$IO_T_DS FOR$IO_ENDSTR$TRIMݫ^@< RMS_PUTSEQ^Y˸~ FOR$ENCODE_MFYZ4J˱84 FOR$IO_T_DSIt FOR$IO_L_R,J0, FOR$IO_T_DSIx FOR$IO_L_R FOR$%IO_ENDSTR$TRIM  RMS_PUTSEQL LIB$MOVC5Ithd RMS_GETERRMSGPhЏzp

BADSTRNG*Invalid character string detected--ignored< ARGNOTALL(Illegal RMS field specification detected8BADNUM&Invalid numeric character string '!AS'<BADINFID)Invalid item spec for RMS_INFO, arg # !SL0 NOSUCHXABXAB !SL not found -- created8BADTIME%Invalid time format '!AS' encountered*FATALERRFatal error encounteredFBADIFI5Invalid Internal File Identifier encou*ntered; val=!XLRMSIFww1XH01RMSPROT014-NOV-1983 20:09 VAX-11 Macro V03-006RMSPROT+USER$DISK:[FRANK.SOFTWARE.LIBRARY]MACROS/LIB S LIB$SIGNALRMSIF_BADSTRNG SKIP_BLANKS SYS$SETDFPROT UPSHIFT.$ . ABS . . BLANK .P$CODEP  PROTECTION_ANALYZER&X^^Wg~ SYS$SETDFPROTgPZRMSIF_BADSTRNG+ LIB$SIGNALҰgP j RAC_DEF.$. b RAT_DEF.$.  RECORD_ACCESS_ RECORD_ATTRIBUTES_ RECORD_BUFFER_ RECORD_BUFFER_SIZE_ RECORD_FILE_ADDRESS_ RECORD_FORMAT_ >RECORD_HEADER_BUFFER_ RECORD_OPTIONS_ ] REFERENCE_NUMBER_ RELATED_FILE_NAM_ RESULTANT_STRING_ADDRESS_ NRESULTANT_STRING_SIZE_ DRETRIEV1AL_WINDOW_SIZE_ x RFM_DEF.$. RMSIF_BADIFI RMSIF_BADTIME RMSIF_DUPDEFRMSIF_FATALERRRMSIF_NOSUCHXAB  ROP_DEF.$.SETFN  SETUP_ASYNC.$  SHR_DEF.$. SUCCESS_ SYS$BINTIM SYS$CONNECT SYS$CREATE SYS$DISPLAYSYS$OPEN SYS$PUTMSG SYS$SETAST TEST_ASYNC.$ TIMEOUT_ mUNRECOVERABLE_ERROR  USER_BUFFER_ USER_BUFFER_SIZE_ VALUE_BUILDER . ABS . . BLANK .2P$ABS$-PPPPPPPPPPPRMS_DATAPS'^'_'''-'5''$CODEPQCYLLBNRFIVBNQQQCBTCTGHRDONCQQQIN2BN2BN4IN2IN4PACSTGQ#Q#QCHG DAT_NCMPRDUP IDX_NCMPR KEY_NCMPRNULQ0Q0QPUTGETDELUPDNILMSEUPIQ#Q#3QPUTGETDELUPDTRNBIOBROQ#Q#QCBTCIFCTGDFWDLTESCINPKFOMXVNAMNEF NFSOFPPOSPPFRCKRWC RWOSCFSPL SQOSUPTEFTMDTMPUFMkUFOWCK QrQQBLKCRFTNPRNQQQFIXVARVFCSTMSTMCRSTMLFUDFQ'Q'QRELSEQIDX QQQASYBIO CCOCVTEOFFDLLOCKGEKGTLOA LIMNLKNXRPMTPTARAH REARLKRNERNFRRLTMOTPTUIFULKWATWBH Q4wQQKEYSEQRFAQQPP| P|RMS_STORE_DATA& (,`| j|RMS_RESTORE_DATA&( x RMS_ALLOW_AST&  RMS_AUTO_AST&}P~ SYS$SETAST}P}P~ SYS$SETAST}P   ARG_PROCESSOR&0ЬR RMSIF_DUPDEF LIB$SIGNAL1GЦfX0]XP XP PVPk1 Цk1l6ݬ~RMSIF_NOSUCHXAB LIB$SIGNALݬ!ЫPR:X bRQQxQSX S XSSP SUC_&0Ь Џ P ERR_&0Ь  ASYNC_SUC_&0ЬЏ P  ASYNC_ERR_&0Ь  TEST_IFI.$&AЬZ j Z~ RMSIF_BADIFI LIB$SIGNAL 7IFI_&|0RЬм?^^[kk LIB$GET7_VMP1,`kЫЫЫPP  wЏP MTACC_&)ЬP[~ ~~~ P UIC_&E[~~~2~P[~ ~~2~P GRP_&%[~~~2~P !MBM_&%[~ ~~2~ϣP APRO_&BPROTECTION_ANALYZER[~~~2P~zP jPRO_M_& P r8XABPRO_&L2~lPROCESS_STRING_ARGS2~lPAC.$ЏP@ @ RMS_PRODEF&h2~lPROCESS_STRING_ARGS2~lPAC.$V~V~0`[nl0 AID_&10w~~~~@P ALN_&? VALUE_BUILDERw~ ~~P~ϧ@P <XABALQ_&#w~~~ݼω@P ZAOP_&>Ϸ MASK_BU9ILDERw~~~P~]@P AOP_M_& P BKZ_&$w~~~~6@P XABDEQ_&$w~~~2~@P LOC_&#w ~ ~~ݼ@P VOL_&$w ~ ~~2~@P  RFI_&bw~~~2~ϻ@Pw~~~2~ϟ@Pw~~~2 ~σ@P `XABALL_&J@~lPROCESS_STRI:NG_ARGS@~lPAC.$ЏP@ @ RMS_ALLDEF&f@~lPROCESS_STRING_ARGS@~lPAC.$V~V~F`wτl0 BINTIM_&L SYS$BINTIMP|~ RMSIF_BADTIME LIB$SIGNAL BDT_&R^^[kƟ~$~~kϾP~(~~ݫϢP B BDT_V_&^^[}k P CDT_&S^^[kn~~~k;fP~~~ݫJP  CDT_V_&^^[}k  EDT_&S^^[k~~~kP~ ~~ݫP  EDT_V_&^^[}k  RDT_&S^^[kϾ~ ~~k϶P~~~ݫϚP J RDT_V_&^^[}k X RVN_&%~~~2~lP x XABDAT_&L2~l<PROCESS_STRING_ARGS2~lPAC.$ Џ P@  @ RMS_DATDEF&i2~lPROCESS_STRING_ARGS2~lPAC.$V~V~*`hl0  RDT_RDT_&S^^[k~ ~~kP~~~ݫϮP 6  RDT_RDT_V_&^^[}k D RDT_RVN_&%~~~2~πP d XABRDT_&L2~lPROCESS_STRING_ARGS2~l=PAC.$ ЏP@  @ RMS_RDTDEF&h2~lPROCESS_STRING_ARGS2~lPAC.$V~V~>`|l0  PROLOG_&$~H~~~P  DTP_&>1 VALUE_BUILDER~~~P~P " DTP_V_& P * FLG_&=$ MASK_BUILDER~~~P~ύP U FLG_M_& P ] REF_&>00,~~~~\P  KNM_&%P~8~~P<P  SIZ_&:lR.S TլTS~~ST\RڰP  POS_&:lRSTլTS~2~ST\RڰP  IFL_&#~~~2~ϴP . DFL_&#~~~2~ϖP L DAN_&#~ ~~~xP j IAN_&#?~~~~ZP  NUL_&#~~~~<P  LAN_&#~ ~~~P  KEY_&H~lPROCESS_STRING_ARGS~lPAC.$ ЏP@  @ RMS_KEYDEF&d~lPROCESS_STRING_ARGS~lPAC.$V~V~`$l0 0ESS_&#<~ ~~~ϔP NRSS_&#<~~~~vP@ lESA_&"<~ ~~ݬYP RSA_&"<~~~ݬ<P RLF_&"<~~~ݼP@ @ RMS_NAMDEF&s~lPROCESS_STRING_ARGS~lPAC.$VЦP~ϹP`@`<?l0 BKS_&"~>~~~ϯP 3ALQ_&!~~~ݼϒP PFABCTX_&!~~~ݼuPA mBLS_&"~<~~2~WP DEQ_&"~~~2~9P FOP_&;$ MASK_BUILDER ~~~PP FOP_M_& мP FAC_&< MASK_BUILDER~~~P~P FAC_M_& мP FSZ_&" ~?~~~϶P ,MRN_&! ~8~~ݼϙP IMRSB_&" ~6~~2~{P gGBC_&#~H~~2~\P ORG_&= VALUE_BUILDER ~~~P~1P ORG_V_& мP RAT_&<ϣ MASK_BUILDER~~~P~P RAT_M_& мP RFM_&=φ VALUE_BUILDER~~~P~P RFM_V_& мP SHR_&<Cb MASK_BUILDER~~~P~ϘP JSHR_M_& мP RDNA_&$P~0~~PpP rDNS_&"~5~~~RP FNM_&AЬS~4~~c~1P~,~~ݣP DNM_&AЬS~5~~c~P~0~~ݣP FNA_&$P~,~~PϼP &FNS_&"~D4~~~ϞP DRTV_&"~~~~πP@ b@ RMS_FABDEF&|~lPROCESS_STRING_ARGS~lPAC.$VЦP ~PVP`ϖl0  RABS_FAB_&!s~<~~ݼP   ROP_&D MASK_BUILDERlȼPs~~~PP ROP_M_& мP   RFA_&AЬRs~~~bϬPs~~E~2~ϑP QBKT_&!s~8~~ݼtP nRABCTX_&!s~~~ݼWP KBF_&$Rs~0~~R7P PBF_&$Rs ~0~~RP RBF_&$Rs ~(~~RP UBF_&$Rs~$~~RP  RAC_&=- VALUE_BUILDERs ~~~P~ϬP 6RAC_V_& FмP >RHB_&!s ~,~~ݬχP [PSZ_&"s ~4~~~iP yKSZ_&"s~4~~~KP RSZ_&"s~"~~2~-P USZ_&"s~ ~~2~P MBC_&"s~7~~~P TMO_&"s~~~~P KRF_&"s~5~~~ϵP -MBFG_&"s~6~~~ϗP@ K@ RMS_RABDEF&g~lPROCESS_STRING_ARGS~lPAC.$VfP ~2Pf`sl0& ALLOCATE_INTERNAL&QЬVfqVϸ~ݬ~@~ݬ~2ݬ LINKUP&_ЬVfW է<Ц<ЦWЦ(Ц$ЎP}~}~||P0 - RMS_CREATE&T27<~lPAC.$~lPROCESS_STRIHNG_ARGST:d~SETFN0} ~} ~ݮߴ SYS$CREATEP} ~d~SETFNߴ SYS$CONNECT TEST_ASYNC.$< < RMS_DISPLAY&T20<~lPAC.$~lPROCESS_STRING_ARGSTd~SETFNФU0( dUХRHB_ RLF_ RMS_ALLDEFx RMS_ALLOW_AST RMS_AUTO_AST- RMS_CREATE  RMS_DATDEF RMS_DISPLAYb RMS_FABDEF  RMS_KEYDEF RMS_NAMDEFRMS_OPEN RMS_PRODEFK MRMS_RABDEF  RMS_RDTDEFjRMS_RESTORE_DATAPRMS_STORE_DATA ROP_ ROP_M_ RSA_ NRSS_ RSZ_ DRTV_ X RVN_ SHR_ JSHR_M_  SIZ_ SUC_ TEST_IFI.$ TMO_ UBF_ UIC_ USZ_ VOL_`XABALL_<XABALQ_x XABDAT_0XABDEQ_rXABPRO_d XABRDT_A . BLANKN .RMS_DATA$CODEww1@޺H09RMS_INTERFACE_3013-NOV-1983 03:23 VAX-11 Macro V03-007RMS3.MAR+USER$DISK:[FRANK.SOFTWARE.LIBRARY]MACROS/LIB Z LIB$SIGNALRMSIF_BADSTRNG RMSIF_MNEM & SKIP_BLANKS  UPSHIFT.$ . ABS . . BLANK .P$ABS$PPPP$CODE~PZ<Yja jz jZY뺏YOLOC?VOL@RFIAGRPBMBMCUICDMTACCERVNFRDT_RVNGQhQhkP  kPROCESS_STRING_ARGS&VЬ[&^^XЏި"kШ"PШ"P[kY뱩 1 i1iЩ 1:= 1QU¨ QQhШ PU h VALUE_BUILDERŕP1<54?H86   .H     $00(,0 DHL@PT < @D4 9:;8<=*$ <   $    & (  r TBL_SCANNER&&PQRbbbRPQ TRANSLATE_TO_ASCII&^^[Y WPPYP,P g RM[S_ADDR_DATAUP## !),6:P RMS_INFO& ^^[мݫ TEST_IFI.$֧lkkYYZЬX,Zi h  PROT_RETURN&% _0eVFpWYW 2g~54  DSCR_RETURN&> ^^[0=VFHWYWgPP@P@iPЬ R,P b #NUMERICAL_RETURN&^^[0VF WFX;XTvPYQWQAi!0:ՠ1PWFIND_XABPkkYWl Լ (XGi Ь P,XGi`T`UХ