҃g~ DIBOL042.B@ DIBOL042.BBACKUP/COMMENT=VAX DIBOL Kit Building Procedure/INTERCHANGE/LOG/NOASSIST/VERIFY [.B]*.* DIBOL$NETKITS:[V42-07]DIBOL042.B/SAVE_SET/LABEL=DIBOL VAX DIBOL Kit Building Procedure FERGUSON G l|A5.5 _DUMPIE::  _$2$DUA23: V5.5-2 ~  "*[KITS.V42-07.KIT.B]DBLMSGMGR.EXE;1+,`2.3/G 432-80123 KPWO256GPb77J[|89@A GGHJb0D`0205a9 DBLMSGMGRVAX DIBOL V4.2`a05-13" %?& @'I0J 1 ?!@ DBLRTL_001 @!  LIBRTL2_001! LIBRTL_001P=I DBLMSGMGR ''' +,0475;';b fpsBww x'x ?'x   x'x 'x 'x    xx |wwx{?w?wAwx{T|wx}M&wx{1|TwHwH'|H HHHHH1H'H HI I II'I 9I CIMIRI VI_IaIeIfIgIhImIrIrIuI wIIIII  I I I IDBL$MSGMGR1157505006506 000 0000 00000 000000000000000 8449 0000000000010203040506168961 0000000000 0000000000000000010000000051200000 |l~PE]GFMu M,EMK*^x 5HDTNyw4K_fm&fw\QJQT(T*T+J`)2w4QHTIHuKaTK KLNNywy-N:L ywRTPPryOQT(X X^(ywQTPw@w4QHTIQJHuyO"AOISYY O' O" Z -ZK Z9 y\JK, w4Jb w4QJB/B0| g8/kjy;z  T  g%/ky [m [^V \e \^WUO: Y Y^< Z >Z= 2/9/1M wwLQT0yw4QHVUQJHuyORfJ^R~ w4 Zr4Z3. QT(3chJ3d22 wJe2 w4QHVU QJHuyORf(J^R w4 ZZ y\J^Q w4'QJ2BJ^Q w4!QH"TI#QJHuyOAOISYY O9OJ^Q$ w4yw4$QJAOJOWOyw4%QJB6B7g6kLyBYY^C26A68Mw.QT7yw4RSOHOzRTNyOzHQgzzyOrzRSOVS[WS\[\ OzyN;zISL] i2z ~[b[fy^TzRSOISYHYOzRTNHQ IS JQ 82z[^Tz/"?fTKQT(KSgTSh^h^SSKghST^Kh^JTSST^.w}JKS^SK.wB/z6"@fTKQT(KSiTSj^j^SSKijST^KhJTSST^5wJKS^SK5wB6zN RTNz{Ϯϼ!τ tXPV('f|'hP VhV|/FPUPTW)'fdWW TUФ/TT/TU U3V/Ԧ3VhTV3VV`QQQcQQ`}Q}Ԡ ЬQա' P'P+ԠТ+QP QP+P ϸXϧPVЬW('gfЧ''( ++hP VhV|5FPUPTW)'fdWW TUФ5TT5TU U9V5Ԧ9VhTV9VV 2SЬQQcQС3RС/PP/R3&Qc С/cС/PԠ3QС3С3RԢ/У3Q ЬRЬPR'R+ТSТ QQ S(R'Т 'Т QԡR+Т+ТSԣ ϠRϙ φSЬQQcQС9RС5PP5R9&Qc С5cС5PԠ9QС9С9RԢ5У9Q&RbP$Р'QТQС QТ3PР/Pb<U T)'eTT  UХ/UԼЬPР'P Ѡ Ѡ P Р PԼ ЬPР'P  `  PР PԼ<nU!T) +TT U Х5UԼ<@T1Ѥ' ѬU)'dUU T Ф5TԼ ЬPР'ЬPР/<('ЬPРЬPРЬPР ЬP< <('<ЬP( +ЬPР'ЬPР5AR0Rbv0PPbР30bPR,Rbg,PPbР,bPR(Rzbu(PPbР9(bPЬPQ73Р3PbQԠ3ЬϿ πSЬPRRcQQ `РPbRԠdcc `Ь<ЬPQ=9Р9PbQԠ9Ьd CREATEMBX<ЬQPRR%Ь QPSЬP !SSRPA=|~|~SRP%PQ?ЬP, `PЬQ<~FREEMSGЬPаQ԰Qa߮߮READMBX<ЬS^R|~|~c|~b<1~<(~ PpPbpbߢݬ߮zPRTRVMSGЬRвWgV}PDBLSORT$SETMRS>DBLSORT$SETNOSHR,DBLSORT$_BADCOUNT,DBLSORT$_BADDIR6DBLSORT$KEY_COMPARE;DBLSORT$MERGE_INPUT>DBLSORT$SETMRS>DBLSORT$SETNOSHR,DBLSORT$_BADCOUNT,DBLSORT$_BADDIR yKILLzLOCKM$EXITM$INITM$MSGM$PAWSM$PRMSM$RSUMM$SLCT{MNTPURGEPUTCMRCVIDRSTATDSETDFNSLICEFSORTCSRCVIDDBLMENU$$PARAMLOADDBLMENU$$PUT_OUTPUTDBLMENU$$SHOWTIMEDBLMENU$$SHOWTIME_RESET DBLMENU$EXIT DBLMENU$INITDBLMENU$MESSAGEDBLMENU$PARAMS DBLMENU$PAUSEDBLMENU$RESUMEDBLMENU$SELECTDBLMENU$TIMER_OFFDBLMENU$TIMER_ON DBLMENU$_BASEDBLMENU$_FACILITYDBLMENU$_HELP100DBLMENU$_HELP200 >DBLSORT$SETMRS@DSMNTpEMPBUFqENDFLrGETCMsGETDFNtGETFAuGLINEvGTENTwISMCRExJBNAM 1`Ҡ DIBOL V4.29$_ID_$ DIBOL V4.226-APR-1993 09:49 VAX MACRO V5.4-3JMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:LIBHEADER.MAR+DBLRTLMAC/LIB  $_ID_$ . ABS .Pww"1YҠ3.0-04ACCESS3.0-026-Apr-1993 09:4826-Apr-1993 09:48VAX Bliss-32 V4.6-902 ACCESS ACCESSPPACCESS DBL$_FACILITY DBL$_RTL_BASEDBL$_ENDOF_FILDBL$_RETNO_CAL DBL$_CMPERRDBL$_INCNUMARG DBL$_SUBERRDBL$_WRIINTLITDBL$_NOTENOMEMDBL$_ILLCHANUMDBL$_CHANOTOPNDBL$_INPFROWRIDBL$_CHADEFERR DBL$_UNDOPCDBL$_NUMTOOLONDBL$_CHAIN_USEDBL$_BADFIL#SPCDBL$_FILNOTFNDDBL$_HANNOTAVA DBL$_BADDIGIT DBL$_BADOPEN DBL$_IO_ERRORDBL$_LINTOOLNGDBL$_NO_SPAFILDBL$_OUTFILFULDBL$_FLDRECLNGDBL$_ILLRECNUMDBL$_INCCOMPILDBL$_DIVBYZERODBL$_ARGWROSIZDBL$_SUPEXIFILDBL$_TOOMNYCHNDBL$_DEVIN_USEDBL$_FILEINUSEDBL$_OUTTOREADDBL$_RECLOCKEDDBL$_ILEGALKEYDBL$_KEYNOTSAMDBL$_NODUPKEYSDBL$_NOTISMFILDBL$_JOBSTAERRDBL$_NO_CURREC DBL$_PROTVIOLDB$L$_NO_SUCOPRDBL$_RECNOTFND DBL$_SYSERRORDBL$_ARGOUTORDDBL$_ARGOUTLIM DBL$_ARGCOUNTDBL$_FLDNOTPAKDBL$_ILLBIOSIZDBL$_WROSIZREC DBL$_ARGMISS DBL$_RMSERRORDBL$_INVARGTYPDBL$_DBLRTLERR DBL$_FILE_ORGDBL$_OUTOFRANGDBL$_CALNOTDBL DBL$_EXQUOTADBL$_DEVNOTRDYDBL$_INVOPNMODDBL$_CONTROL_CDBL$_CONTROL_Y DBL$_TIMEOUTDBL$_OPENERROR DBL$_INVALLOCDBL$_INVBKTSIZDBL$_INVBLKSIZDBL$_INVBUFSIZ%DBL$_INVRECSIZ DBL$_NOMSGMGRDBL$_FEANOTIMPDBL$_QUENOTAVA DBL$_STOP DBL$_AT_LINE DBL$_PC_PSLDBL$_IOERRINFODBL$_NUMOFARGSDBL$_SUBSCRPT1DBL$_SUBSCRPT2 DBL$_ARG_NMBR DBL$_LOGCHAN DBL$_ARG_SIZE DBL$_VALUEDBL$_ALLSNDBUF DBL$_UNDEFLBL DBL$_OUTOFBND DBL$_WARNINGDBL$_STV DBL$_OPCODE DBL$_FILENAME DBL$_EXPIRED DBL$_NUMDIMS DBL$_BOUNDS DBLUTL$_TEXT DBL$$ERRTRANS DBL$$SIGNAL% DBL$CVTI&ZA_R1 ACCESS-   }Vlլ lլ~ݏ DBL$_ARGMISS DBL$$SIGNALf0fЬP<`Рf0ЬQ DBL$CVTIZA_R1PXl FIND_RIGHTS'# SYS$GETJPIW SYS$FIND_HELD> l 0   ^~|, |~~|~~ SYS$GETJPIWPSSSP DBL$$ERRTRANSSQ DBL$$SIGNALR^~B  SYS$FIND_HELDPSS'(S! RSP DBL$$ERRTRANSSQ DBL$$SIGNALRR?^N CHECK_RIGHTS  " ( WVV=0PQ"RPQ@VPPRVPЎV!PUGET_NEXT_RIGHT SYS$ASCTOID= U ;. ^ЏԮ RzRS:,SbQQ S|RQRRSPR ~  SYS$ASCTOIDPP+P!  DBL$$ERRTRANSQ DBL$$SIGNAL nЎP^  _DBL$DATA _DBL$DATA_DBL$CODE_NEVER _DBL$CODE_NEVERQUQ<Qlww1Ҡ0/BEGFL026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:BEGFL.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$BEGFL BEGFL BEGFL DBL$BEGFL . ABS .P _DBL$CODE"P DBL$BEGFL& DBL$BEGFL3 _DBL$CODEww1`Ҡ0/CHAIN026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:CHAIN.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$CHAIN CHAIN CHAIN DBL$CHAIN . ABS .P _DBL$CODE"P DBL$CHAIN& DBL$CHAIN3 _DBL$CODEww1dOӠ0/CVTIZ026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:CVTIZ.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$CVTIZ CVTIZ CVTIZ DBL$CVTIZ . ABS .P _DBL$CODE"P DBL$CVTIZ& DBL$CVTIZ3 _DBL$CODEww1`ʡӠ0/CVTZI026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:CVTZI.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$CVTZI CVTZI CVTZI DBL$CVTZI . ABS .P _DBL$CODE"P DBL$CVTZI& DBL$CVTZI3 _DBL$CODEww-14@Ӡ2.2-1: DBL$$SORTMSG2.2-126-APR-1993 09:5126-APR-1993 09:51VAX-11 Message V04-00k$ABS$" MSG$SECTIONMSG$AAAAAAAAAAAMSG$AAAAAAAAAABMSG$AAAAAAAAAAC@DBLSORT$_SORTVERSNDBLSORT$_EXITERRORS DBLSORT$_VAXSRTERRDBLSORT$_FILTOOBIGDBLSORT$_BADTTDBLSORT$_EXTRADBLSORT$_ENDMISDBLSORT$_BADDIRڐDBLSORT$_CHRMISҐDBLSORT$_.UNXRMSERRʐDBLSORT$_UNKSRTERRDBLSORT$_BADWRKDBLSORT$_INPINUSEDBLSORT$_NOCREOUTDBLSORT$_NORENAMEDBLSORT$_BADSIZEDBLSORT$_COUNTERRDBLSORT$_BADFILENAMEDBLSORT$_NOMEMORYDBLSORT$_NOPACKEDzDBLSORT$_TMFIELDSrDBLSORT$_CONFLICTjDBLSORT$_BADSPACEbDBLSORT$_BADCOUNTZDBLSORT$_TMDEVICESRDBLSORT$_MIXEDJDBLSORT$_BADTYPEBDBLSORT$_DEVICERR:DBL/SORT$_RECLENMIS2DBLSORT$_MSGTOOLNG*DBLSORT$_NODATAITEM"DBLSORT$_ERRORSDBLSORT$_OUTPUTMISDBLSORT$_INPUTMIS DBLSORT$_CHAINERRDBLSORT$_TMFILESDBLSORT$_KEYSMISDBLSORT$_TMKEYSDBLSORT$_SIZERRDBLSORT$_TYPERRڏDBLSORT$_KEYMATCHҏDBLSORT$_FILMISʏDBLSORT$_COMMISDBLSORT$_RECMISDBLSORT$_FILERRDBLSORT$_UNRECOGDBLSORT$_SYNTAXDBLSORTM$_BA0SEDBLSORTG$_BASE DBLSORT$_BASEDBLSORT$_FACILITYPeP*P'P" ( {2ZȏЏ؏ 2`H z(08@LHxPX`h<pnx4j:pȐА ؐ0 b 1 , \ $BASEBase for SORT errors$SYNTAXSyntax error [#001]:UNRECOG(Unrecognized directive or command [#002](FILERRFile name error [#003].RECMISRECORD command missing [#004]&COMMISComma missing [#005]*FILMISFile name missing [#006]2KEYMATCHControl key match error [#007](TYPERRData type error [#008].SIZERRSize definition error [#009]*TMKEYST2oo many sort keys [#010]2KEYSMIS Sort keys command missing [#011].TMFILESToo many merge files [#012].CHAINERRExecute/chain error [#013]0INPUTMISINPUT command missing [#014]2 OUTPUTMISOUTPUT command missing [#015]@ERRORS.Command file or message contains errors [#016]( NODATAITEMNo data item [#017]8 MSGTOOLNG$Message exceeds 40 characters [#018]2 RECLENMISRECLEN command missing [#019],DEVICERRDevice la3bel error [#020].BADTYPETAGSORT type invalid [#021].MIXEDMerge files type mixed [#022]4 TMDEVICES Work device list too long [#023]4BADCOUNT!Invalid input record count [#024]2BADSPACEInvalid space allocation [#025]<CONFLICT(SORT mode file name/type conflict [#026]HTMFIELDS5SORTGEN record description line count exceeded [#027]BNOPACKED/Packed decimal keys option unimplemented [#028]6NOMEMORY"Not enough memory alloc4ated [#029]4 BADFILENAMEBad file specification [#030]*COUNTERRSort count error [#031]*BADSIZEWrong record size [#032]HNORENAME4Unable to rename temp file to input file name [#033]6NOCREOUT#Unable to create output file [#034].INPINUSEInput file is in use [#035]4BADWRK#Invalid number of work files [#036]. UNKSRTERRUnknown SORT error [#037]0 UNXRMSERRUnexpected RMS error [#038]2CHRMIS!Expected character missing [#039].BADDIRInvalid sort direction [#040],ENDMISEND command missing [#041]:EXTRA)Extra characters at end of command [#042]6BADTT&Invalid terminal identification [#043]0 FILTOOBIGInput file too large [#044]j VAXSRTERRUError returned from VAX Sort/Merge [#045]!/!_Error code !XL (Hex), !-!UL (Dec), "!AC"( EXITERRORSExit due to errors( SORTVERSNVAX !AS Version !AS DBLSORTww17NԠ00TTFLGS026-APR-1993 09:49 VAX MACRO V5.4-3GMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TTFLGS.VEC+DBLRTLMAC/LIB"- Transfer vector for DBL$TTFLGS TTFLGS  DBL$TTFLGS TTFLGS . ABS .P _DBL$CODE$P DBL$TTFLGS& DBL$TTFLGS3 _DBL$CODEww71ԠVAX DIBOL V4.2 KDBLSORT$KEY_COMPAREVAX DIBOL V4.2 26-APR-1993 09:48 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:KEYCOMPAR.DBLP0000000 PP^,(n^QlTUT1U~RdT1U~RdT1U~R T1U~RT1U~ R8PPP9PcPYPAP{PPPU~P DBL$INIT851B ]T 6  H Q ^  ^ gNw    hT w3PsBP    jT wWPfPB w gw%BB  T    M   MhT w PPjT w PPB w 9f5wEgEw    hT w*Pj9P    jT wNP]P@B w gw    N   NhT wPP    fB wPPT w  g f. T P/Pw9P4PwP9P P1AqD18PIU0PPC$NUM$C$NKC$:C$TYP$C$DIR$C$POS$C$END$$%',123C S    SPPPP8SDBLSORT$KEY_COMPARE DBLSORT$KEY_COMPAREP DBL$INIT85C$NUM$C$NKC$C$TYP$C$DIR$C$POS$C$END$ DBLSORT$KEY_COMPARE$CODE$BIND$PDATA[$LOCAL8$ADDRS$REFRESH$BIND0ww<1ԠVAX DIBOL V4.2 KDBLSORT$MERGE_INPUTVAX DIBOL V4.2 26-APR-1993 09:48 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:MERGEINPT.DBLCP1011021031041051061071080PH^, n^QlTUT1U~RP1}`b0P =PT1U~RT1U~R T1U~RPPbP9PBPYPP|PU~=P DBL$INIT85|akwVP,PP,PVPP DBL$RSTAT0@pPP DBL$ERROR" *P*p8PP  C$NIN$C$CNT$PPP/DBLSORT$MERGE_INPUT  DBLSORT$MERGE_INPUTP DBL$INIT85 DBL$RSTAT DBL$ERRORC$NIN$C$CNT$ DBLSORT$MERGE_INPUT0$CODE$BIND$PDATA$LOCAL$ADDRS$REFRESH$BIND0ww?1@39ՠV3.0-0=DBLSORT$SETMRSV3.0-026-APR-1993 09:49 VAX MACRO V5.4-3JMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:DBLSETMRS.MAR+DBLRTLMAC/LIB DBLSORT$SETMRSC$RFM$C$RSZ$ . ABS .P($CODEP DBLSORT$SETMRS&ЬP$ABS$*PC$RSZ$6C$RFM$P DBLSORT$SETNOSHR&ЬP P8DBLSORT$SETMRSDBLSORT$SETNOSHR$CODE(wwA1ՠ0/DSMNT026-APR-1993 09:48 VAX DIBOL V4.2-073DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DSMNT.DBLPP8^,n^QlTUT1U~RP1}`b0P >PT1U~RP1}`bTP aPCPaPP@aPU~P DBL$INIT85rwyPP ]iwP+PB]5wQPKP]   SYS$DISMOU]@wPP\PP DBL$EXITERRORP1:87PP  PPPr DSMNT DSMNTP DBL$INIT85 SYS$DISMOU DBL$EXITERROR DSMNT $CODE$BIND $PDATA$LOCAL$ADDRS$REFRESH$BIND0wwD1jՠ00SRCVID026-APR-1993 09:48 VAX DIBOL V4.2-074DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:SRCVID.DBLPDBL$MBX_ P8^,n^QlTUT1U~RP1}`b0P =PT1U~RP1}`bSP aPBPaPP@aPU~P DBL$INIT85Q  Xw7P,P@E ] SYS$CREMBX]wxPcP SYS$DELMBX] SYS$DASSGN]P@PP  PPPrSRCVID SRCVIDP DBL$INIT85 SYS$CREMBX SYS$DELMBX SYS$DASSGN DBL$$W_SRCV_MBXCHAN$ SRCVID$CODE$BIND $PDATA$LOCAL$ADDRS$REFRESH$BIND0wwG1@W-֠VAX DIBOL V4.2 <SORTVAX DIBOL V4.2 26-APR-1993 09:48 VAX DIBOL V4.2-072DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:SORT.DBLP0  000F0  0(0 000000099y20    '0 (0000000 010110210H31041051061071080000000000 0          @     I 0 00 y   0 ?SORTWORK0  @ @PH^, n^QlTUT1U~RPJ1}`b0P =PT1U~RP1}`bSP `PT1U~R P1}`bvP PT1U~RP1}`bP PPPePAPBPdPPPU~P DBL$INIT85|youx@wOy4wOyM wOyFwOy wOP';1EPy|\PdP|P"P DBL$EXITSUB.D0^= T1<~ DIBOL042.B!8 [KITS.V42-07.KIT.B]DBLOSSL.OLB;1.|JK,PAP  Fq@AjAkATAUAVAWAXAYAZA[A\DrAvAuAwAxAyAzA}A~AAAAAAAAAAAAAA  @]|QjmjP*P]tST6HtPP DBL$PARSE#P/P SYS$CRELOG1ttj]tBPKPwCPPPPPP   ]gmgsPPL]zwPP]zm rPPlzPPlgPPlfP PlfPPf]uw;P6P]uwP@PfA{|o]{{]uw,P:P]uwPDPA{|SSt5ttGtwaPP]{{]uwMPP]u|zg|rPP DBL$RENAMQ|PP.yP#PMP3Pz/]WwIPFPAWCDn]X,E]YwiPfPAY YFn]Y+P9Pv LIB$FIND_FILE]|w=P^Pv LIB$FIND_FILE]||rwgPPvLIB$FIND_FILNE_END]|P P DBL$PARSEϜ WX\SOR$PASS_FILES]||rw PZPy{rwPm&PShSTgwH]UwgwI]UwJ]Uw ]hYUT\SOR$BEGIN_SORT]||rwPP\SOR$SORT_MERGE]||rwP!P\ SOR$END_SORT]O||rwPBPBz/]Ww[PXPAWCDn]X-G]Yw{"Px1PAY YFn]Y=PKPSSt5ttGttv LIB$FIND_FILE]|whPPttv LIB$FIND_FILE]||rwgP PvLIB$FIND_FILE_END]|w`PPՒP P DBL$PARSEP WX\SOR$PASS_FILES]||rwPPYPSSt5ttG t\SOR$PASS_FILES]||rwPPwnPPy{rwP&PShST]hYT\SOR$BEGIN_MERGE]||rwPn'P\ SOR$END_SORT]||rw?PHPBz S^QA~ SSt5ttGt ]at Q``gwa_\w gwa_\w g#w6a_\w gFw t g]wpa_\w gwa_\w gwa_\w gw a_\w gwa_\w wSw w g w t g4 wG a_\w gW wj a_\w gz w a_\w Rg w a_\w g w a_\w wSw w t fa_\w  P  Pa_\t a_Rt a_R~t S~wjPL  PzykyP]h P! P DBL$GETFA]ZST,E]Yw 7 P F PAY YFn]YR P ` PJ]U hYZDBLSORT$KEY_COMPAREUT\SOR$BEGIN_SORT]||rw P S P]yAy ]hyr1q h\SOR$RELEASE_REC]||rw P9  P P9  Pyrw  PG  P\SOR$SORT_MERGE]||rw Ph ! Pf^* P{ 4 PykzykyPSTSh-G]Yw T P c PAY YFn]Yo P } PhYTDBLSORT$KEY_COMPAREDBLSORT$MERGE_INPUT\SOR$BEGIN_MERGE]||Trw P  P]ykz]yk P P DBL$GETFAw PA  P PA  P  P P DBL$RSTAT1zf]w: PD P DBL$GETFAw0 P O P# P O Pg w ] Mw}g w9  SSt5ttGt ttntoMw  P  P PU P DBL$GETFAMw}gI w  SSt5ttGt ttntoMwY P DPvw}g w SSt5ttGt ttntoMw P Pvw}gw| SSt5ttGt ttntoMw'PYPPP DBL$GETFAMw}]yzgw [wjVgw  wjgwwjg+wC wjgSwiwjzA~ SiTu SSt5ttGt ut ut tlMt tmMt S~]~t SgtnRtoRt\TwJP#Ptn\to\tot\wLPOPzSSt5ttGttpRWttw3PLP}ft0twTPmPttt~PP DBL$GETFAtPP DBL$GETFAg]PPtPP DBL$GETFArgg ,\wPCPPCPPCPw_PHP}P P DBL$GETFAglw~SSXwPgw~]]]SwPgw~]]]~]wPgw~]]]]wPg,wO~]]]]wPflfPm&Pf]3P=P]f]gDBLSORT$SETMRSJPQP DBL$USEROPEN'PWP PWPfm}f`PkPff  Y\ M"  wPP2w9yPP"  ]xwTlP>P"  PP DBL$USEROPENPP DBL$GETFNMz]y]-P~7Pfw{?PHP [\SOR$RETURN_REC]||1jywnPP|pf]ywPPwyrwPZPufm fPP w PKP { wKP{4PP{4PSSt5ttGtwNP_P\ SOR$END_SORT]||rwwPPz^> T5>=?v48j678T8PP37j667T7PP26j6T6[P+P84T<73T;62T:9@v%  ux@w  w  w  yw  yw+PP ?  @ z q SSs5ssG sqs  wEP}6P j  k z|o*fwP\PB]{-,\wTB]{wT]{PP DBL$ERRORgw# ,\wNg3w@,\wNRwNwTB ,\]{wTTw]{!,\wTP  !-*p  SORT LIST INDEXRFA 01SYS$DISK:[].ISMSYS$DISK:[].DDF2P4816UALQXXXXXXXRFMBKSRSZORG.TMPZ,ZZZ,ZZZ,ZZX6024XX:XX:XXSYS$OUTPUTSort statistics Elapsed CPU time (tics): Elapse]d clock time (secs): Number of records input: File Number of records output: Number of key comparisons: 231718PP  FGOW        ^   !    X                    "#P FA_B$M_CBTpPP FAB$M_SUPxPP SOR$M_STABLEPP DBL$INIT85 DBL$EXITSUB DBL$PARSE SYS$CRELOG DBL$RENAM LIB$FIND_FILE LIB$FIND_FILELIB$FIND_FILE_END DBL$PARSESOR$PASS_FILESSOR$BEGIN_SORTSOR$SORT_MERGE SOR$END_SORT LIB$FIND_FILE LIB$FIND_FILELIB$FIND_FILE_END DBL$PARSESOR$PASS_FILESSOR$PASS_FILESSOR$BEGIN_MERGE SOR$END_SORT DBL$GETFADBL`SORT$KEY_COMPARESOR$BEGIN_SORTSOR$RELEASE_RECSOR$SORT_MERGEDBLSORT$KEY_COMPAREDBLSORT$MERGE_INPUTSOR$BEGIN_MERGE DBL$GETFA DBL$RSTAT DBL$GETFA DBL$GETFA DBL$GETFA DBL$GETFA DBL$GETFA DBL$GETFA DBL$GETFADBLSORT$SETMRS DBL$USEROPEN DBL$USEROPEN DBL$GETFNMSOR$RETURN_REC SOR$END_SORT DBL$ERROR FAB$M_CBT FAB$M_SUP SOR$M_STABLE SOR$M_MULTISOR$M_SEQ_CHECK SOR$GK_TAGSOR$GK_ADDRESS aSOR$GK_RECORD \ C$RSZ$ ` C$RFM$ d C$LRL$ h C$NUM$ l C$NOU$ p C$NKC$ t C$TYP$ SOR$M_MULTIPPSOR$M_SEQ_CHECKPP SOR$GK_TAGPPSOR$GK_ADDRESSPP SOR$GK_RECORDP               b   B   Z [ $%&'\ ` d h l p t |                       $ c( , 0 4 5 7 ; ? C G g h i l p  ?()*+,-./49>CH @@QLM @d  N] l  Em:noprsC  &v . 6 > F} N    e6 VSkPPPP`>SORT SORTP | C$DIR$  C$POS$  C$END$  C$CNT$  C$NIN$ SORT?$CODE$BIND$PDATA^$LOCAL`$ADDRS$REFRESH$BIND0ww1 ֠0/TBBIN026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBBIN.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TBBIN TBBIN DBL$TBBIN TBBIN . ABS .P _DBL$CODE"P DBL$TBBIN& DBL$TBBIN3 _DBL$CODEww1W֠0/TBDUT026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBDUT.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TABLE TBDUT DBL$TABLE TBDUT . ABS .P _DBL$CODE"P DBL$TABLE& DBL$TABLE3 _DBL$CODEww1<נ0/TBENG026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBENG.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TABLE TBENG DBL$TABLE TBENG . ABS .P _DBL$CODE"P DBL$TABLE& DBL$TABLE3 _DBL$CODEww1=נ0/TBFRE026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBFRE.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TABLE TBFRE DBL$TABLE TBFRE . ABS .P _DBL$CODE"P DBL$TABLE& DBL$TABLE3 _DBL$CODEww1@נ0/TBGER026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBGER.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TABLE TBGER DBL$TABLE TBGER . ABS .P _DBL$CODE"P DBL$TABLE& DBL$TABLE3 _DBL$CODEww1@ .ؠ0/TBMOD026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBMOD.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TBMOD TBMOD DBL$TBMOD TBMOD . ABS .P _DBL$CODE"P DBL$TBMOD& DBL$TBMOD3 _DBL$CODEww1Tzؠ0/TBMUL026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBMUL.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TBMUL TBMUL DBL$TBMUL TBMUL . ABS .P _DBL$CODE"P DBL$TBMUL& DBL$TBMUL3 _DBL$CODEww1 ؠ0/TBRPL026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBRPL.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TBRPL TBRPL DBL$TBRPL TBRPL . ABS .P _DBL$CODE"P DBL$TBRPL& DBL$TBRPL3 _DBL$CODEww1`d٠0/TBRET026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TBRET.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TBRET TBRET DBL$TBRET TBRET . ABS .P _DBL$CODE"P DBL$TBRET& DBL$TBRET3 _DBL$CODEww1]٠0/ULOCK026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:ULOCK.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$ULOCK ULOCK DBL$ULOCK ULOCK . ABS .P _DBL$CODE"P DBL$ULOCK& DBL$ULOCK3 _DBL$CODEww1٠00EMPBUF026-APR-1993 09:49 VAX MACRO V5.4-3GMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:EMPBUF.VEC+DBLRTLMAC/LIB"- Transfer vector for DBL$EMPBUF EMPBUF  DBL$EMPBUF EMPBUF . ABS .P _DBL$CODE$P DBL$EMPBUF& DBL$EMPBUF3 _DBL$CODEww1٠0/ENDFL026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:ENDFL.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$ENDFL ENDFL DBL$ENDFL ENDFL . ABS .P _DBL$CODE"P DBL$ENDFL& DBL$ENDFL3 _DBL$CODEww1@%Gڠ0/GETCM026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:GETCM.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$GETCM GETCM DBL$GETCM GETCM . ABS .P _DBL$CODE"P DBL$GETCM& DBL$GETCM3 _DBL$CODEww1@cڠ00GETDFN026-APR-1993 09:50 VAX MACRO V5.4-3GMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:GETDFN.VEC+DBLRTLMAC/LIB"- Transfer vector for DBL$GETDFN GETDFN  DBL$GETDFN GETDFN . ABS .P _DBL$CODE$P DBL$GETDFN& DBL$GETDFN3 _DBL$CODEww1ڠ0/GETFA026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:GETFA.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$GETFA GETFA DBL$GETFA GETFA . ABS .P _DBL$CODE"P DBL$GETFA& DBL$GETFA3 _DBL$CODEww1,۠0/GLINE026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:GLINE.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$GLINE GLINE DBL$GLINE GLINE . ABS .P _DBL$CODE"P DBL$GLINE& DBL$GLINE3 _DBL$CODEww1 |۠0/GTENT026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:GTENT.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$GTENT GTENT DBL$GTENT GTENT . ABS .P _DBL$CODE"P DBL$GTENT& DBL$GTENT3 _DBL$CODEww1۠00ISMCRE026-APR-1993 09:50 VAX MACRO V5.4-3GMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:ISMCRE.VEC+DBLRTLMAC/LIB"- Transfer vector for DBL$ISMCRE ISMCRE  DBL$ISMCRE ISMCRE . ABS .P _DBL$CODE$P DBL$ISMCRE& DBL$ISMCRE3 _DBL$CODEww1$ܠ0/JBNAM026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:JBNAM.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$JBNAM JBNAM DBL$JBNAM JBNAM . ABS .P _DBL$CODE"P DBL$JBNAM& DBL$JBNAM3 _DBL$CODEww1@xܠ0.KILL026-APR-1993 09:50 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:KILL.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$KILL KILLDBL$KILL KILL . ABS .P _DBL$CODE P DBL$KILL&DBL$KILL3 _DBL$CODEww1ܠ0.LOCK026-APR-1993 09:49 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:LOCK.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$LOCK LOCKDBL$LOCK LOCK . ABS .P _DBL$CODE P DBL$LOCK&DBL$LOCK3 _DBL$CODEww|1 ݠ0-MNT026-APR-1993 09:48 VAX DIBOL V4.2-071DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:MNT.DBLP    P@^,n^QlTUT1U~RP1}`b0P >PT1U~RP1}`bTP aPT1U~R P1}`bwP PfP}PCP@PPdPU~P DBL$INIT85]mPP@]P&PrwP5P ]iwPPP]iwPqP]5   LIB$GETDVI]rw?PHPf]PP]P  \ \ \ @  \ \~  \ @  \ \ \ @  SYS$MOUNT]@w PP\ P$P DBL$EXITERROR+P/P DBL$EXITERRORP@1:1787PP   (Hh(XYZ[_ !"$  $  $  $  $  $ PPP(7cMNT MNTP DBL$INIT85 LIB$GETDVI SYS$MOUNT DBL$EXITERROR DBL$EXITERROR MNT8$CODE$BIND&$PDATAc$LOCAL$ADDRS$REFRESH$BIND0ww1oݠ0/PURGE026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:PURGE.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$PURGE PURGE DBL$PURGE PURGE . ABS .P _DBL$CODE"P DBL$PURGE& DBL$PURGE3 _DBL$CODEww1ݠ0/PUTCM026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:PUTCM.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$PUTCM PUTCM DBL$PUTCM PUTCM . ABS .P _DBL$CODE"P DBL$PUTCM& DBL$PUTCM3 _DBL$CODEww1`Vޠ0/RCVID026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:RCVID.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$RCVID RCVID DBL$RCVID RCVID . ABS .P _DBL$CODE"P DBL$RCVID& DBL$RCVID3 _DBL$CODEww1Bsޠ00RSTATD026-APR-1993 09:49 VAX MACRO V5.4-3GMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:RSTATD.VEC+DBLRTLMAC/LIB"- Transfer vector for DBL$RSTATD RSTATD  DBL$RSTATD RSTATD . ABS .P _DBL$CODE$P DBL$RSTATD& DBL$RSTATD3 _DBL$CODEww1`ޠ00SETDFN026-APR-1993 09:49 VAX MACRO V5.4-3GMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:SETDFN.VEC+DBLRTLMAC/LIB"- Transfer vector for DBL$SETDFN SETDFN  DBL$SETDFN SETDFN . ABS .P _DBL$CODE$P DBL$SETDFN& DBL$SETDFN3 _DBL$CODEww1Bߠ0/SLICE026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:SLICE.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$SLICE SLICE DBL$SLICE SLICE . ABS .P _DBL$CODE"P DBL$SLICE& DBL$SLICE3 _DBL$CODEww1ߠ0/SSEND026-APR-1993 09:48 VAX DIBOL V4.2-073DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:SSEND.DBLPDBL$MBX_ P@^,n^QlTUT1U~RP1}`b0P =PT1U~RP1}`bSP `PT1U~R P1}`bvP PePPBP@PPcPU~P DBL$INIT85Q  SYS$ASSIGN]   SYS$QIO]Pw P SYS$DASSGN]AP+P\PPPP IO$_WRITEVBLK`P  PIO$M_NOWhPPPP@O~ DIBOL042.B!8 [KITS.V42-07.KIT.B]DBLOSSL.OLB;1s|5SSEND SSENDP DBL$INIT85 SYS$ASSIGNSYS$QIO SYS$DASSGN IO$_WRITEVBLKIO$M_NOW SSEND6$CODE$BIND$PDATA$LOCAL$ADDRS$REFRESH$BIND0ww1࠹0/SRECV026-APR-1993 09:48 VAX DIBOL V4.2-073DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:SRECV.DBLPP8^,n^QlTUT1U~RP1}`b0P =PT1U~RP1}`bSP aPBPaPP@aPU~P DBL$INIT85  SYS$QIO]\wsPfP@@PPPP IO$_READVBLK`P  PIO$M_NOWhPDBL$$W_SRCV_MBXCHAN$PPPr SRECV SRECVP DBL$INIT85SYS$QIO IO$_READVBLKIO$M_NOWDBL$$W_SRCV_MBXCHAN$ SRECV$CODE$BIND$PDATA $LOCAL$ADDRS$REFRESH$BIND0ww1g࠹0/XSTAT026-APR-1993 09:49 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:XSTAT.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$XSTAT XSTAT DBL$XSTAT XSTAT . ABS .P _DBL$CODE"P DBL$XSTAT& DBL$XSTAT3 _DBL$CODEww18 ࠹1.1 JDBLMENU$$COMMONDEF1.1 26-APR-1993 09:48 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNUCDF.DBLP  0255254 000000 0 0 Q002 P P P P P00000 P0DBLMENU$SEQ_0  X0(0(00010000     @8000  ( (0 ( PP(^,n^QlTUU~P DBL$INIT85PP    -9Q:2PPP^PPNPRTVPX, TD FFHJMP.S # @p9999:.:V:PPP),:DBLMENU$$COMMONDEF DBLMENU$$COMMONDEFP DBL$INIT85 M$TYP$ M$TT$ M$CH$  M$TCH$  M$ROW$  M$COL$ M$DM$ M$DP$ M$CLM$ M$DML$ M$PID$ -M$JBN$ 9M$KMX$ :M$MSG$ M$NTM$  M$TTATTRLIST$  M$TTATTR$ M$SEL$ M$HLP$ ^M$NHE$ M$SRY$ M$IPS$ NM$SSZ$ PM$HSZ$ RM$NSZ$ TM$SRZ$ VM$IPZ$ XM$HIP$ M$HIZ$ M$MSL$ M$SEQ$ M$PGM$ M$FS$ M$MNM$ ,M$INM$ TM$JNM$ DM$SP$ FM$CTS$ FM$VER$ HM$NME$ JM$NIE$ MM$NPE$ PM$NGE$ SM$MNU$  M$GRP$  M$ITM$ pM$SBF$ 9M$BSZ$ 9M$PNM$ 9M$PLN$ 9M$POF$ :M$PCG$ .:M$ULN$ V:M$UAD$ DBLMENU$$COMMONDEF-$CODE$BIND$PDATA:$LOCAL$ADDRS$REFRESH$BIND0ww1 Hᠹ1.0 FDBLMENU$$DESIZ1.0 26-APR-1993 09:48 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNUDIZ.DBLP  0P@^,n^QlTUT1U~RP1}`b0P =PT1U~RP1}`bSP aPT1U~R P1}`bwP PfPPBPAPPdPU~P DBL$INIT85PPDBL$SIZEQ  PP DBL$CVTIZ PP DBL$CVTIZzPPPPPpDBLMENU$$DESIZ DBLMENU$$DESIZP DBL$INIT85DBL$SIZE DBL$CVTIZ DBL$CVTIZ DBLMENU$$DESIZ$CODE$BIND$PDATA$LOCALp$ADDRS$REFRESH$BIND0ww1ᠹ1.1 IDBLMENU$$LOADMENU1.1 26-APR-1993 09:48 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNULOD.DBLP 00     00 00 0 0      2012102010SYS$DISK:[].MNU0000  d000422785280260170777280 000P8^,n^QlTUT1U~RP1}`b0P =PT1U~RP1}`bSP `PBP`PP?`PU~P DBL$INIT85|xP|P DBL$SETDFN|/|  S-S.,.^K-.,T!$S/,T6H/,T !!$ M!,!0$ M!1!2$ M!3T!wPWPwRP\P  @PhP# ,M|:S4,T6H4 wP:P|PPDBL$SIZE5jyP_P|0f  S6,T6H6 wPPPPPP|S7,T6H7 w4POP|S89S:,:^K8:;#wrP#PҒPPDBLMENU$$PARAMLOAD,T)0fS<,T6H< Q#g%PP DBL$CVTIZ&PP DBL$CVTIZ%%&,'PPACCESS'r%%P,P DBL$CVTIZ5%=%=R.T M PWPPWPwRP\PP\Pw}2T+0T*(+">*T))PP DBL$EXITSUBQ""uS?,T6H? Qu"fRPdPw6PiPzP12345049108PPM$CH$M$MNM$M$SP$ M$CTS$M$VER$M$NME$M$NIE$M$NPE$M$NGE$.M$MNU$M$GRP$#M$ITM$@M$SBF$M$BSZ$M$PNM$M$PLN$M$POF$M$PCG$.#/=HHJKV\kosw{d  !+, 4 < D     L  T \ d  l t |4PPPPPq4DBLMENU$$LOADMENU DBLMENU$$LOADMENUP DBL$INIT85 DBL$SETDFNDBL$SIZEDBLMENU$$PARAMLOAD DBL$CVTIZ DBL$CVTIZACCESS DBL$CVTIZ DBL$EXITSUBM$CH$M$MNM$M$SP$M$CTS$M$VER$M$NME$M$NIE$M$NPE$M$NGE$M$MNU$M$GRP$M$ITM$M$SBF$M$BSZ$M$PNM$M$PLN$M$POF$M$PCG$ DBLMENU$$LOADMENU$CODE$BIND$PDATA$LOCALP$ADDRS$REFRESH$BIND0ww1@z⠹1.0-3?DBLMENU$$MESSAGES1.0-326-APR-1993 09:5126-APR-1993 09:51VAX-11 Message V04-00k$ABS$ MSG$SECTIONMSG$AAAAAAAAAAAMSG$AAAAAAAAAABMSG$AAAAAAAAAAC'DBLMENU$_HELP100DBLMENU$_HELP200DBLMENU$_PRESSCTRLZDBLMENU$_PRESSEXITDBLMENU$_PRESSRETURNDBLMENU$_PRESSRESUME{DBLMENU$_SELECT_RETsDBLMENU$_SELECT_DO0DBLMENU$_INSUFPRIV*DBLMENU$_INVMISSARG DBLMENU$_NOHELPDBLMENU$_TTNOTANSIDBLMENU$_USERABORT DBLMENU$_NOMENUDISPDBLMENU$_MENUFILEDBLMENU$_MSLERRORDBLMENU$_SEQLISTDBLMENU$_TTACCESS DBLMENU$_BASEDBLMENU$_FACILITYPeP*P'P({"V F(t0pxHT.BASEBase for MENU Subroutine errors,TTACCESSError accessing terminal4SEQLIST"Error accessing menu sequence list:MSLERROR'More than 10 menu sequence list records,MENUFILEError accessing menu file* NOMENUDISPNo menu is displayed, USERABORTMenu was aborted by user4 TTNOTANSI Terminal is not an ANSI-mode CRT.NOHELPSorry, help is not available.0 INVMISSARGInvalid or missing argument> INSUFPRIV)Insufficient privilege for this selection0 SELECT_DOSelect option and press Do: 6 SELECT_RET Select option and press RETURN: N PRESSRESUME7Press Resume to continue or Exit to return to the menu P PRESSRETURN9Press RETURN to continue or CTRL/Z to return to the menu 6 PRESSEXIT!Press Exit to return to the menu 8 PRESSCTRLZ#Press CTRL/Z to return to the menu 6HELP200$Enter help topic or Exit or Cancel: JHELP1008Enter help topic or CTRL/Z to exit or GOLD-K to cancel: DBLMENUww 1㠹2.0-2=DBLMENU$$OUTPUT2.0-226-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:DBLMNUOUT+DBLRTLMAC/LIBMiscellaneous OutputDBLMENU$$OUTPUTDBLMENU$_NOHELP LBR$CLOSE LBR$GET_HELPLBR$INI_CONTROLLBR$OPENM$CLM$M$DM$M$TCH$ SYS$BINTIM SYS$CANTIMSYS$FAOSYS$QIO SYS$SETIMR SYS$WAITFR . ABS .P$ABS$P$LOCALP37!11%D!5%T8Q&Q!'37!AD8Q&QEQK30 00:01:00.00Q &QQ $CODEPSHUTDOWN7[?6l8 ' !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ ' &DBLMENU$$BROADCAST&}V9VgZ.VgVgWV=E#SYS$FAO<EP|~|~PE|~PT1U~RP1}`bTP aPT1U~R P1}`bwP PT1U~RP1}`bP PPPfP?PCPbPPPU~P DBL$INIT85|RMNPP DBL$FLAGS>B>' PPDBL$SIZEP-PBPPDBL$SIZEBOjT6wVPS PB63T Q  u P#PDBL$JBNOB*P1PDBL$SIZEBOjQ?w@POPD??uNT@8]PaP DBL$TNMBR8Ohw pPyP 7 PP DBL$TTCHAR  2*TDBLMENU$_SELECT_DOPP SYS$GETMSGDBLMENU$_PRESSRESUMEPP SYS$GETMSGDBLMENU$_PRESSEXITPP SYS$GETMSGDBLMENU$_HELP200!P8P SYS$GETMSGw PCP)TDBLMENU$_SELECT_RETJPaP SYS$GETMSGDBLMENU$_PRESSRETURNhPP SYS$GETMSGDBLMENU$_PRESSCTRLZPP SYS$GETMSGDBLMENU$_HELP100PP SYS$GETMSGDBLMENU$_NOHELPPP SYS$GETMSGDBLMENU$_INSUFPRIVPP SYS$GETMSGPP DBL$CVTIZ PP DBL$CVTIZP!P DBL$CVTIZ(P/P DBL$CVTIZ6P=P DBL$CVTIZDPKP DBL$CVTIZwPVPwAP<\PfP DBL$GETFA<mPtP DBL$CVTZI+SQNT;6;;HQA;%MA;&MA;$MwPPB"5wPP|(SRNT"6""HR"T-PP SYS$TRNLOGG PP DBL$XSTATGLfw Pq)P1"M0"M."R/" R2"!Rw"P`Pw "NT"|R?=gyd|PPD0"Oiw6PPy/Oiw6PP,TNPP DBL$EXITSUBNTJwGSTJwGTTJwGUTJwGVTJwGWTJETKwcJ PP DBL$ERRORCTK}STIKCg}wDJ"XITGwEgwFJ"XITGwyBGPP DBL$EXITSUBPP DBL$SETDFNzyBPPDBL$SIZEBOj0PPDBLMENU$$LOADMENUw#PP0PPDBLMENU$$LOADMENUGHPP DBL$XSTATHrw+P?P.Oil.#jPT PN"R PcPz Q1?Q0@T. T2NSYZS["[^;;KY[1;f4r0;f;T"z{PPwkPP;T"zbPPwRPPNT/"(h2"wPP DBL$INIT85 DBL$FLAGSDBL$SIZEDBL$SIZEDBL$JBNODBL$SIZE DBL$TNMBR DBL$TTCHARDBLMENU$_SELECT_DO SYS$GETMSGDBLMENU$_PRESSRESUME SYS$GETMSGDBLMENU$_PRESSEXIT SYS$GETMSGDBLMENU$_HELP200 SYS$GETMSGDBLMENU$_SELECT_RET SYS$GETMSGDBLMENU$_PRESSRETURN SYS$GETMSGDBLMENU$_PRESSCTRLZ SYS$GETMSGDBLMENU$_HELP100 SYS$GETMSGDBLMENU$_NOHELP SYS$GETMSGDBLMENU$_INSUFPRIV SYS$GETMSG DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$GETFA DBL$CVTZI SYS$TRNLOG DBL$XSTAT DBL$EXITSUB DBL$ERROR DBL$EXITSUB DBL$SETDFNDBL$SIZEDBLMENU$$LOADMENUDBLMENU$$LOADMENU DBL$XSTATM$TYP$M$TT$M$CH$M$TCH$M$ROW$M$COL$M$DM$M$PID$M$JBN$M$KMX$M$NTM$ M$TTATTRLIST$ M$TTATTR$M$SEL$M$HLP$M$NHE$M$SRY$M$IPS$M$SSZ$M$HSZ$M$NSZ$M$SRZ$M$IPZ$w y3z"Q1"Q0"T." T/"!T2z1"M0"M."R/" R2"!RzP210000000SCH34578qPPM$TYP$M$TT$M$CH$M$TCH$M$ROW$M$COL$M$DM$M$PID$ M$JBN$M$KMX$M$NTM$2 M$TTATTRLIST$ M$TTATTR$PM$SEL$PM$HLP$PM$NHE$PM$SRY$PM$IPS$M$SSZ$M$HSZ$M$NSZ$M$SRZ$M$IPZ$PM$HIP$M$HIZ$M$MSL$M$SEQ$M$PGM$M$FS$M$MNM$M$INM$ M$JNM$M$SP$M$NME$M$PNM$M$ULN$M$UAD$3RTUXZ\\^@`@  (%&DFJNPWZ blmnrv    z    zPPPP0 z DBLMENU$INIT DBLMENU$INITPM$HIP$M$HIZ$M$MSL$M$SEQ$M$PGM$M$FS$M$MNM$M$INM$M$JNM$M$SP$M$NME$M$PNM$M$ULN$M$UAD$  DBLMENU$INIT!$CODE$BIND$PDATA$LOCAL0$ADDRS$REFRESH$BIND0ww1`j䠹1.0-1 GDBLMENU$MESSAGE1.0-1 26-APR-1993 09:49 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNUMES.DBLDP 000[0;01HP8^,n^QlTUT1U~RP1}`b0P >PT1U~RP1}`bTP aPCPaPP@aPU~P DBL$INIT85 tP{PDBL$SIZE  jTw*P'PBQw_P=P  M  QMTT  PPzP01PPM$DML$QM$MSG$M$TT$M$ROW$ PPPr DBLMENU$MESSAGE  DBLMENU$MESSAGEP DBL$INIT85DBL$SIZEM$DML$M$MSG$M$TT$M$ROW$ DBLMENU$MESSAGE$CODE$BIND $PDATA $LOCAL$ADDRS$REFRESH$BIND0ww1`R䠹1.0-3<DBLMENU$PARAMS1.0-326-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:DBLMNUPRM+DBLRTLMAC/LIB DBLMENU$PARAMSj DBL$CVTZIA_R1M$DP$M$PCG$M$PLN$M$PNM$M$POF$M$SBF$M$UAD$M$ULN$ . ABS .P _DBL$CODE&PDBLMENU$PARAMSQQ DBLMENU$PARAMS&4lVVЬQ DBL$CVTZIA_R1P6+4&3+4&P0 1M$DP$lRRRRBP}`PRSPM$ULN$CQM$UAD$C1M$PCG$CRמM$SBF$WM$PNM$XM$PLN$YM$POF$ZR)R<M$ULN$BPM$UAD$BQWQ堹1.1 FDBLMENU$SELECT1.1 26-APR-1993 09:49 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNUSEL.DBLP 00     00 00 0 0      20121020100123456789012010203040506070809000000000 @ @0 SYS$DISK:[].MNUSYS$HELP:.HLP000 0  000000 000 0000 0  P0000123 P0000->  [?4l 107075104072109077 0[0;01H[0;01H070[0;0H4227852802601707772800 0000000 P8000q123456789101112131415 0030100130210230250261272562572582592742752762772862872882892902912922932942952963165110112240112243841653266471288256951210102411204812409613819214163840 P0   0000000 @0000014456352Pp^,Hn^QlTUT1U~RP1}`b0P >PT1U~RP1}`bTP bPT1U~R P1}`bxP PT1U~RP1}`bP PT1U~ RN~ DIBOL042.B!8 [KITS.V42-07.KIT.B]DBLOSSL.OLB;1e\P1}`bP PT1U~(RP1}`bP PT1U~0RP1}`bP PT1U~8R P1}`b*P 7PT1U~@R$P1}`bMP ZP<PZPP?ZPPcZPPZPPZPPZPgPZPCPZPP9ZPU~P DBL$INIT85| rPyP DBL$FLAGSPP DBL$FLAGSPP DBL$TTFLGSPP DBL$TTFLGSTTT@@RPPDBL$SIZEjTfwPPBfbKTPPP PDBL$SIZEjKTuwP'PBu+P2PDBL$SIZEjKTvwAPPPBvTP[PDBL$SIZEjKTwwjPyPBwDBLMENU$$BROADCAST}PP DBL$TTBRDCSTrPPDBLMENU$TIMER_ONP6PlcPAPyQBBBcwPYPrPP DBL$TTSTSrlP|Pl PPByPPPPrPPDBLMENU$$SHOWTIMEP Py ByP"P yy(&P4PQ >PZPBsBDBTTT Ty#g.w9yo wgIwTyN wgdwoyC wgwy8 wry PPgw {P/P DBL$INSTR{ {Qrw9PPP Qrruywfw!g!w,y wg<wGy;"wgWwby"wȀgrw}ye!wgwy!wgwyTswgwy"wgwTswwwsrwxPPsx( v>Tg@w{j{Mw{RPwPwP|P@w@PPwUgw{j{Mw{R2PCPwPHPyvw@w@[PcPwPiPyAoPvP DBL$CVTIZB}PP DBL$CVTIZ<k2w( .<SgFw_.\R&MuRPyPGPP DBL$CVTIZHPP DBL$CVTIZv&MPPwR P+PwP0PBcQ KTtww# LfwMgwXBcQ KTtww# Nghw _.WR&MuRPPGPP DBL$CVTIZHPP DBL$CVTIZv&M&P>PwRBPMPwPRPBcQ KTtww# Og0w_.XR&MGPP DBL$CVTIZHPP DBL$CVTIZv&MPPwRP PwP PBcQ KTtww# Pgw_.YR&MuR| P PG P P DBL$CVTIZH P P DBL$CVTIZv&M PT PwR Pc PwY Ph PBcQ KTtww# QgwZ _.XR&MGA PH P DBL$CVTIZHO PV P DBL$CVTIZv&M` P x PwR| P  PwU ! P!  PBcQ KTtww# Rgj w" _.ZR&MuR P  PG P P DBL$CVTIZH P P DBL$CVTIZv&M( P @ PwRD P O Pw  P T PBcQ KTtww# w( Sg8 wh \R&MuR Pc  Pw( Lgx w iQy=Ozylyj ww( Mg w &QyTzylDiyj ww( Ng w WR&MuRu P  Pw( Og* wK XR&Mw( Pg[ w YR&MuR P  Pw( Qg w !jy!sx( ww  P 2 PXR&Mw( Rg w' ZR&MuR P"  Pw( y! yu* P P DBL$EXITSUBTw Tw Tw Tw Tw  Tw  TTw PP DBL$ERRORTw }Tg w " Tw g w " Tw y! yu*PP DBL$EXITSUBrPPDBLMENU$TIMER_OFFP2 P PP DBL$TTBRDCSTPP DBL$SETDFNPP DBL$FLAGSPP DBL$TTFLGSzi!fwQP Pyj gk fVRjMzw P PXRRzP ,PE-P4P DBL$CVTIZF;PBP DBL$CVTIZi&QPfPDBLMENU$$LOADMENUwLPqPirPvPDBLMENU$$LOADMENU}PP DBL$XSTATrw P-Pgilg"jPBP!RPQPy\yzyg$Q+h,hlh-jPP,ThPPzQ z##S Tn6nnH n'o.P9P DBL$CVTIZo*n)KPVP DBL$CVTIZn(]PhP DBL$CVTIZkmiwPP &P8PFP8Pw)P=P  *@PKPz;fywPcP?PP DBL$CVTIZ@PP DBL$CVTIZ&Qqq gwywgw&a]Rj&MuR]PhPw=PmP@u@uP}Pw( w!)PPywg6wsBcQ&KTtwywBsz QTw QTBsBDBBBTbPiP DBL$FLAGSy#fw,g,w8TswvfHwXgXwdTswvwvsrwPPPP DBL$FLAGSQzBB&QT $P:P DBL$INSTRrTEPRP QhQTyTwFmP/PDBBBTyQPP DBL$INSTRKT QwPPBBQ"                    PPDBLMENU$$GET_HELPPP DBL$XSTATrmfPPj @@TRTBs P]P wlPPPPBsBPP DBL$CVTIZKTcj  PwPiP TTTST6HiQ~APHP DBL$CVTIZ~  fTw%iP xP ~RP%P2w23P-Pwlw&P7Py#sgrwPOPwlPTPysxsxysfwPP| z KTtBQ Tw6PdP TwTKTQ TBsBDBBTTy#gwTswgwTswgwdj @@ThTlP vPRTTskKTw?P<PBwO<PDPw_/PTPwftwgwTswPPwfwgwmh@PLPfBwZPfPT@22RRT MTsBwfMP[Pw8PkPTswP~PwwsrwoPPQzTST6H @PVP DBL$INSTRRRTw=`PPRRwKw;PBPTTST6H@RwcPPz|mPP DBL$SETDFN&}~&P*P DBL$RSTAT|KTc~ ~}w?PdPTTST6H}~PP DBL$RSTAT~  }fTwPP ~}PPw2PPysfrwP P| z| yzBc| Q KTtyz{PP DBL$TTSTSBy wP2PT|B /g3PP DBL$CVTIZ4PP DBL$CVTIZj&"SS^ppKpp&wPEPp&wPjP&TTP)P| .fwP@P1PP DBL$CVTIZ2PP DBL$CVTIZ|lPP DBL$SETDFN&}~PP DBL$RSTAT~j ~}wP,P  w|  yLPUPy rdPePDBLMENU$$SHOWTIME_PkPzBx-S,T|6||H|%Q58rfh|gy>|Thy PPPTxzPWPwP\P DBL$INIT85 DBL$FLAGS DBL$FLAGS DBL$TTFLGS DBL$TTFLGSDBL$SIZEDBL$SIZEDBL$SIZEDBL$SIZEDBLMENU$$BROADCAST DBL$TTBRDCSTDBLMENU$TIMER_ON DBL$TTSTSDBLMENU$$SHOWTIME DBL$INSTR DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$EXITSUB DBL$ERROR DBL$EXITSUBDBLMENU$TIMER_OFF DBL$TTBRDCST DBL$SETDFN DBL$FLAGS DBL$TTFLGS DBL$CVTIZ DBL$CVTIZDBLMENU$$LOADMENUDBLMENU$$LOADMENU DBL$XSTAT DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$FLAGS DBL$FLAGS DBL$INSTR DBL$INSTRDBLMENU$$GET_HELP DBL$XSTAT DBL$CVTIZ DBL$CVTIZ DBL$INSTR DBL$SETDFN DBL$RSTAT DBL$RSTAT DBL$TTSTS DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$CVTIZ DBL$SETDFN DBL$RSTATDBLMENU$$SHOWTIMEhT|h%Q5z Qj TkyQizTgTh!Ih2!wP PwX yz!Qj!Qi!Tg!Th! Tkzj!Mi!Mg!Rh!Rk! Rzh%Q56T7TTP=Pzh%Q56T7TPrPBPuPzCPP DBL$CVTIZDPP DBL$CVTIZQ&Q w P? PDBsBDBBTTTy#MwR P% Pg8wDTsw gTw_yt"w gowzy#w gwy"w gwTsw gwye!w gwy!w gw yTsw w srw !P( !Psx( z9T|w :T|w hT||,h-T|!Pj !Pw hT||-j,T|!P !Ph|gy>|Thh%Q5"P"P DBL$TTSTSry *"P 3"P!P 3"PrT8"P B"Pz {L"Pb"P DBL$INSTR{j{T{w!q"P!"PT{ {QrruyxTswY!"PH!"PBDwd!G"P^!"PTsz!jT!yj Tsw!"P!"PTsw!"P!#Pz!j!T!yj Tsw!1#P!@#PTsw"#P!K#Pe[R@RTsw"O#P"p#Pz`^R@Tsw:"#P/"#PzrByy"#PQ"#PyLcy"wm"#Ph"#Py"TzrBy#P"#PyLcy#w"#P"$Py#zyw" y$P"$$PQ .$P"N$PT R$P #w$PTzyw*# y$P*#$PQ wh#$PY#$PT $P#$PTzhQTnBTnT2%P#A%Pw$ %P#F%PDBnBTT_%P$r%PByw(lt~%P$%PBtB B D %P;$%P%P;$%P %PR$%Pge$wq$TwL(g$w$TwL(g$w$TwL(g$w$TwL(g$w$y)wL(g$w$y)wL(!h %w%"i%w;%#h+%wF%$j;%wF%y])wL(gV%wb%TwL(fr%w%g%w%TwL(g%w%TwL(g%w%TwL(g%w%TwL(g%w%TwL(f&w&g&w*&TwL(f:&wJ&gJ&wV&TwL(ff&wv&gv&w&y*wL(f&w&g&w&y)wL(g&w&TwL(f&w&g&w'dwy w'X(P&f(PTwL(g'w:(Jf(P(P DBL$FLAGSyw((P(P DBL$FLAGSfX'wh'gh'wt'Tw%(f'w'g'w'Tw%(f'w'g'w'Tw%(f'w'g'w'y*w%(g(w(Tw%(w%(w5((P*()PwL(wL(rw$)PZ()Pn nQ)Pp()PnTz)P)P DBL$TTSTSmr)P()P*P *P DBL$FLAGSw()P(*P*P*P DBL$FLAGSrmr'*P(/*PTw(0*P(?*PǥzP*PW*P DBL$FLAGSp^*Pe*P DBL$TTSTSpS%Tn6nnH%ǥw)*P-)*P*P*P DBL$FLAGSznjmni*PQ)*PT*P\)*Pznh2nn*P*P DBL$ASCIIy<)w)*P)*Pzyw(Tznn@nTny<)+P)4+PznS&'S(n(^nnK&(nfS)'S*n*^nnK)*ngwQ*+P;*+Pw*+P@*+PwQ*k+PE*+Pn@w)[+PQ*+PTnTy<)9+Pt*+Pz+P+PDBL$SIZEjiM+P*,P ,P ,PDBL$SIZEj0 M,P*$,PzDBnBTTzP2101000101010113 45678@*>10000/PR80512511 78032126161254qPPM$TYP$M$TT$M$CH$M$ROW$M$DM$M$DP$M$CLM$M$DML$M$PID$ M$JBN$M$KMX$QM$MSG$M$NTM$ M$TTATTR$PM$SEL$PM$HLP$PM$NHE$PM$SRY$PM$IPS$M$SSZ$M$HSZ$M$NSZ$M$SRZ$M$IPZ$PM$HIP$M$HIZ$M$PGM$M$FS$M$MNM$M$INM$ M$JNM$M$SP$M$NME$M$NPE$.M$MNU$#M$ITM$@M$SBF$M$PNM$M$PLN$M$POF$M$PCG$.    #//1368:=>A:<>@BDEGHJRTZ]^_`abcdghikmoqsuwy{|}~{@@  !.26: <FGHIJKLjlnqqux z PP7<AFKMQRSTWZ]behknqt _PACEGHIJKLMNOPQSUWY[]%(+.147:=@ILORUX[^adgjpsvRP R'(( (>(R(T(W(@Z((((((('      ( !"'* (  ( ( ( , ( (/ (2468;>A ( (D ( )  )(PPP P kL,(DBLMENU$SELECT  DBLMENU$SELECTP DBL$CVTIZ DBL$CVTIZ DBL$TTSTS DBL$INSTR DBL$FLAGS DBL$FLAGS DBL$TTSTS DBL$FLAGS DBL$FLAGS DBL$FLAGS DBL$TTSTS DBL$FLAGS DBL$ASCIIDBL$SIZEDBL$SIZEM$TYP$M$TT$M$CH$M$ROW$M$DM$M$DP$M$CLM$M$DML$M$PID$M$JBN$M$KMX$M$MSG$M$NTM$ M$TTATTR$M$SEL$M$HLP$M$NHE$M$SRY$M$IPS$M$SSZ$M$HSZ$M$NSZ$M$SRZ$M$IPZ$M$HIP$M$HIZ$M$PGM$M$FS$M$MNM$M$INM$M$JNM$M$SP$M$NME$M$NPE$M$MNU$M$ITM$M$SBF$M$PNM$M$PLN$M$POF$M$PCG$ DBLMENU$SELECTM,$CODE$BINDE$PDATA)$LOCAL $ADDRS$REFRESH$BIND0ww1Y堹2.0 E DBLMENU$PAUSE2.0 26-APR-1993 09:49 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNUPAW.DBLP 00422785280260170777280 000P0^,n^QlTUT1U~RP1}`b.P <PP<PU~P DBL$INIT85OPVPDBL$SIZE jTw*eP'tPB|XrPKPPKPB  T  "  P0182PPM$TYP$M$TT$,   PPPM4 DBLMENU$PAUSE DBLMENU$PAUSEP DBL$INIT85DBL$SIZEM$TYP$M$TT$  DBLMENU$PAUSE$CODE$BIND $PDATA4$LOCAL$ADDRS$REFRESH$BIND0ww 1I根2.0 FDBLMENU$RESUME2.0 26-APR-1993 09:49 VAX DIBOL V4.2-077DIBOL/NOLIST/NOSTANDARD/OPTIMIZE SOURCE:DBLMNURSM.DBLP 00     00 00 0 0      2012102010000422785280260170777280 000P0^,n^QlTUT1U~RP1}`b.P <PP<PU~P DBL$INIT85OPVPDBL$SIZEjTw*eP'tPB| PP DBL$TTCHAR 2  TwpPjP TPP DBL$GETFAPP DBL$CVTZI BwPPTT"P20TT:SCH18PPM$TYP$M$TT$M$TCH$M$ROW$M$COL$M$DM$2 M$TTATTRLIST$M M$TTATTR$TU\\]aq   PPPMDBLMENU$RESUME DBLMENU$RESUMEP+ DBL$INIT85DBL$SIZE DBL$TTCHAR DBL$GETFA DBL$CVTZIM$TYP$M$TT$M$TCH$M$ROW$M$COL$M$DM$ M$TTATTRLIST$ M$TTATTR$ DBLMENU$RESUME$CODE$BIND$PDATA$LOCAL$ADDRS$REFRESH$BIND0ww1 根00M$EXIT026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MEXIT.VEC+DBLRTLMAC/LIB$- Transfer vector for DBLMENU$EXIT M$EXIT" DBLMENU$EXIT M$EXIT . ABS .P _DBL$CODE(P DBLMENU$EXIT& DBLMENU$EXIT3 _DBL$CODEww1cv砹00M$INIT026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MINIT.VEC+DBLRTLMAC/LIB$- Transfer vector for DBLMENU$INIT M$INIT" DBLMENU$INIT M$INIT . ABS .P _DBL$CODE(P DBLMENU$INIT& DBLMENU$INIT3 _DBL$CODEww1砹0/M$MSG026-APR-1993 09:50 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MMSG.VEC+DBLRTLMAC/LIB'- Transfer vector for DBLMENU$MESSAGE M$MSG$DBLMENU$MESSAGE M$MSG . ABS .P _DBL$CODE.P DBLMENU$MESSAGE&DBLMENU$MESSAGE3 _DBL$CODEww1E蠹00M$PAWS026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MPAWS.VEC+DBLRTLMAC/LIB%- Transfer vector for DBLMENU$PAUSE M$PAWS# DBLMENU$PAUSE M$PAWS . ABS .P _DBL$CODE*P DBLMENU$PAUSE& DBLMENU$PAUSE3 _DBL$CODEww1f蠹00M$PRMS026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MPRMS.VEC+DBLRTLMAC/LIB&- Transfer vector for DBLMENU$PARAMS M$PRMS$DBLMENU$PARAMS M$PRMS . ABS .P _DBL$CODE,P DBLMENU$PARAMS&DBLMENU$PARAMS3 _DBL$CODEww1@頹00M$RSUM026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MRSUM.VEC+DBLRTLMAC/LIB&- Transfer vector for DBLMENU$RESUME M$RSUM$DBLMENU$RESUME M$RSUM . ABS .P _DBL$CODE,P DBLMENU$RESUME&DBLMENU$RESUME3 _DBL$CODEww1`ф頹00M$SLCT026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MSLCT.VEC+DBLRTLMAC/LIB&- Transfer vector for DBLMENU$SELECT M$SLCT$DBLMENU$SELECT M$SLCT . ABS .P _DBL$CODE,P DBLMENU$SELECT&DBLMENU$SELECT3 _DBL$CODEww"*[KITS.V42-07.KIT.B]DBLREADME.LIS;1+,4 .u/G 4Nuu-80123KPWOv56&87ԋ[|89@A GGHJ, DBLREADME) for3 VAX DIBOL Version V4.2/ Hints and KinksK VMS string functions can be called from DIBOL, with a small amount ofK "hacking" ability. When an alpha function is called, DIBOL internallyK generates a dynamic string descriptor, and passes this as the firstK argument to the function call. Most string functions requiri{~ DIBOL042.B4 8"[KITS.V42-07.KIT.B]DBLREADME.LIS;1Nu@e theK destination string to be the first argument, and to be dynamic strings. EXAMPLE:K STR$DUPL_CHAR, which returns a string of "n" duplicates of a+ character, has the following arguments:* dst_str destination string+ length how many duplicates3 char character to be duplicated.A The DIBOL program below puts 15 asterisks on the screen. EXTERNAL FUNCTION STR$DUPL_CHAR, A PROC OPEN (1, O, "TT:")B WRITES (1, %STR$DUPL_CHAR(%REF(%INTEGER(15)), %REF("*"))) CLOSE 1 ENDK Many applications which call VMS system services use an XCALL followedK by an XCALL XSTAT to get the status. These calls may be recoded using@ EXTERNAL FUNCTION, and calling the system service in line.G The true-boolean operators (.BAND., .BOR., .BXOR., .BNOT.) generateK true bitwise operations on integer data. They may be used forK setting/checking bits in flags, masking bitfields within integers, etc.K For instance, in SORT, the facility number in the error status code isK checked to see if the error was a DIBOL error or a VMS system error. The code to do this is: LITERAL DBLFAC, I, %X(2A8000)" FACILITY, I, %X(0FFF8000)= ; Bits which correspond to facility field. ...0 IF (STATUS .BAND. FACILITY) .EQ. DBLFAC THEN ... ELSE ... 9 Terminal Numbers in VAX DIBOL V4.2K The terminal number algorithm has NOT been changed since VAX DIBOLK V3.1. As shipped, the DIBOL RTL contains tables for translatingK the following types of terminal device names into terminal numbers.K The unit number is added to the starting offset. Thirty-two lines perK controller are assumed for all TT, TX, and TZ devices. Thirty-twoK lines are allowed for RT (DECnet'ed) devices. As there are so manyK lines per controller specified now, and so many controllers per device,K the resulting terminal number may be quite large. It is recommendedK that the variable used to hold the terminal number be large enough toK contain a 10 digit number. The numbers are set up in such a wayK however that the most common numbers will still fit in a 3-digit field.- OPA 0- TTA through TTH 1- TXA through TXH 257- TZA through TZH 513- RTA 769- TTI through TTZ 801- TXI through TXZ 1377- TZI through TZZ 1953- WTA 2529- VTA 32768 LTA 98304- PTY 163840- NVA 229376 WVA 294912 TKA 294944K If you have other terminal devices on your system, or if you simplyK want to change the numbers assigned, a command procedure is supplied inK SYS$UPDATE:DBLTNMBRS.COM. This command procedure will attempt toK generate numbers for all the terminal devices available to yourL system, and then prompts for any additional terminal devices and L controllers that you wish to add to the tables. You should only add L devices in ascending numeric order. The command procedure will then L 'patch' the device names and numbers into the terminal number table K used by the DIBOL RTL. The PATCH utility must be available to do this. @ Unsupported Subroutines for VAX DIBOL Version 4.2K The following subroutines are unsupported and are otherwiseK undocumented. The calling sequence may change from version to versionK or the subroutines may disappear altogether. SPR's concerning these% subroutines WILL NOT BE ACCEPTED.K The information in this document is subject to change without noticeK and should not be construed as a commitment by Digital EquipmentK Corporation. Digital Equipment Corporation assumes no responsibility4 for any errors that may appear in this document.  DBL$USEROPEN FUNCTIONK DBL$USEROPEN specifies a user-supplied subroutine to be calledK immediately preceding the opening of a file, allowing the user toF override the DIBOL default RMS file and/or record attributes. FORMAT' XCALL DBL$USEROPEN [(subaddr)] where:A subaddr is the address of the subroutine to be called. RULESK o The subroutine address specifies the address of a user-suppliedK subroutine to be called during the execution of subsequent OPENK statements. The subroutine address is normally passed using the %XTRNL function.K o If the argument is omitted, no subroutine will be called during$ subsequent OPEN statements.K o The specified subroutine is called during the processing of theK OPEN statement by the DIBOL RTL. The internal data structures andK the RMS data structures (FAB and RAB) required by the DIBOL RTL toK open the file are created and the default attributes set beforeK the subroutine is called. Following the execution of theK subroutine, the DIBOL RTL calls the RMS CREATE or OPEN routine,' using the RMS data structures.K o The specified subroutine is passed two arguments; the firstK argument is the address of the RMS FAB (File Access Block), andK the second argument is the address of the RMS RAB (Record AccessK Block). The subroutine can make changes to these RMS dataK structures, but care should be taken to ensure that attributes areK not set which are in conflict with DIBOL processing. Refer toK Table X-1 in the VAX DIBOL User's Guide for the default attributes set by the DIBOL RTL.H o The specified subroutine is NOT called when opening a terminal.K o If this routine is used, any file problems which occur during theK program which calls this routine are not supported. Any problemK which occurs must be duplicated using standard, supported DIBOL$ before it will be accepted. EXAMPLEK The following example uses the DBL$USEROPEN subroutine to create aK sequential file in stream format rather than the variable-lengthK record default format. The first program is a MACRO-32 subroutineK which is called during the OPEN processing. The routine sets theK record format to STM. The second program is a DIBOL program which< calls DBL$USEROPEN, then creates a sequential file.  .TITLE SUBR .ENTRY SUBR,^M<>) $FAB_STORE FAB=@4(AP),-$ RFM=STM RET .END PROC/ XCALL DBL$USEROPEN (%XTRNL(SUBR))& OPEN (10,O,'MYFILE.DAT')% WRITES (10,'Some data') CLOSE 10 END  @ The following documentation was formerly included in theC VAX DIBOL User's Guide. It describes portions of VAX DIBOL@ made obsolete by improved utilities and language syntax.H AH ________________________________________________________________H The SORTGEN Utility A.1 IntroductionF VAX DIBOL provides two utilities that facilitate sortingC and merging files. The sort utility described in thisD appendix is called SORTGEN; the other, called SORT, isC described in the VAX DIBOL User's Guide. The VMS SortF /Merge Utility Manual provides additional information on2 sorting procedures available on VMS.E Sorting the file with SORTGEN consists of the following steps:G o Construct a control file that describes the parameters+ of a specific application.G o SORTGEN uses the control file to generate a file whichF contains the data division of the sort/merge program.H o The data division file and DBLSORTM.DBL are compiled to0 produce a linkable object file.C o The object file is linked to produce an executable! SORTGEN program.F o The program is run and the specified files are sorted or merged.H The SORTGEN Utility A-1  % A.1.1 Characteristics of SORTGEND The following operating characteristics of SORTGEN should be noted:D o Files may be sorted by multiple keys, and the sort for? each key may be in ascending or descending order.E o Optional statements are provided to allow definition ofD such operating parameters as work files, type of sort, and so on.A o An optional key sort (TAGS sort) is available whichDE allows a sort for key fields only, without transporting / entire records across work files. C o The devices specified by the WORK option are assignedcA as logical names when the VAX sort/merge utility isi@ called. This action is equivalent to the following command:( $ ASSIGN device: SORTWORKn= where n designates the number of the work file.nE o The SORTGEN program developed by the VAX DIBOL user haseC the optional ability to receive a control record senteC from another program. This control record facilitateslB changes in selected sort or merge parameters at run- time.o> o SORTGEN uses the VAX Sort/Merge utility callable interface.? o The output of a sort or merge is a relative file,FB regardless of input file type (sequential, relative, ISAM). A-2 The SORTGEN Utility * )# A.1.2 Appendix OrganizationcA The remainder of this appendix is structured in the H general sequence required to develop a sort/merge program.. It is comprised of two sections:G o Section A.2 describes the control file characteristicsTC and requirements. The individual statements in theyE control file are described, and examples given wheree? necessary. The statements are then summarized.iG o Section A.4 describes the development procedure in thew$ following sequence:C Integrating the control file with the VAX DIBOLXE routines (DBLSORTG, DBLSORTM) to produce the sort " /merge programA Compiling and linking the sort/merge program.FB Examples are used to illustrate operations and" correct usage.> The use of a control record for chain mode operationH The SORTGEN Utility A-3 i n A.1.3 Error MessagesuE See the Appendix titled "VAX DIBOL SORT/MERGE Messages" inoE the VAX DIBOL Language Reference Manual for error messages# associated with SORTGEN.n A.2 The Control File C The sort or merge is defined by the information providedrB in the control file. It describes the input file, inputA record format, sort keys, and the output file, as welltA as other parameters and options. The user creates thise- control file for use with SORTGEN.  A-4 The SORTGEN Utility O H A.2 The Control File* A.2.1 Control File CharacteristicsC The control file is composed of five required control H statements and seven optional control statements. A changeC to any control statement produces a different controlTB file. Whenever any control statement is changed, theG control file must be processed by DBLSORTG, compiled with0C DBLSORTM, and linked to produce an executable program ( which reflects the change.F With the exception of the RECORD statement, each controlD statement in the control file must be contained on oneF line. A control file can not contain more than 50 lines.? The characteristics and use of the twelve controlF statements are described on the following pages. ControlC statement options are shown in brackets. Comments are F allowed on any statement line if they are preceded by an@ exclamation point (!). Examples are also provided.* Required control statements:B o INPUT specifies the input file(s) for the sort or merge. G o OUTPUT specifies the name of the sorted or merged fileoE that results from running the sort or merge program.rC o RECORD specifies the record structure of the input B file(s) and the location of the key(s) within the record.D o KEYS specifies the order in which the file is to be: sorted, in relation to the chosen key(s).D o END identifies the end of the control file. The ENDD statement must be the last statement in the control file.H The control statements are presented in alphabetical orderD on the following pages; each statement begins on a newE page. A control statement consists of a SORTGEN commandrH (INPUT, OUTPUT, END) and a set of command parameters; someE commands may have no parameters. The terms OPTIONAL and H REQUIRED denote the status of the statement in the control file.oH The SORTGEN Utility A-5 s e A.2 The Control File E ________________________________________________________________ A.2.2 DETACH (OPTIONAL)E DETACH causes the sort or merge program to detach from its associated terminal.o Formatt DE[tach]:C ________________________Note ________________________b@ This statement is provided for CTS-300 compatibil-( ity. It is ignored on VAX.C _____________________________________________________e A-6 The SORTGEN Utility s bH A.2 The Control FileH ________________________________________________________________ A.2.3 END (REQUIRED)8 END specifies the end of the control file. Format EN[D]: RulestD END must be the last statement in the control file.H The SORTGEN Utility A-7   A.2 The C<"ontrol FileaE ________________________________________________________________f A.2.4 EXECUTE (OPTIONAL)rA EXECUTE specifies the name of a program to be executedtE (chained to) upon completion of the sort or merge program.s Formatc EX[ECUTE]:filespec Parameterso filespec ; The specification of the program to be executed.l RulesG EXECUTE may be superseded at run-time. See Section A.4.5.a Examplesd 1. EXECUTE:MMENUfC Specifies that program MMENU on the default device ispA to be executed upon completion of the sort or mergea program. A-8 The SORTGEN Utility T fH A.2 The Control FileH ________________________________________________________________ A.2.5 FLAGS (OPTIONAL)G FLAGS specifies miscellaneous information to be passed to " the sorting routine. Format FL[AGS]:n  Parameters n C A 1-10 digit number where each digit corresponds to a particular flag. Rules1 o The numbers are right-justified. " o Meaning of flags:F - if non-zero, all decimal keys are standard numeric5 zoned, and do not contain blanks.sH - if non-zero, then DEC Multi-National Collating table is used.H The SORTGEN Utility A-9 _ _ A.2 The Control File_E ________________________________________________________________R A.2.6 INPUT (REQUIRED) < INPUT specifies the files to be sorted or merged. Formatr= IN[PUT]:filespec1[(count)][,filespec2[(count)]...]  Parameters  filespec1. The first input file specification. filespec2? One or more additional file specification(s) up to anB maximum of six (seven total files). File specifications# are separated by commas.  (count)? A number which specifies the number of records to be  sorted or merged. Rules< o If one file is specified, that file is sorted.A o If two or more files are specified, those files areaD merged. The files must be sorted by the keys specified$ in the KEYS statement.> o count specifies the number of records, beginning@ with the first, to be sorted or merged. A count ofC n specifies that the first n records of a file are top be sorted.A o If an ISAM file is to be sorted or merged, count is ? REQUIRED, and must consist of the characters ISM. > o ISAM files cannot be merged with NON-ISAM files.E o count can be superseded at run-time; see Section A.4.5.s A-10 The SORTGEN Utilityo : H A.2 The Control File Examples$ 1. INPUT:PAY.DDF(2400)E This example sorts the first 2400 records of PAY.DDF  2. INPUT:LABR.DDFr< This example sorts all records in LABR.DDF.4 3. INPUT:LABM.DDF(3000),LABT.DDF(4000)C This example merges the first 3000 records of fileF LABM.DDF and the first 4000 records of file LABT.DDF.# 4. INPUT:PAY.ISM(ISM)a@ This example sorts all records in the ISAM file PAY.ISM.lH The SORTGEN Utility A-11   A.2 The Control FilefE ________________________________________________________________X A.2.7 KEYS (REQUIRED)@ KEYS specifies the field or fields to be used as sort9 /merge criteria. These fields are called keys. Formatn, KE[YS]:fldnam1[-][,fldnam2[-]...] Parameterse fldnamOA The name of the field or fields to be used as the sortf keys. -A Causes records to be sorted in descending order by the B associated sort key. If it is not used, the records are% sorted in ascending order. RulesC o Each sort key must be a field specified in the RECORDe statement.- o There must be at least one key.q1 o A maximum of eight keys is allowed. B o The first specified field is the major sort key. TheE second and subsequent fields are minor sort keys, whicht? are used in the order specified in the statement.l ExamplesaE 1. KEYS:NAME,DATE- ;NAME and DATE are alphanumeric fieldstC This example specifies a sort/merge using NAME as thee@ major sort key and DATE as the minor sort key; theC major sort key is ascending and the minor sort key is B descending. Records are sorted in alphabetical orderD (A-Z) according to NAME; where names are the same, theC records are sorted according to DATE, the most recente/ date occurring first in the file.  A-12 The SORTGEN Utility   H A.2 The Control FileH ________________________________________________________________ A.2.8 OUTPUT (REQUIRED)F OUTPUT specifies the file to which the sort/merge output is written.M Format OU[TPUT]:filespece Parameters filespec3 The specification of the output file. RuleseE o filespec can have the same name as the input file if F one (and only one) input file is specified. The input% file is overwritten.wE o filespec cannot have the same name as the input file0 under the following conditions:) o A merge is performed.E o A TAGS:LIST or TAGS:INDEX sort is performed. (See $ Section A.2.12.)3 o The input file is an ISAM file.aF A DBLSORTG/M error message results if any of these is attempted.tF o filespec is a relative file, regardless of input file type. Examples" 1. OUTPUT:WEEKLY.DDFH In this example, the sorted or merged output is written( to the file WEEKLY.DDF.H The SORTGEN Utility A-13 h  A.2 The Control File E ________________________________________________________________  A.2.9 RECORD (REQUIRED)B RECORD specifies the format of the records in the inputD file or files; all input files must have the same format. Formato& RE[CORD]: [fldnam], format .n . .t( [[fldnam], format] Parameters  fldname The name of the field formatlA The specification of the type (A or D) and size of theu field.e RulesC o Specification of name, type, and size must conform to : DIBOL rules for specifying field attributes.? o Each field definition must be on a separate line.rC o The name, type, size, and location of key fields must D be specified. Other fields may be specified as filler.2 o The entire record must be described. A-14 The SORTGEN Utilitye n iH A.2 The Control File Examples 1. RECORD:' PARNUM, A6e' PARNAM, A6n' INVENT, A3 ' UPDATE, A9i? This example specifies the entire record of 24aB characters. Any field may be used as a key field. 2. RECORD:> , A5 ;fill characters( NAME, A20> , A35 ;fill characters' BADGE, A5cB This example specifies a record of 65 characters.D Positions 6-25 contain a key field called NAME, andF positions 61-65 contain a key field called BADGE. TheD other positions in the record are defined as fillerG so that the relative positons of NAME and BADGE can ben defined. H The SORTGEN Utility A-15 e t A.2 The Control FileiE _________________________________________________________________ A.2.10 SPACE (OPTIONAL)C SPACE controls the amount of additional memory available ) for a sort or merge operation. Format  SP[ACE]:kbytes  Parameterse kbytes_D The number of 1024 byte segments of main memory available% to the sort/merge program.pC ________________________Note ________________________ @ This statement is provided for CTS-300 compatibil-( ity. It is ignored on VMS.C _____________________________________________________  A-16 The SORTGEN UtilityA T CH A.2 The Control FileH ________________________________________________________________ A.2.11 SU (OPTIONAL)F SU specifies that the sort or merge program is to be run- as a Single-User DIBOL program.s Format SU:lF ________________________Note ________________________B This statement is provided for CTS-300 compatibil-* ity. It is ignored on VMS.E _____________________________________________________ H The SORTGEN Utility A-17   A.2 The Control FileiE ________________________________________________________________. A.2.12 TAGS (OPTIONAL)_= TAGS specifies a sort of key fields only; called a= key sort. A key sort increases execution speed and A minimizes disk requirements because the entire file isn not manipulated.t Format  | SORT | TA[GS]: | LIST |  | INDEX |h | |  Parametersf SORTe7 Produces a sorted version of the input file.? The key or keys are first sorted; then each completez0 record is written to the output file. LIST,? Produces an output file which consists of seven-bytet record numbers.? The position of the record number in the output fileB corresponds to the position of the record in the sortedA file. The record number identifies the location of the_C record in the input file. The output file can be used toA$ access the original file. INDEXC Produces an output file which consists of key fields andf% seven-byte record numbers.. Rules9 o TAGS:SORT must not be used on an ISAM file.fC o A TAGS:SORT requires smaller work files than a normalt sort.i? o A TAGS:SORT can provide a significant performance + advantage over a normal sort.o A-18 The SORTGEN Utility   AH A.2 The Control FileE o In a TAGS:SORT, writing the output file uses most ofrG the required time. This time requirement is eliminateda. with TAGS:LIST or TAGS:INDEX.D o TAGS:LIST sort and TAGS:INDEX sort require separate( input and output files.A o In a TAGS:INDEX output file, each record has the " following format:D ...................................................C |major key|minor key |minor key ...|record number| D ...................................................C If the input file is ISAM, specify the ISAM key as B a minor sort key and use the TAGS:INDEX sort. TheF basis of record selection can be any sort key and its( corresponding ISAM key.H The SORTGEN Utility A-19 o A A.2 The Control FileLE ________________________________________________________________ A.2.13 WORK (OPTIONAL)D? WORK specifies the number of sort work files and thef- devices on which they are located.B Formats) WO[RK]: [number][,device:...]  ParametersM number D A decimal number between three and eight (inclusive) that. specifies the number of work files. device:D Specifies a list of one or more devices to which the work files are allocated.f RulesB o The first work file is allocated to the first deviceC in the list. The second work file is allocated to the ' second device, and so on.t> o The same device can be specified more than once.A o If the number of devices specified is less than the E number of work files, devices are allocated to files bysB cycling through the device list until all files have been allocated.bA o If the number of devices exceeds the number of works3 files, the extra devices are ignored.RC o The devices specified by the WORK option are assignedCA as logical names when the VAX sort/merge utility isa@ called. This action is equivalent to the following command:( $ ASSIGN device: SORTWORKn= where n designates the number of the work file.s A-20 The SORTGEN Utilityi h rH 9~ DIBOL042.B4 8"[KITS.V42-07.KIT.B]DBLREADME.LIS;1Nug8l@ A.2 The Control File Examples 1. WORK:4 8 This example allocates four work files. 2. WORK:3,DBA2:aG This example allocates three work files, all on devicen DBA2.. 3. WORK:3,DBA2:,DBA3:,DBA0:,DBA1E This example allocates three work files, one each onsF devices DBA2, DBA3, and DBA0. DBA1 is ignored because5 only three work files are specified. # 4. WORK:3,DBA1:,DBA2:lF This example allocates three work files, the first onF device DBA1, the second on device DBA2, and the third on device DBA1.H The SORTGEN Utility A-21 i n+ A.3 Summary of Control File StatementslE ________________________________________________________________ + A.3 Summary of Control File StatementsuE This section presents a summary of the DBLSORTG/M commandse" and command parameters.E __________________________________________________________iB Required orE Command_______________Description___________Optional______ A DETACH: Provided for CTS-300 Ignored onS; compatibility. VMS. ? END: Indicates the end of Requiredi2 the control file.. EXECUTE:filespec Specifies the. program to be. executed upon3 completion of sortU( /merge.4 FLAGS:n Specifies miscella-2 neous information4 to be passed to the1 sorting routine. ; INPUT:filespec1[(count)][,filespec2[(count)]...]_? Specifies file/files Requiredh5 to be sorted/merged.r* KEYS:fldnam1[-][,fldnam2[-]...]? Specifies the Required4 field(s) to be used2 as sort/merge key( fields.? OUTPUT:filespec Specifies file to Requiredi/ receive output . of sort/merge+ operation.n? RECORD:fldnam,format Specifies the format Required.2 of the records in0 the input file. A-22 The SORTGEN Utilitym  H A.3 Summary of Control File StatementsH __________________________________________________________E Required or H Command_______________Description___________Optional______D SPACE:kbytes Provided for CTS-300 Ignored on> compatibility. VMS.D SU: Provided for CTS-300 Ignored on> compatibility. VMS.3 TAGS: Specifies a key 3 sort. Statement 8 parameters are SORT,4 LIST, and INDEX.% WORK:[number][,device:] 8 Specifies the number5 of work files and68 the devices on which4 those work filesH ______________________reside._____________________________H ________________________________________________________________/ A.4 SORTGEN Program Development and UseE VAX DIBOL supplies two programs, DBLSORTG and DBLSORTM,tF that process the control file and produce the sort/mergeE source program. When the source program is compiled andPC linked, it is executed to perform the sort/merge. ThemH details of each step (process, compile, link, and run) are2 described in the following sections.H The SORTGEN Utility A-23  t, A.4 SORTGEN Program Development and UseE ________________________________________________________________e# A.4.1 Processing with DBLSORTG-C DBLSORTG.EXE, a VAX DIBOL utility, processes the control_> file to produce the data division of the sort/merge> program. The program is executed with the following command: $ $ RUN SYS$SYSTEM:DBLSORTG Input File:D DBLSORTG requests the name of the file which contains theB control file. You should respond with the specificationB of the control file, for example, CTRLFILE. The default extension is CTL.D When you have specified the input file, DBLSORTG requestsB the name of the output file, the file to which the data9 division of the sort/merge program is written.i Output File: C You should respond with the name of the output file, for; example, DATAPROG. The default extension is DBL. @ When you have provided the output file name, DBLSORTGA generates the output file unless an error is detected._C Errors for DBLSORTG are listed in the VAX DIBOL LanguageD Reference Manual. If an error is detected, a message will be displayed.C ________________________Note ________________________s@ The output of DBLSORTG should not be named SORT as? the DBLSORTM code uses the OSSL routine SORT. The @ linker will not correctly resolve the reference if1 the main program has the same name. C _____________________________________________________k A-24 The SORTGEN Utilityl z H A.4 SORTGEN Program Development and UseH ________________________________________________________________% A.4.2 Compiling with DBLSORTMcE DBLSORTM.DBL, a VAX DIBOL supplied file, and the output H file from DBLSORTG.EXE (DATAPROG in the previous case) areB compiled together to produce a linkable object file.) $ DIBOL DATAPROG/NOSTANDARDrF ________________________Note ________________________> DBLSORTM.DBL, in SYS$LIBRARY, is automatically@ included in the compilation when the output file5 from DBLSORTG (DATAPROG) is compiled.lE _____________________________________________________SE The output of the compilation is a linkable object filer" called DATAPROG.OBJ.H The SORTGEN Utility A-25  S, A.4 SORTGEN Program Development and UseE ________________________________________________________________ 2 A.4.3 Linking with the DIBOL Run-Time LibraryB The object file, DATAPROG.OBJ, is linked with the DIBOL1 Run-Time Library and the OSSL library.I2 $ LINK DATAPROG,SYS$LIBRARY:DBLOSSL/LIBD The output of the linking procedure is an executable file called DATAPROG.EXE.  A-26 The SORTGEN Utility. . .H A.4 SORTGEN Program Development and UseH ________________________________________________________________) A.4.4 Running the SORTGEN ProgramsE The sort/merge program is executed with the DCL command  RUN. $ RUN DATAPROGD The input file specified in the control file is sortedF to produce a file with the specified output name. ErrorsF generated during execution are those listed for DBLSORTM9 in the VAX DIBOL Language Reference Manual.tE The following example illustrates the steps required toG generate and run a SORTGEN program. There are five steps.tG 1. Create the control file; it is called FILE.CTL in thisi example: F INPUT:DATA1.DDF ;the unsorted input data fileA OUTPUT:SDATA1.DDF ;the desired sorted file C RECORD: ;record definition followsk6 , A5 ;space fillerJ NAME,A20 ;a field to be used as a sort key6 , A35 ;space fillerJ BADGE,A5 ;a field to be used as a sort keyG KEYS:NAME,BADGE ;major control key followed byl= ;a minor control keyl= END: ;end of control file  2. Run DBLSORTGs* $ RUN SYS$SYSTEM:DBLSORTG$ Input File:FILE.CTL& Output File:SORTA.DBL? The data division of the sort/merge program is C generated by DBLSORTG and is written to the outpute! file, SORTA.DBL.  3. Compile2 $ DIBOL SORTA/OPTIMIZE/NOSTANDARDF The DIBOL compiler produces the linkable object file,E SORTA.OBJ, from the two DIBOL source files SORTA and.H DBLSORTM.DBL. The /OPTIMIZE command qualifier should beF used; the /NOSTANDARD command qualifier must be used.H The SORTGEN Utility A-27 s l, A.4 SORTGEN Program Development and Use 4. Link2 $ LINK SORTA,SYS$LIBRARY:DBLOSSL/LIBE The VAX linker produces the executable image SORTA.EXE.D" 5. Run the sort program $ RUN SORTAs= When you run SORTA, file DATA1.DDF is sorted as E specified and the result is written to file SDATA1.DDF.  A-28 The SORTGEN Utility.  H A.4 SORTGEN Program Development and UseH ________________________________________________________________# A.4.5 SORTGEN in Chain Mode_F The control file parameters that can be affected at run-" time are as follows:G 1. You can change the record count in the INPUT statementcA of the control file and can specify a program to_B be executed when the sort/merge is completed. TheD specified program supersedes a program named in the7 EXECUTE statement of the control file. G 2. You can change the record count in the INPUT statementmF of the control file, specify a program to be executedH when the sort/merge is completed, and specify a messageB to be sent to that program. The specified programD supersedes a program named in the EXECUTE statement% of the control file. C 3. You can cancel the effect of all statements in the E control file, except the EXECUTE statement. The sort D /merge is not performed, and control is immediatelyF passed to the program named in the EXECUTE statement.D 4. You can specify a message to be sent to the programD named in the EXECUTE statement of the control file.H When the sort/merge is complete, the message is sent to' the specified program. E These operations are accomplished by means of a controldD record that is sent to SORTGEN prior to its execution.C The operation performed is determined by the value of E the first field in this record; the field consists of ar4 one-character operation code (OPCODE).H 1. To change the specified record count and the program toH be executed after the sort or merge, the control record& format is as follows: RECORD SCR! OPCODE,A1,'%' COUNT, D6  NEXT, A14C where:0 OPCODE is the character "%".H The SORTGEN Utility A-29 e r, A.4 SORTGEN Program Development and UseA COUNT is a decimal value that is inserted as thev? control file INPUT statement record count. Any B previous value is overwritten. If COUNT is set toD zero, the value originally specified in the control. file INPUT statement is used.C NEXT is the file specification of the program that B is to replace the program originally specified in4 the control file EXECUTE statement.@ 2. To change the record count, name the program to beD executed. To send a message, use the following control record format: RECORD SCR  OPCODE,A1,'#' COUNT, D6 NEXT, A14! , AXXX,'message'_ where:_- OPCODE is the character "#"._A COUNT is a decimal value that is inserted as them? control file INPUT statement record count. AnyLB previous value is overwritten. If COUNT is set toD zero, the value originally specified in the control. file INPUT statement is used.A NEXT is the file specification of the program toa@ replace the program originally specified by the0 control file EXECUTE statement.D XXX indicates the field (message) size. The size of: the message is limited to 100 characters.( message is the message.C ________________________Note ________________________e> If an error occurs during the sort or merge, the@ process is terminated and the program named in the0 EXECUTE statement is not executed.C _____________________________________________________ @ 3. To specify the EXECUTE statement only, the control* record format is as follows: RECORD SCRl OPCODE,A1,'@' A-30 The SORTGEN Utilityh o oH A.4 SORTGEN Program Development and Use where:0 OPCODE is the character "@".F The original control file EXECUTE statement is theC only statement executed. No sort or merge takes place.C 4. To send a message, the control record format is as  follows:L RECORD SCR OPCODE,A1S , A20t$ , AXXX,'message' where:D OPCODE is any character other than %, @, #, or a space.G XXX indicates the field (message) size. The size of_= the message is limited to 100 characters.h+ message is the message. F ________________________Note ________________________@ If an error occurs during the sort or merge, theB process is terminated and the program named in the2 EXECUTE statement is not executed.E _____________________________________________________ E The sending program chains to the sort or merge and the_G specified sort or merge is performed. The message is then G routed to the program originally specified in the EXECUTEiD statement (if one was specified) and the sort or merge/ chains to this specified program.lD Following is a summary of parameter changes via a SORT$ /MERGE control record:H The SORTGEN Utility A-31 S B, A.4 SORTGEN Program Development and UseL +---------------+-----------------------------------------------+L | | CHARACTER |L | FUNCTION +---------+---------+---------+---------+-------+L | | @ | % | # | other | blank |L | | | | |character| |L +---------------+---------+---------+---------+---------+-------+L | Normal SORT | | | | | X |L +---------------+---------+---------+---------+---------+-------+L | EXECUTE only | X | | | | |L +---------------+---------+---------+---------+---------+-------+L |Change program | | | | | |L |to be executed | | X | | | |L |and record | | | | | |L |count | | | | | |L +---------------+---------+---------+---------+---------+-------+L |Send a message | | | | X | |L +---------------+---------+---------+---------+---------+-------+L |Send a message,| | | | | |L |change record | | | | | |L |count, and | | | X | | |L |change program | | | | | |L |to be executed | | | | | |L +---------------+---------+---------+---------+---------+-------+ A-32 The SORTGEN UtilityF  H BH ________________________________________________________________H Obsolete Routines@ Due to the enhancements to the VAX DIBOL languageD syntax with the release of VAX DIBOL Version 3.0, manyA subroutines (from Version 2.3 or prior) have becomeKD obsolete. Table B-1 lists the obsolete subroutines andF the corresponding alternate Version 3.0 syntax. AlthoughG these subroutines will continue to be part of the DBLRTL,sH their usage is not recommended. It is strongly recommended; that the new syntax alternatives be utilized. H Table_B-1_Alternate_Syntax_for_Obsolete_Subroutines_____________B VAX DIBOL Version 3.0H Obsolete_Subroutine__________________Syntax_____________________N DBL$IXREAD READ(CH,RECORD,KEYFLD,KEYNUM:num)@ DBL$POSRFA FIND(CH,RFA:rfaddr)< DBL$EXITSUB XRETURN {value}H (continued on next page)H Obsolete Routines B-1 O EE Table_B-1_(Cont.)_Alternate_Syntax_for_Obsolete_Subroutines_____ ? VAX DIBOL Version 3.0BE Obsolete_Subroutine__________________Syntax_____________________E! DBL$EXITSUB_VAL (%XTRNL(SS$_r: NORMAL)) EXTERNAL LITERAL7 SS$_NORMAL, Ic. PROC> XRETURN (SS$_NORMAL), or0 RECORD@ STATUS, I, %XTRNL(SS$_1 NORMAL) . PROC: XRETURN (STATUS)" DBL$CVTIZV(%XTRNL(FAB$M_SUP),: SUPERSEDE) EXTERNAL LITERAL6 FAB$M_SUP, I0 RECORD8 SUPERSEDE, D10. PROC? SUPERSEDE = FAB$M_SUP $ DBL$CVTIIV(%XTRNL(DVI$_DEVNAM),: DEVNAM) EXTERNAL LITERAL8 DVI$_DEVNAM, I0 RECORD4 DEVNAM, I2. PROC> DEVNAM = DVI$_DEVNAM, or0 RECORDB DEVNAM, I2, %XTRNL(DVI$_1 DEVNAM)tE (continued on next page)X B-2 Obsolete Routines s iH Table_B-1_(Cont.)_Alternate_Syntax_for_Obsolete_Subroutines_____B VAX DIBOL Version 3.0H Obsolete_Subroutine__________________Syntax_____________________/ DBL$CVTIIV(%REF(BUFFER), DESCRIPTOR(2))a3 RECORDo< DESCRIPTOR, 2I49 BUFFER, A255 1 PROCrJ DESCRIPTOR(2) = %ADDR(BUFFER)3 DBL$CVTIZ (INT_FIELD,D_FIELD) RECORD8 (DBL$INTCVT) D_FIELD, D5: INT_FIELD, I21 PROCP@ D_FIELD = INT_FIELD3 DBL$CVTZI (D_FIELD, INT_FIELD) RECORD 9 (DBL$CVTINT) D_FIELD, D10 : INT_FIELD, I41 PROC@ INT_FIELD = D_FIELD3 DBL$CVTZI (numbers, INT_FIELD) RECORDo: INT_FIELD, I41 PROCv@ INT_FIELD = numbersD DBL$ISMCRE (fnam, rlen, kpos, klen, kdpu, kchg, nkey, alloc, bktsiz, prot) C OPEN (ch,O:I, filenam, G RECSIZ:rlen, ALLOC: alloc, I BKTSIZ:bktsiz, PROTECT:prot, G KEY:((pos:size..., TYPE:T, 9 ATTR:A)...)) F ________________________Note ________________________B There a difference in the format of the protectionA string; with DBL$ISMCRE, it is a decimal field ofn@ 1s and 0s. With OPEN, the actual S:RWED, O:RWED,. G:RWED, W:RWED syntax is used.E _____________________________________________________iH (continued on next page)H Obsolete Routines B-3  E Table_B-1_(Cont.)_Alternate_Syntax_for_Obsolete_Subroutines_____ ? VAX DIBOL Version 3.0gE Obsolete_Subroutine__________________Syntax_____________________aC DBL$RENAM_V1 XCALL RENAM (newfile.ext,_E _____________________________________oldfile.exe;_ver)__________a B-4 Obsolete Routines t H CH ________________________________________________________________H VAX DIBOL SORT/MERGE Messages (DBLSORTGM) C.1 Message FormatF Errors may be detected during DBLSORTGM command process-B ing, during DBLSORTGM program compilation, or duringB execution of the DBLSORTGM program with the VAX SORTF utility. The DBLSORTGM utility messages are described inH the Appendix titled "VAX DIBOL SORT/MERGE Messages" in theH VAX DIBOL Language Reference Manual. The VAX SORT messagesA are described in the VMS Sort/Merge Utility Manual.C The DBLSORTGM messages are displayed in the following  specific format:, %DBLSORTG-L-IDENT, TEXT [#nnn] or, %DBLSORTM-L-IDENT, TEXT [#nnn] where:@ DBLSORTG is the facility identification for the, DBLSORTGM generation phase.E DBLSORTM is the facility identification for the sorte' /merge run-time phase._E # indicates that the information which follows is ano error number.E nnn is the error number associated with the message.t C.2 MessagesB The DBLSORTGM messages are described in the AppendixE titled "VAX DIBOL SORT/MERGE Messages" in the VAX DIBOL G Language Reference Manual in alphabetical order. See thatg< section for the description of those messages.H VAX DIBOL SORT/MERGE Messages (DBLSORTGM) C-1end of DBLREADME.LIS*[KITS.V42-07.KIT.B]DBLRTL.EXE;1+,0./G 4-80123 KPWO56`ex7Y[|89@A GGHJ0D`0205@DBLRTLDBLRTL V4.2-07`Qt05-13    @!  LIBRTL2_001! LIBRTL_001<B;<jNq|q<ns<-6<N<OP<Rt|P|S ~|<Wr|U<Y6<7Vۋ V0W$<|Г< Z<]'_<cb< ||<b< d<|fX<h|$ﮢ<P<Ci<}|_101r&_&)b0#NF<тz|6s|t 5 Zx n x<4<95<T4<<~]xyy|3|>mm︐<{<M{W<̓<l88<+<b<c濾||7<9<[<<&q|_<d0nd-%8<Pig`yRnTTT}nRRR(HTP72P(PnTTT}nRRR .P0eRzPDb~^P`P!^aݏB*FPQ^QPUЏ ԮPR ^P3^PѮPFdPW@ݏ*ݏ:*'WUUnVP ^ 0be7i ?D( 1 : Bsx}C F 4 4 |  G S 1X^Q{P~^~~~1X|~~~^~~ ~^RbH 01NXULUWUhU1|~~^~~~^U1^~~~1^~~~^U1w~~~^U1g|~|~~^~~~^U1P|~|~|~~~^ݏ ~n~Ю nݏ ^U1&|~~~^ݏ ~n~Ю nݏ ^U1WWW^VWWPPPP^UnWW1WW^VWWPPPP^W1qC1W] ƾҕښzl % HM%+13IOU[agjk-kQkokky J_753}5w@ tc d||X~1ב$w=#Pv{{(}P{b{7S55557777`CXDDGfO9OWOHO:PP'PPAfBBB =$===?U@??NLKKO\ZXX  H Y011322?3q k) 7#"!#U!&%"%%$'O'y'''g(gHg8ghgXgagacfc\d^Kdtt*R " f\Se?e`D-ibo@bxR;;;9٬ R IU[agmsy('Ѣk\3fƹLryrw pqOXRRb~ݏÆ*ݏt*gїC﹗u﹙:ﵩ~`aﭦp̦Kﴪ臘3ݏ*nﷃݏ*弄X~hЎXnRȏHЎRЈfЭP hX ЭP WϪWXݭeX]ZYXiܑ }n~}n~000^QPѡPЭSЭPe^e\e]ХXWXPeRRUUDeRRe1ȏH@P@maaЎmP=.Pa;Pa1}PPPmmaaЎmP.Pa<Pa1ZݏB*iu1H]QСP4/}PPPmmaaЎmP.Paf9Pa1}PPPmmaaЎmP.Pa7:Pa1ЈQX1QX1Q0OՎ PSQSSPSQRSʏRR1R(R1R1R1R1@RR1R1Pca1bPca1WPca1LPԡcaЏ14PPP1cЏЏЏ  ԡԡԡ ca1P2ca1Pca1Pca1Pԡ2caЏ1PPP1!cЏЏЏ  ԡԡԡ 2ca1PSa1|PSa1qPSa1fPԡSaЏ1NPPP1 Sa ԡԡԡ ЏЏЏ 1Sa1Pca1Pca1Pca1PԡcaЏ1PPP17 cЏЏЏ  ԡԡԡ ca1Pca1Pca1Pca1|P}ca1qPPP1 գЏЏ ԡԡ }ca1APca16Pca1+Pca1 P}ca1PPP1u }ca}1R еP22P&P 1m}PV VhR1Y; PQRPX1;=SPPPPPPS~$PPcVЎQЎP$Х~<PPPХQPQЎPVPSPP<T||Ԅ|dSTTqtPV~;S<@VPn;g<VnVVPX< PЫ$QQP: >PaPnQQPЎPЎQTTXVATZ3T*.T=/PQP:=Pa VWYЎQЎP VVWPVWYYWTYZV VՎ;R< P^SP^VT0WTRTXX1qTTX1TZ1T*IT*=1/T"=+T- TC#1Z WQ$V s1VRVTs1VW1V7WV7;~nRn; ;ՎՎ*sV VVW0rsYX?1pVWWVVVVVVϐ s1 rsV1mrsYZP11qTVJT9< QP:-<Zc ЎPЎQ1ЎPЎQ1T<1P1;1TX1TZ1T*1T;BT;]T-DT;TCoxWrP1**sy;lYhV;s_Z W=Q$7V3HVY*V=W9 WWVW0sY%VrsYTsWVVWYא sZP<PХ QPPmmaaЎmPݏB*VZP PZZS(Pca ZP P(Zca[^( }PR9SoVaPaPQP2aPGPPQP4aP/PP*QP%@aQPQݏ*ݏ*CV8S}PPPPQsqc RTRqTTX/TZET*&T9T- Z V sTsZPW0sYR 8RRXZPVVWYؐ s10}RRTSUPRmmccЎmP1fՎ1{1<P}@jP}R}a~RQQ*Q1v3}PT}PQTPUQPTQU }PT}PQTPUQPTQUMTRUSf gVf_),aPa>PAT~^P|~F`P^Pa~~ݏ ^P|~`^Эn0h^Эn } R 2P> 0lh^Эn^gЮhG2h>X|~W}~~8PPQ2ЮPݮQWlPWPQ^FDLSHRFDL$RELEASEFDL$PARSESECURESHRSYS$PARSE_ACLINPUTOUTPUTUPDATEAPPENDSEQUENTIALRELATIVEINDEXEDBLOCKPRINTCHARACTERnRЮS<2PR ^Pg^PѮP/%e11 1+O13S&05w 1p` 1YQ 2+M1Џ15 1*+1#05 1 1 .` Iݏ4*Ы\QЎPP  1mЏ"*P1ЎP1}Rv*^SЫ\QЎPP"ȏʏ ȏ 1Џ *P1ЎPP Ы\QP1Џ*P1^R P0`,PЏXPP1-ЎPQ`aXL`UPU(1 ~^Z ^Q ^PZPQP18^U}bT1Џ*P1p ЎPЎRЎS"S^T:qa a+a- a015PޔTTa9틏aTRTPEqa a+a- a0 1P!a9aUxUUTUsRPTR TsTRTsR[RRR RmccЎmPRURRUR,$SPRc,RUTURTcPPP PСQЏСQԡ0P ^anС}R<q@PPfSQիhԫhRݏ*Pͭm ݏ*Ў[]Q]^(^^j\k]`0qXРZРYРXXqXqqXqqPq[qq &q%qq1fQ^lS'R1RS!Sݏc*ݏ4*SR1RQ|~RQ^RClQ}CjTСUaT}TCbS1$Р Rbݏ,*nblSRRSRRS SR)Sݏc*ݏ4*RQ^0`~^ ӎ̒Ŏ0L8 3PVРQР SS$VV(acV(VacЎVЎPa(ܻ}P^V\1mcP0ЏPPPQ|~ݏQPWP0T[@P0SSмPP1نD|^^ݏ^V^Pff`XP)EPB~1^V-Voݏ^~~^VP@^^W1g'^~~~~VF^(ݏ ^^<8PR2S}(P R5Si<P R?SUQPQ,Q` IQPQ,Q` hm" ^P|~`P^P-|~^U|~|~ݏg|~e<QՎՎRUWUc0c9 cP RPRR eReURSQЎU^ЎRЏڃ*PʏHݫTR~ݫXЬQ1]PammЎmP1*jP ЏPjQQP^QpЬQDBL$TT_NAME_TO_NUMBER<l1ЬQ1Pam[mЎmP1ЬQ1 ЬQz|^^V,a fUf_VUf_VUfNLOfP0PROSBc PBc R0cP.BTVU::Uf: UfVQRVSTPЏP^|DBL$TT_NUMBER_TO_NAME<l1ЬQ1PamgmЎmP1ЬQ1OЬQ NLA!AD!ZW:QWPNSRBcPBR힯QPBcQP RBcQBP~^RPQgbPЎQ^P 9 P4Pc+ЏcP"PЏPP'Џ'PƿʏHPݏ*ЫHSSRWP[gQRRPЏ*PʏHPݫTR~ݫXP1U~^P`P16ЎUV]]UR7_|~^S|~|~ݏ<_|~c<0~<_~ ^P1<_~`P1VUݏ****hP1 V1e]mD&(Z- %upVdS—SDZ3dzj <]&m̆q&0D [P{nG Tۧ7)˄t{p!K_Ҁty*_7 hΙ\HShq-_@)OG4ׄP.g:vpEC}"tk$Ӯ,Va^Z7Uao?&SCھl3R/D#+ Jއџ041):'#BZ.6DBr|A(!\{ v&ukvy ˟}'$,j{W γZR#pGu{2|=fr7TYCQw#ףA۱xܾ`'a*W0Qp Y 6W2` âV0Qy(F *a :{ϔZDC $ oH!!D "0lqw^TI!rN wW{E򎪼8zh$À-sNRjy?rfř2'be ی0Ϩ!lc1.%xH(I%fh/$9f%uyfjJAfʑȴPA;8eLZл@.Ockƌ1zS^oh1 p"h{P<m>rkТ&1vfYmʟ-!Ì^Ε9;m$[w#byAZQV:qpLX. ރpJ!f*OS?cڌ iFph& `ڎZST)Q`͝en+nOn¿PqȰP o #_u=T]x"}"75{ #R!<WN&B,&g(c(<j̺(AwX1a$1&N8JKeKX}=ŝZ|EH,[ UyT @47ՄO4k9 t<]LfO9Kԛ8SGY7n*>Rg;%A >%^kYu2G|=Yb]CaPB< Xj>q^YHt&NB'WV.4RKd"0'u?}@l7):vWkwarb/wO}PleDZ05ULoh n,ʥxغyɚ].3rq!j[6]Cڑ= ZoV3¨` ,WZhaw zcoR.BIۗ38ة /ŌQd&SObT t&gO)5AtjPZr3T@j׉$!=d;o.CQovWvQ>%A;E'bR@h߱/Cur;P;Ys,FM?&˽R9TFؑ7t<mC}n-9'$,etƟ*C5W}O;fm&}3oYNLq}6}+z8$~/9E ajT%%>>~9Vr0l崃I7n/%Jr,:T;سdMpd>2k?q[mYYϤU2S]jV-؁*1)tY*@B+`w,ڲz NI9U?rvU]'5/{IJŊRgVߗ%uûW&H*C:_j2o߬ a# P B\//*“^^i_  N؞~t%]%*ma~(bv.QnQ 3kNd6򗂞ݰ f|5_ljcKC Gj,,OauW]EO .'2ڸt+wj_jl–Iߟ9t㭩\?,.IzH)ATNo|CB/pdAݵRAԌyMdMl9fO ˕ RlqSo%98Q/\W5Z%90]v#ǢuC`7W=.V0XF%qLC<NN>Xqeu B}@hH+ íEq_o@n@LCp`$W0=aobsn1Lb#p@]N MɤQdzI n_g)~\@~h ':YN \`GȒXscW~!b RG3ox>L7Ǟl,4hN_,Geb`>7ᮡ{.E 6 6-_fusmy /SJ:4ӵW%Ww [ns7P&_GQ!kTplwj۹^p5~g"l2] sCPx%a6;d$VHEe]T9Z5 l.J OvhxTU'pi)m4CDH4_IPdqx+Avk۷Zm7m2XbVe9)?[(+'9-@'X~fmEILG8- aA{zohELSl RJ#YoWۡ>X M i lSX/=*&;ZLdX[.o fd/0- ZA/i:J]W6Zd?ڗsdRLݭ#1YC1ӸHS;pJp1!nshi7 U@>N1^f]%DzH_K/`-e{ g/γ ieZa]Vl[J`|/ezq 9]KqqA*RJ4-&}W ?WL[YiWxr-j3\Յ~5yBoe1eCJĚe,>tDT l 94=`hݫV>نKnE5Z{<;e5S=&mnt{aC9ab%wk9x*"$o_AO4!oFS/tU^C(F =Tbr1"^| _*FvDUClŴwX fjrD}67oF㰈ī6u+{p3yw}l9JY\BV HnOY/ w~M\]S q)-݌;lD_U?948iUzc& )p8F"jͧع}*%1cYe+b“exܖ3rbQ6LUV=zecw]_# 82ړ0`Bh'D) 'ovIJCkU,둺ܲ^$ E -tn'oan5sX:yCN|Y uqu%ˣN!|\_`2(!AMxMx9BnhvTNW*Ge! '_D w:5?Ц*蠾,~m]Y4a_HqDA@x7LmN>TG+СxY6[:~QVBݔ$|nԉ<උPvF??ncU]YuLarMi6[.eWDȃ'9Ğ?N%o'rٗFE OgA:9-H,E0oEiC)z [ctw{_W2F^#גa^-jJ/ugȥۜ X2mOm;QV(5cxf2)IOGꪤi'7r;H+OU:hIG3{2L#i>t#h"e) ݯEo?Tonz]]o3$$ Tks&_Z|fRH8LfqB~McܨS{|@6w;I:@7 M-F'V1SvW)0?'D~et ԉ7ڤnK9w((afɠɎ0 s'#H*L?!uʾ,1|!CЎT"P*aa y^Ĺ8$:c|`<Ӥ*|:`E8'Vٓ̉e?{33exD1pm$cz_P)PXʪ#Ӆ$:LvU~t B A{"l琗#Q:E/[VH:. Z&|8m5AS\1~0uq$t"b)xS`C\њ8X'r?arRtCH3S[_g ^`5PƊdՠY"{+o#F1ViԀ\$9O[_~Ԏ>cG0{"FT⫑]`%VD#49~W%U)Α!~zt 8<-y Q1ލ2þ:c&)܏@ҁMKsc^cU0?`T'wp<_ GVezhKFnZCCcx)O;۬ 7x;^]%WǙGe -3nPda۔ 0"U;Es9T MH|G7r6j'uda)7x[Ьɩw˟C&y!?}{$,-X(Lo,QaW˘E]큗]!`]bQ 2JFt~7i'EL!4W'F^&z֏? N(\Ŀ;sjuq_z47Z%g;5[B@yct`k^X&aӃ 2ܵ,MWޗ4ܵ Ǒ=0Hm"ݬ+1۰m<$؞Kcw:ʦgķo@v}]f4{!JӔ戃$`Q>ʼnj|Ыᇮ*ADm\gs6sR6Nbxv%?ogނᷗyOF'd +>J>tWao|/C9:D (> sMd5`װ;XGc# C G ea`Eucx:r.)7qefwOJ20Lj$xVd:Tm(t&{Utzf D x Yh)7.-s^¶wĎ(^˃Y0]2oS} %/~FyA|& am(Q]LDlE 5w1JSzcY󷊍4zޕ'LK; wp+ &K}QV븖?kPzo*KHJ~JI: ?ٽ)o"&yrf16ϐsxfxέWER/&!W 2 ΍H&ЯI56#ocsQ5o&#tJ.{̠\TXP6RcrU^I׉+\j4'U(ZC9IL(VtyšM 0|̧sT#|I'+~ O>eB_ԋ~Pw*\lZ-\_]5XPfU|RuBM~j~p]~+Jk~Y CC 0 TDN LVoXЮ dFhYs`S f Av1Ҳז>(KLāRJiaH&c\ c"'#PJ.8><.m8?k`mѽVJZKLmDtB~Rh&/|ҘCyaͦF}YB{Mo߆{~wcf sW?p֡vs7h6 E5[}]x@Tj)\R$ۿ\jفopBFg y;Gd~Lw_/DKăG_tRy &[N3B 0e%d=NEH;]!rm3jfԨ6Pws+/֗/!d~lU3e&'4 Vai~%S}Y#)-QYx7Cm] yX#N53Tݍ~\51ZNlݧoa} *VL0P@=& &C`Դhl5u\ B}|D~?귔_<'X>gOv^Nny+ n=?<`>H`ˋP~8yYVhŕh2s[kraF1ҥ݀V_dWK ՚;% ﵘ N뢄Gʡ7buMyd ʎ9C @J^'OPR~(ي*-`{2ǣ+qBdT2rj^Ӏ':~oj?roAgۻ,\J8!԰[W|{1cErOJ sF^u! iQ|e6*7Z8v,6#87j{Ɍ0yp 7(=tYT)]C]_vP5)ӵ]V?r9H0ỎL (V1UX.>19f<|ļnbE7aJU̳:NUFJ;pǹkb Mi{r^{ %T,o9רW8.(amA\%[:':aejršL@s(H3&e)#5hRlkoR:!W~]uՑwztu 8rn`MLH7w*FsZGoTk-n}r74glSԿС[uPg^cWg0u>9HRyUCm-.E=Kx3w1j"`=3W~5y } #uЇ>@A!kԴȾ3Û۽}kn? ȉ} 㖞ƭz}Vco%rp)1:dqp,jbe|>{K}eH x,R0$rI-qi$3!1lAza5)O7@ U]84 _x0;d|ίF`(ys'_S7rLY)(s@0$lKj-jy87Agܦ[g ]8BDi/D!)Pi~#XV+X *g-RVcķx؞s`AJ" ݆O=ݔTY2p/`k^lF0/l #f o#Y,$#YUb]E|k1^k}๽%+]v6 Jȵ:<)[uc8jwg Eg'[5%yy* >ɋoPd鑸bǵoؽ1<O~:vԠOl`1~*ꕧ1͠]XIuVwcށsfaPTރqSV> RYSv3K&X+D.2{nA!*c=2]ZO8pU(nߩ]5廢:H4O[upNK{ٹROh+ϓ/{۽63C %b"5z-B~$sȢMGpBN?pdbc͙ɍ4s3^F`ćTi|J>kD(.T,"l65ZWjB[h e( Pd8<>T%)ЃڜV2Ljv}9Qd;ľ 5 XjGZiߕGmԸJh$LtR9A:y͋uGe!vK3jjdgǂ%nNE4FlX09I+é7p$,mu |(n6w׷%;Կb')¸ءt[>wOYDNC.Ċsݧ<]͐ڶWcrڠ*=pK1Wp~U0A&&{'6Cpe+U&vqPWF̈~Zx抾1CͤcY5fBv e )RrI:'-S0>) dȮZ,Dlpj@ΙuGN0m|;6U&7d4:WIݨ`A6u]Y6AYybnhfAWc-OiBU(:h!TS-)}C`чn63">SS(i'^WXGS_MY:w91hRJݚ<:\o|- Q*ɫ :GC3A,?r$K}Et3K?3H;''!,uo'jyv.>Эw#lbOGhV^n(uK bƔx/yk!~B _(d$ }Yv/>+T [()˼;=LgD- )G!m맔v~ĉ@D/ tt }LId񥲉gJh_;`L՝x/.TiPEb\0+qt } Hg]!g_ 4#,hF 6 /%Uܼ&"lgƉ.0 .OGb?SϬb\[؂nqmftUbq,d &?zE]C;ƣC UۗubVV6~&(x'$*c_\PGBdGoV-GSVҜ:bmkU9 qU4&vhw1Mtm5[Yj-Ч<^yK&Ne^mOsœ+ dfu@ۗVAcc%/_hcg)iTrRyIX@Q~ZA`k({ h*HlE=4e#%Z6⻿3k舣 5[!p$C8NB%+ G~, oD#YZlq红h Hg@r09?LLޮ1-HsMI+ Ø!v=Hcf<j1˶X8BΕXX-]iR\L$lU6lBatb  5.wk] ؿaۊ+)08 _(vЅsɉӐ= 6'hf[Y=" o\\M۸ԛ8mKG4G392.#Ē/-Y_քb&{Z6-t`pG3i@h2tW?J C+"\ ceQre2 _Q|'InB-M_;GšG=xY?U^$:<v0A@޾uDlS^iA ߩ?[ؘ2!BeםR(J))%$JN@ˋpA|X ?J8t+ҹpqXY=ڠjeprvѤE+C]zBH2ٵy+N@OE9Irs5/bt${! 1k$?eogY~FƘGߠ`ZtVz%GQiW<Vsnr}[j6IаqnFmmT,KO?wC:sˠʹ{һyu]?;?pI^`k4` #j{s+JbmLVVQ-搭- 9>dӁ=Ký3!m;jޔ~U(4=RpG4\s&MA<\hRjBZ${G kw:?Ixq$M!b\  b. :+X-M=զGh4L(-2KRH۵syRud$mU gQt;ϧN#$sٕģ(UF+L`n.|=RBw(Wia10{f%ҷ2.Ky6b^Wݬ?c#4)"NV#M`8!cHj\QiK?Sr~r*pr횈WGZT1Eƾu/rb"|BMe7Q潺 ^ZM&KY<`ƲN({)ʌr!º*;HEgx]hL{V N> ᖙ? \ lg"=no BȺDcQd]ω4h(_lXm!Fˉ٥kp_YW|uwcL<tӍ=N.ZߍJ% XGGP2gN^ݑP\E^U}0fC8ZB 'QıVӮv"t9w9R݀}":(3K}Ze 9bre\tv_3tF%VЭe=(6?DJh?P'$jx^hBӝ8wY 4|^!}A5Ωe޸`UA%4zYKU{cCbk`Sh 3ga6i:MEA0ˑA#Z< ¿U0domI ݽӁv1^JqVDl ~3]a>oӛ:dS$V3{^(UɂS5KŠtU =UmӍ_$:@bE" s05H50t?Mh_ZRp)% q]A:JUJRU^0Ce`2&`MO>+1ce»pq<)*N)<[IXt|Z jtzkzMv 2AJ94SILSea` 8{>3 P5.VHs}'ܩ*MàЈlk/Rl3nn2eR 6# 3"!;9O?}d\#V8T D΃"@TvAS֗#oW^7Q/B2ajKYQ&dL.gg;HVpRFޱsQFdWlTTN~S%B,e6~6F*lp+=Cͧ*|iwpN%kfHOlMy`R0<y r~YVۿv|_-#D9,psGYfDx=XH[qQ*H$Lo61 ؈ B->/TUɪX?W!!uDNĄ* X'2[09]Bm2í \7<߉I2њvA*$vkT9VVSw?SҨR1z,F*HQ:bğU#kCGMyPؚ{x~'4`T"^Q=L/cER-ms.iGX[P>`kr694t2GWHS$DFOF3>HZ_9QKHHg;t"JIy*h;5-g|D"[˶ l-{0uSq $NqLϯ؜h-M7_N =>U݉Aܪ"Oi~0Mι  +hืM&3bS;H<, *#㰟Ϫw]&t1l,Oʂ#IfIoe'H:W+2&tc \}ȟ}2yXF뷓U=DW 9zDo3P ; x%Qs,-+aZI"V̄օd{UpȔ%CMޝK/vKktve Cpu; DC ԌZ/:orLVníkc5R5ֳy{gY`]sǦYdS}C-]^yEOb,ULgyh9MW&s}b(4A*)窍s  VN!&Y}?UhIhU^_J'p|NE͕ +8*[;I%CBTR3y]mfۚܯgjFpxM߉G HVmօ[zsl:v7^՛h1m'ZAN>s̼=xIe')7R^J)$;X74 #bt-1[Hw/cmQ$BZD`H ֽMgs<BŽv9U~O( ]"aBybE]cBhrgYs}ȫozo}B+a]g K ?&51ѺcŇ A s%'M baTOS2/E]h!h>7"Rlnb9|[Z (LoדH "Rsy@=>v7UHp"jڇֻ<@mAy2&|xVb>*WrrbJJϾI ϼqcD_ćEh!:G!Rr!N$wn21FDBq)V}Z;C8hq.}4j3n%SU|`68l)P-}]?@*=An.-x &xy˔&$hP^Rm|ANDn|D-7fѭU%x sXb@Hˋ5x0-t!L#, VG$0Ig1%kt V0\8|ۨ'{KI .p FY7Moכ&~~A\4|F.ꁨf wZݏh#+ ֆG+yK]Ať$GJ.%gJ\15 MT(oƉphB{f{z;u3W_`3Z-# |- |\yrF P4=ZzPG^a8LoEwEJJFzuGpYXT EbũiL4(ۦ"O `b8UR#'FW~2Ꙃ4[ZK]$ Dd)2o7E@L)hJKfQE(vS1Tmy,({~V3 JhEgvƱ!G}"S6Z=ejJ|*laqapeA!}{21ZiQcӔdQ8$AONVjͧlo9bEhAfogPd: ZsÔ.}7csOvU\gNY8LQE܊4Ax01D-eVSyvx 2;mŚѼʽQ ^`jq%+SsHe8 Q:aB+Hd.n9]Ϛ;&Ke \+kkI;eQ)贅H_: e|}^\7k#qiYhmG *dlŁĸH#t)XbRc7B3oUHlfkg:*4&QwnW3R C3KM\m XΙ'E+*j/M=a@ o!q|Khh\϶StŵzVbGW6 SFqh{`"j7mzd^)bXDuOܧ\(Y̽uεmQw}[x ?ڑn8iV{grYQQi/)xfe݄uJ7xٞThƳF笲O)j_C( k4Eb y/jǵt7}Ӄۨa&ytp34v lO_Y^K}dNd`Mu$MQлUNmuL3j'A3Ur;TAx]ZNT:_ #bZ`ߠ.w֗4yHu唯?w@]!D TnegCW{IeɥO@m+ì-M=R5Ow?U@4]#ӻqHe4IђAvk cY̡I 9rX l? $f.UUa~G%GԉfIWw\P%D[&ˌb=dSSI&~\;5RKɌ>[pmt_xTPi2:}YH 46Pjz1}&H4s䎷l'1UzȞ|~zz21%BQ Zs)lrig^]> gls"pU(/桗3 or5*6X ӔӨ\@'WR%()E'n"`:x5: 2Zv4PY3tuyz-d_SOPv.D7\U|f] to2#d` 6[ >c"hYJ:<;iCI ʱeVCp|U#sŧOv}BeWB;gSX\ 52(7ĬL"3_LFvcU咽ݞ'o0\{kS)AxMzeW_t^/hRV;<1DK<0&} Z6K# ŕ۠L9aA0M^S}Wn2x)uʋSI&׷;haG@<[2ז QV?tSjmia['󁧠YrG߁̸IR䶇ǡ:b~/-HcRt•±DD#hE|H~~yJ|"$  |a!k,l"Sm۠ϛ*s(ք22'MG-`#ˬ 3p TOuq|_^Ɓ{|c8&~q6R&p6 fׁ#*_gdAi: ʗRs.(yz;F5 {=PrN_DR~Sv[\s)`%E΂Mc}@b0՛=M%CQ_CE] 38|Zq1T&+HGbp~_ڋzP4D`" bci&K|Jg-D\R(fy.\2έA0O^VpI7+eq0,M)4h`0PZPE,<Ւ0 v J}l׮cSzI5i`! !b/񀟶4RLO(4̜1Oe<;H2, -mJ#0|K{`V Ču}w5 1n(RC  R㡢SbGA X#8E;++O`ޡ&x5 9g 6ۚA$0s_$5d_ٓo:N 5pmB I#ȼ6D: y땸ufE֔~8͔9 q=/@Ig2R mADDJ$'RUtUKpP@ (r3򾥬/hf7S{jNҧJ<{zs~冁f 侵T8XydBHݸ.+NA[jSR8X-(׆U"W.\hیL**dA #Uo*꿜:i}/5Bٛ#Zk1uq /<5OU,$p0螼S9M s 4b/ 1F2b}{Swwh;qQz$>497n7$ ^%H$Znي_㤿q;2!5YUFe[l@UE ^PTm4%Rv{uat9-Z)N`I1)K.X29r.˴j<<(y~C臵]WZe)+ד-_*ob!RZ}t~9Yf8~1ݏe)r X<O$ɡk,x;"ѻ uAO.ֳgy!=R_I-̏Zyb+RaBae#s0CMۺ5 XD!hle1;tr6mSa.KXDdό[\l'32Mi[y_꘭&b3FT7'z) 3TT 5Yt.K ^ 5c9{Uj;I-3] N,Kv_22(K"ט'*TeL}'$EٕOh[(\VSUV7Y<^Jֶl=e7L{I6F:4 %M*+U_Wl wSM%UQТ IJNQ҆ja?j^@L"0^u(umu6uZ%Ub)@"(Ѡ5('zDT{~55Я jy1t8`m9r!  4|Ar "sWd2T Fd@f7 "0'[lxt,Bij6!4d% n;dٻ+>u- 8MT?a6G9X.{)d Cdu::RSeȬ05XRtZMԉ 5,; ^pm' p4WH•b9! s7kU<jy1TtQ΀FɩҘaw7 p^lx(  B+DjE!dQv~W_ⴍ##P*! 졀WJؒG{txb L1.f }Axtq:3<6H{3IΞw@>+Է'G×doeZt!Fޥ_-+Mx ')l Sn‰̆{@=\1pƀDMgGq-5_>bZy8~f;xm ^"~c+&p܄S@x!~v9o⵲|b'Z("$FKSGr0Όi $C( 49PKH 4.~L~|- %FH1%̏\Qo*7cnK7D<|dn>!E.Jw\~i VSo4~e[dAE%eՆ7iynkxLcH׾4%R.~d9 91bFw=I$v/k>uq.c婖q /=zQ`Ցrt͛a±1]**ӥՆ2.߬Gn2[ŖJ|2ZDciCShI3|:׬tQ}wպe0| ?jo!4/z_hX1\VkN7U:}&/!gƙl5W2M'i+6ID;!jk+p/#]=jbܶOmGeQOVsڕSwjDcǻ\KVyg.CSE$E#lI._v Dvi*{} ln; pll#  g[H^wWw)ɹ*CJ;0<+;(6[612'-bIٻks->f4"q`kCl2\S)пRdڴ5N n\'ޣGg*u$)Co+cT0A&An34 9:z{r\Rq%pV bflӼp͕j\t;:xM Ӆ-S~;SC~k AK9‚7:kl;G}Qd;!|.WAx/ymd0&طyY ~9I3R=ip=LZ PG|2^ YI34/RQ瞁E'oE[gBR8z*V'4*hNJ>Pp\0Fȹܳ3d[+]܃m:U+M:; ʍqZAwMȪLVqq[3QX1*`7az)&POmHՁG.9 ={V@_vpJ?QWTm50xBBo>(*-jqM[30s)|M:i\{Jti:<1 17:\([n /I$R"_лƞy忺`c9k`ըl1DUyL ߘV?-ܬǥ<8 ^̪ 6EĺM :k"Y5Mwc-+u p'ꥠU/V^FDZD풼~{$zrxշA x S9l.[ŘYs(TNCR?Acm0z~sϓwVj^Ɩ[s<[.syiWER?Mʧxtm nVI Gq(bzc2"{ͦb'+'Cڼ.^=Iv4yUߕdxC3"-MI"EzѮmbs XH} ,WQnRhz6 cbӄ#M 9,U0{elc]mˊ0h)y`ڴ"詢jT@>C 2/ ,c- :PżRhpmp,)ůW}ӛf,;ѕ&.qJ2ٴ\E.Z"S;z?{.4&_&#JЇ+ vH1Gk!':KbO){HQX"\5=jyר+VϤ7JQ௵nAr$ӽwEt"( 9GV ^R^w1d$,r]d.`xl5^-wSJ6u<EݤkOS.PtiyXn5*߭T7zg<9T9]V j})3IbHΉpd,R _K$m3k62pylpjxXlq·!џH>&*y0f|hG< "'opHZT 7Al(I?}٢"3H$MoJ ^2jО|0hVc14*Hb>!ַ+.q~n2әCu{:fg0ɼtĮ_Ĥw8il^{LfǻUrV`= C9H.O DyzK`I繄Ӛ#019j:nvþ|Q$2k߈/&yi TXACQjĚ8,D|"u&87e{&6,iY( "mmB{,NAX>LUS,o6^`xQkC4TDl6`}W"Kadp`Eٱ5^x^In%lbA0Y} P,n0Pa} Pl Sլ(NЮ$,nXPX`PV`Ь(PРQ<`RPa0a  SPcQRPV$,ndfdfЬ QPЬQP.lլЬQPѮ1| P`P`lլ ЬPРlլ ЬPРn1dЦV< PP<PP,ndfdfnЮSм RRPЮSмR?P.ծ<PPЮSмR Pծ<PPЮSмRPn`ԦWP Ю P^ݧ ݮQJ_W$,TЮ P DBL$IXREADll1 ЬQ1PRUȏHH1  P1ЬV1Pfm@mЎmP1}fVЬ T+l1ЬQ1eQPQ1W"}dTPlЬQeQPQ1>լ YP6Ы QʏH]ݫ PݫTR~ݫXmЎmP1}R,Rc aPiQWW0P1WЧ(VЦ4Wl 8Ь$Q2Pam߳mЎmP1 RЦ S,Rc al8Ь Q2PammЎmP1i=RЦTS,Rc al8ЬQ2PamemЎmP1,P6IPQIfP((`lSRBlQgPTBQgPfP@dSR@+PB0W^g5W<`>PHPQNIgP(:(`ЬPРU<`VVTTQQUSRPgQPAdVT@+P/P 'SPSlTRBlQ^PVCfUBQUPTRP DBL$XARGS|lllݏc*ݏ4*HЭVfPPUЬQ19PmޡmЎmPݏB*BHl\ЬQV}aRPRmmccЎmPݏB*HEf1~0~U ,fn0RcP^QfP^SfRЬRSPcđ }PcPcPcPQP%@aQPQݏ*ݏ*IGP DBL$XSTAT|k]QЭ PРVl(Y%lݏc*ݏ4*FЬQ.PambmЎmP1 VPЬQ.Pam.mЎmP1 VPWЬQ.PammЎmP1 VP#Ь Q.PamƟmЎmP1qVPЬQ-PammЎmP@PVP$ЬQ)Pam_mЎmP VPPݏB*E DBL$WKDAYЏ*TES^ޮll~ݏc*ݏ4*clլ~TcЬQa0P^mn̞mбRЬQRnm^P ~ݏB*c^9zn~{PPPnnlլ ~Tc ЬQnPﷃP            [!ZL;!ZLH  SMG$DEL_TERM_TABLESMG$INIT_TERM_TABLE_BY_TYPESMGSHRSMG$GET_TERM_DATA~ݏn^Q~^Q8P1ЎPPPzԎ^Q~^RQa~߯^Q߯^PRQP:8^^QPՎՎ1Վ^TЫzPPn`~^Ve^QV^PVQP7^^R^S ^Q^^U^PTRQPQzPTSQSccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏbePcP`ccdЏ:bePcP`ccdЏHbePcP`,^ՎY^Q}^P~^RRQP6^Aݏ^QЫz~^Q 6^/zh|zh~ ,?@abcdefghijklmnopqrstuvwxyz[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?`abcdefghijklmnopqrstuvwxyz{|}~_`abcdefghijklmnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{|}~  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^OPA0TTA0TTB0!TTC0ATTD0aTTE0TTF0TTG0TTH0TXA0TXB0!TXC0ATXD0aTXE0TXF0TXG0TXH0TZA0TZB0!TZC0ATZD0aTZE0TZF0TZG0TZH0RTA0TTI0!TTJ0ATTK0aTTL0TTM0TTN0TTO0TTP0TTQ0!TTR0ATTS0aTTT0TTU0TTV0TTW0TTX0TTY0!TTZ0ATXI0aTXJ0TXK0TXL0TXM0TXN0TXO0!TXP0ATXQ0aTXR0TXS0TXT0TXU0TXV0TXW0!TXX0ATXY0aTXZ0TZI0TZJ0TZK0TZL0TZM0!TZN0ATZO0aTZP0TZQ0TZR0TZS0TZT0 TZU0! TZV0A TZW0a TZX0 TZY0 TZZ0 WTA0 TCA0 TCB0! TCC0A VTA0LTA0PTY0NVA0TWA0TNA0 FTA0 TKA0@???VBUWULUQUBWLQFDFCDCTNUNLNLONRNRONZPZIZEMDSCOUOGHGCHCCITBPVBLVVUADTVTSMGSHRSMG$GET_TERM_DATA DBL$ASCIIDBL$DATE DBL$DECML DBL$DELET DBL$ERRORDBL$FATAL_IMAGE DBL$FATALFDLSHRFDL$CREATE DBL$FILEC DBL$FLAGS_NLA0: DBL$TTSTS DBL$ASTSAV DBL$ASTRST DBL$BEGFL DBL$BKSTRDBL$CHAIN_PARAMETER0 DBL$CHAIN DBL$GTENT DBL$CPUTM DBL$CHOPEN DBL$DELMBXDISKTAPESCOMCARDTERMLP WKSTRLTMBUS MLBXJRNLMISC................????RK06 RK07 RP04 RP05 RP06 RM03 RP07 RP07HT RL01 RL02 RX02 RX04 RM80 TU58 RM05 RX01 ML11 RB02 RB80 RA80 RA81 RA60 RC25 RCF25 RD51 RX50 RD52 RD53 RA82 RD31 RD54 RRD50 RX33 RA70 RA90 RD32 RF30 RF71 RD33 ESE20 RZ22 RZ23 RZ24 RZ55 RRD40 RX23 RF31 RF72 RAM_DISKRZ25 RZ56 RZ57 RA92 SSTRIPE RZ58 TE16 TU45 TU77 TS11 TU78 TA78 TU80 TU81 TA81 TK50 MR_TU70 MR_TU72 MW_TSU05MW_TSV05TK70 RV20 TA79 TA90 TF85 TF70 RV60 TZ30 TM32 TSZ05 TK50S TZ30S TK70L TLZ04 TZK10 TSZ07 TSZ08 TA90E TZ85 TZ87 TZ857 EXABYTE TTYUNKWNVT05 FT1 FT2 FT3 FT4 FT5 FT6 FT7 FT8 LA36 LA120 VT52 VT55 VT100 VK100 VT173 LA34 LA38 LA12 LA100 LQP02 VT101 VT102 VT105 VT125 VT131 VT132 VT200SRSTQ_BTS TEK401X PRO LA84 VT300SRSVT400SRSVS100 VS125 ........LP11 LA11 LA180 CR11 ........MBX SHRMBX NULL ???????? ABCF`7  "$&'(+,-.01235789:;<=@AF$  !"#$&()*# !@A`"#$%&abcdefn o'pq *;;c DBL$TTCHAR DBL$DEVCLT DBL$EMPBUF DBL$ENDFL DBL$ERRTXTSYS$INPUTSYS$COMMAND DBL$GLINECDDSHRCDD$SIGN_IN CDD$SIGN_OUT !CDD$FIND_NODE 5CDD$GET_ENTITY_ATTJCDD$GET_STRING_ATTdCDD$GET_STRING_LIST_ATT~CDD$GET_STRING_CELL  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?@ACDEFGHIJKLMNOPRSTUWXYZ[\]^_`abcACDEFGHIJKLMNOPRSTUWXYZ[\]{|}~AAAAAABDFFFFJJJJOPPPPPQPXXXX\VAAAAAABDFFFFJJJJOPPPPPQPXXXX\  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNQRSTUWXYZ[\]^_`abcABCDEFGHIJKLMNQRSTUWXYZ[\]{|}~AAAAAA^CEEEEIIIIOQQQQQP_XXXX\VAAAAAA^CEEEEIIIIOQQQQQP_XXXX\ SYS$DISK:[].DDFSYS$DISK:[].ISMe  DBLRTLMSG DBLDDTMSG@@80P@ (8@  HP @LIBRTL2LIBRTL 1F`z=DBLRTLDBLRTL V4.2-0726-APR-1993 09:3426-APR-1993 09:34VAX-11 Linker V05-13 .$$ABS$$. DBLDDT$_BASE DBLDDT$_TITLE DBLDDT$_BREAK DBLDDT$_AT"DBLDDT$_INVDDTCOM*DBLDDT$_NOSUCHVAR2DBLDDT$_NOSUCHRTN:DBLDDT$_NOSUCHBPTBDBLDDT$_XOUTOFRANJDBLDDT$_RMSERRRDBLDDT$_SYSERRZDBLDDT$_SUBSCRERRbDBLDDT$_NOSUCBPATjDBLDDT$_WRIINTLITrDBLDDT$_NOCONTzDBLDDT$_ARGNOTPAS DBLDDT$_ABORTDBLDDT$_NOSYMRTNDBLDDT$_ERRHLPLIBDBLDDT$_EXITSTATUSDBLDDT$_SHOWBREAKDBLDDT$_NOSETBREAKDBLDDT$_LINERANGEDBLDDT$_NOBREAKSETÀDBLDDT$_SHOWRTN* DBL$_FACILITY* DBL$_RTL_BASE *DBL$_EOF *DBL$_ENDOF_FIL* DBL$_NOCALL*DBL$_RETNO_CAL* DBL$_CMPERR,*DBL$_RECEXTCAL4* DBL$_ARGNUM4*DBL$_INCNUMARG:* DBL$_SUBSCR:* DBL$_SUBERRB* DBL$_WRTLITB*DBL$_WRIINTLITJ* DBL$_NOMEMJ*DBL$_NOTENOMEMR* DBL$_ILLCHNR*DBL$_ILLCHANUMZ* DBL$_NOOPENZ*DBL$_CHANOTOPNb* DBL$_ONLYWRb*DBL$_INPFROWRIl*DBL$_CHADEFERRt* DBL$_UNDOPCz* DBL$_BIGNUMz*DBL$_NUMTOOLON* DBL$_CHNUSE*DBL$_CHAIN_USE* DBL$_FILSPC*DBL$_BADFILSPC*DBL$_FNF*DBL$_FILNOTFND*DBL$_HANNOTAVA* DBL$_DIGIT* DBL$_BADDIGIT* DBL$_FILOPT* DBL$_BADOPEN* DBL$_IOFALL* DBL$_IO_ERROR* DBL$_TOOBIG*DBL$_LINTOOLNG€* DBL$_NOSPAC€*DBL$_NO_SPAFILʀ* DBL$_FILFULʀ*DBL$_OUTFILFULҀ*DBL$_FLDRECLNG* DBL$_RECNUM*DBL$_ILLRECNUM* DBL$_BADCMP*DBL$_INCCOMPIL* DBL$_DIVIDE*DBL$_DIVBYZERO* DBL$_ARGSIZ*DBL$_ARGWROSIZ* DBL$_REPLAC*DBL$_SUPEXIFIL * DBL$_CHNEXC *DBL$_TOOMNYCHN** DBL$_DEVUSE**DBL$_DEVIN_USE2* DBL$_FINUSE2*DBL$_FILEINUSE:* DBL$_ONLYRD:*DBL$_OUTTOREADB* DBL$_LOCKEDB*DBL$_RECLOCKED* DBL$_BADKEY*DBL$_ILEGALKEY* DBL$_KEYNOT*DBL$_KEYNOTSAM* DBL$_NODUPS*DBL$_NODUPKEYS*DBL$_NOTISMFILҁ*DBL$_JOBSTAERRځ*DBL$_ILLTRMNUM* DBL$_NOCURR*DBL$_NO_CURREC* DBL$_PROTEC* DBL$_PROTVIOL*DBL$_NO_SUCOPR*DBL$_RNF*DBL$_RECNOTFND* DBL$_SYSTEM* DBL$_SYSERRORj*DBL$_ARGOUTORDr*DBL$_ARGOUTLIMz* DBL$_ARGCOUNT*DBL$_FLDNOTPAK*DBL$_ILLBIOSIZ*DBL$_WROSIZREC* DBL$_ARGMIS* DBL$_ARGMISSʂ*DBL$_INVSHRCOD"* DBL$_RMSERROR**DBL$_INVARGTYP4*DBL$_DBLRTLERR:* DBL$_FILORG:* DBL$_FILE_ORGB* DBL$_OUTRNGB*DBL$_OUTOFRANGL* DBL$_NOTDIBL*DBL$_CALNOTDBLR* DBL$_EXQUOTAZ*DBL$_DEVNOTRDYb* DBL$_IOMODEb*DBL$_INVOPNMODj* DBL$_CANCELj*DBL$_CONTROL_Cr* DBL$_INTRPTr*DBL$_CONTROL_Yz* DBL$_TIMEOUT*DBL$_OPENERROR* DBL$_ALLOC* DBL$_INVALLOC* DBL$_BKTSIZ*DBL$_INVBKTSIZ* DBL$_BLKSIZ*DBL$_INVBLKSIZ* DBL$_BUFSIZ*DBL$_INVBUFSIZ* DBL$_RECSIZ*DBL$_INVRECSIZ* DBL$_NOMSGMGR*DBL$_FEANOTIMPƒ*DBL$_QUENOTAVAʃ*DBL$_INVKEYNUM҃*DBL$_FORGNTERMڃ*DBL$_OUTATTERR* DBL$_INATTERR*DBL$_INVCHRERR*DBL$_FULBUFERR*DBL$_UNSUPDTYP* DBL$_INVMATCH *DBL$_INVCONTIG* DBL$_INVDEQ* DBL$_NUMREC*DBL$_INVNUMREC"*DBL$_INVRECTYP** DBL$_INVALFDL2*DBL$_INVBUFNUM:* DBL$_INVPROB* DBL$_INVACLJ*DBL$_TOOMNYSEGR* DBL$_INVDATYPZ*DBL$_NO_RECSIZb* DBL$_INVALRFAj*DBL$_NOTYETFUNr*DBL$_INVKEYPOSz*DBL$_INVKEYKRF*DBL$_INVKEYATRA* DBL$_STOPK* DBL$_AT_LINES* DBL$_PC_PSL[*DBL$_IOERRINFOc*DBL$_NUMOFARGSk*DBL$_SUBSCRPT1s*DBL$_SUBSCRPT2{* DBL$_ARG_NMBR* DBL$_LOGCHAN* DBL$_ARG_SIZE* DBL$_VALUE*DBL$_ALLSNDBUF* DBL$_UNDEFLBL* DBL$_OUTOFBND* DBL$_WARNING*DBL$_STVÆ* DBL$_OPCODEˆ* DBL$_FILENAMEԆ* DBL$_EXPIREDۆ* DBL$_NUMDIMS* DBL$_BOUNDSDBLUTL$_FACILITYC DBLUTL$_TEXTDBL$K_PATCHAREASIZEDBL$$K_MAXCHANS DBL$USEROPEN8< DBL$TTNAME< DBL$FUNCTION(DBL$EXECUTE_IMAGE_ROUTINEh| DBL$SETCTLH DBL$$CVTDXDXPDBL$TRACEBACK_R5X DBL$WHERE_R1 DBL$$SIGNAL DBL$$ERRTRANSDBL$ERRTRANS_R1( DBL$$TRNLOGDBL$INTERP_LINEDBL$MBXNAME_R1 DBL$CREMBXh DBL$WKDAY`| DBL$XSTAT| DBL$XARGS0 DBL$$TBXXX8 DBL$TBMUL@ DBL$TBBINH DBL$TBMODP DBL$TBRPLX DBL$TBRET< DBL$TIMOUT| DBL$TTFLGS| DBL$TTBRDCST | DBL$SNDOP< DBL$SLICE| DBL$SETDFN< DBL$RMSCC < DBL$JBNAM< DBL$RCVID DBL$PUTCM DBL$PURGE< DBL$SETKRF< DBL$POSRFA DBL$PARSEH DBL$ULOCKDBL$LOCKDBL$KILL@ DBL$IXREAD DBL$ISMCRE| DBL$GLINE< DBL$GETFNM8< DBL$GETFA< DBL$GETDFN DBL$GETCM< DBL$EXITERROR< DBL$EXITSUB<DBL$EXITSUB_VAL DBL$ERRTXT` DBL$ERRMOD  DBL$ENDFL  DBL$EMPBUF| DBL$DEVCLT| DBL$TTCHARp< DBL$DELMBX< DBL$CHOPENH< DBL$CPUTM< DBL$GTENT@| DBL$CHAIN8 DBL$BKSTR  DBL$BEGFLx DBL$ASTRSTp| DBL$ASTSAVx<DBL$WAITX< DBL$VERSN@| DBL$TTSTS<DBL$TT_NUMBER_TO_NAME<DBL$TT_NAME_TO_NUMBER0< DBL$TNMBR(<DBL$TIME<DBL$SIZE DBL$RUNJB< DBL$RSTAT< DBL$RSTATD DBL$RENAMP DBL$UNPAKDBL$PAK DBL$MONEY<DBL$JBNO| DBL$INSTR| DBL$FLAGSx< DBL$FILECp< DBL$FATALx| DBL$ERRORh DBL$DELET`< DBL$DECMLX<DBL$DATE0< DBL$ASCIIDBL$INITp DBL$INIT85 DBL$$GETCCB DBL$$RELCCB DBL$CVTIIV(< DBL$CVTIZV < DBL$CVTIZ< DBL$INTCVT0< DBL$CVTZIP< DBL$CVTINThDBL$$CVT_LONG_TO_NUM`DBL$$CVT_NUM_TO_LONG DBL$CVTAZ_R1 DBL$CVTIQZ_R1 DBL$CVTIZA_R1 DBL$CVTIZ_R1 DBL$CVTZA_R1 m~ DIBOL042.B08[KITS.V42-07.KIT.B]DBLRTL.EXE;113 DBL$CVTZIA_R1 DBL$CVTZIQ_R1 DBL$CVTZI_R1 DBL$GB_CMP_MAJOR_VERSION DBL$GB_CMP_MINOR_VERSION DBL$GT_RTL_MAJORVERSION DBL$GT_RTL_MINORVERSION DBL$GT_RTL_OPSYS DBL$GT_RTL_PATCHLEVEL DBL$GT_RTL_RELEASETYPE DBL$GT_RTL_SUBSYS DBL$GT_RTL_VERSION_STRINGDBL$TNMBR_TABLEDBL$$GX_LO_UP_STANDARD_TABLElDBL$GX_PATCHAREADBL$$GL_CHANBLOCKSDBL$$GV_CHANNELSpDBL$$GA_DDTCMDlDBL$$GA_DDTMODINITLbDBL$$GL_DDTFLAGSlDBL$$GL_INITFLAGS DBL$GL_FLAGS MSGPTR$AAAAAAAA MSGPTR$AAAAAAAC HP @LIBRTL2LIBRTL 1F`z*[KITS.V42-07.KIT.B]DBLRTL.MAP;1+,0 ./G 4-80123KPWO56 t7[|89@A GGHJv KIT:DBLRTL.EXE 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 1G +------------------------+G ! Object Module Synopsis !G +------------------------+lModule Name Ident Bytes File Creation Date Creatorl----------- ----- ----- ----- ------------- -------r$DBL$$VECTOR DIBOL V4.0-5 1098 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:33 VAX MACRO V5.4-3rDBL$$SLEEP 3.0-3 237 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:26 VAX MACRO V5.4-3wDBL$$LPQUE 4.0-0 758 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902wDBL$$STROPS 3.0 278 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902rDBL$$READS 4.1-14 5822 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$WRITES 4.1-3 1807 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$DISPLAY 4.0-6 1839 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$ACCEPT 4.0-5 1416 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$READ 4.0-14 2866 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$WRITE 4.0-3 1209 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$FORMS 3.0-3 692 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$SEND_RECV 4.0-2 1541 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3wDBL$$ARRAY 3.0-4 122 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902rDBL$$BIFUNC 4.2-01 4318 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$XCALL 4.0-6 2114 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$INTERP 4.2-3 4997 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$PUSH 4.0-8 1909 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$STORE 4.0-7 4279 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$FORMAT 4.0-10 1588 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$FOR 3.0-5 1188 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$MATH 4.0-5 10101 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$BOOLEAN 3.0-1 2089 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$CMPR 4.0-4 3419 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:27 VAX MACRO V5.4-3rDBL$$FIND 4.0-2 2306 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$OPEN 4.2-04 7638 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$CLOSE 4.2-1 788 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:28 VAX MACRO V5.4-3rDBL$$GET2DX 3.0-2 152 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$CONVERT 4.2-04 7512 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:26 VAX MACRO V5.4-3rDBL$$MODE_TRANS 4.0-1 280 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3wDBL$$KEY_LOOKUP 4.0-4 765 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902rDBL$$TRNLOG 2-00 186 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$CHANNEL 4.0-1 97 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$CCB 3.0-5 372 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$GETVMCLR 2-00 46 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$INIT 4.0-4 1748 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$OPENTT 2-01 163 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$ERRTRANS 4.2-0 671 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$HANDLER 4.2-06 154 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$SIGNAL 2.3-0 270 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$WHERE 2-00.1 149 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3DBL$$SELECT_CONVERT w 4.2-06 2242 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902DBL$$CVT_FUNCTIONS w 4.0-0 408 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902rDBL$EXITHANDLER 4.2-1 725 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$SETCTL 4.0-3 1272 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$$DBGEXT V3.0-1 12 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$TERM_IO 4.0-8 1744 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$FAB 2.2=0 240 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3 KIT:DBLRTL.EXE 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 2lModule Name Ident Bytes File Creation Date Creatorl----------- ----- ----- ----- ------------- -------rDBL$ASCII 4.2 168 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$DATE 4.2 174 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$DECML 4.2 143 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$DELET 4.2 229 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$ERROR 4.2-0 261 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$FATAL 4.2-0 361 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$FILEC 4.2-0 234 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$FLAGS 4.2-0 450 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$INSTR 4.0-0 194 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$JBNO 3-00 168 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$MONEY 3.0-1 104 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$PAK 4.0-0 1001 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$RENAM 4.0-2 690 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$RSTAT 3.0-0 271 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$RUNJB 4.0-1 972 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$SIZE 3.1-0 150 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TIME 3.0-2 302 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TNMBR 3.0-2 669 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TTSTS 4.0-0 552 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$VERSN 3.0-0 198 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$WAIT 4.0-1 1275 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$AST 4.2 251 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$BEGFL 4.2 195 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$BKSTR 4.2 232 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$CHAIN 4.2-0 425 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$CPUTM 4.2 128 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$CHOPEN 4.2 156 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$DELMBX 4.2 111 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$DEVICE 4.2-0 2747 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$EMPBUF 4.2-0 178 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$ENDFL 4.2-0 220 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3wDBL$ERRMOD 4.0-0 159 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902 rDBL$ERRTXT 4.2-0 286 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3DBL$EXECUTE_IMAGE_ROUTINE Tw 4.2 204 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902;rDBL$EXITS 3.0-0 268 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$FUNCTION 2-00 106 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$GETCM 4.0-0 144 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$GETDFN 3.0-1 219 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$GETFA 3.1-1 1177 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:30 VAX MACRO V5.4-3rDBL$GETFNM 3.0-0 226 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$GLINE 4.0-1 516 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3wDBL$ISMCRE 4.0-0 797 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902 rDBL$IXREAD 3.0-0 428 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$KILL 3.0-0 81 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$LOCK 3.0-0 93 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$PARSE 3.0-0 1099 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$POSRFA 3.0-0 494 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$PURGE 3.0-0 381 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$PUTCM 3.0-0 45 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$RCVID 3.0-0 221 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$RENAM_V1 3.0-0 162 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3 KIT:DBLRTL.EXE 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 3:lModule Name Ident Bytes File Creation Date Creatorl----------- ----- ----- ----- ------------- -------rDBL$RMSCC 3.0-0 90 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:31 VAX MACRO V5.4-3rDBL$SETDFN 3.0-0 365 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$SLICE 3.0-0 99 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$SNDOP 3.0-0 127 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TTBRDCST 4.2-1 947 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TTFLGS 3.0-0 341 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TTNAME 4-00 152 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TIMOUT 3.0-0 173 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3wDBL$$TBXXX 3.0-0 1334 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902 rDBL$USEROPEN 2-00 40 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$XARGS 3.0-0 370 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$XSTAT 3.0-0 398 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3wDBL$WKDAY 4.0-0 195 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-Apr-1993 09:26 VAX Bliss-32 V4.6-902EwDBL$$RTLMSG DIBOL V4.0-2 42 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:33 VAX-11 Message V04-00wDBL$$DDTMSG 2.2-2 42 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:33 VAX-11 Message V04-00-rDBL$$UPLOTABLE 3.0-0 1753 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$TNMBR_TABLE 4.2-3 1600 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$ANSI_TABLE 3.0-0 224 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3DBL$DATA_TYPE_TABLE 4r 3.0-0 152 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$ESC_TABLE 3.0-3 790 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:29 VAX MACRO V5.4-3rDBL$$DATA 4.2-06 1296 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$$IODB 2.2-0 1440 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:32 VAX MACRO V5.4-3rDBL$$PATCH 2-00 1032 [KITS.V42-07.KIT.B]DBLRTL.OLB;1 26-APR-1993 09:33 VAX MACRO V5.4-3vLIBRTL2 V05-000 0 SYS$COMMON:[SYSLIB]LIBRTL2.EXE;4 8-JUL-1992 00:46 VAX-11 Linker V05-13vLIBRTL V05-001 0 SYS$COMMON:[SYSLIB]LIBRTL.EXE;6 8-JUL-1992 00:46 VAX-11 Linker V05-13rSYS$MISCDEF V04-000 0 SYS$COMMON:[SYSLIB]STARLET.OLB;6 12-OCT-1991 01:33 VAX MACRO V5.4-3rSYS$IODEF V04-000 0 SYS$COMMON:[SYSLIB]STARLET.OLB;6 7-JUL-1992 21:00 VAX MACRO V5.4-3wLIB$MSGDEF X-8 0 SYS$COMMON:[SYSLIB]STARLET.OLB;6 7-JUL-1992 20:45 VAX-11 Message V04-00LrRMS$GLOBALS X-1 0 SYS$COMMON:[SYSLIB]STARLET.OLB;6 12-OCT-1991 00:42 VAX MACRO V5.4-3rSYS$SSDEF V04-000 0 SYS$COMMON:[SYSLIB]STARLET.OLB;6 11-OCT-1991 21:23 VAX MACRO V5.4-3rSYS$P1_VECTOR X-4 0 SYS$COMMON:[SYSLIB]STARLET.OLB;6 7-JUL-1992 22:35 VAX MACRO V5.4-3N +---------------------------------------+N ! Module Relocatable Reference Synopsis !N +---------------------------------------+Module Name Number Module Name Number Module Name Number3----------- ------ ----------- ------ ----------- ------A+DBL$$BIFUNC 8  1DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 4KG +------------------------+ G ! Image Section Synopsis !3G +------------------------+.~ Cluster Type Pages Base Addr Disk VBN PFC Protection and Paging Global Sec. Name Match Majorid Minorid~ ------- ---- ----- --------- -------- --- --------------------- ---------------- ----- ------- -------CDBL$$$READONLY 3 224 00000000-R 2 0 READ ONLY CDBL$$$READDATA 3 4 0001C000-R 226 0 READ ONLY NDBL$$$READWRITE 4 10 0001C800-R 230 0 READ WRITE COPY ON REFN 4 1 P-0001DC00-R 240 0 READ WRITE COPY ON REFP 2 1 0001DE00-R 241 0 READ WRITE FIXUP VECTORSLIBRTL2 3 64 00000000-R 0 0 READ ONLY LIBRTL2_001 LESS/EQUAL 1 12  4 1 00008000-R 0 0 READ WRITE COPY ON REF LIBRTL2_002 LESS/EQUAL 1 12  2 1 00008200-R 0 0 READ WRITE FIXUP VECTORS LIBRTL2_003 LESS/EQUAL 1 12KLIBRTL 3 195 00000000-R 0 0 READ ONLY LIBRTL_001 LESS/EQUAL 1 14  4 8 00018600-R 0 0 READ WRITE DEMAND ZERO LIBRTL_002 LESS/EQUAL 1 14 $ Key for special characters above: +------------------+ ! R - Relocatable ! ! P - Protected ! +------------------+ LDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 5-H +--------------------------+H ! Program Section Synopsis !H +--------------------------+kPsect Name Module Name Base End Length Align AttributesLk---------- ----------- ---- --- ------ ----- ----------L_DBL$$VECTOR 00000000 000003FF 00000400 ( 1024.) PAGE 9 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVECpP $DBL$$VECTOR 00000000 000003FF 00000400 ( 1024.) PAGE 9_DBL$CODE 00000400 0000FCE7 0000F8E8 ( 63720.) LONG 2 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVECLP DBL$$SLEEP 00000400 000004EC 000000ED ( 237.) LONG 2P DBL$$STROPS 000004F0 00000605 00000116 ( 278.) LONG 2P DBL$$READS 00000608 00001CC5 000016BE ( 5822.) LONG 2P DBL$$WRITES 00001CC8 000023D6 0000070F ( 1807.) LONG 2P DBL$$DISPLAY 000023D8 00002B06 0000072F ( 1839.) LONG 2P DBL$$ACCEPT 00002B08 0000308F 00000588 ( 1416.) LONG 2P DBL$$READ 00003090 00003BC1 00000B32 ( 2866.) LONG 2P DBL$$WRITE 00003BC4 0000407C 000004B9 ( 1209.) LONG 2P DBL$$FORMS 00004080 00004333 000002B4 ( 692.) LONG 2P DBL$$SEND_RECV 00004334 00004938 00000605 ( 1541.) LONG 2P DBL$$ARRAY 0000493C 000049B5 0000007A ( 122.) LONG 2P DBL$$BIFUNC 000049B8 000059DD 00001026 ( 4134.) LONG 2P DBL$$XCALL 000059E0 00006221 00000842 ( 2114.) LONG 2P DBL$$INTERP 00006224 000075A8 00001385 ( 4997.) LONG 2P DBL$$PUSH 000075AC 00007D20 00000775 ( 1909.) LONG 2P DBL$$STORE 00007D24 00008DDA 000010B7 ( 4279.) LONG 2P DBL$$FORMAT 00008DDC 0000940F 00000634 ( 1588.) LONG 2P DBL$$FOR 00009410 000098B3 000004A4 ( 1188.) LONG 2P DBL$$MATH 000098B4 0000C028 00002775 ( 10101.) LONG 2P DBL$$BOOLEAN 0000C02C 0000C854 00000829 ( 2089.) LONG 2P DBL$$CMPR 0000C858 0000D5B2 00000D5B ( 3419.) LONG 2P DBL$$FIND 0000D5B4 0000DEB5 00000902 ( 2306.) LONG 2P DBL$$CONVERT 0000DEB8 0000E22C 00000375 ( 885.) LONG 2P DBL$$KEY_LOOKUP 0000E230 0000E52C 000002FD ( 765.) LONG 2P DBL$$TRNLOG 0000E530 0000E5E9 000000BA ( 186.) LONG 2P DBL$$CHANNEL 0000E5EC 0000E64C 00000061 ( 97.) LONG 2P DBL$$GETVMCLR 0000E650 0000E67D 0000002E ( 46.) LONG 2P DBL$$OPENTT 0000E680 0000E722 000000A3 ( 163.) LONG 2P DBL$$ERRTRANS 0000E724 0000E9C2 0000029F ( 671.) LONG 2P DBL$$SIGNAL 0000E9C4 0000EAD1 0000010E ( 270.) LONG 2P DBL$$WHERE 0000EAD4 0000EB68 00000095 ( 149.) LONG 27 DBL$$SELECT_CONVERT 0P 0000EB6C 0000F42D 000008C2 ( 2242.) LONG 2P DBL$SETCTL 0000F430 0000F927 000004F8 ( 1272.) LONG 2P DBL$$FAB 0000F928 0000FA17 000000F0 ( 240.) LONG 27 DBL$EXECUTE_IMAGE_ROUTINE P 0000FA18 0000FAE3 000000CC ( 204.) LONG 2P DBL$FUNCTION 0000FAE4 0000FB4D 0000006A ( 106.) LONG 2P DBL$TTNAME 0000FB50 0000FBE7 00000098 ( 152.) LONG 2P DBL$USEROPEN 0000FBE8 0000FC0F 00000028 ( 40.) LONG 2P DBL$$UPLOTABLE 0000FC10 0000FCE7 000000D8 ( 216.) LONG 2_DBL$CODE_FAR 0000FCE8 000120CB 000023E4 ( 9188.) LONG 2 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVEC P DBL$$LPQUE 0000FCE8 0000FFDD 000002F6 ( 758.) LONG 2 .DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 6TkPsect Name Module Name Base End Length Align AttributesLk---------- ----------- ---- --- ------ ----- ----------T_DBL$CODE_FAR 0000FCE8 000120CB 000023E4 ( 9188.) LONG 2 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVEC P DBL$$OPEN 0000FFE0 00011DB5 00001DD6 ( 7638.) LONG 2P DBL$$CLOSE 00011DB8 000120CB 00000314 ( 788.) LONG 2_DBL$CODE_NEVER 000120CC 0001A8C9 000087FE ( 34814.) LONG 2 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVEC-P $DBL$$VECTOR 000120CC 00012115 0000004A ( 74.) LONG 2P DBL$$GET2DX 00012118 000121AF 00000098 ( 152.) LONG 2P DBL$$CONVERT 000121B0 0001396A 000017BB ( 6075.) LONG 2P DBL$$MODE_TRANS 0001396C 00013A83 00000118 ( 280.) LONG 2P DBL$$CCB 00013A84 00013BF7 00000174 ( 372.) LONG 2P DBL$$INIT 00013BF8 000142CB 000006D4 ( 1748.) LONG 2P DBL$$HANDLER 000142CC 00014365 0000009A ( 154.) LONG 27 DBL$$CVT_FUNCTIONS -P 00014368 000144FF 00000198 ( 408.) LONG 2P DBL$EXITHANDLER 00014500 000147D4 000002D5 ( 725.) LONG 2P DBL$$DBGEXT 000147D8 000147E3 0000000C ( 12.) LONG 2P DBL$$TERM_IO 000147E4 00014E9C 000006B9 ( 1721.) LONG 2P DBL$ASCII 00014EA0 00014F3D 0000009E ( 158.) LONG 2P DBL$DATE 00014F40 00014FE4 000000A5 ( 165.) LONG 2P DBL$DECML 00014FE8 0001506C 00000085 ( 133.) LONG 2P DBL$DELET 00015070 0001514A 000000DB ( 219.) LONG 2P DBL$ERROR 0001514C 00015246 000000FB ( 251.) LONG 2P DBL$FATAL 00015248 00015397 00000150 ( 336.) LONG 2P DBL$FILEC 00015398 00015467 000000D0 ( 208.) LONG 2P DBL$FLAGS 00015468 0001561F 000001B8 ( 440.) LONG 2P DBL$INSTR 00015620 000156E1 000000C2 ( 194.) LONG 2P DBL$JBNO 000156E4 0001578B 000000A8 ( 168.) LONG 2P DBL$MONEY 0001578C 000157F3 00000068 ( 104.) LONG 2P DBL$PAK 000157F4 00015BDC 000003E9 ( 1001.) LONG 2P DBL$RENAM 00015BE0 00015E91 000002B2 ( 690.) LONG 2P DBL$RSTAT 00015E94 00015FA2 0000010F ( 271.) LONG 2P DBL$RUNJB 00015FA4 0001636F 000003CC ( 972.) LONG 2P DBL$SIZE 00016370 00016405 00000096 ( 150.) LONG 2P DBL$TIME 00016408 00016535 0000012E ( 302.) LONG 2P DBL$TNMBR 00016538 000167D4 0000029D ( 669.) LONG 2P DBL$TTSTS 000167D8 000169EF 00000218 ( 536.) LONG 2P DBL$VERSN 000169F0 00016AB5 000000C6 ( 198.) LONG 2P DBL$WAIT 00016AB8 00016FB2 000004FB ( 1275.) LONG 2P DBL$AST 00016FB4 00017098 000000E5 ( 229.) LONG 2P DBL$BEGFL 0001709C 00017154 000000B9 ( 185.) LONG 2P DBL$BKSTR 00017158 00017235 000000DE ( 222.) LONG 2P DBL$CHAIN 00017238 000173B8 00000181 ( 385.) LONG 2P DBL$CPUTM 000173BC 00017431 00000076 ( 118.) LONG 2P DBL$CHOPEN 00017434 000174C4 00000091 ( 145.) LONG 2P DBL$DELMBX 000174C8 0001752B 00000064 ( 100.) LONG 2P DBL$DEVICE 0001752C 00017A66 0000053B ( 1339.) LONG 2P DBL$EMPBUF 00017A68 00017B0E 000000A7 ( 167.) LONG 2P DBL$ENDFL 00017B10 00017BE1 000000D2 ( 210.) LONG 2P DBL$ERRMOD 00017BE4 00017C82 0000009F ( 159.) LONG 2P DBL$ERRTXT 00017C84 00017D96 00000113 ( 275.) LONG 2P DBL$EXITS 00017D98 00017EA3 0000010C ( 268.) LONG 2P DBL$GETCM 00017EA4 00017F33 00000090 ( 144.) LONG 2 LDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 7$kPsect Name Module Name Base End Length Align Attributes0k---------- ----------- ---- --- ------ ----- ----------2_DBL$CODE_NEVER 000120CC 0001A8C9 000087FE ( 34814.) LONG 2 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVEC P DBL$GETDFN 00017F34 0001800E 000000DB ( 219.) LONG 2P DBL$GETFA 00018010 000184A8 00000499 ( 1177.) LONG 2P DBL$GETFNM 000184AC 0001858D 000000E2 ( 226.) LONG 2P DBL$GLINE 00018590 00018774 000001E5 ( 485.) LONG 2P DBL$ISMCRE 00018778 00018A94 0000031D ( 797.) LONG 2P DBL$IXREAD 00018A98 00018C43 000001AC ( 428.) LONG 2P DBL$KILL 00018C44 00018C94 00000051 ( 81.) LONG 2P DBL$LOCK 00018C98 00018CF4 0000005D ( 93.) LONG 2P DBL$PARSE 00018CF8 00019142 0000044B ( 1099.) LONG 2P DBL$POSRFA 00019144 00019331 000001EE ( 494.) LONG 2P DBL$PURGE 00019334 000194B0 0000017D ( 381.) LONG 2P DBL$PUTCM 000194B4 000194E0 0000002D ( 45.) LONG 2P DBL$RCVID 000194E4 000195C0 000000DD ( 221.) LONG 2P DBL$RENAM_V1 000195C4 00019665 000000A2 ( 162.) LONG 2P DBL$RMSCC 00019668 000196C1 0000005A ( 90.) LONG 2P DBL$SETDFN 000196C4 00019830 0000016D ( 365.) LONG 2P DBL$SLICE 00019834 00019896 00000063 ( 99.) LONG 2P DBL$SNDOP 00019898 00019916 0000007F ( 127.) LONG 2P DBL$TTBRDCST 00019918 00019CCA 000003B3 ( 947.) LONG 2P DBL$TTFLGS 00019CCC 00019E20 00000155 ( 341.) LONG 2P DBL$TIMOUT 00019E24 00019ED0 000000AD ( 173.) LONG 2P DBL$$TBXXX T!~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;11b< 00019ED4 0001A109 00000236 ( 566.) LONG 2P DBL$XARGS 0001A10C 0001A27D 00000172 ( 370.) LONG 2P DBL$XSTAT 0001A280 0001A40D 0000018E ( 398.) LONG 2P DBL$WKDAY 0001A410 0001A4D2 000000C3 ( 195.) LONG 2P DBL$ANSI_TABLE 0001A4D4 0001A5B3 000000E0 ( 224.) LONG 2P DBL$ESC_TABLE 0001A5B4 0001A8C9 00000316 ( 790.) LONG 2_DBL$TABLES 0001AA00 0001BE97 00001498 ( 5272.) PAGE 9 PIC,USR,CON,REL,GBL, SHR, EXE, RD,NOWRT,NOVECFP DBL$$CONVERT 0001AA00 0001AC27 00000228 ( 552.) PAGE 9P DBL$$UPLOTABLE 0001AE00 0001B400 00000601 ( 1537.) PAGE 9P DBL$TNMBR_TABLE 0001B600 0001BC3F 00000640 ( 1600.) PAGE 97 DBL$DATA_TYPE_TABLE FP 0001BE00 0001BE97 00000098 ( 152.) PAGE 9_DBL$LIT 0001C000 0001C6E5 000006E6 ( 1766.) LONG 2 PIC,USR,CON,REL,GBL, SHR,NOEXE, RD,NOWRT,NOVEC P DBL$$TERM_IO 0001C000 0001C016 00000017 ( 23.) LONG 2P DBL$ASCII 0001C018 0001C021 0000000A ( 10.) LONG 2P DBL$DATE 0001C024 0001C02C 00000009 ( 9.) LONG 2P DBL$DECML 0001C030 0001C039 0000000A ( 10.) LONG 2P DBL$DELET 0001C03C 0001C045 0000000A ( 10.) LONG 2P DBL$ERROR 0001C048 0001C051 0000000A ( 10.) LONG 2P DBL$FATAL 0001C054 0001C06C 00000019 ( 25.) LONG 2P DBL$FILEC 0001C070 0001C089 0000001A ( 26.) LONG 2P DBL$FLAGS 0001C08C 0001C095 0000000A ( 10.) LONG 2P DBL$TTSTS 0001C098 0001C0A7 00000010 ( 16.) LONG 2P DBL$AST 0001C0A8 0001C0BD 00000016 ( 22.) LONG 2P DBL$BEGFL 0001C0C0 0001C0C9 0000000A ( 10.) LONG 2P DBL$BKSTR 0001C0CC 0001C0D5 0000000A ( 10.) LONG 2P DBL$CHAIN 0001C0D8 0001C0FF 00000028 ( 40.) LONG 2P DBL$CPUTM 0001C100 0001C109 0000000A ( 10.) LONG 2 DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 80kPsect Name Module Name Base End Length Align AttributesOk---------- ----------- ---- --- ------ ----- ----------C_DBL$LIT 0001C000 0001C6E5 000006E6 ( 1766.) LONG 2 PIC,USR,CON,REL,GBL, SHR,NOEXE, RD,NOWRT,NOVEC P DBL$CHOPEN 0001C10C 0001C116 0000000B ( 11.) LONG 2P DBL$DELMBX 0001C118 0001C122 0000000B ( 11.) LONG 2P DBL$DEVICE 0001C124 0001C6A3 00000580 ( 1408.) LONG 2P DBL$EMPBUF 0001C6A4 0001C6AE 0000000B ( 11.) LONG 2P DBL$ENDFL 0001C6B0 0001C6B9 0000000A ( 10.) LONG 2P DBL$ERRTXT 0001C6BC 0001C6C6 0000000B ( 11.) LONG 2P DBL$GLINE 0001C6C8 0001C6E5 0000001E ( 30.) LONG 2_DBL$DATA 0001C800 0001DA73 00001274 ( 4724.) LONG 2 PIC,USR,CON,REL,GBL,NOSHR,NOEXE, RD, WRT,NOVEC3P DBL$$BIFUNC 0001C800 0001C8B7 000000B8 ( 184.) LONG 2P DBL$GLINE 0001C8B8 0001C8B8 00000001 ( 1.) LONG 2P DBL$$TBXXX 0001C8BC 0001CBBB 00000300 ( 768.) LONG 2P DBL$$DATA 0001CBBC 0001D0CB 00000510 ( 1296.) LONG 2P DBL$$IODB 0001D0CC 0001D66B 000005A0 ( 1440.) LONG 2P DBL$$PATCH 0001D66C 0001DA73 00000408 ( 1032.) LONG 2MSGPTR$AAAAAAAA 0001DC00 0001DC0F 00000010 ( 16.) LONG 2 PIC,USR,OVR,REL,GBL,NOSHR,NOEXE, RD, WRT, VEC0P DBL$$RTLMSG 0001DC00 0001DC0F 00000010 ( 16.) LONG 2P DBL$$DDTMSG 0001DC00 0001DC0F 00000010 ( 16.) LONG 2MSGPTR$AAAAAAAB 0001DC10 0001DC17 00000008 ( 8.) LONG 2 PIC,USR,CON,REL,GBL,NOSHR,NOEXE, RD, WRT, VEC P DBL$$RTLMSG 0001DC10 0001DC13 00000004 ( 4.) LONG 2P DBL$$DDTMSG 0001DC14 0001DC17 00000004 ( 4.) LONG 2MSGPTR$AAAAAAAC 0001DC18 0001DC1B 00000004 ( 4.) LONG 2 PIC,USR,OVR,REL,GBL,NOSHR,NOEXE, RD, WRT, VEC1P DBL$$RTLMSG 0001DC18 0001DC1B 00000004 ( 4.) LONG 2P DBL$$DDTMSG 0001DC18 0001DC1B 00000004 ( 4.) LONG 2MSGPTR$SECTION 0001DC1C 0001DC3F 00000024 ( 36.) BYTE 0 PIC,USR,CON,REL,GBL,NOSHR,NOEXE, RD, WRT, VEC8P DBL$$RTLMSG 0001DC1C 0001DC2D 00000012 ( 18.) BYTE 0P DBL$$DDTMSG 0001DC2E 0001DC3F 00000012 ( 18.) BYTE 0 0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 9 G +------------------------+ G ! Symbol Cross Reference !G +------------------------+ _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jD85$$ACCEPT_BEGIN 00002B28-R DBL$$ACCEPT DBL$$INTERP jD85$$ACCEPT_END 00002B3B-R DBL$$ACCEPT DBL$$INTERP jD85$$ACCEPT_KEYWORD 00002B2B-R DBL$$ACCEPT DBL$$INTERP jD85$$ADDI 000098F6-R DBL$$MATH DBL$$INTERP jD85$$ADDP 00009905-R DBL$$MATH DBL$$INTERP jD85$$ADDR 000059C8-R DBL$$BIFUNC DBL$$INTERP jD85$$ADDS 00009925-R DBL$$MATH DBL$$INTERP jD85$$ADDZ 00009915-R DBL$$MATH DBL$$INTERP jD85$$ARG_ARG 00005CFD-R DBL$$XCALL DBL$$INTERP jD85$$ARG_DLIT 00005CE8-R DBL$$XCALL DBL$$INTERP jD85$$ARG_DSC 00005AF2-R DBL$$XCALL DBL$$INTERP jD85$$ARG_DSC_S 00005B5F-R DBL$$XCALL DBL$$INTERP jD85$$ARG_DVAL 00005CA8-R DBL$$XCALL DBL$$INTERP jD85$$ARG_DVAL_S 00005CCA-R DBL$$XCALL DBL$$INTERP jD85$$ARG_REF 00005C2B-R DBL$$XCALL DBL$$INTERP jD85$$ARG_REF_S 00005C6D-R DBL$$XCALL DBL$$INTERP jD85$$ARG_XTRNL 00005D6F-R DBL$$XCALL DBL$$INTERP jD85$$BAND 0000C6CE-R DBL$$BOOLEAN DBL$$INTERP jD85$$BIFUNC 000049BA-R DBL$$BIFUNC DBL$$INTERP jD85$$BNOT 0000C7B3-R DBL$$BOOLEAN DBL$$INTERP jD85$$BOR 0000C71D-R DBL$$BOOLEAN DBL$$INTERP jD85$$BXOR 0000C768-R DBL$$BOOLEAN DBL$$INTERP jD85$$CCHAR 000075AC-R DBL$$PUSH DBL$$INTERP jD85$$CLOSE 00011EDC-R DBL$$CLOSE DBL$$INTERP jD85$$CLOSE_KEYWORD 00011DB8-R DBL$$CLOSE DBL$$INTERP jD85$$CMPR_EQ 0000CA80-R DBL$$CMPR DBL$$INTERP jD85$$CMPR_GE 0000CAC0-R DBL$$CMPR DBL$$INTERP jD85$$CMPR_GT 0000CAD0-R DBL$$CMPR DBL$$INTERP jD85$$CMPR_LE 0000CAA0-R DBL$$CMPR DBL$$INTERP jD85$$CMPR_LT 0000CAB0-R DBL$$CMPR DBL$$INTERP jD85$$CMPR_NE 0000CA90-R DBL$$CMPR DBL$$INTERP jD85$$CVTNI 0000DEDE-R DBL$$CONVERT DBL$$INTERP jD85$$CVTNP 0000DEFA-R DBL$$CONVERT DBL$$INTERP jD85$$CVTNZ 0000E090-R DBL$$CONVERT DBL$$INTERP jD85$$CVT_SYM_VAL 0000DEB8-R DBL$$CONVERT DBL$$INTERP jD85$$CVT_TOS_VAL 0000DECA-R DBL$$CONVERT DBL$$INTERP jD85$$DECRI 0000A3BD-R DBL$$MATH DBL$$INTERP jD85$$DECRP 0000A359-R DBL$$MATH DBL$$INTERP jD85$$DECRS 0000A305-R DBL$$MATH DBL$$INTERP jD85$$DECRZ 0000A31F-R DBL$$MATH DBL$$INTERP jD85$$DISPLAY_ATTS_KEYWORD 000025D9-R DBL$$DISPLAY DBL$$INTERP jD85$$DISPLAY_BEGIN 000023D8-R DBL$$DISPLAY DBL$$INTERP jD85$$DISPLAY_END 00002933-R DBL$$DISPLAY DBL$$INTERP jD85$$DIVDIVI 0000B36D-R DBL$$MATH DBL$$INTERP jD85$$DIVDIVP 0000B37C-R DBL$$MATH DBL$$INTERP jD85$$DIVDIVS 0000B3A2-R DBL$$MATH DBL$$INTERP jD85$$DIVDIVZ 0000B38F-R DBL$$MATH DBL$$INTERP jD85$$DIVI 0000B2A1-R DBL$$MATH DBL$$INTERP jD85$$DIVP 0000B2B0-R DBL$$MATH DBL$$INTERP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 100_Symbol Value Defined By Referenced By ...0_------ ----- ---------- -----------------1jD85$$DIVS 0000B2CE-R DBL$$MATH DBL$$INTERP jD85$$DIVZ 0000B2BF-R DBL$$MATH DBL$$INTERP jD85$$END_ATTS_OUT 00001041-R DBL$$READS DBL$$INTERP jD85$$FIND_BEGIN 0000D5B4-R DBL$$FIND DBL$$INTERP jD85$$FIND_END 0000DB56-R DBL$$FIND DBL$$INTERP jD85$$FIND_KEYWORD 0000D5E1-R DBL$$FIND DBL$$INTERP jD85$$FORBY1I 00009412-R DBL$$FOR DBL$$INTERP jD85$$FORBY1IMP 000094EA-R DBL$$FOR DBL$$INTERP jD85$$FORBY1N 0000947E-R DBL$$FOR DBL$$INTERP jD85$$FORBYSTEPI 0000959B-R DBL$$FOR DBL$$INTERP jD85$$FORBYSTEPIMP 000096A7-R DBL$$FOR DBL$$INTERP jD85$$FORBYSTEPN 000095FD-R DBL$$FOR DBL$$INTERP jD85$$FORMAT 00008DDC-R DBL$$FORMAT DBL$$INTERP jD85$$FORMS 0000410C-R DBL$$FORMS DBL$$INTERP jD85$$FRETURN 00006132-R DBL$$XCALL DBL$$INTERP jD85$$FRETURN_VAL 0000612D-R DBL$$XCALL DBL$$INTERP jD85$$IFTEST 0000C8BB-R DBL$$CMPR DBL$$INTERP jD85$$IFTEST_NOFF 0000C8A7-R DBL$$CMPR DBL$$INTERP jD85$$INCRI 0000A08C-R DBL$$MATH DBL$$INTERP jD85$$INCRP 0000A0F1-R DBL$$MATH DBL$$INTERP jD85$$INCRS 0000A074-R DBL$$MATH DBL$$INTERP jD85$$INCRZ 0000A12B-R DBL$$MATH DBL$$INTERP jD85$$INTERP 00006363-R DBL$$INTERP DBL$$INIT j DBL$SETCTL jD85$$LPQUE_BEGIN 0000FD2E-R DBL$$LPQUE DBL$$INTERP jD85$$LPQUE_END 0000FF3A-R DBL$$LPQUE DBL$$INTERP jD85$$LPQUE_KEYWORD 0000FDF0-R DBL$$LPQUE DBL$$INTERP jD85$$MULI 0000A7C0-R DBL$$MATH DBL$$INTERP jD85$$MULP 0000AB3A-R DBL$$MATH DBL$$INTERP jD85$$MULS 0000A6C8-R DBL$$MATH DBL$$INTERP jD85$$MULZ 0000A81B-R DBL$$MATH DBL$$INTERP jD85$$NOT 0000C182-R DBL$$BOOLEAN DBL$$INTERP jD85$$OPAND 0000C4CF-R DBL$$BOOLEAN DBL$$INTERP jD85$$OPEN_BEGIN 0001009E-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_END 0001109B-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_END_KEY_SEGS 00010E45-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_END_SEG 00010E2C-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_KEYWORD 000107B3-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_KEY_END 00010F2C-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_KEY_KEYWORD 00010CA7-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_KEY_SEG_KEYWORD 00010C91-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_MODE 000100A7-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_START_KEYS 00010C2A-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_START_KEY_SEGS 00010C7C-R DBL$$OPEN DBL$$INTERP jD85$$OPEN_START_SEG 00010C8A-R DBL$$OPEN DBL$$INTERP jD85$$OPOR 0000C4E7-R DBL$$BOOLEAN DBL$$INTERP jD85$$PUSH 000075FA-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_1 0000760E-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_2 0000768C-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_2AS 000077A5-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_2ASX 00007849-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_2X 00007787-R DBL$$PUSH DBL$$INTERP  0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 11 _Symbol Value Defined By Referenced By ...$_------ ----- ---------- ----------------- jD85$$PUSH_ARG 00007864-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_ARG1 0000788B-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_ARG2 0000794D-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_ARG2X 00007A0A-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_ARGARY 00007B41-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_ARGN 00007AB8-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_ARY 00007B64-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_IM_LONG 00007C2C-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_IM_SHORT 00007C21-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_LONGLIT 00007C18-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_N 00007ADF-R DBL$$PUSH DBL$$INTERP jD85$$PUSH_SHORTLIT 00007C1C-R DBL$$PUSH DBL$$INTERP jD85$$READS_BEGIN 00000639-R DBL$$READS DBL$$INTERP jD85$$READS_END 000006D3-R DBL$$READS DBL$$INTERP jD85$$READS_KEYWORD 000009F6-R DBL$$READS DBL$$INTERP jD85$$READ_BEGIN 00003090-R DBL$$READ DBL$$INTERP jD85$$READ_END 0000338F-R DBL$$READ DBL$$INTERP jD85$$READ_KEYWORD 0000314A-R DBL$$READ DBL$$INTERP jD85$$RECV 00004666-R DBL$$SEND_RECV DBL$$INTERP jD85$$RECVSZ 00004516-R DBL$$SEND_RECV DBL$$INTERP jD85$$ROUNDI 0000BFB7-R DBL$$MATH DBL$$INTERP jD85$$ROUNDN 0000BC1B-R DBL$$MATH DBL$$INTERP jD85$$ROUNDP 0000BC42-R DBL$$MATH DBL$$INTERP jD85$$ROUNDZ 0000BD7A-R DBL$$MATH DBL$$INTERP jD85$$RTSI 0000B16E-R DBL$$MATH DBL$$INTERP jD85$$RTSN 0000AF05-R DBL$$MATH DBL$$INTERP jD85$$RTSP 0000AF2C-R DBL$$MATH DBL$$INTERP jD85$$RTSZ 0000B012-R DBL$$MATH DBL$$INTERP jD85$$SEND 0000433E-R DBL$$SEND_RECV DBL$$INTERP jD85$$SEND_X 00004384-R DBL$$SEND_RECV DBL$$INTERP jD85$$SLEEP 00000420-R DBL$$SLEEP DBL$$INTERP jD85$$START_ARGS 00005AD7-R DBL$$XCALL DBL$$INTERP jD85$$START_ATTS_OUT 000009A1-R DBL$$READS DBL$$INTERP jD85$$START_FUNC 000059E0-R DBL$$XCALL DBL$$INTERP jD85$$STOREAA 0000829F-R DBL$$STORE DBL$$INTERP jD85$$STOREAI 000082D3-R DBL$$STORE DBL$$INTERP jD85$$STOREAP 00008349-R DBL$$STORE DBL$$INTERP jD85$$STOREAS 000083D9-R DBL$$STORE DBL$$INTERP jD85$$STOREAZ 00008391-R DBL$$STORE DBL$$INTERP jD85$$STOREIA 00007FF8-R DBL$$STORE DBL$$INTERP jD85$$STOREII 00007D24-R DBL$$STORE DBL$$INTERP jD85$$STOREIP 00008106-R DBL$$STORE DBL$$INTERP jD85$$STOREIS 00008181-R DBL$$STORE DBL$$INTERP jD85$$STOREIZ 00008040-R DBL$$STORE DBL$$INTERP jD85$$STORENA 00008B0B-R DBL$$STORE DBL$$INTERP jD85$$STORENI 00008AB7-R DBL$$STORE DBL$$INTERP jD85$$STORENP 00008B35-R DBL$$STORE DBL$$INTERP jD85$$STORENS 00008B5F-R DBL$$STORE DBL$$INTERP jD85$$STORENZ 00008AE1-R DBL$$STORE DBL$$INTERP jD85$$STOREPA 00008843-R DBL$$STORE DBL$$INTERP jD85$$STOREPI 00008949-R DBL$$STORE DBL$$INTERP jD85$$STOREPP 000088FA-R DBL$$STORE DBL$$INTERP  0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 12E_Symbol Value Defined By Referenced By ...$_------ ----- ---------- ----------------- jD85$$STOREPS 000089F2-R DBL$$STORE DBL$$INTERP jD85$$STOREPZ 0000888A-R DBL$$STORE DBL$$INTERP jD85$$STOREZA 000084BD-R DBL$$STORE DBL$$INTERP jD85$$STOREZI 0000864C-R DBL$$STORE DBL$$INTERP jD85$$STOREZP 000086EF-R DBL$$STORE DBL$$INTERP jD85$$STOREZS 0000875F-R DBL$$STORE DBL$$INTERP jD85$$STOREZZ 00008505-R DBL$$STORE DBL$$INTERP jD85$$STUFF_BUFF 000023E7-R DBL$$DISPLAY DBL$$INTERP jD85$$SUBI 00009B1C-R DBL$$MATH DBL$$INTERP jD85$$SUBP 00009B2C-R DBL$$MATH DBL$$INTERP jD85$$SUBS 00009B4C-R DBL$$MATH DBL$$INTERP jD85$$SUBZ 00009B3C-R DBL$$MATH DBL$$INTERP jD85$$UMINUSI 0000A5CE-R DBL$$MATH DBL$$INTERP jD85$$UMINUSP 0000A57D-R DBL$$MATH DBL$$INTERP jD85$$UMINUSS 0000A52D-R DBL$$MATH DBL$$INTERP jD85$$UMINUSZ 0000A667-R DBL$$MATH DBL$$INTERP jD85$$WRITES_BEmGIN 00001CCE-R DBL$$WRITES DBL$$INTERP jD85$$WRITES_END 00001E02-R DBL$$WRITES DBL$$INTERP jD85$$WRITES_KEYWORD 00001D2E-R DBL$$WRITES DBL$$INTERP jD85$$WRITE_BEGIN 00003BC4-R DBL$$WRITE DBL$$INTERP jD85$$WRITE_END 00003C9B-R DBL$$WRITE DBL$$INTERP jD85$$WRITE_KEYWORD 00003C30-R DBL$$WRITE DBL$$INTERP jD85$$XCALL 00005DCA-R DBL$$XCALL DBL$$INTERP jD85$$XFUNC 00005F66-R DBL$$XCALL DBL$$INTERP jD85$$XOR 0000C02D-R DBL$$BOOLEAN DBL$$INTERP jD85$$XRETURN 00006147-R DBL$$XCALL DBL$$INTERP jD85$$XRETURN_STATUS 0000614C-R DBL$$XCALL DBL$$INTERP JDBGEXT$DBL_RTL_ENTRY 000147D8-R DBL$$DBGEXT jDBL$$ACCPTDLC_L 00002C1E-R DBL$$ACCEPT DBL$$INTERP jDBL$$ACCPTDLC_N 00002CC8-R DBL$$ACCEPT DBL$$INTERP jDBL$$ACCPTDXC_L 00002BE0-R DBL$$ACCEPT DBL$$INTERP jDBL$$ACCPTDXC_N 00002C8A-R DBL$$ACCEPT DBL$$INTERP jDBL$$ADDP 00009961-R DBL$$MATH DBL$$FOR jDBL$$ADDZ 000099D0-R DBL$$MATH DBL$$FOR jDBL$$ADD_B 000098E1-R DBL$$MATH DBL$$INTERP jDBL$$ADD_S 000098D2-R DBL$$MATH DBL$$INTERP jDBL$$ADD_W 000098E6-R DBL$$MATH DBL$$INTERP jDBL$$AND 0000C29A-R DBL$$BOOLEAN DBL$$INTERP jDBL$$ARG_ARG 00005D0A-R DBL$$XCALL DBL$$INTERP jDBL$$ARG_DSC 00005B46-R DBL$$XCALL DBL$$INTERP jDBL$$ARG_DSC_S 00005BDD-R DBL$$XCALL DBL$$INTERP jDBL$$ARG_REF 00005C51-R DBL$$XCALL DBL$$INTERP jDBL$$ARG_REF_S 00005C92-R DBL$$XCALL DBL$$INTERP jDBL$$CHANNEL_RANGECHECK 0000E5EC-R DBL$$CHANNEL DBL$$CCB j DBL$$CLOSE j DBL$$INTERP j DBL$$OPEN jDBL$$CLOCCB 00013B4C-R DBL$$CCB DBL$$CLOSE j DBL$$INTERP j DBL$$OPEN jDBL$$CLOSEDLC 00011EE1-R DBL$$CLOSE DBL$$INTERP jDBL$$CLOSEDXC 00011EE6-R DBL$$CLOSE DBL$$INTERP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 13 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------EjDBL$$CLOSE_CHAN 00011F27-R DBL$$CLOSE DBL$DELMBX jDBL$$CMPR_EQA 0000CB78-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_EQD 0000CD27-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_GEA 0000CBC3-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_GED 0000CDC8-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_GTA 0000CBB4-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_GTD 0000CDA7-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_KEY 0000E4B4-R DBL$$KEY_LOOKUP DBL$$READ jDBL$$CMPR_LEA 0000CBA5-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_LED 0000CD89-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_LTA 0000CB96-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_LTD 0000CD65-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_NEA 0000CB87-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_NED 0000CD46-R DBL$$CMPR DBL$$INTERP jDBL$$CMPR_P_SETUP 0000D24F-R DBL$$CMPR DBL$$FOR jDBL$$CMPR_Z_SETUP 0000D03D-R DBL$$CMPR DBL$$FOR jDBL$$CTRLC 0000F63A-R DBL$SETCTL DBL$$OPEN JDBL$$CTRLY 0000F6B6-R DBL$SETCTL jDBL$$CVTAI 000121B0-R DBL$$CONVERT DBL$$STORE jDBL$$CVTAIPK 00012471-R DBL$$CONVERT DBL$$STORE jDBL$$CVTAIQ 00012244-R DBL$$CONVERT DBL$$STORE jDBL$$CVTAIZ 00012642-R DBL$$CONVERT DBL$$STORE jDBL$$CVTAPK 00012378-R DBL$$CONVERT DBL$$STORE j ,X~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;11|z DBL$TIME jDBL$$CVTAZ 00012573-R DBL$$CONVERT DBL$$SELECT_CONVERT j DBL$$STORE jDBL$$CVTDXDX 0000ECC6-RU DBL$$SELECT_CONVERT $DBL$$VECTOR j DBL$CHAIN jDBL$$CVTIA 0001277A-R DBL$$CONVERT DBL$$FORMAT j DBL$$STORE j DBL$$TERM_IO jDBL$$CVTIA_R1 00012727-R DBL$$CONVERT DBL$$BIFUNC j DBL$$DISPLAY jDBL$$CVTIPKA 00012EC7-R DBL$$CONVERT DBL$$STORE jDBL$$CVTIPKIZ 0001309F-R DBL$$CONVERT DBL$$STORE j DBL$$TERM_IO jDBL$$CVTIPKZ 0001304F-R DBL$$CONVERT DBL$$STORE jDBL$$CVTIQA 000129AC-R DBL$$CONVERT DBL$$STORE jDBL$$CVTIQPK 00012A2D-R DBL$$CONVERT DBL$$FOR j DBL$$MATH j DBL$$STORE jDBL$$CVTIQZ 00012BAC-R DBL$$CONVERT DBL$$FOR j DBL$$FORMAT j DBL$$MATH j DBL$$STORE jDBL$$CVTIZ 00012823-R DBL$$CONVERT DBL$$FORMAT j DBL$$MATH j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$STORE j DBL$$TERM_IO  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 14 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Bj DBL$EXITHANDLER j DBL$FUNCTION jDBL$$CVTIZA 0001348A-R DBL$$CONVERT DBL$$STORE jDBL$$CVTIZIPK 0001357A-R DBL$$CONVERT DBL$$STORE jDBL$$CVTIZPK 00013549-R DBL$$CONVERT DBL$$STORE jDBL$$CVTIZ_A 00012815-R DBL$$CONVERT DBL$$XCALL jDBL$$CVTPKA 00012C8D-R DBL$$CONVERT DBL$$STORE jDBL$$CVTPKI 00012D18-R DBL$$CONVERT DBL$$FIND j DBL$$MATH j DBL$$SLEEP jDBL$$CVTPKIQ 00012D56-R DBL$$CONVERT DBL$$FOR j DBL$$MATH jDBL$$CVTPKIZ 00012E62-R DBL$$CONVERT DBL$$STORE jDBL$$CVTPKZ 00012E34-R DBL$$CONVERT DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$STORE j DBL$$TERM_IO jDBL$$CVTZA 00013232-R DBL$$CONVERT DBL$$SELECT_CONVERT j DBL$$STORE jDBL$$CVTZI 0001329C-R DBL$$CONVERT DBL$$CLOSE j DBL$$FIND j DBL$$FORMS j DBL$$INTERP j DBL$$MATH j DBL$$OPEN j DBL$$PUSH j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$SLEEP j DBL$$STORE j DBL$$WRITE j DBL$$WRITES j DBL$TIME j DBL$TNMBR jDBL$$CVTZIPK 00013455-R DBL$$CONVERT DBL$$STORE jDBL$$CVTZIQ 00013329-R DBL$$CONVERT DBL$$FOR j DBL$$MATH j DBL$$STORE j DBL$TIME j DBL$XARGS jDBL$$CVTZI_A 00013292-R DBL$$CONVERT DBL$$INTERP j DBL$$MATH j DBL$$PUSH j DBL$$READ j DBL$$SEND_RECV j DBL$$XCALL j DBL$SETCTL jDBL$$CVTZPK 000133F2-R DBL$$CONVERT DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$STORE j DBL$XARGS  0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 15 _Symbol Value Defined By Referenced By ...$_------ ----- ---------- ----------------- jDBL$$CVT_DSCA 0000EB74-R DBL$$SELECT_CONVERT DBL$$XCALL jDBL$$CVT_LONG_TO_NUM 00012886-RU DBL$$CONVERT $DBL$$VECTOR j DBL$$SEND_RECV j DBL$$TBXXX j DBL$BKSTR j DBL$CHOPEN j DBL$CPUTM j DBL$DECML j DBL$DEVICE j DBL$ERRMOD j DBL$ERROR j DBL$ERRTXT j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$JBNO j DBL$PAK j DBL$RSTAT j DBL$SIZE j DBL$TNMBR j DBL$TTSTS j DBL$WAIT j DBL$WKDAY j DBL$XARGS j DBL$XSTAT jDBL$$CVT_LONG_TO_NUM_R23 00012876-R DBL$$CONVERT DBL$$ACCEPT j DBL$TTBRDCST j DBL$WAIT jDBL$$CVT_NUM_TO_LONG 00013149-RU DBL$$CONVERT $DBL$$VECTOR j DBL$$BIFUNC j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$MATH j DBL$$OPEN j DBL$$READ j DBL$$SEND_RECV j DBL$$TBXXX j DBL$$WRITE j DBL$$XCALL j DBL$ASCII j DBL$BEGFL j DBL$BKSTR j DBL$CHOPEN j DBL$DELMBX j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$ERRTXT j DBL$EXITS j DBL$FATAL j DBL$FLAGS  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 16 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$INSTR j DBL$ISMCRE j DBL$IXREAD j DBL$PARSE j DBL$POSRFA j DBL$RMSCC j DBL$RUNJB j DBL$SETDFN j DBL$SLICE j DBL$TIMOUT j DBL$TNMBR j DBL$TTBRDCST j DBL$TTFLGS j DBL$TTSTS j DBL$WAIT jDBL$$CVT_NUM_TO_LONG_R23 00013139-R DBL$$CONVERT DBL$$ACCEPT j DBL$$BIFUNC j DBL$$LPQUE j DBL$$TBXXX j DBL$ISMCRE j DBL$RCVID jDBL$$CVT_NZU_NZU 000138B5-R DBL$$CONVERT DBL$$INIT j DBL$$SELECT_CONVERT jDBL$$CVT_TO_BIN 00014368-R DBL$$CVT_FUNCTIONS DBL$$BIFUNC jDBL$$CVT_TO_BITS 000137BA-R DBL$$CONVERT DBL$$BIFUNC j DBL$FLAGS j DBL$TTFLGS j DBL$WAIT jDBL$$CVT_TO_HEX 00014456-R DBL$$CVT_FUNCTIONS DBL$$BIFUNC jDBL$$CVT_TO_OCT 000143DF-R DBL$$CVT_FUNCTIONS DBL$$BIFUNC jDBL$$DATA_TYPE_TABLE 0001BE00-R DBL$DATA_TYPE_TABLE DBL$$BIFUNC j DBL$$BOOLEAN j DBL$$CMPR j DBL$$CONVERT j DBL$$FIND j DBL$$FORMAT j DBL$$MATH j DBL$$OPEN j DBL$$STORE j DBL$$TERM_IO j DBL$XARGS jDBL$$DEALLOC_FAB 0000F9E9-R DBL$$FAB DBL$DELET j DBL$PARSE j DBL$PURGE j DBL$RENAM_V1 jDBL$$DECR_S 0000A31A-R DBL$$MATH DBL$$INTERP jDBL$$DIV_B 0000B28D-R DBL$$MATH DBL$$INTERP jDBL$$DIV_S 0000B27F-R DBL$$MATH DBL$$INTERP jDBL$$DIV_W 0000B292-R DBL$$MATH DBL$$INTERP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 17 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$$DSPLYDLC 00002922-R DBL$$DISPLAY DBL$$INTERP jDBL$$DSPLYDXC 000028F6-R DBL$$DISPLAY DBL$$INTERP jDBL$$ERRTRANS 0000E924-RU DBL$$ERRTRANS $DBL$$VECTOR j DBL$$ACCEPT j DBL$$ARRAY j DBL$$CLOSE j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$FAB j DBL$$FIND j DBL$$FORMS j DBL$$INIT j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$OPENTT j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$SLEEP j DBL$$STROPS j DBL$$TBXXX j DBL$$WRITE j DBL$$WRITES j DBL$BEGFL j DBL$DELET j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$ERRMOD j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FATAL j DBL$FILEC j DBL$GETCM j DBL$GETFA j DBL$GLINE j DBL$ISMCRE j DBL$IXREAD j DBL$KILL j DBL$LOCK j DBL$PARSE j DBL$POSRFA j DBL$PURGE j DBL$PUTCM j DBL$RENAM j DBL$RENAM_V1 j DBL$RUNJB j DBL$SETCTL j DBL$SLICE  0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 18F_Symbol Value Defined By Referenced By ...$_------ ----- ---------- ----------------- j DBL$SNDOP j DBL$TIMOUT j DBL$TTBRDCST j DBL$TTFLGS j DBL$TTSTS j DBL$WAIT j DBL$WKDAY jDBL$$FABLUB 00013B95-R DBL$$CCB DBL$$OPEN jDBL$$FIND_ARRAY_ELEM 0000493C-R DBL$$ARRAY DBL$$PUSH jDBL$$FLAG8_CLR 0000F43A-R DBL$SETCTL DBL$$OPENTT j DBL$FLAGS jDBL$$FLAG8_SET 0000F468-R DBL$SETCTL DBL$FLAGS JDBL$$FLAGS_SET 000155D5-R DBL$FLAGS jDBL$$FORBY1 0000956D-R DBL$$FOR DBL$$INTERP jDBL$$FORBYSTEP 000097B5-R DBL$$FOR DBL$$INTERP jDBL$$FORMAT 00008DF9-R DBL$$FORMAT DBL$$INTERP jDBL$$FORMAT_NEW 00008E14-R DBL$$FORMAT DBL$$DISPLAY j DBL$$WRITES jDBL$$FORMS_L 00004080-R DBL$$FORMS DBL$$INTERP jDBL$$FORMS_X 00004085-R DBL$$FORMS DBL$$INTERP jDBL$$FREE_DYN_STRING 0000680A-R DBL$$INTERP DBL$$ACCEPT j DBL$$BIFUNC j DBL$$BOOLEAN j DBL$$CLOSE j DBL$$CMPR j DBL$$CONVERT j DBL$$DISPLAY j DBL$$FIND j DBL$$FORMS j DBL$$MATH j DBL$$OPEN j DBL$$PUSH j DBL$$READ j DBL$$SEND_RECV j DBL$$STORE j DBL$$WRITE j DBL$$WRITES j DBL$$XCALL jDBL$$FREE_KEY 0000E47F-R DBL$$KEY_LOOKUP DBL$IXREAD jDBL$$GA_BRDCSTAST 0001D074-R DBL$$DATA DBL$TTBRDCST jDBL$$GA_CDD_FIND_NODE 0001D0B8-R DBL$$DATA DBL$$BIFUNC jDBL$$GA_CDD_GET_ENT_ATT 0001D0BC-R DBL$$DATA DBL$$B-|Po~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;11bxIFUNC jDBL$$GA_CDD_GET_STR_ATT 0001D0C0-R DBL$$DATA DBL$$BIFUNC jDBL$$GA_CDD_GET_STR_CELL 0001D0C8-R DBL$$DATA DBL$$BIFUNC jDBL$$GA_CDD_GET_STR_LIST_ATT 0001D0C4-R DBL$$DATA DBL$$BIFUNC jDBL$$GA_CDD_SIGN_IN 0001D0B0-R DBL$$DATA DBL$$BIFUNC jDBL$$GA_CDD_SIGN_OUT 0001D0B4-R DBL$$DATA DBL$$BIFUNC jDBL$$GA_COLLATING_TABLE 0001D088-R DBL$$DATA DBL$$CMPR j DBL$$TBXXX jDBL$$GA_DBLBIND_PSECT 0001D08D-R DBL$$DATA DBL$$INIT j DBL$$INTERP jDBL$$GA_DDTCMD 0001D070-RU DBL$$DATA DBL$$INTERP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 19 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$SIGNAL jDBL$$GA_DDTMODINIT 0001D06C-RU DBL$$DATA DBL$$INIT jDBL$$GA_ERROR_MODNAME 0001CBD8-R DBL$$DATA DBL$$BIFUNC j DBL$$SIGNAL j DBL$ERRMOD j DBL$EXITHANDLER j DBL$EXITS jDBL$$GA_EXITHA 0001CC97-R DBL$$DATA DBL$$INIT jDBL$$GA_EXITSTATUS 0001CC9F-R DBL$$DATA DBL$$INIT JDBL$$GA_INTERP 0001CBBC-R DBL$$DATA jDBL$$GA_LABEL_ADDRESS 0001CC66-R DBL$$DATA DBL$$ACCEPT j DBL$$INTERP j DBL$$READS jDBL$$GA_MAIN_MODNAME 0001CE08-R DBL$$DATA DBL$$INIT j DBL$EXITHANDLER jDBL$$GA_TTMBX_MESSAGE_AST 0001D099-R DBL$$DATA DBL$TTBRDCST jDBL$$GA_TTMBX_NAME 0001CDB9-R DBL$$DATA DBL$$INIT jDBL$$GA_USEROPEN 0001CC8F-R DBL$$DATA DBL$$OPEN j DBL$USEROPEN jDBL$$GB_CTRLC_ACTION 0001CC74-R DBL$$DATA DBL$$INTERP j DBL$$READS j DBL$SETCTL jDBL$$GB_CTRLY_ACTION 0001CC75-R DBL$$DATA DBL$$INTERP j DBL$$READS j DBL$SETCTL jDBL$$GB_CURRENCY 0001CDA8-R DBL$$DATA DBL$$FORMAT j DBL$$INIT j DBL$$TERM_IO j DBL$MONEY jDBL$$GB_CURRENCY_DEFAULT 0001CDA9-R DBL$$DATA DBL$$INIT jDBL$$GB_DIGIT_SEP 0001CDAA-R DBL$$DATA DBL$$FORMAT j DBL$$INIT j DBL$$TERM_IO j DBL$FLAGS jDBL$$GB_DIGIT_SEP_DEFAULT 0001CDAB-R DBL$$DATA DBL$$INIT j DBL$FLAGS jDBL$$GB_FATALFUNC 0001CCA7-R DBL$$DATA DBL$EXITHANDLER j DBL$FATAL jDBL$$GB_MSGMGR_FUNC 0001CDCB-R DBL$$DATA DBL$$SEND_RECV j DBL$EXITHANDLER j DBL$WAIT jDBL$$GB_NUMASTS 0001CC76-R DBL$$DATA DBL$AST jDBL$$GB_PROCNUM 0001D08C-R DBL$$DATA DBL$$INIT j DBL$$OPEN jDBL$$GB_RADIX_PT 0001CDAC-R DBL$$DATA DBL$$CONVERT j DBL$$FORMAT j DBL$$INIT j DBL$$TERM_IO j DBL$FLAGS jDBL$$GB_RADIX_PT_DEFAULT 0001CDAD-R DBL$$DATA DBL$$INIT j DBL$FLAGS jDBL$$GB_UPDATE_DEFERRED_WRITE 0001CDAE-R DBL$$DATA DBL$$INIT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 20 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$OPEN jDBL$$GDIT_ACCUM1 0001CBE0-R DBL$$DATA DBL$$BIFUNC j DBL$$CMPR j DBL$$DISPLAY j DBL$$FORMAT j DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$TERM_IO jDBL$$GDIT_ACCUM1_END 0001CBFC-R DBL$$DATA DBL$$CMPR j DBL$$FORMAT j DBL$$MATH j DBL$$TERM_IO jDBL$$GDIT_ACCUM1_INTEND 0001CBF3-R DBL$$DATA DBL$$CMPR j DBL$$FORMAT j DBL$$MATH j DBL$$TERM_IO jDBL$$GDIT_ACCUM2 0001CBFC-R DBL$$DATA DBL$$CMPR j DBL$$CONVERT j DBL$$SELECT_CONVERT jDBL$$GDIT_ACCUM2_END 0001CC18-R DBL$$DATA DBL$$CMPR jDBL$$GDIT_ACCUM2_INTEND 0001CC0F-R DBL$$DATA DBL$$CMPR j DBL$$CONVERT jDBL$$GDIT_RESULT 0001CC18-R DBL$$DATA DBL$$CMPR j DBL$$FORMAT j DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$TERM_IO jDBL$$GDIT_RESULT_END 0001CC34-R DBL$$DATA DBL$$FORMAT j DBL$$MATH j DBL$$TERM_IO jDBL$$GDIT_RESULT_INTEND 0001CC2B-R DBL$$DATA DBL$$MATH jDBL$$GET2DX 00012118-R DBL$$GET2DX DBL$$BIFUNC j DBL$$CMPR j DBL$$INTERP j DBL$$READ j DBL$$SEND_RECV j DBL$$STORE jDBL$$GET2DXR 00012146-R DBL$$GET2DX DBL$$BOOLEAN j DBL$$CMPR j DBL$$MATH j DBL$$STORE jDBL$$GET3DX 00012174-R DBL$$GET2DX DBL$$BIFUNC jDBL$$GETCCB 00013B22-RU DBL$$CCB $DBL$$VECTOR j DBL$$ACCEPT j DBL$$BIFUNC j DBL$$CLOSE j DBL$$DISPLAY j DBL$$FORMS j DBL$$INTERP j DBL$$READ j DBL$$READS j DBL$$WRITE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 21 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$WRITES j DBL$BEGFL j DBL$DELMBX j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$GETFA j DBL$GETFNM j DBL$IXREAD j DBL$POSRFA j DBL$TIMOUT j DBL$TTBRDCST j DBL$TTSTS jDBL$$GETCCBZOK 00013B28-R DBL$$CCB DBL$$BIFUNC j DBL$SETCTL j DBL$TTSTS jDBL$$GETVMCLR 0000E650-R DBL$$GETVMCLR DBL$$CCB j DBL$$FAB j DBL$$OPEN j DBL$$SEND_RECV j DBL$GETFA j DBL$PURGE j DBL$RUNJB jDBL$$GET_KEY 0000E328-R DBL$$KEY_LOOKUP DBL$IXREAD jDBL$$GET_QUAD 0000D44E-R DBL$$CMPR DBL$$FOR j DBL$$MATH jDBL$$GL_ASTBASEADDR 0001CC77-R DBL$$DATA DBL$AST jDBL$$GL_CDD_CONTEXT 0001D0AC-R DBL$$DATA DBL$$BIFUNC jDBL$$GL_CHANBLOCKS 0001D0EC-RU DBL$$IODB DBL$$CCB j DBL$EXITHANDLER j DBL$WAIT jDBL$$GL_CTRLMASK 0001CC70-R DBL$$DATA DBL$$OPENTT j DBL$EXITHANDLER j DBL$SETCTL JDBL$$GL_DDTFLAGS 0001CC62-RU DBL$$DATA jDBL$$GL_EXITHCB 0001CC93-R DBL$$DATA DBL$$INIT jDBL$$GL_EXITSTATUS 0001CCA3-R DBL$$DATA DBL$$INIT jDBL$$GL_IFLAGS 0001CBC4-R DBL$$DATA DBL$$CMPR j DBL$$INTERP j DBL$$TBXXX j DBL$EXITHANDLER j DBL$SETCTL j DBL$TTBRDCST j DBL$WAIT jDBL$$GL_INITFLAGS 0001CC6C-RU DBL$$DATA DBL$$INIT j DBL$$INTERP j DBL$$OPENTT j DBL$$SEND_RECV j DBL$$SIGNAL j DBL$EXITHANDLER j DBL$RCVID j DBL$WAIT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 22 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$$GL_LOCKPAGES 0001CC87-R DBL$$DATA DBL$$INIT j DBL$EXITHANDLER jDBL$$GL_LPQUE_ENTRY 0001D084-R DBL$$DATA DBL$$BIFUNC j DBL$$LPQUE jDBL$$GL_MAXCHANNEL 0001D080-R DBL$$DATA DBL$$INIT j DBL$$INTERP jDBL$$GL_RECV_BUFQUO 0001CDC7-R DBL$$DATA DBL$$SEND_RECV j DBL$RCVID jDBL$$GL_SAVEAP 0001D0A5-R DBL$$DATA DBL$$INIT j DBL$$INTERP jDBL$$GL_SAVEFP 0001D0A1-R DBL$$DATA DBL$$INIT j DBL$$INTERP jDBL$$GL_SAVESP 0001D09D-R DBL$$DATA DBL$$INIT j DBL$$INTERP jDBL$$GL_SYSERROR_NUMBER 0001CBD4-R DBL$$DATA DBL$$BIFUNC j DBL$$SIGNAL j DBL$ERROR j DBL$EXITHANDLER jDBL$$GL_TTUNIT 0001D055-R DBL$$DATA DBL$$INIT j DBL$$OPENTT jDBL$$GO_TERM_ECHOMASK 00000611-R DBL$$READS DBL$$ACCEPT j DBL$$INIT jDBL$$GP_ACCUM1 0001CC34-R DBL$$DATA DBL$$BIFUNC j DBL$$CMPR j DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$STORE JDBL$$GP_ACCUM1_END 0001CC42-R DBL$$DATA jDBL$$GP_ACCUM2 0001CC44-R DBL$$DATA DBL$$CMPR j DBL$$CONVERT j DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$STORE JDBL$$GP_ACCUM2_END 0001CC52-R DBL$$DATA jDBL$$GP_RESULT 0001CC54-R DBL$$DATA DBL$$CMPR j DBL$$MATH j DBL$$SELECT_CONVERT JDBL$$GP_RESULT_END 0001CC62-R DBL$$DATA jDBL$$GQ_DSC_TSEQ_STRING 0001D091-R DBL$$DATA DBL$$BIFUNC jDBL$$GQ_TTMBX_DSC 0001CDB5-R DBL$$DATA DBL$$OPEN JDBL$$GQ_TTMBX_IOSB 0001D078-R DBL$$DATA jDBL$$GTC_DFNDDF 0001CE4C-R DBL$$DATA DBL$$FAB j DBL$$OPEN j DBL$GETDFN j DBL$SETDFN jDBL$$GTC_DFNISM 0001CF4C-R DBL$$DATA DBL$$OPEN j DBL$GETDFN j DBL$ISMCRE j DBL$SETDFN jDBL$$GTC_FATALNAME 0001CCA8-R DBL$$DATA DBL$EXITHANDLER j DBL$FATAL jDBL$$GTC_IMAGE_NAME 0001CE0C-R DBL$$DATA DBL$$INIT  TDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 23G_Symbol Value Defined By Referenced By ..._------ ----- ---------- ----------------- j DBL$RCVID jDBL$$GTC_TTNAME 0001D04C-R DBL$$DATA DBL$$BIFUNC j DBL$$CCB j DBL$$INIT j DBL$$OPENTT j DBL$TNMBR j DBL$TTNAME jDBL$$GT_DFNDDF 0001CE4D-R DBL$$DATA DBL$$FAB j DBL$$OPEN j DBL$GETDFN jDBL$$GT_DFNISM 0001CF4D-R DBL$$DATA DBL$$OPEN j DBL$GETDFN j DBL$ISMCRE jDBL$$GT_FATALNAME 0001CCA9-R DBL$$DATA DBL$EXITHANDLER j DBL$FATAL jDBL$$GT_IMAGE_NAME 0001CE0D-R DBL$$DATA DBL$$INIT j DBL$RCVID jDBL$$GT_MSGMGR_REQ 0001CDCB-R DBL$$DATA DBL$$SEND_RECV j DBL$EXITHANDLER j DBL$WAIT jDBL$$GT_RECV_ID 0001CDCC-R DBL$$DATA DBL$$INIT j DBL$$INTERP j DBL$RCVID jDBL$$GT_RECV_MBXNAME 0001CDFD-R DBL$$DATA DBL$$SEND_RECV jDBL$$GT_TTMBXMSG 0001D56C-R DBL$$IODB DBL$TTBRDCST j DBL$WAIT jDBL$$GT_TTMBX_NAME 0001CDBD-R DBL$$DATA DBL$$INIT jDBL$$GT_TTNAME 0001D04D-R DBL$$DATA DBL$$BIFUNC j DBL$$CCB j DBL$$INIT j DBL$$OPENTT j DBL$TNMBR j DBL$TTNAME j DBL$TTSTS jDBL$$GT_TTNMBR 0001CDF3-R DBL$$DATA DBL$$SEND_RECV jDBL$$GV_CHANNELS 0001D0CC-RU DBL$$IODB DBL$$BIFUNC j DBL$$CCB j DBL$$CLOSE j DBL$$INTERP j DBL$CHOPEN j DBL$WAIT jDBL$$GW_ERROR_MODLINE 0001CBDC-R DBL$$DATA DBL$$SIGNAL j DBL$ERRMOD j DBL$EXITHANDLER jDBL$$GW_MSGMGR_MBXCHAN 0001CDAF-R DBL$$DATA DBL$$SEND_RECV j DBL$EXITHANDLER j DBL$WAIT jDBL$$GW_RECV_MBXCHAN 0001CDB1-R DBL$$DATA DBL$$SEND_RECV j DBL$EXITHANDLER j DBL$RCVID j DBL$WAIT jDBL$$GW_TTMBX_CHAN 0001CDB3-R DBL$$DATA DBL$$INIT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 24 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Dj DBL$TTBRDCST j DBL$WAIT jDBL$$GX_CHANZERO 0001D4EC-R DBL$$IODB DBL$$CCB jDBL$$GX_CSI_CODES 0000FCB6-R DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$READS jDBL$$GX_CSI_TABLE 0000FC26-R DBL$$UPLOTABLE DBL$$ACCEPT j ?Ű'~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1S;1KU DBL$$READS jDBL$$GX_LO_UP_NOSTANDARD_TABLE 0001B100-R DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$INTERP jDBL$$GX_LO_UP_STANDARD_TABLE 0001B000-RU DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$INTERP jDBL$$GX_SAVE_AREA 0001CBD0-R DBL$$DATA DBL$AST jDBL$$GX_SS3_CODES 0000FC8A-R DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$READS jDBL$$GX_SS3_TABLE 0000FC10-R DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$READS jDBL$$GX_TERM_8BITMASK 00002B08-R DBL$$ACCEPT DBL$$INIT jDBL$$GX_UPONLY_ECHO 0001B300-R DBL$$UPLOTABLE DBL$$ACCEPT jDBL$$GX_UP_LO_ECHO 0001B200-R DBL$$UPLOTABLE DBL$$ACCEPT jDBL$$GX_UP_LO_NOSTANDARD_TABLE 0001AF00-R DBL$$UPLOTABLE DBL$$INTERP jDBL$$GX_UP_LO_STANDARD_TABLE 0001AE00-R DBL$$UPLOTABLE DBL$$INTERP jDBL$$HANDLER 000142CC-R DBL$$HANDLER $DBL$$VECTOR jDBL$$IFTEST 0000C85C-R DBL$$CMPR DBL$$INTERP jDBL$$INCR 0000A1A4-R DBL$$MATH DBL$$FOR jDBL$$INCRP 0000A177-R DBL$$MATH DBL$$FOR jDBL$$INCR_B 0000A16E-R DBL$$MATH H DBL$$INTERP jDBL$$INCR_S 0000A164-R DBL$$MATH DBL$$INTERP jDBL$$INCR_W 0000A169-R DBL$$MATH DBL$$INTERP jDBL$$INTERP 00006233-R DBL$$INTERP DBL$$INIT j DBL$SETCTL jDBL$$I_COMMON 00009D42-R DBL$$MATH DBL$$FOR jDBL$$KEY_LOOKUP 0000E230-R DBL$$KEY_LOOKUP DBL$$INTERP j DBL$$READ j DBL$$WRITE jDBL$$K_CSI_ENTRIES 00000019 DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$READS jDBL$$K_DFNDDFSIZE 000000FF DBL$$DATA DBL$SETDFN jDBL$$K_DFNISMSIZE 000000FF DBL$$DATA DBL$SETDFN jDBL$$K_FATALNAMESIZE 000000FF DBL$$DATA DBL$FATAL jDBL$$K_IMAGE_NAME_LEN 0000003F DBL$$DATA DBL$RCVID jDBL$$K_MAXCHANS 00000100-U DBL$$IODB DBL$WAIT jDBL$$K_MSGMGR_REQ_LEN 0000003C DBL$$DATA DBL$$SEND_RECV j DBL$EXITHANDLER j DBL$WAIT jDBL$$K_RECV_ID_LEN 00000027 DBL$$DATA DBL$$INIT j DBL$$INTERP j DBL$RCVID JDBL$$K_RECV_MBXNAME_LEN 0000000A DBL$$DATA jDBL$$K_SAVE_AREA_LEN 0000009A DBL$$DATA DBL$AST jDBL$$K_SS3_ENTRIES 00000016 DBL$$UPLOTABLE DBL$$ACCEPT j DBL$$READS jDBL$$K_TTMBXMSG_SIZE 00000100 DBL$$IODB DBL$$INIT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 25 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Tj DBL$TTBRDCST j DBL$WAIT jDBL$$K_TTNMBR_LEN 0114000A DBL$$DATA DBL$$SEND_RECV jDBL$$LPQUE 0000FF3A-R DBL$$LPQUE DBL$$INTERP jDBL$$LPQUE_ALIGN 0000FEF9-R DBL$$LPQUE DBL$$LPQUE jDBL$$LPQUE_COPIES 0000FE87-R DBL$$LPQUE DBL$$INTERP j DBL$$LPQUE jDBL$$LPQUE_DELETE 0000FF06-R DBL$$LPQUE DBL$$LPQUE jDBL$$LPQUE_DELETE_WITH_VALUE 0000FF12-R DBL$$LPQUE DBL$$LPQUE jDBL$$LPQUE_FORM 0000FEB2-R DBL$$LPQUE DBL$$INTERP j DBL$$LPQUE jDBL$$LPQUE_LPNUM 0000FE47-R DBL$$LPQUE DBL$$INTERP j DBL$$LPQUE jDBL$$LPQUE_START 0000FD2E-R DBL$$LPQUE DBL$$INTERP jDBL$$MAKCCB 00013A84-R DBL$$CCB DBL$$OPEN jDBL$$MAKCCB_TT 00013AC7-R DBL$$CCB DBL$$OPENTT jDBL$$MBXNAME 000048D6-R DBL$$SEND_RECV DBL$$INIT j DBL$$OPEN jDBL$$MODE_TO_CODE 00013A3A-R DBL$$MODE_TRANS DBL$$BIFUNC j DBL$$OPEN jDBL$$MODE_TRANS 00013A1A-R DBL$$MODE_TRANS DBL$$OPEN jDBL$$MUL_B 0000A7FD-R DBL$$MATH DBL$$INTERP jDBL$$MUL_S 0000A7D3-R DBL$$MATH DBL$$INTERP jDBL$$MUL_W 0000A7F8-R DBL$$MATH DBL$$INTERP jDBL$$ONERROR_GO 0000690B-R DBL$$INTERP DBL$$HANDLER jDBL$$OPAND 0000C5F5-R DBL$$BOOLEAN DBL$$INTERP jDBL$$OPEN 0001109B-R DBL$$OPEN DBL$$INTERP jDBL$$OPENTT 0000E680-R DBL$$OPENTT DBL$$INIT jDBL$$OPEN_ALLOC 0001081D-R DBL$$OPEN DBL$$INTERP jDBL$$OPEN_BKTSIZ 00010F8D-R DBL$$OPEN DBL$$INTERP jDBL$$OPEN_BLKSIZ 00011005-R DBL$$OPEN DBL$$INTERP jDBL$$OPEN_BUFSIZ 00010F4E-R DBL$$OPEN DBL$$INTERP jDBL$$OPEN_CHANDLC 00010095-R DBL$$OPEN DBL$$INTERP jDBL$$OPEN_CHANDXC 00010053-R DBL$$OPEN DBL$$INTERP jDBL$$OPEN_RECSIZ 00010FC7-R DBL$$OPEN DBL$$INTERP jDBL$$OPOR 0000C641-R DBL$$BOOLEAN DBL$$INTERP jDBL$$OR 0000C200-R DBL$$BOOLEAN DBL$$INTERP jDBL$$POP1 000066BB-R DBL$$INTERP DBL$$SLEEP jDBL$$POP_DSC 000067AF-R DBL$$INTERP DBL$$BIFUNC j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$FIND j DBL$$FORMAT j DBL$$LPQUE j DBL$$MATH j DBL$$READ j DBL$$SEND_RECV j DBL$$WRITE j DBL$$WRITES j DBL$$XCALL jDBL$$PROBEW_HANDLER 00014340-R DBL$$HANDLER DBL$$CONVERT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 26 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Ij DBL$$FOR j DBL$$FORMAT j DBL$$INTERP j DBL$$MATH j DBL$$PUSH j DBL$$READ j DBL$$READS j DBL$$STORE j DBL$ASCII j DBL$BKSTR j DBL$CHAIN j DBL$CHOPEN j DBL$DATE j DBL$DECML j DBL$DEVICE j DBL$ERROR j DBL$ERRTXT j DBL$FATAL j DBL$FLAGS j DBL$GETCM j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$IXREAD j DBL$JBNO j DBL$PAK j DBL$PARSE j DBL$RSTAT j DBL$SIZE j DBL$TIME j DBL$TNMBR j DBL$TTFLGS j DBL$TTNAME j DBL$TTSTS j DBL$VERSN j DBL$WKDAY j DBL$XARGS j DBL$XSTAT JDBL$$PROBEW_USERACTION 0001435D-R DBL$$HANDLER jDBL$$PROC 00006655-R DBL$$INTERP DBL$$INIT jDBL$$PUSH_ARG 00007873-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_ARG1 000078A2-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_ARG2 00007A2A-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_B 00007604-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_B1 00007624-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_B2 000076A9-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_W1 0000761F-R DBL$$PUSH DBL$$INTERP jDBL$$PUSH_W2 000076A4-R DBL$$PUSH DBL$$INTERP jDBL$$READIDX 000037AC-R DBL$$READ DBL$IXREAD jDBL$$READRDLC 0000344C-R DBL$$READ DBL$$INTERP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 27 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------_jDBL$$READRDXC 00003451-R DBL$$READ DBL$$INTERP jDBL$$READSDLC_L 00000728-R DBL$$READS DBL$$INTERP jDBL$$READSDLC_N 000007B2-R DBL$$READS DBL$$INTERP jDBL$$READSDXC_L 0000071A-R DBL$$READS DBL$$INTERP jDBL$$READSDXC_N 000007A4-R DBL$$READS DBL$$INTERP jDBL$$RECV 000046F1-R DBL$$SEND_RECV DBL$$INTERP jDBL$$RECVSZ 000045BB-R DBL$$SEND_RECV DBL$$INTERP jDBL$$RECV_INIT 0000483B-R DBL$$SEND_RECV DBL$WAIT jDBL$$RELCCB 00013B43-RU DBL$$CCB $DBL$$VECTOR j DBL$$OPEN jDBL$$RETURN_FOR_EXTRNLCALL 0000667B-R DBL$$INTERP DBL$$XCALL jDBL$$RETURN_TO_NATIVE 00006674-R DBL$$INTERP $DBL$$VECTOR j DBL$$XCALL jDBL$$ROUND 0000B012-R DBL$$MATH DBL$$INTERP jDBL$$SEND_X 00004347-R DBL$$SEND_RECV DBL$$INTERP jDBL$$SETUP_FAB 0000F928-R DBL$$FAB DBL$DELET j DBL$PARSE j DBL$PURGE j DBL$RENAM j DBL$RENAM_V1 jDBL$$SIGNAL 0000E9C4-RU DBL$$SIGNAL $DBL$$VECTOR j DBL$$ACCEPT j DBL$$ARRAY j DBL$$BIFUNC j DBL$$BOOLEAN j DBL$$CCB j DBL$$CHANNEL j DBL$$CLOSE j DBL$$CMPR j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j  DBL$$DISPLAY j DBL$$FAB j DBL$$FIND j DBL$$FOR j DBL$$FORMAT j DBL$$FORMS j DBL$$INIT j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$MATH j DBL$$MODE_TRANS j DBL$$OPEN j DBL$$OPENTT j DBL$$PUSH j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$SLEEP j DBL$$STORE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 28 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$STROPS j DBL$$TBXXX j DBL$$TERM_IO j DBL$$WRITE j DBL$$WRITES $ j DBL$$XCALL j DBL$ASCII j DBL$AST j DBL$BEGFL j DBL$BKSTR j DBL$CHAIN j DBL$CHOPEN j DBL$CPUTM j DBL$DATE j DBL$DECML j DBL$DELET j DBL$DELMBX j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$ERRMOD j DBL$ERROR j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$EXITS j DBL$FATAL j DBL$FILEC j DBL$FLAGS j DBL$FUNCTION j DBL$GETCM j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$ISMCRE j DBL$IXREAD j DBL$JBNO j DBL$KILL j DBL$LOCK j DBL$MONEY j DBL$PAK j DBL$PARSE j DBL$POSRFA j DBL$PURGE j DBL$PUTCM j DBL$RCVID j DBL$RENAM j DBL$RENAM_V1 j DBL$RMSCC j DBL$RSTAT j DBL$RUNJB  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 29 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$SETCTL j DBL$SETDFN j DBL$SIZE j DBL$SLICE j DBL$SNDOP j DBL$TIME j DBL$TIMOUT j DBL$TNMBR j DBL$TTBRDCST j DBL$TTFLGS j DBL$TTNAME j DBL$TTSTS j DBL$VERSN j DBL$WAIT j DBL$WKDAY j DBL$XARGS j DBL$XSTAT jDBL$$SLEEP 0000047A-R DBL$$SLEEP DBL$$INTERP jDBL$$STOREPP 00008909-R DBL$$STORE DBL$$FOR jDBL$$STOREZZ 00008514-R DBL$$STORE DBL$$FOR jDBL$$STORE_B 00008CE0-R DBL$$STORE DBL$$INTERP 3 jDBL$$STORE_S 00008C9E-R DBL$$STORE DBL$$INTERP jDBL$$STORE_W 00008CDB-R DBL$$STORE DBL$$INTERP jDBL$$STR_CONCAT 000004F0-R DBL$$STROPS DBL$$INTERP jDBL$$STR_REDUCE 00000558-R DBL$$STROPS DBL$$INTERP jDBL$$STUFBUF_AS 00002469-R DBL$$DISPLAY yy~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1S;1d4 DBL$$INTERP jDBL$$STUFBUF_DL 0000248F-R DBL$$DISPLAY DBL$$INTERP jDBL$$STUFBUF_DX 00002495-R DBL$$DISPLAY DBL$$INTERP jDBL$$STUFBUF_SB 00002476-R DBL$$DISPLAY DBL$$INTERP jDBL$$STUFBUF_SW 0000247B-R DBL$$DISPLAY DBL$$INTERP jDBL$$STUFBUF_TS 00002423-R DBL$$DISPLAY DBL$$INTERP jDBL$$SUB_B 00009B07-R DBL$$MATH DBL$$INTERP jDBL$$SUB_S 00009AF8-R DBL$$MATH DBL$$INTERP jDBL$$SUB_W 00009B0C-R DBL$$MATH DBL$$INTERP jDBL$$TBXXX 00019ED4-RU DBL$$TBXXX $DBL$$VECTOR jDBL$$TERM_IO_FORMAT 000147E4-R DBL$$TERM_IO DBL$$READS jDBL$$TERM_IO_POSITION 00014C23-R DBL$$TERM_IO DBL$$DISPLAY j DBL$$READS j DBL$$WRITES jDBL$$TRACEBACK 0000EADF-R DBL$$WHERE DBL$$INTERP j DBL$$SIGNAL jDBL$$TRNLOG 0000E530-RU DBL$$TRNLOG $DBL$$VECTOR jDBL$$TSEQ_SAVE 00004BDF-R DBL$$BIFUNC DBL$$ACCEPT j DBL$$READS jDBL$$TTMBX_AST 00019BA8-R DBL$TTBRDCST DBL$WAIT jDBL$$TTNAMNUM 0001660D-R DBL$TNMBR DBL$$BIFUNC jDBL$$TTNUMNAM 0001670B-R DBL$TNMBR DBL$RUNJB jDBL$$TTSTS0 000168DD-R DBL$TTSTS DBL$$BIFUNC jDBL$$UMINUS_B 0000A66C-R DBL$$MATH DBL$$INTERP jDBL$$UMINUS_S 0000A644-R DBL$$MATH DBL$$INTERP jDBL$$UMINUS_W 0000A667-R DBL$$MATH DBL$$INTERP jDBL$$WAIT_FUNCTION 00016B2E-R DBL$WAIT DBL$$BIFUNC  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 30 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- JDBL$$WAIT_SETEF 00016F74-R DBL$WAIT jDBL$$WHERE_AT 0000EAD4-R DBL$$WHERE DBL$$INTERP jDBL$$WRITES_L 00001D58-R DBL$$WRITES DBL$$INTERP jDBL$$WRITES_X 00001D5D-R DBL$$WRITES DBL$$INTERP jDBL$$WRITE_L 00003CCD-R DBL$$WRITE DBL$$INTERP jDBL$$WRITE_X 00003CD2-R DBL$$WRITE DBL$$INTERP jDBL$$XOR 0000C09E-R DBL$$BOOLEAN DBL$$INTERP jDBL$$XRET 0000618C-R DBL$$XCALL DBL$EXITS jDBL$$XRETURN_STATUS 00006151-R DBL$$XCALL DBL$$INTERP jDBL$AB_CVTPT_Z 0001AB00-R DBL$$CONVERT DBL$$FORMAT j DBL$$MATH jDBL$ANSI_TABLE 0001A4D4-R DBL$ANSI_TABLE DBL$$CLOSE j DBL$$DISPLAY j DBL$$OPEN j DBL$$TERM_IO j DBL$$WRITES j DBL$ESC_TABLE jDBL$ASCII 00014EA0-RU DBL$ASCII $DBL$$VECTOR jDBL$ASTRST 00017032-RU DBL$AST $DBL$$VECTOR jDBL$ASTSAV 00016FB4-RU DBL$AST $DBL$$VECTOR jDBL$BEGFL 0001709C-RU DBL$BEGFL $DBL$$VECTOR jDBL$BKSTR 00017158-RU DBL$BKSTR $DBL$$VECTOR jDBL$CHAIN 00017238-RU DBL$CHAIN $DBL$$VECTOR jDBL$CHOPEN 00017434-RU DBL$CHOPEN $DBL$$VECTOR jDBL$CPUTM 000173BC-RU DBL$CPUTM $DBL$$VECTOR jDBL$CREMBX 000118E8-RU DBL$$OPEN $DBL$$VECTOR jDBL$CVTAZ_R1 00012570-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTIIV 00013789-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTINT 00013683-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTIQZ_R1 00012BA9-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTIZ 0001370E-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTIZA_R1 00012815-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTIZV 00013767-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTIZ_R1 00012820-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTPKA_A 00012C7B-R DBL$$CONVERT DBL$$BIFUNC j DBL$$DISPLAY j DBL$$FORMAT j DBL$$TERM_IO jDBL$CVTPKIQ_A 00012D24-R DBL$$CONVERT DBL$$STORE jDBL$CVTPKI_A 00012D05-R DBL$$CONVERT DBL$$DISPLAY jDBL$CVTZA_R1 00013228-RU DBL$$CONVERT $DBL$$VECTOR j DBL$$BIFUNC j DBL$$DISPLAY j DBL$$FORMAT j DBL$$TERM_IO jDBL$CVTZI 0001368A-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTZIA_R1 00013292-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTZIQ_R1 00013329-RU DBL$$CONVERT $DBL$$VECTOR jDBL$CVTZI_R1 0001329C-RU DBL$$CONVERT $DBL$$VECTOR j DBL$$DISPLAY jDBL$DATE 00014F40-RU DBL$DATE $DBL$$VECTOR jDBL$DECML 00014FE8-RU DBL$DECML $DBL$$VECTOR  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 31 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------XjDBL$DELET 00015070-RU DBL$DELET $DBL$$VECTOR jDBL$DELMBX 000174C8-RU DBL$DELMBX $DBL$$VECTOR jDBL$DEVCLT 0001767E-RU DBL$DEVICE $DBL$$VECTOR jDBL$EMPBUF 00017A68-RU DBL$EMPBUF $DBL$$VECTOR jDBL$ENDFL 00017B10-RU DBL$ENDFL $DBL$$VECTOR jDBL$ERRMOD 00017BF0-RU DBL$ERRMOD $DBL$$VECTOR jDBL$ERROR 0001514C-RU DBL$ERROR $DBL$$VECTOR jDBL$ERRTRANS_R1 0000E924-RU DBL$$ERRTRANS $DBL$$VECTOR jDBL$ERRTXT 00017C84-RU DBL$ERRTXT $DBL$$VECTOR jDBL$ESC_TABLE 0001A5F8-R DBL$ESC_TABLE DBL$$OPEN jDBL$EXECUTE_IMAGE_ROUTINE 0000FA18-RU DBL$EXECUTE_IMAGE_ROUTINE $DBL$$VECTOR jDBL$EXITERROR 00017E32-RU DBL$EXITS $DBL$$VECTOR jDBL$EXITHANDLER 00014519-R DBL$EXITHANDLER DBL$$INIT jDBL$EXITSUB 00017DE3-RU DBL$EXITS $DBL$$VECTOR jDBL$EXITSUB_VAL 00017DA8-RU DBL$EXITS $DBL$$VECTOR jDBL$FATAL 00015248-RU DBL$FATAL $DBL$$VECTOR jDBL$FILEC 00015398-RU DBL$FILEC $DBL$$VECTOR jDBL$FLAGS 00015468-RU DBL$FLAGS $DBL$$VECTOR jDBL$FUNCTION 0000FAF1-RU DBL$FUNCTION $DBL$$VECTOR JDBL$GB_CMP_MAJOR_VERSION 000120CC-RU $DBL$$VECTOR JDBL$GB_CMP_MINOR_VERSION 000120CD-RU $DBL$$VECTOR jDBL$GETCM 00017EAE-RU DBL$GETCM $DBL$$VECTOR jDBL$GETDFN 00017F3F-RU DBL$GETDFN $DBL$$VECTOR jDBL$GETFA 0001807A-RU DBL$GETFA $DBL$$VECTOR jDBL$GETFNM 000184B7-RU DBL$GETFNM $DBL$$VECTOR jDBL$GLINE 00018590-RU DBL$GLINE $DBL$$VECTOR jDBL$GL_FLAGS 0001CBC0-RU DBL$$DATA $DBL$$VECTOR j DBL$$ACCEPT j DBL$$FAB j DBL$$INTERP j DBL$$OPEN j DBL$$READS j DBL$FLAGS j DBL$ISMCRE j DBL$RENAM j DBL$RMSCC jDBL$GL_TTFLAGS 0001CBC8-R DBL$$DATA DBL$$ACCEPT j DBL$$DISPLAY j DBL$$FORMS j DBL$$READS j DBL$$WRITES j DBL$TTFLGS jDBL$GQ_TERM_8BITMASK 0001D064-R DBL$$DATA DBL$$ACCEPT j DBL$$INIT jDBL$GQ_TERM_ECHOMASK 0001D05C-R DBL$$DATA DBL$$ACCEPT j DBL$$INIT jDBL$GQ_TERM_NOECHOMASK 00000631-R DBL$$READS DBL$WAIT jDBL$GTENT 000172F5-RU DBL$CHAIN $DBL$$VECTOR JDBL$GT_BASELEVEL_DATE 000120E3-R $DBL$$VECTOR JDBL$GT_BASELEVEL_TYPE 000120E1-R $DBL$$VECTOR JDBL$GT_BASELEVEL_XXXX 000120EE-R $DBL$$VECTOR jDBL$GT_RTL_BASELEVEL_STRING 000120E1-R $DBL$$VECTOR DBL$VERSN  EDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 32V_Symbol Value Defined By Referenced By ..._------ ----- ---------- ----------------- JDBL$GT_RTL_MAJORVERSION 000120DA-RU $DBL$$VECTOR JDBL$GT_RTL_MINORVERSION 000120DD-RU $DBL$$VECTOR JDBL$GT_RTL_OPSYS 000120CE-RU $DBL$$VECTOR JDBL$GT_RTL_PATCHLEVEL 000120DF-RU $DBL$$VECTOR JDBL$GT_RTL_RELEASETYPE 000120D9-RU $DBL$$VECTOR JDBL$GT_RTL_SUBSYS 000120D5-RU $DBL$$VECTOR jDBL$GT_RTL_VERSION_STRING 000120CE-RU $DBL$$VECTOR DBL$$BIFUNC j DBL$VERSN jDBL$GW_ERROR_LINE 0001CBD2-R DBL$$DATA DBL$$BIFUNC j DBL$$INTERP j DBL$ERROR j DBL$EXITS jDBL$GW_ERROR_NUMBER 0001CBD0-R DBL$$DATA DBL$$BIFUNC j DBL$$SIGNAL j DBL$ERROR j DBL$EXITHANDLER j DBL$EXITS jDBL$GW_RSTAT_RSZ 0001CBCC-R DBL$$DATA DBL$$ACCEPT j DBL$$BIFUNC j DBL$$READ j DBL$$READS j DBL$RSTAT jDBL$GW_RSTAT_TERMCODE 0001CBCE-R DBL$$DATA DBL$$ACCEPT j DBL$$BIFUNC j DBL$$READ j DBL$$READS j DBL$RSTAT JDBL$GX_PATCHAREA 0001D66C-RU DBL$$PATCH jDBL$HANDLER 00000000-R $DBL$$VECTOR DBL$$CHANNEL j DBL$$INIT j DBL$$SIGNAL j DBL$$WHERE j DBL$SETCTL j DBL$XSTAT jDBL$INIT 00013BF8-RU DBL$$INIT $DBL$$VECTOR jDBL$INIT85 00013BF8-RU DBL$$INIT $DBL$$VECTOR jDBL$INSTR 0001562A-RU DBL$INSTR $DBL$$VECTOR jDBL$INTCVT 00013707-RU DBL$$CONVERT $DBL$$VECTOR jDBL$INTERP_LINE 00006224-RU DBL$$INTERP $DBL$$VECTOR jDBL$ISMCRE 00018784-RU DBL$ISMCRE $DBL$$VECTOR jDBL$IXREAD 00018AA3-RU DBL$IXREAD $DBL$$VECTOR jDBL$JBNAM 0001958A-RU DBL$RCVID $DBL$$VECTOR jDBL$JBNO 000156ED-RU DBL$JBNO $DBL$$VECTOR jDBL$KILL 00018C4D-RU DBL$KILL $DBL$$VECTOR JDBL$K_PATCHAREASIZE 00000408-U DBL$$PATCH jDBL$K_RTL_BASELEVEL_LEN 00000035 $DBL$$VECTOR DBL$VERSN jDBL$K_RTL_VERSION_LEN 00000013 $DBL$$VECTOR DBL$$BIFUNC j DBL$VERSN jDBL$LOCK 00018CA1-RU DBL$LOCK $DBL$$VECTOR jDBL$MBXNAME_R1 000048D6-RU DBL$$SEND_RECV $DBL$$VECTOR jDBL$MONEY 00015796-RU DBL$MONEY $DBL$$VECTOR jDBL$PAK 00015806-RU DBL$PAK $DBL$$VECTOR  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 33 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$PARSE 00018D02-RU DBL$PARSE $DBL$$VECTOR j DBL$EXITHANDLER jDBL$POSRFA 0001914F-RU DBL$POSRFA $DBL$$VECTOR jDBL$PURGE 0001933E-RU DBL$PURGE $DBL$$VECTOR jDBL$PUTCM 000194BE-RU DBL$PUTCM $DBL$$VECTOR jDBL$RCVID 000194EE-RU DBL$RCVID $DBL$$VECTOR jDBL$RENAM 00015BEA-RU DBL$RENAM $DBL$$VECTOR JDBL$RENAM_V1 000195D1-R DBL$RENAM_V1 jDBL$RMSCC 00019672-RU DBL$RMSCC $DBL$$VECTOR jDBL$RSTAT 00015EB3-RU DBL$RSTAT $DBL$$VECTOR jDBL$RSTATD 00015E9F-RU DBL$RSTAT $DBL$$VECTOR jDBL$RUNJB 00016035-RU DBL$RUNJB $DBL$$VECTOR j DBL$EXITHANDLER jDBL$SETCTL 0000F4A1-RU DBL$SETCTL $DBL$$VECTOR jDBL$SETDFN 000196ED-RU DBL$SETDFN $DBL$$VECTOR jDBL$SETKRF 00019289-RU DBL$POSRFA $DBL$$VECTOR jDBL$SIZE 00016379-RU DBL$SIZE $DBL$$VECTOR jDBL$SLICE 0001983E-RU DBL$SLICE $DBL$$VECTOR jDBL$SNDOP 000198A2-RU DBL$SNDOP $DBL$$VECTOR jDBL$TBBIN 00019F76-RU DBL$$TBXXX $DBL$$VECTOR jDBL$TBMOD 00019FBC-RU DBL$$TBXXX $DBL$$VECTOR jDBL$TBMUL 00019F25-RU DBL$$TBXXX $DBL$$VECTOR jDBL$TBRET 0001A0C2-RU DBL$$TBXXX $DBL$$VECTOR jDBL$TBRPL 0001A03E-RU DBL$$TBXXX $DBL$$VECTOR jDBL$TIME 00016411-RU DBL$TIME $DBL$$VECTOR jDBL$TIMOUT 00019E2F-RU DBL$TIMOUT $DBL$$VECTOR jDBL$TNMBR 00016542-RU DBL$TNMBR $DBL$$VECTOR j DBL$$SEND_RECV j DBL$EXITHANDLER jDBL$TNMBR_TABLE 0001B600-RU DBL$TNMBR_TABLE DBL$TNMBR jDBL$TRACEBACK_R5 0000EADF-RU DBL$$WHERE $DBL$$VECTOR jDBL$TTBRDCST 00019925-RU DBL$TTBRDCST $DBL$$VECTOR jDBL$TTCHAR 0001752C-RU DBL$DEVICE $DBL$$VECTOR jDBL$TTFLGS 00019CD7-RU DBL$TTFLGS $DBL$$VECTOR jDBL$TTNAME 0000FB5B-RU DBL$TTNAME $DBL$$VECTOR jDBL$TTSTS 000167D8-RU DBL$TTSTS $DBL$$VECTOR jDBL$TT_NAME_TO_NUMBER 000165BE-RU DBL$TNMBR $DBL$$VECTOR jDBL$TT_NUMBER_TO_NAME 000166B2-RU DBL$TNMBR $DBL$$VECTOR jDBL$ULOCK 00018CD0-RU DBL$LOCK $DBL$$VECTOR jDBL$UNPAK 00015A44-RU DBL$PAK $DBL$$VECTOR jDBL$USEROPEN 0000FBF5-RU DBL$USEROPEN $DBL$$VECTOR jDBL$VERSN 000169FA-RU DBL$VERSN $DBL$$VECTOR jDBL$WAIT 00016AC1-RU DBL$WAIT $DBL$$VECTOR jDBL$WHERE_R1 0000EAD7-RU DBL$$WHERE $DBL$$VECTOR jDBL$WKDAY 0001A41C-RU DBL$WKDAY $DBL$$VECTOR jDBL$XARGS 0001A116-RU DBL$XARGS $DBL$$VECTOR jDBL$XSTAT 0001A28A-RU DBL$XSTAT f $DBL$$VECTOR JDBL$_ALLOC 002A838A-U DBL$$RTLMSG jDBL$_ALLSNDBUF 002A869B-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 34 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_ARGCOUNT 002A827A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$PAK j DBL$WKDAY JDBL$_ARGMIS 002A82BA-U DBL$$RTLMSG jDBL$_ARGMISS 002A82BA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$BIFUNC j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j DBL$$FOR j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ASCII j DBL$BEGFL j DBL$BKSTR j DBL$CHAIN j DBL$CHOPEN j DBL$DATE j DBL$DECML j DBL$DELET j DBL$DELMBX j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$ERRMOD j DBL$ERROR j DBL$ERRTXT j DBL$EXECUTE_IMAGE_|"~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1ArROUTINE j DBL$EXITS j DBL$FATAL j DBL$FILEC  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 35 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------$j DBL$FLAGS j DBL$FUNCTION j DBL$GETCM j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$ISMCRE j DBL$IXREAD j DBL$JBNO j DBL$MONEY j DBL$PAK j DBL$PARSE j DBL$POSRFA j DBL$RCVID j DBL$RSTAT j DBL$SETCTL j DBL$SIZE j DBL$TIME j DBL$TIMOUT j DBL$TNMBR j DBL$TTBRDCST j DBL$TTFLGS j DBL$TTNAME j DBL$TTSTS j DBL$VERSN j DBL$WAIT j DBL$WKDAY JDBL$_ARGNUM 002A8034-U DBL$$RTLMSG jDBL$_ARGOUTLIM 002A8272-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$PAK j DBL$WKDAY jDBL$_ARGOUTORD 002A826A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTIN$~E j DBL$ISMCRE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 36 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$PAK j DBL$WKDAY jDBL$_ARGSIZ 002A80FA-U DBL$$RTLMSG DBL$CHAIN jDBL$_ARGWROSIZ 002A80FA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FATAL j DBL$GETFA j DBL$ISMCRE j DBL$MONEY j DBL$POSRFA j DBL$WKDAY jDBL$_ARG_NMBR 002A867B-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$PARSE j DBL$WKDAY jDBL$_ARG_SIZE 002A868B-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_AT_LINE 002A864B-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$SIGNAL j DBL$$STROPS j DBL$$TBXXX  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 37 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_BADCMP 002A80EC-U DBL$$RTLMSG jDBL$_BADDIGIT 002A80A2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$PAK j DBL$WKDAY jDBL$_BADFILSPC 002A808A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j  DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$PURGE j DBL$WKDAY JDBL$_BADKEY 002A81A2-U DBL$$RTLMSG jDBL$_BADOPEN 002A80AA-U DBL$$RTLMSG DBL$$ACCEPT j DBL$$ARRAY j DBL$$CLOSE j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$ERRTRANS j DBL$$FIND j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$WRITE j DBL$$WRITES j DBL$BEGFL j DBL$ENDFL j DBL$ERRMOD  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 38 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Cj DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$IXREAD j DBL$POSRFA j DBL$TIMOUT j DBL$TTBRDCST j DBL$TTSTS j DBL$WKDAY JDBL$_BIGNUM 002A807A-U DBL$$RTLMSG JDBL$_BKTSIZ 002A8392-U DBL$$RTLMSG JDBL$_BLKSIZ 002A839A-U DBL$$RTLMSG jDBL$_BOUNDS 002A86E3-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j . DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_BUFSIZ 002A83A2-U DBL$$RTLMSG jDBL$_CALNOTDBL 002A834C-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_CANCEL 002A836A-U DBL$$RTLMSG jDBL$_CHADEFERR 002A806C-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_CHAIN_USE 002A8082-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CCB j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 39B_Symbol Value Defined By Referenced By ..._------ ----- ---------- ----------------- j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_CHANOTOPN 002A805A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CCB j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_CHNEXC 002A810A-U DBL$$RTLMSG JDBL$_CHNUSE 002A8082-U DBL$$RTLMSG jDBL$_CMPERR 002A801C-U DBL$$RTLMSG DBL$$ACCEPT j DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$FOR j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_CONTROL_C 002A836A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$SETCTL j DBL$WKDAY  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 40 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$_CONTROL_Y 002A8372-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$SETCTL j DBL$WKDAY jDBL$_DBLRTLERR 002A8334-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CONVERT j p;>~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1M> DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$XCALL j DBL$AST j DBL$DEVICE j DBL$ERRMOD j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_DEVIN_USE 002A812A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_DEVNOTRDY 002A835A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 41 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_DEVUSE 002A812A-U DBL$$RTLMSG JDBL$_DIGIT 002A80A2-U DBL$$RTLMSG jDBL$_DIVBYZERO 002A80F2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_DIVIDE 002A80F2-U DBL$$RTLMSG jDBL$_DTYPEINFO 002A86EB DBL$$RTLMSG DBL$$BIFUNC j DBL$$BOOLEAN j DBL$$CMPR j DBL$$CONVERT j DBL$$FIND j DBL$$FORMAT j DBL$$MATH j DBL$$OPEN j DBL$$STORE j DBL$$TERM_IO j DBL$XARGS jDBL$_ENDOF_FIL 002A800A-U DBL$$RTLMSG DBL$$ACCEPT j DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READ j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_EOF 002A800A-U DBL$$RTLMSG jDBL$_EXPIRED 002A86D4-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 42 _Symbol Value Defined By Referenced By ...0_------ ----- ---------- ----------------- j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_EXQUOTA 002A8352-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_FACILITY 0000002A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$HANDLER j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_FEANOTIMP 002A83BA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CLOSE j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_FILEINUSE 002A8132-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-101 Linker V05-13 Page 43 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$_FILENAME 002A86CB-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$RENAM j DBL$WKDAY jDBL$_FILE_ORG 002A833A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_FILFUL 002A80CA-U DBL$$RTLMSG jDBL$_FILNOTFND 002A8092-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$RENAM j DBL$WKDAY JDBL$_FILOPT 002A80AA-U DBL$$RTLMSG JDBL$_FILORG 002A833A-U DBL$$RTLMSG JDBL$_FILSPC 002A808A-U DBL$$RTLMSG JDBL$_FINUSE 002A8132-U DBL$$RTLMSG jDBL$_FLDNOTPAK 002A8282-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE  ODIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 44 _Symbol Value Defined By Referenced By ..._------ ----- ---------- ----------------- j DBL$ISMCRE j DBL$PAK j DBL$WKDAY jDBL$_FLDRECLNG 002A80D2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$FORMS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$WRITE j DBL$$WRITES j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_FNF 002A8092-U DBL$$RTLMSG JDBL$_FORGNTERM 002A83D2-U DBL$$RTLMSG JDBL$_FULBUFERR 002A83F2-U DBL$$RTLMSG jDBL$_HANNOTAVA 002A809A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_ILEGALKEY 002A81A2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READ j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$WRITE j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$IXREAD j DBL$WKDAY jDBL$_ILLBIOSIZ 002A82A2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 45 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j  DBL$$STROPS j DBL$$TBXXX j DBL$$WRITE j DBL$$WRITES j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_ILLCHANUM 002A8052-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CHANNEL j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS  j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_ILLCHN 002A8052-U DBL$$RTLMSG jDBL$_ILLRECNUM 002A80E2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$FIND j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READ j DBL$$SELECT_CONVERT j  DBL$$STROPS j DBL$$TBXXX j DBL$$WRITE j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j d~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1I DBL$ISMCRE j DBL$WKDAY jDBL$_ILLTRMNUM 002A81DA-U DBL$$RTLMSG DBL$TNMBR jDBL$_INATTERR 002A83E2-U DBL$$RTLMSG DBL$$READS jDBL$_INCCOMPIL 002A80EC-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INIT j DBL$$KEY_LOOKUP j DBL$$LPQUE j  DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 46 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$WKDAY jDBL$_INCNUMARG 002A8034-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j DBL$$INIT j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ASCII j DBL$BEGFL j DBL$BKSTR j DBL$CHAIN j DBL$CHOPEN j DBL$CPUTM j DBL$DATE j DBL$DECML j DBL$DELET * j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$ERRMOD j DBL$ERROR j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$EXITS j DBL$FATAL j DBL$FILEC j DBL$FLAGS j DBL$FUNCTION j DBL$GETCM j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$ISMCRE j DBL$IXREAD j DBL$JBNO j DBL$KILL j DBL$MONEY j DBL$PARSE j DBL$POSRFA j DBL$PURGE j DBL$RENAM j DBL$RENAM_V1 j DBL$RMSCC j DBL$RSTAT j DBL$RUNJB j DBL$SETCTL  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 47 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$SETDFN j DBL$SIZE j DBL$SLICE j DBL$SNDOP j DBL$TIME j DBL$TIMOUT j DBL$TNMBR j DBL$TTBRDCST j DBL$TTFLGS j DBL$TTNAME j DBL$TTSTS j DBL$VERSN j DBL$WAIT j DBL$WKDAY j DBL$XARGS j DBL$XSTAT jDBL$_INPFROWRI 002A8062-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_INTRPT 002A8372-U DBL$$RTLMSG jDBL$_INVACL 002A8442-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVALFDL 002A842A-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVALLOC 002A838A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_INVALRFA 002A8462-U DBL$$RTLMSG DBL$$ERRTRANS jDBL$_INVARGTYP 002A832A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 48 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$ISMCRE j DBL$WKDAY jDBL$_INVBKTSIZ 002A8392-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j   DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_INVBLKSIZ 002A839A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_INVBUFNUM 002A8432-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVBUFSIZ 002A83A2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_INVCHRERR 002A83EA-U DBL$$RTLMSG DBL$$READS jDBL$_INVCONTIG 002A840A-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVDATYP 002A8452-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVDEQ 002A8412-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVKEYATR 002A8482-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVKEYKRF 002A847A-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVKEYNUM 002A83CA-U DBL$$RTLMSG DBL$$ERRTRANS j DBL$$FIND j DBL$$READ jDBL$_INVKEYPOS 002A8472-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVMATCH 002A8402-U DBL$$RTLMSG DBL$$FIND j DBL$$READ jDBL$_INVNUMREC 002A841A-U DBL$$RTLMSG DBL$$OPEN  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 49 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$_INVOPNMOD 002A8362-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$MODE_TRANS j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j  DBL$ISMCRE j DBL$WKDAY jDBL$_INVPRO 002A843A-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVRECSIZ 002A83AA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j  DBL$ISMCRE j DBL$WKDAY jDBL$_INVRECTYP 002A8422-U DBL$$RTLMSG DBL$$OPEN jDBL$_INVSHRCOD 002A82CA-U DBL$$RTLMSG DBL$$OPEN jDBL$_IOERRINFO 002A865B-U DBL$$RTLMSG DBL$$ACCEPT j DBL$$ARRAY j DBL$$CLOSE j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$FAB j DBL$$FIND j DBL$$FORMS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$TERM_IO j DBL$$WRITE j DBL$$WRITES j DBL$BEGFL j DBL$EMPBUF j DBL$ENDFL  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 50 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FILEC j DBL$GETFA j DBL$ISMCRE j DBL$IXREAD j DBL$POSRFA j DBL$TIMOUT j DBL$TTBRDCST j DBL$TTSTS j DBL$WKDAY JDBL$_IOFALL 002A80B2-U DBL$$RTLMSG JDBL$_IOMODE 002A8362-U DBL$$RTLMSG jDBL$_IO_ERROR 002A80B2-U DBL$$RTLMSG # DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_JOBSTAERR 002A81D2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$RUNJB j DBL$WKDAY JDBL$_KEYNOT 002A81AA-U DBL$$RTLMSG jDBL$_KEYNOTSAM 002A81AA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$FIND j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READ j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 51 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$WKDAY jDBL$_LINTOOLNG 002A80BA-U DBL$pdZtPٿhu;K$`':4 @Ffh=]UR`u] r SA%[),D pgA|wKymmt%\2uU9d_kf~M6dyaH`eEtjPp4\jF(+gxK7nywCDpMK|zmTֈbWVfz V  "Av'8 tMITJ&ǿHi,:}%m9;N+L$xEdlօu"F li ee VT%"8KEE8A*{fth,aAx% $C)W8O=;nG$ o^æow-k@tQpPN9H{8-&L2c IÅ* w ,?ms,gg uv BY=14>#PRj\D"m9Jcw1Atjftl 70(pq(I-h<PodqDD0fg e"A{JkNvk1X6*2 Wry2{pG:Rb5oAc:GIt@*=2[iTeAR01vD%Qj Mf{ :Uߥ4t7,ff*:kK^44r3;a!b'(l0yMbxzx*T/ 3,^>4DY|Zk.Qfqq`剣yufrZ8x\>0\ٕtF )AF^z$Ńc++_fvJ,i&gPLȨ|ԗVr[ +j2V,sӦY8Pl33{R9= Gcfg}o.3?)Shhr(t,}OgQjsc} R˓G\}Z;C5יTfl' yAʞPRQ.ӝb |lVa'Ė@P0 !MM2wc7Q.y_?^<$MHoOn$l4 oҔ i"/0 '3b,[*E)1LR 93J5WbOHkK r\J#tHEQ MUܥ'bf*\b{]^AwY#RGv2߃RƠ )C2~LEfVEZ@SNFIķn};% .QϻUY&!+C?) 3N&zE<|X $|l5(==7y~q a9P](rϊf<=z "N,JGN$@-5~4T$)&biE%q\/88>@.->?Rh**YY&c&HR$19Y"7uH-~4J r#q៮_0`*-̊ag9}8 ,.TP63?TvQwM[t]U:6@Nt 6Cn#fۡk]*7ʿ~y.r )%T:(d /huLL(?3-6΅`ᮦĿ7#M!/۹Ct_"/#>3O 26_ F"\@XF6 &6Hg͑orK N!!8#|QA~h-7=<)30x\]E_fI(Y!V7VeeLIqg5t @!Mz#HQY-!$G=YHn]v%,6HVW:kHTN!&umC*k_BPTG*ML%_EZs=vbAePAAI_!h<22yL1Ix'"[ul]bTCWsZ`˂x,\)/.ĝ!!5+e]Ĵ7Vݘ0<"Wb%^*bNH'aӸ{V^f-D;X&*: 3 _ DQrD_@[յ˴8?K;pEX8{j*Ak>d~$AJJA_ {%DU:.7dUM=*p]PUo }n{C! a[Bt@JjO9LBQpۤ۬+K\Gj/MR~P7E\E%)ACK^x<2 X@@'P]Nӵ9(X]xY-wD"A')x~YIW%" .~JK,t;LV꫻/H(K JITZ334 a4$#O^M{7ao.G;xP?};^^hY3 s?v3bAh2V_~#@h yTBAWS[ X*PYhKVW?ZPHd N`; 6nUPфi0B^OQa!Y ry+FMtoX@O`;*A=㪢.*F]`7#8p"&k>sr[85V%a{R/fC69NBb.6>T^"X}U*deblK _I3N+fYaA;7Z[.ծML%HO VX8|.{~ T}EDzQ"2TU-9U5 KƍWi#CK&0o8$pdq]&,1[#64q$Y7 x)?֭诠]ӸggT]AeFXFזnb 6H59|+ V3F)?$$)3_O^:b pwkQ Q*XP^x}A:$W*2M1825n$&K9 /)gly417q-] Zm#!6 M J&7J@,Rn^$z.VƾĊjyNwuq efjY*(١1t%G@%X_ yYBbfX(n C8a"Em FcEL:26u(A.#cH5|M J 21< $ g aRA!"|WeqD"kBnԏ Z*v53?׾F6(FMMLz^6ہM#}9\ ְuIUƩ 1\r$!gͶ[U^21op7hl{nBGƚ^,ez>xw  Q ]3goOI*O6E hA:f.^ TlEQmuv*':4.֙V V&% } ̦S=ަ{- 4Sfj38qL߼v<@]]bD6RM|rupEWIK^E]vQ0z MYE9s<698jJJt{Wbi#CzrwLHcd:JR`Ie\JCTk]⧼tRPU~?%7GQyI =O׭c{Cj gPp!mƱ:C*{u 13FSj5snL F)'osKEmI@е#mf39_l߷PRT:͜u=Q3J_-EaG%4}B C& ^hi͏gl)%M¾FVM1&έd29xW&K^ٺ^+RKb,ձ7c"1כW5F+NGuqwz~f&@2imb4A|sS}Uv[^vTTLZ($s fqRPO朧 z BiQWG#*8][;:ح_`tbce ad/[]hx[_|N2Ӆ~JyBl()M90a`vr ihsSǃ#>)FWD[`_ (riNFӱ7jJv(r1;%c \_upd{ Cn:x:{A[T5gA{7 sB YIСIȘ RgEPj %BE`f a  n z\OOm$aAYT߬p39Kts43;8!!Q.G'Xr@Xv?! VG49:a`w`M) p au|f{|:'|xy 3F"$Khfm%%ǹAR" b = .ۚ4@2~A)tҺN2%G^֫Ƀw)$VEfT1?l< ":s+8.4-a­2nawj@d6[j*:$QB҉sKKv'iK_IV+)T$DBh;30Nws46cȡo/fݧt[(.-)XBݝkE-&T[!da&5|FքR\$wԦC N0 bDS 2y\+(a \6g2h{] U@|/.WL6$0.7#MGZR zƛP.>YzJ2 lQ#(5YV$, ~oZ|W2!lU^bs0"wv.u,28"K.Q[\UX]5-1({â~:;>Q0sG*$It=i#}Bh2Wsf]OT&CHPIi /mkRUB_^A`S.0VjB T8\+7 9 UO%CNSd1 ZjUAIAX"M *._Qnc 3\`FCTL\^C~b=^b2v%+;X"jp%QD/ɩ'C?o-o>-o hzaqJ#*;&uBPIL qp|xvb|7I:#,R\^NH_QHI9T!%Z3c.D(}pX-ODG0$I!*+e6'՛_P}~v)%/(ގ3 X(W^m8'xD =DK:m]{UIi7Ѽ@ap Eγ۝RL>+<5-Ra{I!P Os1$gW]?/.?;B!S#EbOFF2l"Wvo#^sioV<[ @LmK75k[B;DZa(`gZlhnx(OǬ,8(/O L^#DHcRYq0FAa??B]Ԁ΁6yĈ$O6;WP)Zʼ- D~\n^2A? $Zl 4`QSr,)fidr6I2|MY:1LO(~_lL$qRAYu1)sf2p6s79mP=ZJ򹺆PDd BQ]NcT, Hd5viI(ycx[ X(joAN!pSGb55IAn[lq2(.nOW֝˰4UgH\4QeM o[&? r*4e"[MAFǛsEL6I8?+R2bT%A$3\X` p"OیȀR T_"#;b8[qIAsL"H}D&psNYIM0\cM1\,,\>"PlhML@`r P\%uN]JiR HzMZdj<لVHf.K$Y6kwO[^ϔ3C]={@qxɣږbT*v1:K!G~$EHڞV&ڑr(UpKDr ۝b7"Ǭ[('4V/_%]$sB|R?s UJ2\6Gd;4O`V |^kj^;7?FsX<^;o~wny wKݶp3Q?q6vfڿhV$%]dE#M(|*$oL5w5@3xa5*GR{8Clea|Z%F'Yl41EiD9ߗGR%0)mu,y<ΫM`wCkB&ӽ?*/gW#T9&%P'S#Q'>$YY6ٍQ]#6>j­vsng/vF0*sH_1b/; Dc`vI)`7^fѠx4k.x}ps+ڈ6c?: jH@\Lmm ^nEk%H-NSmf) ND_$ w굆#CM)cs>n㭳Mf Ika"E >:%-ҩN$FYt+*8{@X mObנ ˢ+N2.M -N_H, X) I4g*Ž9+|BQg_TF&֯M3>5K9~aL[IDŽӗy%.MgDSHVۭ1,Q/g gϹ2D=b*DS699dqH-!;LO'Ɂ68&b>MO>;Q(AC|7u'7fKwHS6.&,ny&gv"1c!$)J$qr@0NPvfAP}nEZ\UN8K#+AI&01 moT+"$N!M-aQ3"4~EM4ߋ D?M"CK'Ou2)c`o@V00NzXx{ha  "=C# R|ronzq3'dkRuc/}eA\ FpLtvf?,6,2C@~9p?9| !^+-d_->&rxPhZdflE/>9-wjr erbO$$T.}fvb ~bMQQ'+3*jn-B:P,/UcgI@cvvS[$ZKzmC= $U4BpeGAtvD4qxznipctermooxgrgAM o ~imt uzf}+1 qdoa~آ50;C+ v{ M\JkOq0Tpew9I҆_5֛IAF:3XG%2yP+c ËG1`ig5P-SVTB10ۄCL$":h:`OX#MQO-11ړ8.}HW;??lZ%0C1+_RK"*\s&9|>$(H6N?ȝ]'gq-ZC C@@5\B碈VWVD8#{DqP6A (<1B/LBUI<&J9_/6&֋YEQ!A;XMnHG8C""<‹RB_$A9>'hFIG+](:[X)Q);~+o.&EO=3C,\'H,O&@WLP#ChURb6+O6'C'!V$agːCx"!^M4 \8wC%Q<<)ܓ+$O ;d\> }o8dwϜ.f8C-+&^*Ǫ^VFS_8RW)&1$,++4R aXZP#*"QLU#CLERxD#^+O;?8F3sanwRYP["BWT()x "M{rRM+&$MSGZ [KIT2V UOG?:!LB]DBL66 *K%,OTRP "&=PG6H"4KFj9@.RIPV7OP+E0R+B:1N"$E ,#cy`4=('YU;"T. L..VU_?ESFA+-&;0b1Znz>!OZ%Q@BW5E;#?44-AAKP&XL#HFO@DP7DA8?DX pRW,[PCSW2-MNS 2#4$-NN"#SF%g`kq8>\FTU%5f^# &VG]`8/-PLPROBE,#h`*$7ST0K[XFB?*[,9(NQ+?2*-C@F;'0O_A:62G= nD6X"]J4'KQLD ]'&F$#8$!6F;!db]>_.9:$Y=Mqx|e_RR$@94]AZG*{[oR<9H/U +=Pr#:w^WB0)^t^8$r`bcLVG!UZUp{^IOL$@+"PA 8y5d'0K-(2B#$A&u@-5L5W11&1/A1nIGk^!T-N5 eqa)38 ;HJ:d_Of}LDxtN_B-[8#9 >,0Sy +CX[\3Q-S\R[AML3+#J$RTLM%&H=! 2\ q[==#VYG6:]5=QIZ>4O>O7nh{_:YY}[ j ;buO yJ2u+ *H)#'6UF6zC5j(W M$UyTT;kgf]8_1 DBL$$RTLMSG j VP9efd YzU5:<[N LHdyL>_\ TA!Otq@6{(V';OY&$T^Y7>= VAMACRO-[(3)1,k[+\HAV$(,0+0L$$GQZ"IH ----g --IOT?)\9Y(Xwk>HO8X%W\Y+'- vM&$;w4GNAFRdUB$ ^U4EGC1993DR6[AT>AX Bliss-7VB:0*@HZD]Rr A;< =&P j PLJ%[QW/#@nlP+,EDEH",I\LrakIDC> ":5XzM9%T6L,2MFI*#;1 DB2@ $:-1993 09:7TBLRE.E.5, O 2WB0)Zqt!0<$xEC16:P51\+\/ycY/4J0JR4((=E 3j?E@0{4BSOtq$P mJ0TS\0VH&FNM DB6BQA?8ITS.V42-4SL'MPX'>0->RT(L#HFR_TERP j6-% 1BP&2>QwiF>6PA6)%P{g+"E ;k$ L_*\*]`'P_R]^!v<_Y]JG&.4;( 2; p IT(9PJ6+[aIR4RkN4(& |5^#H󫳸Ӧ݆ʬƧ흑헛띹зۤօϣǦ쀒͍Ѧ̳ȭ܎IOF#$%2)8$:+HOB+4PQPQEB789^YA-.V :3~fze|,Ob w~m4%|9$L9rf]T3>ve*:n/G>!6J#1O /A4VJQ/63!_',/"7ar 5)&; Fw~a JNLjo}lx pBP,"Aix-*-'S.V4VO\3*"' K0-DlRT(L#XUB"48Jp_(">E9Vfvys(MSK@R800P03)L oFZsJ49+BoB$7Z"@DLXF&Bti$UZ1;,!YQ0<11 b+m @+"; L.HUHIOL$$INTERP j IO%KCXA1+N[<{O8632P:TERpabA9  '# bfP\0Z9bIyttdAV%:_Apy A&ff5-1 ACC 4_9eyOHG:TXM) :8.8EXdA!Id16Ur%IS7YxqODFZ&vIX tHletz+0!" tzbK tzca" tzd%@L$AN8kontC&&SEg+T_J,VCW4eya,[ 4<*jxBn54f60UBg} \00JP iU~q {P-8RPk|RUEttp!$  ]W@kt l)IO}CTA p^NK%K+4}WXV$Zo_V#qqwHZ%(Du}VPEQTPA}z$jCCFM=(07zgcY(fel+OLc}ABLpn x!=_eaaM2=S  bG2}{@M!nalY/,[{\"=yw R8hsdH9PjOTL |A+?tJ\Ajr%UPj~q0O17QZ\K2W2qu\8UV"x^(8'b|!(sdiyH!/\^EL v gM9fj3$0'j v.8Idd 'OL`))R,yhdYR-eca;ZRoI0 PR7%VFY-,87&RHt$38X .#-V .Rs7:L.E;E&;,4_OPSYS3> = E65TO,2)(>6XSK?;B5;RDBL$!0-G[;lM)ZB/.AS>>H%]5vNS_S>%-+!Kb64+"d9 NIzlRTL.OL&Y}$@-DB(F;OE[PGQ%_0N"~e$;(\(4G9 [KITS.2V$HN9?C=O/DBLRTL.+..?5PUSH 2RO-TVD_M\AP09:33DB:EK$9T]$A'i !SCP'JRa  TSBNJ/6wepLH^=sk(PE^vPPA43IJ_ q3O60AX/5/K.Q)<07J)%P*"8':)AF0AQHTDR55 9SU/!F407R.4>BTYnVM,:ZHo67yPDD A!yS3ivmMR 8uAFxX-Q WC] M45b@\7sk/ 6W~>PJkJr-EJO`=*bKj!6}^:H~j{L=RAc<0"j5j:uOxf_xzdei]e8D8X2 !=9 _- 0TR]GF%SN* ?)A2;KU\U (,22(T.B]DBL66 ' kbY%$-Y."$Y0^ 7=HBK4 6!F,&GL:0R+=GK9YZ/5t f7\E.;LA,]\?PE!YHG-a.KY\+SU13HHH q;8,L{r+Bp*S%.ZP4BO9RT(4YTYPE_TA&.)$$@ECYDT#KK:S=1ER4BL$$DATA DB_*~dtE() V"#,UBL$ER6-/1:KT]&HzJNV/8P}d:'JIzl66j K+J&t|U<=45%Z=3PR-1993DRU>7REC/%,'&*Y@==jy{w$&i|ds sxjSA (3jd xmEX%rf @!fO2R_{o $0N&91XTZq~C.}$mnjR dblplqsrv|  9v{o 8IJusghpaU0mV( TflfydtJS@nfse,IA2gdJ_V~kvt8D}jJN5 X-cQXXvywib >.Fwr F#9 r 2I znvfnt_\2QRsyq/~hsdgIs|u RKGFI ;& wyB^?#iw^6hC{ nnrhixlzw ucpk ~h{xr{lw  iv)T=Diup%Gy{hAE0ALn96 {d g5By}C\tsDVfsiw#*pv` | pxycsr{lybzly}zryad d tkuYU>Lhm mOB[vhghi~@AfprbqiAKy\oerbZ DBtfc@*%B--kisco w{sy rahxa^1'=rji)Kwd0dee ucs T*\BJgoiU&*[Q[W-lmGB+) tBPakj`rabajycpffaik {f uhddY3! HrZzx4,goododf hqk8Y:S] mBT6ssU:wU:da KOpode`ktqdfh}f vykrj~w jd<38{{oz sE4ecbtqVS,wsyb!(7_$$"%L'\9fv1;y~<"uc]F{I: pk~=g2^/.)(+*%@EJ54E$wA!Q9G678]XW888oqfexgocqeui&=`` I]u(D H<r{e =[`CVs,Lrh@F^?v~!9#1 !%rz e !@PrWRPSM T#NQUCV_+eXtNkA,1/%#d:t-`j pk>VOtcvxjA}'<+\EVc+AnaMxDnA({^D'^8[M$BZ83}H3vo6^g*|*R:>T>uu%"+;&J7_1P"Do1/O[\AggC4{9Y, '%Df#N {qDQ4L)AUs`e j{ay`l`/R~LDl k~T?@K)#Vvb1ji&" x@(%F3R1(Y&LV-droTAtgj_5hciw??'J_DrsqkK>w?s~H '!ZW(C]RARH]X_V_fcir}pif vlhxuu>= }8:;B9<ncbtnl`qc ^rr|3:J_';bzmR[8W^Z7$&i?_ua.Vtxm8XՆÿ˩ܑԨ;告ŃƑͱ蒁Ԧ̲ȺѦʺغְֳY;;8ZAWS-%0&, G@_>X8j-60#(]b`wb'@}t 95rzcqi yti{ioxazgv~qm(^usuwvq9EK[4$*/KP'-FV@ V.WE*GUA 7D%5SV;?T,()%W B(td8T993LY[HGX"O PFBS9_L'#Q8;ihq$;QAE1WC]$$Rl)0+5Y_}5 VERGPOnl+Y{nbo~DON7 P5&45'RYV)DF4) K1,(.01-v#-a*&)%N97Ai~uYXoA&9[W@=*QE:^-LPH_>DX36 av)Rw/'UOB. _----<- =,,=*P12Kdh C@#;5$FE 6/DI /EP@LYE-------gb(F 'U@<"#/^]^D A;<9FS#S/E55&U.M.HWMVX2:185$$R+&R"a aP+!&eCV_BUFQUO $000BD/EIT>H SVMSMT3V$MATH DB\$$Dt-@M5*'5(E;7\AND ;TYX0&5_I!LXN ;N&%!'>!:4*V<-W!?TTQE?nD_rK-VbaiPa RMpyTvGjx~eal/012eBLE!CR0e: +-@7.:::9OA);,7P!\*;g[X)Y1YQS}'Ghy)#u` Z+% ,Dk'X:ffH_Og DAXMe --=5=Xmp9-6R\Akq$]D^KGS1Y8!Aiii/$/v !*"----Lai-N T(vD0XF3B,OLCpm}v e]c]A\-%$gp:Ymf!G,SN02=NCEY]Z]cPAGET?w#C]!@Q3R)!>I!& >\Gl$+ZFG_TAUI/rEV yCA1-6BL$EBB]? 5$eB1[B`a4#o6a0I&- T$!6KM]PIFd|M6>[2@5F.F:H1D6EZUO]N[:_:771$TyUE RQ[6~o[R? 7:w%C-+6GY>;.JC%HrelF1paM*. . SG@0W,*-;V$Y:,;EC\0Q=]29F O---!PV%Q_.40' 3'#N3,ISB-15ZO]^---DB^3veLYy3K`{ZW91[FINIT j b(<1FQ"!9} LO"2D-OM;YWA9+7xtNS-XI7~xN[?$1( DWT629?#^LT63[3SFPU*X DB(F"h0WFU#!_%>AG<)/^DcC8 0z0HJT&*;" Y79H ;E3;*]ZCPM_ECN9#,2UDZZ8U 3=D0000VQL^HW%J T]oIAA (36''))TlmSCC1r9TP LUT\g-~$LPQUE $DBL$$eCTOB04k ";$C! 00z2B08V00>R4\,61:%3<45\M,8'>%%M9:9E us*Yqx/pXmF&F//xf$JKM$4'B.qrkes]9N( d.z0?1"0|K3$] eN $DBL$$eCTOBTR8N^N6_RECVjTR\9=MJV;:Q99XIBME00000605DJL$EX!!~lY/;: 80_]!\&U j ZY 0\Bcf!6V=13'ArTR\4*2C0009PR*$ |YSU6y RY 5;=[E7O<]LN(0<"G 2l$$eCTOB00zB5F-6B(FHBRRTR6SC V78V0HP>40=OtY%V_&=)@],?4zfv\Y7'P1188.MB Kw D] j ZY ::&B'"^$S(')T$ME0*L$$eCT_RG qxt|VKUIO\-IJFLMDBL$$ST\TSqJOF[#SQE9CN"Qg3,G'P jj-74= n ZY 0**+0E^&$CD_B&850DR\44 }QMOJ00&Q?#) b]U:"Ne#[],01BR0AY_EKi0LJ;HG:MFQSFP=3Y+K37_EGAS7'{r`R8%72)"'@Y"6= 5%N%'$+#[ H]MC95x?W `aQN)!4<%B(F,4v,YK- nNv{rA54]ZU``0Cidh]KD6O.(G&&(.H2VG@-R2WR `gpBfJCO[$>'Dined BBH@F?[XozOG*,(@R((V%H&n D9nwK2 848VH-%---- j88QL!F$$:AN2BG*\Y7'P-----DBntBX#Z hA@1O'?44Q&Q\END*K_H#=Y@$E##4T1+OPIO%=Q'\(zsx?3pRB< x-A40A5=XPSUOKEC3E-RU000F$MZC-vo9VDGQ%'_2$N\T Ayu/.$^v{tQIl6 NV!08$rmOD: AF"JA+P_REC3%5+'DR8VX @!@DmtiUE>2-R DBp>)E$H+KQ-6&7enced By ..``YE-8*%4 3&SEQOCDBH:>4h{)5'1P?8JH[SR51IFE jDO%K!;20-%PS+;6 6 RU DBi$ P?EK$FD"$+EPu,-!$MP(IOSB DBL4 {yA8%_.457YPVLZBL$$SBU![0UAE4UZ?&,T_Y]QWUNB*1>ojo h`Q'WL_R9!1/.4E\46'cr@J@I_E[=J39U o9?PWY3A`be@2Zk%}U9t 9PEB61dr|BYng6'(F, ) 9%TM[ELONG 27 DBnitERP )) 3T_ o*NPVPS0->A?1tHANDLER DR<@:/U78Z07C?BR_TABL!B$So6'(F<9(75W&2HR& KFGD 00TRr~aPLRN[+'HZ;06]]R#?=Gj45$$S0->A..p3809VO9$SE0!8HASCYFRXDF%C',=? [9/E4Cd_BQ"ZT/?PNB)&B9SST#[ULONGDPFmJ3=%C]3DVO9$$T&:4\@$gf@JAHI 7+ 9NGz|QLOB000F+7 00JG]HzWNV/]6['4CA@0.MBjkJ4um~HN O1.Q#"ZVG?;@H#?EGB$d`(G)IQQ<"3: K8N@$DY n*WAER2  9O=zq Y/D-APR-!)+R8F!]<TZY4AYEL\>O"TTEh?_qg5\525GK[D>H*OT^X^GWONq\-(WkL*<;mbL$mwRITES b(^\?;\0}TOR)--)XZ#GH2zwM^?PQ$KEY)?zJK\&WQfR,h?O,!E_ a683hmbm\5G[Y=R 0000FCE8G$$ gD8L0'I=^?_Ing6]J\. S,0@$('YF R *WBVP_?IN)G$lECTOR DBL$DA07P7^FB<-N /.AFvq{q|x$xa'Z  bww [3fFkfrzzG.C]D,SVEy|bfrgB%%U&<~|$͝T2gk|{f ]YQ@O5SYi_Zw,OgM0AvFU?A/4} Z'ncdlec#ZeB D6 !!|2EQL%*,#Hw@"P7#G(G02rST$EoJH?7| UZ>n'obZxRAdblauZI}V/7>NE* COS`-I7)X:* (H (INAPW#Hrs~m3W.Zxc8"|)9/#i<jh -ZPfmSM-+%6)'5QS_.^Z9\RCWWM|]GupO=  h,-RbQ)Cs9Pxhwlot %,l)*̅E1p`"OfyePUNX^\ hAf~w4DQ`8("GZU  lfq{e jr<=RR&Fcl m` !J 92`oijv|j'0H"KQcui w}dofPh_.4(`bn`IQg~|irURuw`)#{baxm3! W'4>- ˍc> aR$kdh{p2EG2.E"vodxjnidfZ a%$QRY㵂C0{{[Rdvf YFG^&hT/}a o }dpSl:++j2&~yeJ+|iq+R*C+&> IR* O NB`4M8^|n~m`R*Ef !  vAF9B@g~Y6oynq}{37,[<7u*9 cY\McF6IDO(j: oekn~a+zu~(TSBOyAk jqc~ ccw5S0RT&~RRqayzrN.>K$k!1vl` a=EvOX8/)u"nTsv rr!d|FF 'hPS|t!7 ytOSbE\O&ijrzsAO, EgAMzi7EB3$ r(?$aFO)!$%J^Hr9yfn](#/8k %Fqrmd{954&+&HGtOLvu kude3PDBK[jreb gj%E^IT.d !UT-k6thg5JOZ:F7n sw e|{R~E: LNzod}hzhW'?"!I$I3SP]dzmel|ae6g,N\-{E?|b|icc]y2[}WV{`y`| `hxnc?68g*DZf)L*58 g7P| !={ F#Tip}joCO/ FNqK}KLp ~V!-7'LB2:jklh)\]1062CӷBp Z#E"NI `+er{gRp;OAt]XL6xarats}a5F5 BTy4brr d zlpi}48()- (.=|x{bse)ARALg!LfeL,dkdgz4 <=6rl}qeafj ~7=FW^9.dblpdry{o{dxBN}>tG`;?cnjlacEB %nkudrffy ytERZ45Llo{|dl}uCL"GEts34alegalkey23TLEE\tnGh| t! &DBDa\gw@Stje RW[WCւM/L2VyEJ+Z)GD%_U`xx jfrsh9=,[$̉WDLhq rb a IBK\-yE@arrph%80&4N&3| z;Vu  _ָQE tsCyvZcUgMOvhH['!s7t+u,m &00°69tKlf'!4AOIbft<)nn&+Sdb0lo%*` 5GeS'bfH,(AN}0>uw emdr|bd|tb3>+A4 =[ocdengjeg3P Vk5r6&BCmzzxdv4*:/Evceuqq?X1fA\LaWpcck/9myw mgI$BXC G m95(<'! BBLhc*8mp9S?G3>f NblEBJ$~1?XIL~c{l6SPjul\>ho;b d.+q7PT,fh|xjok EB+IO#~ICblinvb w{P"%G4BSD;lT;tr|p  8d`$V wkamP:kZGF8[5'7kygc~dcy{m!0600JDHh~d~[)&LO 2^DblN^X3djaWA'ONwTMkllje RDXEH KKi3XeXDn`u4@!+ ڧnA_byilbtF 4PnBB`fi` c %VCRSԣ aBd`<>qi @;==$W'q y cyj1E3UB`s|c@\  ""LA(k .dbl`jcyk2&]Y)1Q k{lz3 600?QMnmR[d|tLB&K.y:y|nomsgmgr! &bIsUf `*B2 07>}z|qqhi,?G$CT+9>)IJ:]!+6UyIM =0kclI0eLOB 1sT{o5E HGm`k.>G/5K2RGcNHdblg|`ht 1T&q-c*8mmubvr bdj')9PqiRK.B|owibdx$K)!]mZ/ |J8`8[dp$invmatch! & *nBB`ec gk`nu54XGWO~0;ts{sj[?ub$5prL]i&Ifhsz}x3KfO8622W~BQ ,K cn?M6e6&C5k#*qzer ~fcrprxxW#XZ7 PXrub vuiml?$UEEpz,Tum^/x /(Ufn)FNVPr_J;. c`jo! & 81`[<.Q)5YjO!j.--!iolwh/Bxb !M)C"FO&D7&ba ~tl|(c`MPr -dbl "_ya M$*S-G'@&hd~|wp [ . &o /aZ9B yQCADEGMEjbfj  v,6L\4Y_U)exZ>iteob289 e0( @F` }ihfOH(5?<%S5 Q}[> CIahvZZF3t:$(G$6XATpnogqn^K(zu;5^CM&TGMO5L$Or  wu "j002S$0L jukxI@;TXv%[R7_K0|f|R;Ns*UUXb   }s%'231&;Mh;SuKD0"FG* X3bvskiG0>4s"(D~ L ` 1=K@!WcG\ *db&$tcvLF}az;t9<$+fpN$CC.0@Qw}5TT-t8Ush?ow 8 ?P QRlhcwRd ! DH bT_abrga +)2TkneX KgR|LW-qh"Zf9:$ U[JMX0K=[Q^m$v`dveXdr@L*TTL#1L$-~vak?NQHg" T[wrjvwt==>8J_3Y0 8:wsN[cDal!>MBXbx|?zARKDR4N $(iqvM,P . Px>%X6TLy vvdml;F.0001%! ts`;JYZ[1N[RG(vLk#Ll !kj ~ _@!T3rbe v CI>01A440:dcdwuO20>>,0T*^$-v}ggeNO@GjQ \Zi~ix~aa IZY.>x KG\E A$gedv;rgz!1=I6po (UK )mark$BSFB^_~L)`tspbjo0}E "DBp$I`vp`z}znS@M06BBQuzpl /X#VV:t}t9 +Q ;F 2*dblerrtxt" >004#(2BOth s 64\TA^6 0<88}q_E~tv|VS'AWA/6(J$#|jj:3QTo&6%7Y:#:o eC9%S,A1SGE\(*dblttb")L #S!#sJ*trqakt&CCPR(# 31$mbJK obq,N$*I*c\F, =7wqo% ? n 2i%%+dsqq&A.;K';lDS>:$+ybin g _D\,wq I@/\1Ib:H$&5%K1 ,()dbfDAI!!"28I#0&14!2a~fr ~"0>0F!Juho@#EPTRBIK8:FF 2l(dblt6&,t20,$DJofD\9U*BUU98%7O!j(C(AW7r(;@$- A>"2^ 08tzf|ox *FFB< -O*2/R&8-{acyn wa ^#3uaxlzgj.LN[Cq ikey!EYIC:JQY'<9:&?_LONGD'`lctsLTTNAFVY-Niivnh jDR7X8V$+7nw{ajbo 9?" I^Z'H1;^r'Bcs DBL$'4\/2?76olinx!0<$CVTZA_jbl+ (F)\A0!!#=<+>&6_dbfhg eoq~tin/ J BL$$DISPL yDBL$_LINTOOLNG 002A80BA-U DBL$pѻ~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1p,$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READ j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_LOCKED 002A8142-U DBL$$RTLMSG jDBL$_LOGCHAN 002A8683-U DBL$$RTLMSG DBL$$ARRAY jv/ DBL$$CCB j DBL$$CHANNEL j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_NOCALL 002A8014-U DBL$$RTLMSG JDBL$_NOCURR 002A81EA-U DBL$$RTLMSG jDBL$_NODUPKEYS 002A81B2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_NODUPS 002A81B2-U DBL$$RTLMSG JDBL$_NOMEM 002A804A-U DBL$$RTLMSG jDBL$_NOMSGMGR 002A83B2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$STROPS  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 52B_Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_NONLOCAL 002A848A DBL$$RTLMSG DBL$$ERRTRANS JDBL$_NOOPEN 002A805A-U DBL$$RTLMSG JDBL$_NOSPAC 002A80C2-U DBL$$RTLMSG JDBL$_NOTDIB 002A834C-U DBL$$RTLMSG jDBL$_NOTENOMEM 002A804A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$STROPS j DBL$$TBXXX j DBL$AST j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$GETFA j DBL$ISMCRE j DBL$WKDAY jDBL$_NOTISMFIL 002A81C2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_NOTYETFUN 002A846A-U DBL$$RTLMSG DBL$$OPEN jDBL$_NO_CURREC 002A81EA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_NO_RECSIZ 002A845A-U DBL$$RTLMSG DBL$$OPEN jDBL$_NO_SPAFIL 002A80C2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 53N_Symbol Value Defined By Referenced By ..._------ ----- ---------- -----------------Sj DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_NO_SUCOPR 002A81FA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_NUMDIMS 002A86DB-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_NUMOFARGS 002A8663-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INIT j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$OPEN j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ASCII j DBL$BEGFL j DBL$BKSTR j DBL$CHAIN j DBL$CHOPEN j DBL$CPUTM j DBL$DATE j DBL$DECML j DBL$DELET  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 54 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$DEVICE j DBL$EMPBUF j DBL$ENDFL j DBL$ERRMOD j DBL$ERROR j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$EXITS j DBL$FATAL j DBL$FILEC j DBL$FLAGS j DBL$FUNCTION j DBL$GETCM j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$ISMCRE j DBL$IXREAD j DBL$JBNO j DBL$KILL j DBL$MONEY j DBL$PAK j DBL$PARSE j DBL$POSRFA j DBL$PURGE j DBL$RENAM j DBL$RENAM_V1 j DBL$RMSCC j DBL$RSTAT j DBL$RUNJB j DBL$SETDFN j DBL$SIZE j DBL$SLICE j DBL$SNDOP j DBL$TIME j DBL$TIMOUT j DBL$TNMBR j DBL$TTBRDCST j DBL$TTFLGS j DBL$TTNAME j DBL$TTSTS j DBL$VERSN j DBL$WAIT j DBL$WKDAY j DBL$XARGS j DBL$XSTAT JDBL$_NUMREC 002A841A-U DBL$$RTLMSG jDBL$_NUMTOOLON 002A807A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CMPR j DBL$$CONVERT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 55 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Fj DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$MATH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_ONLYRD 002A813A-U DBL$$RTLMSG JDBL$_ONLYWR 002A8062-U DBL$$RTLMSG jDBL$_OPCODE 002A86C3-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$WRITES j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_OPENERROR 002A8382-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_OUTATTERR 002A83DA-U DBL$$RTLMSG DBL$$DISPLAY j DBL$$READS j DBL$$TERM_IO j DBL$$WRITES jDBL$_OUTFILFUL 002A80CA-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 56 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_OUTOFBND 002A86AB-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_OUTOFRANG 002A8342-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$DISPLAY j DBL$$FORMS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$MATH j DBL$$SELECT_CONVERT j 5~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;11A|j DBL$$SLEEP j DBL$$STROPS j DBL$$TBXXX j DBL$ASCII j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FATAL j DBL$FLAGS j DBL$GETFA j DBL$ISMCRE j DBL$SETCTL j DBL$SETDFN j DBL$TTBRDCST j DBL$TTFLGS j DBL$WKDAY JDBL$_OUTRNG 002A8342-U DBL$$RTLMSG jDBL$_OUTTOREAD 002A813A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_PC_PSL 002A8653-U DBL$$RTLMSG DBL$$ARRAY  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 57 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$SIGNAL j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_PROTEC 002A81F2-U DBL$$RTLMSG jDBL$_PROTVIOL 002A81F2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$RENAM j DBL$WKDAY jDBL$_QUENOTAVA 002A83C2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_RECEXTCAL 002A802C-U DBL$$RTLMSG DBL$$INIT jDBL$_RECLOCKED 002A8142-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_RECNOTFND 002A8202-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 58 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Ej DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_RECNUM 002A80E2-U DBL$$RTLMSG JDBL$_RECSIZ 002A83AA-U DBL$$RTLMSG JDBL$_REPLAC 002A8102-U DBL$$RTLMSG jDBL$_RETNO_CAL 002A8014-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_RMSERROR 002A8322-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_RNF 002A8202-U DBL$$RTLMSG jDBL$_RTL_BASE 002A8000-U DBL$$RTLMSG DBL$$ARRAY j DBL$$BIFUNC j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$EXITS j DBL$ISMCRE j DBL$WKDAY  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 59 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jDBL$_STOP 002A8641-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_STV 002A86BB-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_SUBERR 002A803A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_SUBSCR 002A803A-U DBL$$RTLMSG jDBL$_SUBSCRPT1 002A866B-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_SUBSCRPT2 002A8673-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 60 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------Rj DBL$$LPQUE j DBL$$PUSH j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_SUPEXIFIL 002A8102-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$RENAM j DBL$WKDAY jDBL$_SYSERROR 002A821A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$BIFUNC j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$CHAIN j DBL$CPUTM j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_SYSTEM 002A821A-U DBL$$RTLMSG jDBL$_TIMEOUT 002A837A-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_TOOBIG 002A80BA-U DBL$$RTLMSG jDBL$_TOOMNYCHN 002A810A-U DBL$$RTLMSG DBL$$ARRAY  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 61 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_TOOMNYSEG 002A844A-U DBL$$RTLMSG DBL$$OPEN jDBL$_UNDEFLBL 002A86A3-U DBL$$RTLMSG DBL$$ACCEPT j DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$SEND_RECV j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_UNDOPC 002A8074-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$$WRITES j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_UNSUPDTYP 002A83FA-U DBL$$RTLMSG DBL$$BIFUNC j DBL$$BOOLEAN j DBL$$CMPR j DBL$$CONVERT Ng-1~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;11v j DBL$$DISPLAY j DBL$$FIND j DBL$$FORMAT j DBL$$MATH j DBL$$OPEN j DBL$$STORE j DBL$$TERM_IO j DBL$XARGS  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 62 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------RjDBL$_VALUE 002A8693-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FLAGS j DBL$ISMCRE j DBL$TTFLGS j DBL$WKDAY jDBL$_WARNING 002A86B3-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$ERRTRANS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDBL$_WRIINTLIT 002A8042-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CONVERT j DBL$$CVT_FUNCTIONS j DBL$$FOR j DBL$$FORMAT j DBL$$INTERP j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$MATH j DBL$$READ j DBL$$READS j DBL$$SELECT_CONVERT j DBL$$STORE j DBL$$STROPS j DBL$$TBXXX j DBL$ASCII j DBL$BKSTR j DBL$CHAIN j DBL$CHOPEN j DBL$DATE j DBL$DECML j DBL$DEVICE j DBL$ERRMOD j DBL$ERROR j DBL$ERRTXT j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FATAL  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 63 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- j DBL$FILEC j DBL$FLAGS j DBL$GETCM j DBL$GETDFN j DBL$GETFA j DBL$GETFNM j DBL$GLINE j DBL$INSTR j DBL$ISMCRE j DBL$IXREAD j DBL$JBNO j DBL$PAK j DBL$PARSE j DBL$RSTAT j DBL$SIZE j DBL$TIME j DBL$TNMBR j DBL$TTFLGS j DBL$TTNAME j DBL$TTSTS j DBL$VERSN j DBL$WKDAY j DBL$XARGS j DBL$XSTAT jDBL$_WROSIZREC 002A82B2-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY JDBL$_WRTLIT 002A8042-U DBL$$RTLMSG JDBLDDT$_ABORT 00DC8082-U DBL$$DDTMSG JDBLDDT$_ARGNOTPAS 00DC807A-U DBL$$DDTMSG JDBLDDT$_AT 00DC801B-U DBL$$DDTMSG JDBLDDT$_BASE 00DC8000-U DBL$$DDTMSG JDBLDDT$_BREAK 00DC8013-U DBL$$DDTMSG JDBLDDT$_ERRHLPLIB 00DC8092-U DBL$$DDTMSG JDBLDDT$_EXITSTATUS 00DC809B-U DBL$$DDTMSG JDBLDDT$_FACILITY 000000DC DBL$$DDTMSG JDBLDDT$_INVDDTCOM 00DC8022-U DBL$$DDTMSG JDBLDDT$_LINERANGE 00DC80B3-U DBL$$DDTMSG JDBLDDT$_NOBREAKSET 00DC80BB-U DBL$$DDTMSG JDBLDDT$_NOCONT 00DC8072-U DBL$$DDTMSG JDBLDDT$_NOSETBREAK 00DC80AA-U DBL$$DDTMSG JDBLDDT$_NOSUCBPAT 00DC8062-U DBL$$DDTMSG JDBLDDT$_NOSUCHBPT 00DC803A-U DBL$$DDTMSG JDBLDDT$_NOSUCHRTN 00DC8032-U DBL$$DDTMSG  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 64 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- JDBLDDT$_NOSUCHVAR 00DC802A-U DBL$$DDTMSG JDBLDDT$_NOSYMRTN 00DC808A-U DBL$$DDTMSG JDBLDDT$_RMSERR 00DC804A-U DBL$$DDTMSG JDBLDDT$_SHOWBREAK 00DC80A3-U DBL$$DDTMSG JDBLDDT$_SHOWRTN 00DC80C3-U DBL$$DDTMSG JDBLDDT$_SUBSCRERR 00DC805A-U DBL$$DDTMSG JDBLDDT$_SYSERR 00DC8052-U DBL$$DDTMSG JDBLDDT$_TITLE 00DC800B-U DBL$$DDTMSG JDBLDDT$_WRIINTLIT 00DC806A-U DBL$$DDTMSG JDBLDDT$_XOUTOFRAN 00DC8042-U DBL$$DDTMSG JDBLUTL$_FACILITY 000000DC-U DBL$$RTLMSG jDBLUTL$_TEXT 00DC8643-U DBL$$RTLMSG DBL$$ARRAY j DBL$$CVT_FUNCTIONS j DBL$$KEY_LOOKUP j DBL$$LPQUE j DBL$$SELECT_CONVERT j DBL$$STROPS j DBL$$TBXXX j DBL$ERRMOD j DBL$EXECUTE_IMAGE_ROUTINE j DBL$ISMCRE j DBL$WKDAY jDSC$A_POINTER 00000004 SYS$MISCDEF DBL$$SLEEP j DBL$CHOPEN j DBL$GETFA j DBL$XARGS jDSC$B_DTYPE 00000002 SYS$MISCDEF DBL$$SLEEP j DBL$XARGS jDSC$K_CLASS_S 00000001 SYS$MISCDEF DBL$EXITHANDLER jDSC$K_DTYPE_B 00000006 SYS$MISCDEF DBL$$SLEEP j DBL$XARGS jDSC$K_DTYPE_L 00000008 SYS$MISCDEF DBL$$SLEEP j DBL$EXITHANDLER j DBL$XARGS jDSC$K_DTYPE_NZ 00000014 SYS$MISCDEF DBL$$SLEEP j DBL$EXITHANDLER j DBL$XARGS jDSC$K_DTYPE_P 00000015 SYS$MISCDEF DBL$$SLEEP j DBL$XARGS jDSC$K_DTYPE_Q 00000009 SYS$MISCDEF DBL$XARGS jDSC$K_DTYPE_T 0000000E SYS$MISCDEF DBL$XARGS jDSC$K_DTYPE_VT 00000025 SYS$MISCDEF DBL$XARGS jDSC$K_DTYPE_W 00000007 SYS$MISCDEF DBL$$SLEEP j DBL$XARGS jDSC$W_LENGTH 00000000 SYS$MISCDEF DBL$CHOPEN j DBL$GETFA j DBL$XARGS JINIT_OTO 00013DF7-R DBL$$INIT jIO$M_ESCAPE 00004000 SYS$IODEF DBL$$TERM_IO jIO$M_INCLUDE 00000800 SYS$IODEF DBL$WAIT jIO$M_NOW 00000040 SYS$IODEF DBL$$SEND_RECV jIO$M_OUTBAND 00000400 SYS$IODEF DBL$WAIT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 65 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------CjIO$M_TYPEAHDCNT 00000040 SYS$IODEF DBL$WAIT jIO$_READPROMPT 00000037 SYS$IODEF DBL$$TERM_IO jIO$_READVBLK 00000031 SYS$IODEF DBL$$SEND_RECV j DBL$WAIT jIO$_SENSEMODE 00000027 SYS$IODEF DBL$WAIT jIO$_SETMODE 00000023 SYS$IODEF DBL$WAIT jIO$_WRITEVBLK 00000030 SYS$IODEF DBL$$SEND_RECV j DBL$WAIT jJPI$_CPUTIM 00000407 SYS$MISCDEF DBL$$BIFUNC jJPI$_PID 00000319 SYS$MISCDEF DBL$$BIFUNC jLIB$CVT_DX_DX 0001DE48-RX LIBRTL2 DBL$$SELECT_CONVERT jLIB$DAY 0001DE84-RX LIBRTL DBL$$BIFUNC j DBL$WKDAY jLIB$DECODE_FAULT 0001DE4C-RX LIBRTL2 DBL$$HANDLER jLIB$DISABLE_CTRL 0001DE70-RX LIBRTL DBL$EXITHANDLER j DBL$SETCTL jLIB$DO_COMMAND 0001DE88-RX LIBRTL DBL$$INTERP j DBL$CHAIN jLIB$ENABLE_CTRL 0001DE6C-RX LIBRTL DBL$$OPENTT j DBL$EXITHANDLER j DBL$SETCTL jLIB$FIND_IMAGE_SYMBOL 0001DE90-RX LIBRTL DBL$$BIFUNC j DBL$$OPEN j DBL$$TERM_IO j DBL$ESC_TABLE j DBL$EXECUTE_IMAGE_ROUTINE j DBL$FILEC jLIB$FREE_VM 0001DEBC-RX LIBRTL DBL$$CCB j DBL$$CLOSE j DBL$$FAB j DBL$$LPQUE j DBL$$OPEN j DBL$$SEND_RECV j DBL$$TBXXX j DBL$AST j DBL$ESC_TABLE j DBL$GETFA j DBL$ISMCRE j DBL$PURGE jLIB$GET_COMMAND 0001DE94-RX LIBRTL DBL$GLINE jLIB$GET_COMMON 0001DE7C-RX LIBRTL DBL$GETCM jLIB$GET_INPUT 0001DE98-RX LIBRTL DBL$GLINE jLIB$GET_SYMBOL 0001DE78-RX LIBRTL DBL$CHAIN jLIB$GET_VM 0001DEC0-RX LIBRTL DBL$$GETVMCLR j DBL$$LPQUE j DBL$$TBXXX j DBL$AST j DBL$ESC_TABLE j DBL$ISMCRE jLIB$PUT_COMMON 0001DE80-RX LIBRTL DBL$PUTCM jLIB$RENAME_FILE 0001DE9C-RX LIBRTL DBL$RENAM jLIB$RESERVE_EF 0001DE8C-RX LIBRTL DBL$$INIT  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 66 _Symbol Value Defined By Referenced By ... _------ ----- ---------- -----------------PjLIB$RUN_PROGRAM 0001DEA0-RX LIBRTL DBL$$INTERP j DBL$CHAIN j DBL$EXITHANDLER jLIB$SCOPY_DXDX6 0001DEA8-RX LIBRTL DBL$$SELECT_CONVERT jLIB$SCOPY_R_DX6 0001DEA4-RX LIBRTL DBL$$BIFUNC jLIB$SET_SYMBOL 0001DE74-RX LIBRTL DBL$CHAIN jLIB$SFREE1_DD6 0001DEAC-RX LIBRTL DBL$$INTERP jLIB$SIGNAL 0001DEB4-RX LIBRTL DBL$$SIGNAL j DBL$EXITS jLIB$STOP 0001DEB0-RX LIBRTL DBL$$INIT jLIB$SYS_GETMSG 0001DEB8-RX LIBRTL DBL$$BIFUNC jLIB$_INPSTRTRU 0015821C LIB$MSGDEF DBL$GLINE jNAM$B_ESL 0000000B RMS$GLOBALS DBL$DELET jNAM$L_ESA 0000000C RMS$GLOBALS DBL$DELET jNAM$L_FNB 00000034 RMS$GLOBALS DBL$DELET jNAM$L_VER 00000054 RMS$GLOBALS DBL$DELET jNAM$V_EXP_VER 00000000 RMS$GLOBALS DBL$DELET jOTS$CVT_L_TB 0001DE68-RX LIBRTL DBL$$CVT_FUNCTIONS jOTS$CVT_L_TO 0001DE60-RX LIBRTL DBL$$CVT_FUNCTIONS j DBL$GETFA jOTS$CVT_L_TZ 0001DE64-RX LIBRTL DBL$$CVT_FUNCTIONS jRMS$_EOF 0001827A RMS$GLOBALS DBL$$FIND j DBL$ENDFL j DBL$GLINE jRMS$_OK_LIM 00018051 RMS$GLOBALS DBL$$FIND j DBL$$READ jRMS$_RLK 000182AA RMS$GLOBALS DBL$$READ jRMS$_RNF 000182B2 RMS$GLOBALS DBL$$FIND j DBL$$READ jRMS$_RNL 000181A0 RMS$GLOBALS DBL$$INTERP jRMS$_RTB 000181A8 RMS$GLOBALS DBL$$READ jSS$_NOLOGNAM 000001BC SYS$SSDEF DBL$$INTERP jSS$_NORMAL 00000001 SYS$SSDEF DBL$$TERM_IO jSS$_NOTRAN 00000629 SYS$SSDEF DBL$$TRNLOG j DBL$EXITHANDLER j DBL$FATAL jSS$_RESULTOVF 00000214 SYS$SSDEF DBL$$TRNLOG j DBL$FATAL jSS$_WASSET 00000009 SYS$SSDEF DBL$RCVID jSTR$FREE1_DX_R4 0001DE58-RX LIBRTL DBL$$KEY_LOOKUP j DBL$$STROPS jSTR$GET1_DX_R4 0001DE5C-RX LIBRTL DBL$$KEY_LOOKUP j DBL$$STROPS jSYS$ASCTIM 7FFEDE48 SYS$P1_VECTOR DBL$$BIFUNC j DBL$DATE j DBL$GETFA j DBL$TIME jSYS$ASSIGN 7FFEDE50 SYS$P1_VECTOR DBL$$OPEN j DBL$$OPENTT j DBL$$SEND_RECV j DBL$DELMBX j DBL$EXITHANDLER  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 67 _Symbol Value Defined By Referenced By ... _------ ----- ---------- ----------------- jSYS$CANCEL 7FFEDE60 SYS$P1_VECTOR DBL$EXITHANDLER j  DBL$TTBRDCST j DBL$WAIT jSYS$CANTIM 7FFEDE68 SYS$P1_VECTOR DBL$WAIT jSYS$CLOSE 7FFEE1B8 SYS$P1_VECTOR DBL$$CLOSE j DBL$$INTERP j DBL$$OPEN j DBL$ISMCRE jSYS$CLREF 7FFEDE98 SYS$P1_VECTOR DBL$WAIT jSYS$CONNECT 7FFEE1C0 SYS$P1_VECTOR DBL$$OPEN jSYS$CREATE 7FFEE1C8 SYS$P1_VECTOR DBL$$OPEN j DBL$ISMCRE jSYS$CRELOG 7FFEDEB0 SYS$P1_VECTOR DBL$$INIT jSYS$CREMBX 7FFEDEB8 SYS$P1_VECTOR DBL$$INIT j DBL$$OPEN j _~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;112 DBL$$SEND_RECV j DBL$RUNJB jSYS$CREPRC 7FFEDEC0 SYS$P1_VECTOR DBL$RUNJB jSYS$DASSGN 7FFEDEE0 SYS$P1_VECTOR DBL$$CLOSE j DBL$$INTERP j DBL$$OPEN j DBL$DELMBX j DBL$RCVID j DBL$RUNJB jSYS$DCLEXH 7FFEDEF0 SYS$P1_VECTOR DBL$$INIT jSYS$DELETE 7FFEE168 SYS$P1_VECTOR DBL$$INTERP jSYS$DELMBX 7FFEDF00 SYS$P1_VECTOR DBL$DELMBX jSYS$DELPRC 7FFEDF08 SYS$P1_VECTOR DBL$KILL jSYS$DISPLAY 7FFEE1D8 SYS$P1_VECTOR DBL$$OPEN j DBL$GETFA  jSYS$ERASE 7FFEE1E0 SYS$P1_VECTOR DBL$DELET j DBL$PURGE j DBL$RENAM jSYS$EXIT 7FFEDF40 SYS$P1_VECTOR DBL$$INTERP j DBL$EXITHANDLER jSYS$FAO 7FFEDF50 SYS$P1_VECTOR DBL$TNMBR jSYS$FAOL 7FFEDF58 SYS$P1_VECTOR DBL$$TERM_IO jSYS$FILESCAN 7FFEE278 SYS$P1_VECTOR DBL$$INIT j DBL$$INTERP j DBL$PARSE jSYS$FIND 7FFEE170 SYS$P1_VECTOR DBL$$FIND j DBL$$WRITE j DBL$ENDFL j DBL$POSRFA jSYS$FLUSH 7FFEE1F0 SYS$P1_VECTOR DBL$$INTERP j DBL$$WRITE j DBL$$WRITES j DBL$EMPBUF jSYS$FREE 7FFEE178 SYS$P1_VECTOR DBL$$INTERP jSYS$GET 7FFEE180 SYS$P1_VECTOR DBL$$READ j DBL$$READS jSYS$GETCHN 7FFEE0C8 SYS$P1_VECTOR DBL$$SEND_RECV  0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 68 _Symbol Value Defined By Referenced By ...$_------ ----- ---------- ----------------- jSYS$GETDVI 7FFEE410 SYS$P1_VECTOR DBL$$INIT j DBL$$OPENTT j DBL$DEVICE jSYS$GETDVIW  7FFEE418 SYS$P1_VECTOR DBL$RUNJB j DBL$TTSTS jSYS$GETJPI 7FFEE0D8 SYS$P1_VECTOR DBL$$BIFUNC j DBL$$INIT j DBL$CPUTM j DBL$JBNO j DBL$RUNJB jSYS$GETMSG 7FFEE0B0 SYS$P1_VECTOR DBL$ERRTXT jSYS$HIBER 7FFEDF88 SYS$P1_VECTOR DBL$$SLEEP jSYS$LKWSET 7FFEDFA0 SYS$P1_VECTOR DBL$$INIT jSYS$OPEN 7FFEE208 SYS$P1_VECTOR DBL$$OPEN jSYS$PARSE 7FFEE230 SYS$P1_VECTOR DBL$DELET j DBL$PARSE j DBL$PURGE j DBL$RENAM j DBL$RUNJB jSYS$PUT 7FFEE188 SYS$P1_VECTOR DBL$$DISPLAY j DBL$$FORMS j DBL$$INTERP j DBL$$WRITE j DBL$$WRITES jSYS$PUTMSG 7FFEE0E0 SYS$P1_VECTOR DBL$$INTERP jSYS$QIO 7FFEDFC8 SYS$P1_VECTOR DBL$$ACCEPT j DBL$$FORMS j DBL$$READS j DBL$TTBRDCST j DBL$WAIT jSYS$QIOW 7FFEDE00 SYS$P1_VECTOR DBL$$ACCEPT j DBL$$CLOSE j DBL$$DISPLAY j DBL$$OPEN j DBL$$SEND_RECV j DBL$$TERM_IO j DBL$$WRITES j DBL$EXITHANDLER j DBL$RUNJB j DBL$SETCTL j DBL$TTBRDCST j DBL$TTSTS j DBL$WAIT jSYS$READ 7FFEE190 SYS$P1_VECTOR DBL$$READ j DBL$$READS jSYS$READEF 7FFEDFD0 SYS$P1_VECTOR DBL$WAIT  jSYS$RENAME 7FFEE240 SYS$P1_VECTOR DBL$RENAM_V1 jSYS$REWIND 7FFEE210 SYS$P1_VECTOR DBL$$FIND j DBL$BEGFL j DBL$POSRFA jSYS$SCHDWK 7FFEDFF0 SYS$P1_VECTOR DBL$$SLEEP jSYS$SEARCH 7FFEE248 SYS$P1_VECTOR DBL$DELET  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 69 _Symbol Value Defined By Referenced By ...$_------ ----- ---------- ----------------- j DBL$PURGE j DBL$RENAM j DBL$RUNJB jSYS$SETAST 7FFEDFF8 SYS$P1_VECTOR DBL$$INIT j DBL$$SEND_RECV j DBL$RCVID j DBL$WAIT jSYS$SETEF 7FFEE000 SYS$P1_VECTOR DBL$SETCTL j DBL$TTBRDCST j DBL$WAIT jSYS$SETIMR 7FFEE020 SYS$P1_VECTOR DBL$WAIT jSYS$SETPRI 7FFEE028 SYS$P1_VECTOR DBL$SLICE jSYS$SETSWM 7FFEE048 SYS$P1_VECTOR DBL$LOCK jSYS$SNDJBCW 7FFEE438 SYS$P1_VECTOR DBL$$LPQUE jSYS$SNDOPR 7FFEDFC0 SYS$P1_VECTOR DBL$SNDOP jSYS$SPACE 7FFEE218 SYS$P1_VECTOR DBL$$FIND jSYS$SYNCH 7FFEE440 SYS$P1_VECTOR DBL$$ACCEPT j DBL$$FORMS j DBL$$READS j 0 DBL$DEVICE j DBL$TTBRDCST jSYS$TRNLNM 7FFEE490 SYS$P1_VECTOR DBL$$INTERP j DBL$RUNJB jSYS$TRNLOG 7FFEE058 SYS$P1_VECTOR DBL$$INIT j DBL$$TRNLOG j DBL$EXITHANDLER j DBL$FATAL j DBL$GLINE jSYS$ULWSET 7FFEE068 SYS$P1_VECTOR DBL$EXITHANDLER jSYS$UNWIND 7FFEE070 SYS$P1_VECTOR DBL$$HANDLER jSYS$UPDATE 7FFEE1A0 SYS$P1_VECTOR DBL$$WRITE jSYS$WAITFR 7FFEE078 SYS$P1_VECTOR DBL$$INIT j DBL$$OPENTT jSYS$WFLOR 7FFEE090 SYS$P1_VECTOR DBL$WAIT jSYS$WRITE 7FFEE1B0 SYS$P1_VECTOR DBL$$WRITE j DBL$$WRITES jTT2$V_ANSICRT 00000018 SYS$IODEF DBL$$TERM_IO j DBL$ESC_TABLE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 70 D +------------------+D ! Symbols By Value !D +------------------+2Value Symbols...2----- ----------q00000000 R-DBL$HANDLER DSC$W_LENGTH NAM$V_EXP_VER O00000001 DSC$K_CLASS_S SS$_NORMAL -00000002 DSC$B_DTYPE B-00000004 DSC$A_POINTER -00000006 DSC$K_DTYPE_B -00000007 DSC$K_DTYPE_W -00000008 DSC$K_DTYPE_L CO00000009 DSC$K_DTYPE_Q SS$_WASSET -0000000A DBL$$K_RECV_MBXNAME_LEN -0000000B NAM$B_ESL -0000000C NAM$L_ESA -0000000E DSC$K_DTYPE_T -00000013 DBL$K_RTL_VERSION_LEN -00000014 DSC$K_DTYPE_NZ -00000015 DSC$K_DTYPE_P -00000016 DBL$$K_SS3_ENTRIES -00000018 TT2$V_ANSICRT 7-00000019 DBL$$K_CSI_ENTRIES -00000023 IO$_SETMODE -00000025 DSC$K_DTYPE_VT O00000027 DBL$$K_RECV_ID_LEN IO$_SENSEMODE -0000002A U-DBL$_FACILITY L-00000030 IO$_WRITEVBLK -00000031 IO$_READVBLK -00000034 NAM$L_FNB -00000035 DBL$K_RTL_BASELEVEL_LEN -00000037 IO$_READPROMPT -0000003C DBL$$K_MSGMGR_REQ_LEN -0000003F DBL$$K_IMAGE_NAME_LEN O00000040 IO$M_NOW IO$M_TYPEAHDCNT -00000054 NAM$L_VER -0000009A DBL$$K_SAVE_AREA_LEN O000000DC DBLDDT$_FACILITY U-DBLUTL$_FACILITY q000000FF DBL$$K_DFNDDFSIZE DBL$$K_DFNISMSIZE DBL$$K_FATALNAMESIZE O00000100 U-DBL$$K_MAXCHANS DBL$$K_TTMBXMSG_SIZE -000001BC SS$_NOLOGNAM -00000214 SS$_RESULTOVF -00000319 JPI$_PID -00000400 IO$M_OUTBAND -00000407 JPI$_CPUTIM -00000408 U-DBL$K_PATCHAREASIZE -00000420 R-D85$$SLEEP 7-0000047A R-DBL$$SLEEP -000004F0 R-DBL$$STR_CONCAT -00000558 R-DBL$$STR_REDUCE -00000611 R-DBL$$GO_TERM_ECHOMASK D-00000629 SS$_NOTRAN V-00000631 R-DBL$GQ_TERM_NOECHOMASK -00000639 R-D85$$READS_BEGIN  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 71 2Value Symbols...2----- -----------000006D3 R-D85$$READS_END -0000071A R-DBL$$READSDXC_L -00000728 R-DBL$$READSDLC_L Y-000007A4 R-DBL$$READSDXC_N Y-000007B2 R-DBL$$READSDLC_N -00000800 IO$M_INCLUDE 4-000009A1 R-D85$$START_ATTS_OUT E-000009F6 R-D85$$READS_KEYWORD V-00001041 R-D85$$END_ATTS_OUT R-00001CCE R-D85$$WRITES_BEGIN -00001D2E R-D85$$WRITES_KEYWORD -00001D58 R-DBL$$WRITES_L -00001D5D R-DBL$$WRITES_X -00001E02 R-D85$$WRITES_END -000023D8 R-D85$$DISPLAY_BEGIN -000023E7 R-D85$$STUFF_BUFF -00002423 R-DBL$$STUFBUF_TS -00002469 R-DBL$$STUFBUF_AS -00002476 R-DBL$$STUFBUF_SB -0000247B R-DBL$$STUFBUF_SW -0000248F R-DBL$$STUFBUF_DL -00002495 R-DBL$$STUFBUF_DX D-000025D9 R-D85$$DISPLAY_ATTS_KEYWORD $-000028F6 R-DBL$$DSPLYDXC -00002922 R-DBL$$DSPLYDLC -00002933 R-D85$$DISPLAY_END -00002B08 R-DBL$$GX_TERM_8BITMASK -00002B28 R-D85$$ACCEPT_BEGIN -00002B2B R-D85$$ACCEPT_KEYWORD -00002B3B R-D85$$ACCEPT_END -00002BE0 R-DBL$$ACCPTDXC_L E-00002C1E R-DBL$$ACCPTDLC_L $-00002C8A R-DBL$$ACCPTDXC_N -00002CC8 R-DBL$$ACCPTDLC_N -00003090 R-D85$$READ_BEGIN -0000314A R-D85$$READ_KEYWORD -0000338F R-D85$$READ_END -0000344C R-DBL$$READRDLC -00003451 R-DBL$$READRDXC -000037AC R-DBL$$READIDX E-00003BC4 R-D85$$WRITE_BEGIN $-00003C30 R-D85$$WRITE_KEYWORD -00003C9B R-D85$$WRITE_END -00003CCD R-DBL$$WRITE_L -00003CD2 R-DBL$$WRITE_X O-00004000 IO$M_ESCAPE -00004080 R-DBL$$FORMS_L -00004085 R-DBL$$FORMS_X -0000410C R-D85$$FORMS E-0000433E R-D85$$SEND $-00004347 R-DBL$$SEND_X -00004384 R-D85$$SEND_X  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 72 2Value Symbols...2----- -----------00004516 R-D85$$RECVSZ -000045BB R-DBL$$RECVSZ E-00004666 R-D85$$RECV -000046F1 R-DBL$$RECV -0000483B R-DBL$$RECV_INIT O000048D6 R-DBL$$MBXNAME R-DBL$MBXNAME_R1 -0000493C R-DBL$$FIND_ARRAY_ELEM -000049BA R-D85$$BIFUNC J-00004BDF R-DBL$$TSEQ_SAVE -000059C8 R-D85$$ADDR -000059E0 R-D85$$START_FUNC -00005AD7 R-D85$$START_ARGS -00005AF2 R-D85$$ARG_DSC -00005B46 R-DBL$$ARG_DSC -00005B5F R-D85$$ARG_DSC_S -00005BDD R-DBL$$ARG_DSC_S -00005C2B R-D85$$ARG_REF A-00005C51 R-DBL$$ARG_REF -00005C6D R-D85$$ARG_REF_S -00005C92 R-DBL$$ARG_REF_S -00005CA8 R-D85$$ARG_DVAL -00005CCA R-D85$$ARG_DVAL_S $-00005CE8 R-D85$$ARG_DLIT $-00005CFD R-D85$$ARG_ARG -00005D0A R-DBL$$ARG_ARG -00005D6F R-D85$$ARG_XTRNL I-00005DCA R-D85$$XCALL -00005F66 R-D85$$XFUNC -0000612D R-D85$$FRETURN_VAL -00006132 R-D85$$FRETURN -00006147 R-D85$$XRETURN $-0000614C R-D85$$XRETURN_STATUS $-00006151 R-DBL$$XRETURN_STATUS -0000618C R-DBL$$XRET -00006224 R-DBL$INTERP_LINE I-00006233 R-DBL$$INTERP -00006363 R-D85$$INTERP -00006655 R-DBL$$PROC -00006674 R-DBL$$RETURN_TO_NATIVE -0000667B R-DBL$$RETURN_FOR_EXTRNLCALL -000066BB R-DBL$$POP1 -000067AF R-DBL$$POP_DSC -0000680A R-DBL$$FREE_DYN_STRING B-0000690B R-DBL$$ONERROR_GO -000075AC R-D85$$CCHAR -000075FA R-D85$$PUSH -00007604 R-DBL$$PUSH_B -0000760E R-D85$$PUSH_1 -0000761F R-DBL$$PUSH_W1 -00007624 R-DBL$$PUSH_B1 -0000768C R-D85$$PUSH_2 -000076A4 R-DBL$$PUSH_W2 D HDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 73 2Value Symbols...2----- -----------000076A9 R-DBL$$PUSH_B2 D-00007787 R-D85$$PUSH_2X D-000077A5 R-D85$$PUSH_2AS D-00007849 R-D85$$PUSH_2ASX D-00007864 R-D85$$PUSH_ARG -00007873 R-DBL$$PUSH_ARG X-0000788B R-D85$$PUSH_ARG1 -000078A2 R-DBL$$PUSH_ARG1 -0000794D R-D85$$PUSH_ARG2 -00007A0A R-D85$$PUSH_ARG2X I-00007A2A R-DBL$$PUSH_ARG2 -00007AB8 R-D85$$PUSH_ARGN -00007ADF R-D85$$PUSH_N R-00007B41 R-D85$$PUSH_ARGARY -00007B64 R-D85$$PUSH_ARY R-00007C18 R-D85$$PUSH_LONGLIT -00007C1C R-D85$$PUSH_SHORTLIT -00007C21 R-D85$$PUSH_IM_SHORT _-00007C2C R-D85$$PUSH_IM_LONG -00007D24 R-D85$$STOREII -00007FF8 R-D85$$STOREIA -00008040 R-D85$$STOREIZ -00008106 R-D85$$STOREIP -00008181 R-D85$$STOREIS -0000829F R-D85$$STOREAA -000082D3 R-D85$$STOREAI -00008349 R-D85$$STOREAP -00008391 R-D85$$STOREAZ -000083D9 R-D85$$STOREAS -000084BD R-D85$$STOREZA -00008505 R-D85$$STOREZZ -00008514 R-DBL$$STOREZZ F-0000864C R-D85$$STOREZI F-000086EF R-D85$$STOREZP -0000875F R-D85$$STOREZS 0-00008843 R-D85$$STOREPA L-0000888A R-D85$$STOREPZ $-000088FA R-D85$$STOREPP $-00008909 R-DBL$$STOREPP I-00008949 R-D85$$STOREPI $-000089F2 R-D85$$STOREPS I-00008AB7 R-D85$$STORENI L-00008AE1 R-D85$$STORENZ 5-00008B0B R-D85$$STORENA L-00008B35 R-D85$$STORENP L-00008B5F R-D85$$STORENS L-00008C9E R-DBL$$STORE_S L-00008CDB R-DBL$$STORE_W $-00008CE0 R-DBL$$STORE_B L-00008DDC R-D85$$FORMAT 5-00008DF9 R-DBL$$FORMAT T-00008E14 R-DBL$$FORMAT_NEW  6DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 74 2Value Symbols...2----- -----------00009412 R-D85$$FORBY1I L-0000947E R-D85$$FORBY1N L-000094EA R-D85$$FORBY1IMP L-0000956D R-DBL$$FORBY1 $-0000959B R-D85$$FORBYSTEPI 5-000095FD R-D85$$FORBYSTEPN 5-000096A7 R-D85$$FORBYSTEPIMP 5-000097B5 R-DBL$$FORBYSTEP 5-000098D2 R-DBL$$ADD_S 5-000098E1 R-DBL$$ADD_B L-000098E6 R-DBL$$ADD_W L-000098F6 R-D85$$ADDI 5-00009905 R-D85$$ADDP 5-00009915 R-D85$$ADDZ 5-00009925 R-D85$$ADDS L-00009961 R-DBL$$ADDP L-000099D0 R-DBL$$ADDZ L-00009AF8 R-DBL$$SUB_S L-00009B07 R-DBL$$SUB_B L-00009B0C R-DBL$$SUB_W L-00009B1C R-D85$$SUBI 5-00009B2C R-D85$$SUBP L-00009B3C R-D85$$SUBZ L-00009B4C R-D85$$SUBS 5-00009D42 R-DBL$$I_COMMON L-0000A074 R-D85$$INCRS 5-0000A08C R-D85$$INCRI 5-0000A0F1 R-D85$$INCRP 5-0000A12B R-D85$$INCRZ L-0000A164 R-DBL$$INCR_S L-0000A169 R-DBL$$INCR_W L-0000A16E R-DBL$$INCR_B L-0000A177 R-DBL$$INCRP 5-0000A1A4 R-DBL$$INCR 5-0000A305 R-D85$$DECRS 5-0000A31A R-DBL$$DECR_S L-0000A31F R-D85$$DECRZ L-0000A359 R-D85$$DECRP L-0000A3BD R-D85$$DECRI 5-0000A52D R-D85$$UMINUSS 5-0000A57D R-D85$$UMINUSP 5-0000A5CE R-D85$$UMINUSI L-0000A644 R-DBL$$UMINUS_S LO0000A667 R-D85$$UMINUSZ R-DBL$$UMINUS_W 0-0000A66C R-DBL$$UMINUS_B 0-0000A6C8 R-D85$$MULS 0-0000A7C0 R-D85$$MULI 0-0000A7D3 R-DBL$$MUL_S 0-0000A7F8 R-DBL$$MUL_W 0-0000A7FD R-DBL$$MUL_B -0000A81B R-D85$$MULZ -0000AB3A R-D85$$MULP  kDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 75-2Value Symbols...2----- -----------0000AF05 R-D85$$RTSN 0-0000AF2C R-D85$$RTSP 0O0000B012 R-D85$$RTSZ R-DBL$$ROUND -0000B16E R-D85$$RTSI 0-0000B27F R-DBL$$DIV_S 0-0000B28D R-DBL$$DIV_B 0-0000B292 R-DBL$$DIV_W 0-0000B2A1 R-D85$$DIVI 0-0000B2B0 R-D85$$DIVP 0-0000B2BF R-D85$$DIVZ 0-0000B2CE R-D85$$DIVS 0-0000B36D R-D85$$DIVDIVI 0-0000B37C R-D85$$DIVDIVP 0-0000B38F R-D85$$DIVDIVZ 0-0000B3A2 R-D85$$DIVDIVS 0-0000BC1B R-D85$$ROUNDN 0-0000BC42 R-D85$$ROUNDP 0-0000BD7A R-D85$$ROUNDZ 0-0000BFB7 R-D85$$ROUNDI 0-0000C02D R-D85$$XOR 0-0000C09E R-DBL$$XOR 0-0000C182 R-D85$$NOT 0-0000C200 R-DBL$$OR 0-0000C29A R-DBL$$AND 0-0000C4CF R-D85$$OPAND 0-0000C4E7 R-D85$$OPOR 0-0000C5F5 R-DBL$$OPAND 0-0000C641 R-DBL$$OPOR 0-0000C6CE R-D85$$BAND 0-0000C71D R-D85$$BOR 0-0000C768 R-D85$$BXOR 0-0000C7B3 R-D85$$BNOT 0-0000C85C R-DBL$$IFTEST 0-0000C8A7 R-D85$$IFTEST_NOFF 0-0000C8BB R-D85$$IFTEST 0-0000CA80 R-D85$$CMPR_EQ 0-0000CA90 R-D85$$CMPR_NE 0-0000CAA0 R-D85$$CMPR_LE 0-0000CAB0 R-D85$$CMPR_LT 0-0000CAC0 R-D85$$CMPR_GE 0-0000CAD0 R-D85$$CMPR_GT 0-0000CB78 R-DBL$$CMPR_EQA 0-0000CB87 R-DBL$$CMPR_NEA 0-0000CB96 R-DBL$$CMPR_LTA 0-0000CBA5 R-DBL$$CMPR_LEA 0-0000CBB4 R-DBL$$CMPR_GTA 0-0000CBC3 R-DBL$$CMPR_GEA 0-0000CD27 R-DBL$$CMPR_EQD 0-0000CD46 R-DBL$$CMPR_NED 0-0000CD65 R-DBL$$CMPR_LTD -0000CD89 R-DBL$$CMPR_LED -0000CDA7 R-DBL$$CMPR_GTD  kDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 76-2Value Symbols...2----- -----------0000CDC8 R-DBL$$CMPR_GED 0-0000D03D R-DBL$$CMPR_Z_SETUP 0-0000D24F R-DBL$$CMPR_P_SETUP 0-0000D44E R-DBL$$GET_QUAD 0-0000D5B4 R-D85$$FIND_BEGINppa~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;11!$ 0-0000D5E1 R-D85$$FIND_KEYWORD 0-0000DB56 R-D85$$FIND_END 0-0000DEB8 R-D85$$CVT_SYM_VAL 0-0000DECA R-D85$$CVT_TOS_VAL 0-0000DEDE R-D85$$CVTNI 0-0000DEFA R-D85$$CVTNP 0-0000E090 R-D85$$CVTNZ 0-0000E230 R-DBL$$KEY_LOOKUP 0-0000E328 R-DBL$$GET_KEY 0-0000E47F R-DBL$$FREE_KEY 0-0000E4B4 R-DBL$$CMPR_KEY 0-0000E530 R-DBL$$TRNLOG 0-0000E5EC R-DBL$$CHANNEL_RANGECHECK 0-0000E650 R-DBL$$GETVMCLR 0-0000E680 R-DBL$$OPENTT 0O0000E924 R-DBL$$ERRTRANS R-DBL$ERRTRANS_R1 -0000E9C4 R-DBL$$SIGNAL -0000EAD4 R-DBL$$WHERE_AT -0000EAD7 R-DBL$WHERE_R1 O0000EADF R-DBL$$TRACEBACK R-DBL$TRACEBACK_R5 R-0000EB74 R-DBL$$CVT_DSCA R-0000ECC6 R-DBL$$CVTDXDX R-0000F43A R-DBL$$FLAG8_CLR R-0000F468 R-DBL$$FLAG8_SET R-0000F4A1 R-DBL$SETCTL R-0000F63A R-DBL$$CTRLC R-0000F6B6 R-DBL$$CTRLY R-0000F928 R-DBL$$SETUP_FAB R-0000F9E9 R-DBL$$DEALLOC_FAB R-0000FA18 R-DBL$EXECUTE_IMAGE_ROUTINE R-0000FAF1 R-DBL$FUNCTION R-0000FB5B R-DBL$TTNAME R-0000FBF5 R-DBL$USEROPEN R-0000FC10 R-DBL$$GX_SS3_TABLE R-0000FC26 R-DBL$$GX_CSI_TABLE R-0000FC8A R-DBL$$GX_SS3_CODES R-0000FCB6 R-DBL$$GX_CSI_CODES RO0000FD2E R-D85$$LPQUE_BEGIN R-DBL$$LPQUE_START -0000FDF0 R-D85$$LPQUE_KEYWORD -0000FE47 R-DBL$$LPQUE_LPNUM -0000FE87t( R-DBL$$LPQUE_COPIES -0000FEB2 R-DBL$$LPQUE_FORM -0000FEF9 R-DBL$$LPQUE_ALIGN $-0000FF06 R-DBL$$LPQUE_DELETE -0000FF12 R-DBL$$LPQUE_DELETE_WITH_VALUE rO0000FF3A R-D85$$LPQUE_END R-DBL$$LPQUE l-00010053 R-DBL$$OPEN_CHANDXC - -DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 77 2Value Symbols...2----- -----------00010095 R-DBL$$OPEN_CHANDLC -0001009E R-D85$$OPEN_BEGIN -000100A7 R-D85$$OPEN_MODE -000107B3 R-D85$$OPEN_KEYWORD -0001081D R-DBL$$OPEN_ALLOC -00010C2A R-D85$$OPEN_START_KEYS -00010C7C R-D85$$OPEN_START_KEY_SEGS -00010C8A R-D85$$OPEN_START_SEG -00010C91 R-D85$$OPEN_KEY_SEG_KEYWORD -00010CA7 R-D85$$OPEN_KEY_KEYWORD -00010E2C R-D85$$OPEN_END_SEG -00010E45 R-D85$$OPEN_END_KEY_SEGS -00010F2C R-D85$$OPEN_KEY_END -00010F4E R-DBL$$OPEN_BUFSIZ -00010F8D R-DBL$$OPEN_BKTSIZ -00010FC7 R-DBL$$OPEN_RECSIZ -00011005 R-DBL$$OPEN_BLKSIZ O0001109B R-D85$$OPEN_END R-DBL$$OPEN -000118E8 R-DBL$CREMBX -00011DB8 R-D85$$CLOSE_KEYWORD -00011EDC R-D85$$CLOSE -00011EE1 R-DBL$$CLOSEDLC -00011EE6 R-DBL$$CLOSEDXC -00011F27 R-DBL$$CLOSE_CHAN -000120CC RU-DBL$GB_CMP_MAJOR_VERSION -000120CD RU-DBL$GB_CMP_MINOR_VERSION O000120CE RU-DBL$GT_RTL_OPSYS RU-DBL$GT_RTL_VERSION_STRING D-000120D5 RU-DBL$GT_RTL_SUBSYS D-000120D9 RU-DBL$GT_RTL_RELEASETYPE D-000120DA RU-DBL$GT_RTL_MAJORVERSION D-000120DD RU-DBL$GT_RTL_MINORVERSION D-000120DF RU-DBL$GT_RTL_PATCHLEVEL DO000120E1 R-DBL$GT_BASELEVEL_TYPE R-DBL$GT_RTL_BASELEVEL_STRING 0-000120E3 R-DBL$GT_BASELEVEL_DATE 0-000120EE R-DBL$GT_BASELEVEL_XXXX 0-00012118 R-DBL$$GET2DX 0-00012146 R-DBL$$GET2DXR D-00012174 R-DBL$$GET3DX D-000121B0 R-DBL$$CVTAI D-00012244 R-DBL$$CVTAIQ D-00012378 R-DBL$$CVTAPK D-00012471 R-DBL$$CVTAIPK D-00012570 R-DBL$CVTAZ_R1 D-00012573 R-DBL$$CVTAZ D-00012642 R-DBL$$CVTAIZ D-00012727 R-DBL$$CVTIA_R1 U-0001277A R-DBL$$CVTIA O00012815 R-DBL$$CVTIZ_A R-DBL$CVTIZA_R1 u-00012820 R-DBL$CVTIZ_R1 -00012823 R-DBL$$CVTIZ --00012876 R-DBL$$CVT_LONG_TO_NUM_R23 -00012886 R-DBL$$CVT_LONG_TO_NUM  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 7802Value Symbols...2----- -----------000129AC R-DBL$$CVTIQA D-00012A2D R-DBL$$CVTIQPK D-00012BA9 R-DBL$CVTIQZ_R1 D-00012BAC R-DBL$$CVTIQZ D-00012C7B R-DBL$CVTPKA_A D-00012C8D R-DBL$$CVTPKA D-00012D05 R-DBL$CVTPKI_A D-00012D18 R-DBL$$CVTPKI D-00012D24 R-DBL$CVTPKIQ_A D-00012D56 R-DBL$$CVTPKIQ D-00012E34 R-DBL$$CVTPKZ D-00012E62 R-DBL$$CVTPKIZ D-00012EC7 R-DBL$$CVTIPKA D-0001304F R-DBL$$CVTIPKZ D-0001309F R-DBL$$CVTIPKIZ D-00013139 R-DBL$$CVT_NUM_TO_LONG_R23 D-00013149 R-DBL$$CVT_NUM_TO_LONG D-00013228 R-DBL$CVTZA_R1 D-00013232 R-DBL$$CVTZA DO00013292 R-DBL$$CVTZI_A R-DBL$CVTZIA_R1 0O0001329C R-DBL$$CVTZI R-DBL$CVTZI_R1 O00013329 R-DBL$$CVTZIQ R-DBL$CVTZIQ_R1 X-000133F2 R-DBL$$CVTZPK N-00013455 R-DBL$$CVTZIPK F-0001348A R-DBL$$CVTIZA F-00013549 R-DBL$$CVTIZPK F-0001357A R-DBL$$CVTIZIPK M-00013683 R-DBL$CVTINT M-0001368A R-DBL$CVTZI M-00013707 R-DBL$INTCVT M-0001370E R-DBL$CVTIZ M-00013767 R-DBL$CVTIZV M-00013789 R-DBL$CVTIIV M-000137BA R-DBL$$CVT_TO_BITS M-000138B5 R-DBL$$CVT_NZU_NZU M-00013A1A R-DBL$$MODE_TRANS M-00013A3A R-DBL$$MODE_TO_CODE M-00013A84 R-DBL$$MAKCCB M-00013AC7 R-DBL$$MAKCCB_TT M-00013B22 R-DBL$$GETCCB M-00013B28 R-DBL$$GETCCBZOK M-00013B43 R-DBL$$RELCCB M-00013B4C R-DBL$$CLOCCB M-00013B95 R-DBL$$FABLUB IO00013BF8 R-DBL$INIT R-DBL$INIT85 k-00013DF7 R-INIT_OTO -000142CC R-DBL$$HANDLER -00014340 R-DBL$$PROBEW_HANDLER 0-0001435D R-DBL$$PROBEW_USERACTION 0-00014368 R-DBL$$CVT_TO_BIN 0-000143DF R-DBL$$CVT_TO_OCT 0-00014456 R-DBL$$CVT_TO_HEX 0 5DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 79 2Value Symbols...2----- -----------00014519 R-DBL$EXITHANDLER A-000147D8 R-DBGEXT$DBL_RTL_ENTRY 0-000147E4 R-DBL$$TERM_IO_FORMAT 0-00014C23 R-DBL$$TERM_IO_POSITION 8-00014EA0 R-DBL$ASCII F-00014F40 R-DBL$DATE 4-00014FE8 R-DBL$DECML 0-00015070 R-DBL$DELET C-0001514C R-DBL$ERROR 0-00015248 R-DBL$FATAL 0-00015398 R-DBL$FILEC 4-00015468 R-DBL$FLAGS R-000155D5 R-DBL$$FLAGS_SET I-0001562A R-DBL$INSTR H-000156ED R-DBL$JBNO E-00015796 R-DBL$MONEY R-00015806 R-DBL$PAK -00015A44 R-DBL$UNPAK -00015BEA R-DBL$RENAM -00015E9F R-DBL$RSTATD -00015EB3 R-DBL$RSTAT -00016035 R-DBL$RUNJB -00016379 R-DBL$SIZE -00016411 R-DBL$TIME -00016542 R-DBL$TNMBR -000165BE R-DBL$TT_NAME_TO_NUMBER -0001660D R-DBL$$TTNAMNUM U-000166B2 R-DBL$TT_NUMBER_TO_NAME -0001670B R-DBL$$TTNUMNAM -000167D8 R-DBL$TTSTS -000168DD R-DBL$$TTSTS0 -000169FA R-DBL$VERSN -00016AC1 R-DBL$WAIT -00016B2E R-DBL$$WAIT_FUNCTION -00016F74 R-DBL$$WAIT_SETEF -00016FB4 R-DBL$ASTSAV 0-00017032 R-DBL$ASTRST 0-0001709C R-DBL$BEGFL 0-00017158 R-DBL$BKSTR 0-00017238 R-DBL$CHAIN 0-000172F5 R-DBL$GTENT 0-000173BC R-DBL$CPUTM 0-00017434 R-DBL$CHOPEN 0-000174C8 R-DBL$DELMBX D-0001752C R-DBL$TTCHAR D-0001767E R-DBL$DEVCLT U-00017A68 R-DBL$EMPBUF -00017B10 R-DBL$ENDFL 1-00017BF0 R-DBL$ERRMOD -00017C84 R-DBL$ERRTXT -00017DA8 R-DBL$EXITSUB_VAL -00017DE3 R-DBL$EXITSUB  RDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 8012Value Symbols...2----- -----------00017E32 R-DBL$EXITERROR D-00017EAE R-DBL$GETCM D-00017F3F R-DBL$GETDFN D-00018051 RMS$_OK_LIM D-0001807A R-DBL$GETFA D-000181A0 RMS$_RNL D-000181A8 RMS$_RTB D-0001827A RMS$_EOF D-000182AA RMS$_RLK D-000182B2 RMS$_RNF D-000184B7 R-DBL$GETFNM D-00018590 R-DBL$GLINE -00018784 R-DBL$ISMCRE -00018AA3 R-DBL$IXREAD W-00018C4D R-DBL$KILL -00018CA1 R-DBL$LOCK -00018CD0 R-DBL$ULOCK -00018D02 R-DBL$PARSE N-0001914F R-DBL$POSRFA O-00019289 R-DBL$SETKRF O-0001933E R-DBL$PURGE Y-000194BE R-DBL$PUTCM -000194EE R-DBL$RCVID -0001958A R-DBL$JBNAM -000195D1 R-DBL$RENAM_V1 -00019672 R-DBL$RMSCC -000196ED R-DBL$SETDFN -0001983E R-DBL$SLICE -000198A2 R-DBL$SNDOP -00019925 R-DBL$TTBRDCST -00019BA8 R-DBL$$TTMBX_AST -00019CD7 R-DBL$TTFLGS -00019E2F R-DBL$TIMOUT -00019ED4 R-DBL$$TBXXX -00019F25 R-DBL$TBMUL -00019F76 R-DBL$TBBIN -00019FBC R-DBL$TBMOD -0001A03E R-DBL$TBRPL -0001A0C2 R-DBL$TBRET -0001A116 R-DBL$XARGS -0001A28A R-DBL$XSTAT -0001A41C R-DBL$WKDAY -0001A4D4 R-DBL$ANSI_TABLE -0001A5F8 R-DBL$ESC_TABLE Z-0001AB00 R-DBL$AB_CVTPT_Z Z-0001AE00 R-DBL$$GX_UP_LO_STANDARD_TABLE I-0001AF00 R-DBL$$GX_UP_LO_NOSTANDARD_TABLE_-0001B000 RU-DBL$$GX_LO_UP_STANDARD_TABLE _-0001B100 R-DBL$$GX_LO_UP_NOSTANDARD_TABLES-0001B200 R-DBL$$GX_UP_LO_ECHO A-0001B300 R-DBL$$GX_UPONLY_ECHO -0001B600 RU-DBL$TNMBR_TABLE  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 81 2Value Symbols...2----- -----------0001BE00 R-DBL$$DATA_TYPE_TABLE K-0001CBBC R-DBL$$GA_INTERP P-0001CBC0 RU-DBL$GL_FLAGS K-0001CBC4 R-DBL$$GL_IFLAGS P-0001CBC8 R-DBL$GL_TTFLAGS K-0001CBCC R-DBL$GW_RSTAT_RSZ P-0001CBCE R-DBL$GW_RSTAT_TERMCODE PO0001CBD0 R-DBL$$GX_SAVE_AREA R-DBL$GW_ERROR_NUMBER -0001CBD2 R-DBL$GW_ERROR_LINE -0001CBD4 R-DBL$$GL_SYSERROR_NUMBER -0001CBD8 R-DBL$$GA_ERROR_MODNAME -0001CBDC R-DBL$$GW_ERROR_MODLINE -0001CBE0 R-DBL$$GDIT_ACCUM1 -0001CBF3 R-DBL$$GDIT_ACCUM1_INTEND O0001CBFC R-DBL$$GDIT_ACCUM1_END R-DBL$$GDIT_ACCUM2 -0001CC0F R-DBL$$GDIT_ACCUM2_INTEND O0001CC18 R-DBL$$GDIT_ACCUM2_END R-DBL$$GDIT_RESULT -0001CC2B R-DBL$$GDIT_RESULT_INTEND IO0001CC34 R-DBL$$GDIT_RESULT_END R-DBL$$GP_ACCUM1 -0001CC42 R-DBL$$GP_ACCUM1_END -0001CC44 R-DBL$$GP_ACCUM2 -0001CC52 R-DBL$$GP_ACCUM2_END -0001CC54 R-DBL$$GP_RESULT O0001CC62 RU-DBL$$GL_DDTFLAGS R-DBL$$GP_RESULT_END -0001CC66 R-DBL$$GA_LABEL_ADDRESS -0001CC6C RU-DBL$$GL_INITFLAGS -0001CC70 R-DBL$$GL_CTRLMASK -0001CC74 R-DBL$$GB_CTRLC_ACTION -0001CC75 R-DBL$$GB_CTRLY_ACTION -0001CC76 R-DBL$$GB_NUMASTS -0001CC77 R-DBL$$GL_ASTBASEADDR -0001CC87 R-DBL$$GL_LOCKPAGES -0001CC8F R-DBL$$GA_USEROPEN -0001CC93 R-DBL$$GL_EXITHCB -0001CC97 R-DBL$$GA_EXITHA -0001CC9F R-DBL$$GA_EXITSTATUS -0001CCA3 R-DBL$$GL_EXITSTATUS -0001CCA7 R-DBL$$GB_FATALFUNC -0001CCA8 R-DBL$$GTC_FATALNAME -0001CCA9 R-DBL$$GT_FATALNAME -0001CDA8 R-DBL$$GB_CURRENCY -0001CDA9 R-DBL$$GB_CURRENCY_DEFAULT -0001CDAA R-DBL$$GB_DIGIT_SEP -0001CDAB R-DBL$$GB_DIGIT_SEP_DEFAULT -0001CDAC R-DBL$$GB_RADIX_PT -0001CDAD R-DBL$$GB_RADIX_PT_DEFAULT -0001CDAE R-DBL$$GB_UPDATE_DEFERRED_WRITE -0001CDAF R-DBL$$GW_MSGMGR_MBXCHAN $-0001CDB1 R-DBL$$GW_RECV_MBXCHAN -0001CDB3 R-DBL$$GW_TTMBX_CHAN r-0001CDB5 R-DBL$$GQ_TTMBX_DSC -0001CDB9 R-DBL$$GA_TTMBX_NAME  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 8202Value Symbols...2----- -----------0001CDBD R-DBL$$GT_TTMBX_NAME -0001CDC7 R-DBL$$GL_RECV_BUFQUO O0001CDCB R-DBL$$GB_MSGMGR_FUNC R-DBL$$GT_MSGMGR_REQ -0001CDCC R-DBL$$GT_RECV_ID -0001CDF3 R-DBL$$GT_TTNMBR -0001CDFD R-DBL$$GT_RECV_MBXNAME -0001CE08 R-DBL$$GA_MAIN_MODNAME -0001CE0C R-DBL$$GTC_IMAGE_NAME -0001CE0D R-DBL$$GT_IMAGE_NAME -0001CE4C R-DBL$$GTC_DFNDDF -0001CE4D R-DBL$$GT_DFNDDF -0001CF4C R-DBL$$GTC_DFNISM -0001CF4D R-DBL$$GT_DFNISM -0001D04C R-DBL$$GTC_TTNAME -0001D04D R-DBL$$GT_TTNAME -0001D055 R-DBL$$GL_TTUNIT -0001D05C R-DBL$GQ_TERM_ECHOMASK -0001D064 R-DBL$GQ_TERM_8BITMASK -0001D06C RU-DBL$$GA_DDTMODINIT -0001D070 RU-DBL$$GA_DDTCMD -0001D074 R-DBL$$GA_BRDCSTAST -0001D078 R-DBL$$GQ_TTMBX_IOSB -0001D080 R-DBL$$GL_MAXCHANNEL -0001D084 R-DBL$$GL_LPQUE_ENTRY -0001D088 R-DBL$$GA_COLLATING_TABLE -0001D08C R-DBL$$GB_PROCNUM -0001D08D R-DBL$$GA_DBLBIND_PSECT -0001D091 R-DBL$$GQ_DSC_TSEQ_STRING -0001D099 R-DBL$$GA_TTMBX_MESSAGE_AST -0001D09D R-DBL$$GL_SAVESP -0001D0A1 R-DBL$$GL_SAVEFP -0001D0A5 R-DBL$$GL_SAVEAP -0001D0AC R-DBL$$GL_CDD_CONTEXT -0001D0B0 R-DBL$$GA_CDD_SIGN_IN -0001D0B4 R-DBL$$GA_CDD_SIGN_OUT -0001D0B8 R-DBL$$GA_CDD_FIND_NODE -0001D0BC R-DBL$$GA_CDD_GET_ENT_ATT -0001D0C0 R-DBL$$GA_CDD_GET_STR_ATT -0001D0C4 R-DBL$$GA_CDD_GET_STR_LIST_ATT -0001D0C8 R-DBL$$GA_CDD_GET_STR_CELL -0001D0CC RU-DBL$$GV_CHANNELS -0001D0EC RU-DBL$$GL_CHANBLOCKS -0001D4EC R-DBL$$GX_CHANZERO -0001D56C R-DBL$$GT_TTMBXMSG -0001D66C RU-DBL$GX_PATCHAREA -0001DE48 RX-LIB$CVT_DX_DX -0001DE4C RX-LIB$DECODE_FAULT -0001DE58 RX-STR$FREE1_DX_R4 L-0001DE5C RX-STR$GET1_DX_R4 -0001DE60 RX-OTS$CVT_L_TO -0001DE64 RX-OTS$CVT_L_TZ l-0001DE68 RX-OTS$CVT_L_TB - -DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 83 2Value Symbols...2----- -----------0001DE6C RX-LIB$ENABLE_CTRL -0001DE70 RX-LIB$DISABLE_CTRL -0001DE74 RX-LIB$SET_SYMBOL -0001DE78 RX-LIB$GET_SYMBOL -0001DE7C RX-LIB$GET_COMMON -0001DE80 RX-LIB$PUT_COMMON -0001DE84 RX-LIB$DAY -0001DE88 RX-LIB$DO_COMMAND -0001DE8C RX-LIB$RESERVE_EF -0001DE90 RX-LIB$FIND_IMAGE_SYMBOL -0001DE94 RX-LIB$GET_COMMAND -0001DE98 RX-LIB$GET_INPUT -0001DE9C RX-LIB$RENAME_FILE -0001DEA0 RX-LIB$RUN_PROGRAM -0001DEA4 RX-LIB$SCOPY_R_DX6 -0001DEA8 RX-LIB$SCOPY_DXDX6 -0001DEAC RX-LIB$SFREE1_DD6 -0001DEB0 RX-LIB$STOP -0001DEB4 RX-LIB$SIGNAL -0001DEB8 RX-LIB$SYS_GETMSG -0001DEBC RX-LIB$FREE_VM -0001DEC0 RX-LIB$GET_VM -0015821C LIB$_INPSTRTRU -002A8000 U-DBL$_RTL_BASE O002A800A U-DBL$_ENDOF_FIL U-DBL$_EOF O002A8014 U-DBL$_NOCALL U-DBL$_RETNO_CAL D-002A801C U-DBL$_CMPERR D-002A802C U-DBL$_RECEXTCAL DO002A8034 U-DBL$_ARGNUM U-DBL$_INCNUMARG 0O002A803A U-DBL$_SUBERR U-DBL$_SUBSCR O002A8042 U-DBL$_WRIINTLIT U-DBL$_WRTLIT RO002A804A U-DBL$_NOMEM U-DBL$_NOTENOMEM CO002A8052 U-DBL$_ILLCHANUM U-DBL$_ILLCHN O002A805A U-DBL$_CHANOTOPN U-DBL$_NOOPEN _O002A8062 U-DBL$_INPFROWRI U-DBL$_ONLYWR R-002A806C U-DBL$_CHADEFERR U-002A8074 U-DBL$_UNDOPC RO002A807A U-DBL$_BIGNUM U-DBL$_NUMTOOLON O002A8082 U-DBL$_CHAIN_USE U-DBL$_CHNUSE O002A808A U-DBL$_BADFILSPC U-DBL$_FILSPC O002A8092 U-DBL$_FILNOTFND U-DBL$_FNF -002A809A U-DBL$_HANNOTAVA -O002A80A2 U-DBL$_BADDIGIT U-DBL$_DIGIT LO002A80AA U-DBL$_BADOPEN U-DBL$_FILOPT GO002A80B2 U-DBL$_IOFALL U-DBL$_IO_ERROR BO002A80BA U-DBL$_LINTOOLNG U-DBL$_TOOBIG O002A80C2 U-DBL$_NOSPAC U-DBL$_NO_SPAFIL VO002A80CA U-DBL$_FILFUL U-DBL$_OUTFILFUL O-002A80D2 U-DBL$_FLDRECLNG SO002A80E2 U-DBL$_ILLRECNUM U-DBL$_RECNUM O002A80EC U-DBL$_BADCMP U-DBL$_INCCOMPIL O002A80F2 U-DBL$_DIVBYZERO U-DBL$_DIVIDE _ DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 84 2Value Symbols...2----- ----------O002A80FA U-DBL$_ARGSIZ U-DBL$_ARGWROSIZ LO002A8102 U-DBL$_REPLAC U-DBL$_SUPEXIFIL 1O002A810A U-DBL$_CHNEXC U-DBL$_TOOMNYCHN O002A812A U-DBL$_DEVIN_USE U-DBL$_DEVUSE O002A8132 U-DBL$_FILEINUSE U-DBL$_FINUSE IO002A813A U-DBL$_ONLYRD U-DBL$_OUTTOREAD O002A8142 U-DBL$_LOCKED U-DBL$_RECLOCKED O002A81A2 U-DBL$_BADKEY U-DBL$_ILEGALKEY EO002A81AA U-DBL$_KEYNOT U-DBL$_KEYNOTSAM DO002A81B2 U-DBL$_NODUPKEYS U-DBL$_NODUPS 0-002A81C2 U-DBL$_NOTISMFIL 0-002A81D2 U-DBL$_JOBSTAERR 0-002A81DA U-DBL$_ILLTRMNUM 0O002A81EA U-DBL$_NOCURR U-DBL$_NO_CURREC O002A81F2 U-DBL$_PROTEC U-DBL$_PROTVIOL B-002A81FA U-DBL$_NO_SUCOPR BO002A8202 U-DBL$_RECNOTFND U-DBL$_RNF BO002A821A U-DBL$_SYSERROR U-DBL$_SYSTEM -002A826A U-DBL$_ARGOUTORD -002A8272 U-DBL$_ARGOUTLIM I-002A827A U-DBL$_ARGCOUNT -002A8282 U-DBL$_FLDNOTPAK -002A82A2 U-DBL$_ILLBIOSIZ -002A82B2 U-DBL$_WROSIZREC O002A82BA U-DBL$_ARGMIS U-DBL$_ARGMISS 2-002A82CA U-DBL$_INVSHRCOD 1-002A8322 U-DBL$_RMSERROR -002A832A U-DBL$_INVARGTYP -002A8334 U-DBL$_DBLRTLERR O002A833A U-DBL$_FILE_ORG U-DBL$_FILORG 7O002A8342 U-DBL$_OUTOFRANG U-DBL$_OUTRNG O002A834C U-DBL$_CALNOTDBL U-DBL$_NOTDIB -002A8352 U-DBL$_EXQUOTA -002A835A U-DBL$_DEVNOTRDY O002A8362 U-DBL$_INVOPNMOD U-DBL$_IOMODE GO002A836A U-DBL$_CANCEL U-DBL$_CONTROL_C RO002A8372 U-DBL$_CONTROL_Y U-DBL$_INTRPT -002A837A U-DBL$_TIMEOUT -002A8382 U-DBL$_OPENERROR O002A838A U-DBL$_ALLOC U-DBL$_INVALLOC O002A8392 U-DBL$_BKTSIZ U-DBL$_INVBKTSIZ GO002A839A U-DBL$_BLKSIZ U-DBL$_INVBLKSIZ 0O002A83A2 U-DBL$_BUFSIZ U-DBL$_INVBUFSIZ O002A83AA U-DBL$_INVRECSIZ U-DBL$_RECSIZ M-002A83B2 U-DBL$_NOMSGMGR X-002A83BA U-DBL$_FEANOTIMP Q-002A83C2 U-DBL$_QUENOTAVA L-002A83CA U-DBL$_INVKEYNUM O-002A83D2 U-DBL$_FORGNTERM L-002A83DA U-DBL$_OUTATTERR C-002A83E2 U-DBL$_INATTERR M-002A83EA U-DBL$_INVCHRERR V DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 85$2Value Symbols...2----- -----------002A83F2 U-DBL$_FULBUFERR _-002A83FA U-DBL$_UNSUPDTYP E-002A8402 U-DBL$_INVMATCH S-002A840A U-DBL$_INVCONTIG S-002A8412 U-DBL$_INVDEQ SO002A841A U-DBL$_INVNUMREC U-DBL$_NUMREC L-002A8422 U-DBL$_INVRECTYP L-002A842A U-DBL$_INVALFDL L-002A8432 U-DBL$_INVBUFNUM L-002A843A U-DBL$_INVPRO B-002A8442 U-DBL$_INVACL B-002A844A U-DBL$_TOOMNYSEG R-002A8452 U-DBL$_INVDATYP R-002A845A U-DBL$_NO_RECSIZ S-002A8462 U-DBL$_INVALRFA S-002A846A U-DBL$_NOTYETFUN S-002A8472 U-DBL$_INVKEYPOS T-002A847A U-DBL$_INVKEYKRF -002A8482 U-DBL$_INVKEYATR -002A848A DBL$_NONLOCAL -002A8641 U-DBL$_STOP -002A864B U-DBL$_AT_LINE -002A8653 U-DBL$_PC_PSL -002A865B U-DBL$_IOERRINFO -002A8663 U-DBL$_NUMOFARGS -002A866B U-DBL$_SUBSCRPT1 -002A8673 U-DBL$_SUBSCRPT2 -002A867B U-DBL$_ARG_NMBR -002A8683 U-DBL$_LOGCHAN -002A868B U-DBL$_ARG_SIZE -002A8693 U-DBL$_VALUE -002A869B U-DBL$_ALLSNDBUF -002A86A3 U-DBL$_UNDEFLBL -002A86AB U-DBL$_OUTOFBND -002A86B3 U-DBL$_WARNING -002A86BB U-DBL$_STV -002A86C3 U-DBL$_OPCODE -002A86CB U-DBL$_FILENAME -002A86D4 U-DBL$_EXPIRED -002A86DB U-DBL$_NUMDIMS -002A86E3 U-DBL$_BOUNDS -002A86EB DBL$_DTYPEINFO -00DC8000 U-DBLDDT$_BASE -00DC800B U-DBLDDT$_TITLE -00DC8013 U-DBLDDT$_BREAK -00DC801B U-DBLDDT$_AT -00DC8022 U-DBLDDT$_INVDDTCOM -00DC802A U-DBLDDT$_NOSUCHVAR L-00DC8032 U-DBLDDT$_NOSUCHRTN -00DC803A U-DBLDDT$_NOSUCHBPT -00DC8042 U-DBLDDT$_XOUTOFRAN -00DC804A U-DBLDDT$_RMSERR  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 86U2Value Symbols...2----- -----------00DC8052 U-DBLDDT$_SYSERR 0-00DC805A U-DBLDDT$_SUBSCRERR _-00DC8062 U-DBLDDT$_NOSUCBPAT _-00DC806A U-DBLDDT$_WRIINTLIT -00DC8072 U-DBLDDT$_NOCONT -00DC807A U-DBLDDT$_ARGNOTPAS -00DC8082 U-DBLDDT$_ABORT -00DC808A U-DBLDDT$_NOSYMRTN -00DC8092 U-DBLDDT$_ERRHLPLIB U-00DC809B U-DBLDDT$_EXITSTATUS U-00DC80A3 U-DBLDDT$_SHOWBREAK -00DC80AA U-DBLDDT$_NOSETBREAK P-00DC80B3 U-DBLDDT$_LINERANGE -00DC80BB U-DBLDDT$_NOBREAKSET -00DC80C3 U-DBLDDT$_SHOWRTN A-00DC8643 U-DBLUTL$_TEXT 2-0114000A DBL$$K_TTNMBR_LEN I-7FFEDE00 SYS$QIOW A-7FFEDE48 SYS$ASCTIM -7FFEDE50 SYS$ASSIGN -7FFEDE60 SYS$CANCEL 0-7FFEDE68 SYS$CANTIM D-7FFEDE98 SYS$CLREF D-7FFEDEB0 SYS$CRELOG -7FFEDEB8 SYS$CREMBX -7FFEDEC0 SYS$CREPRC -7FFEDEE0 SYS$DASSGN -7FFEDEF0 SYS$DCLEXH -7FFEDF00 SYS$DELMBX -7FFEDF08 SYS$DELPRC C-7FFEDF40 SYS$EXIT B-7FFEDF50 SYS$FAO -7FFEDF58 SYS$FAOL ]-7FFEDF88 SYS$HIBER -7FFEDFA0 SYS$LKWSET 8-7FFEDFC0 SYS$SNDOPR -7FFEDFC8 SYS$QIO -7FFEDFD0 SYS$READEF -7FFEDFF0 SYS$SCHDWK L-7FFEDFF8 SYS$SETAST -7FFEE000 SYS$SETEF -7FFEE020 SYS$SETIMR Y-7FFEE028 SYS$SETPRI _-7FFEE048 SYS$SETSWM -7FFEE058 SYS$TRNLOG -7FFEE068 SYS$ULWSET 1-7FFEE070 SYS$UNWIND _-7FFEE078  ~ DIBOL042.B0 8[KITS.V42-07.KIT.B]DBLRTL.MAP;1S;1C b SYS$WAITFR _-7FFEE090 SYS$WFLOR -7FFEE0B0 SYS$GETMSG -7FFEE0C8 SYS$GETCHN -7FFEE0D8 SYS$GETJPI U LDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 87O2Value Symbols...2----- -----------7FFEE0E0 SYS$PUTMSG -7FFEE168 SYS$DELETE -7FFEE170 SYS$FIND U-7FFEE178 SYS$FREE U-7FFEE180 SYS$GET U-7FFEE188 SYS$PUT -7FFEE190 SYS$READ R-7FFEE1A0 SYS$UPDATE -7FFEE1B0 SYS$WRITE -7FFEE1B8 SYS$CLOSE -7FFEE1C0 SYS$CONNECT -7FFEE1C8 SYS$CREATE -7FFEE1D8 SYS$DISPLAY -7FFEE1E0 SYS$ERASE -7FFEE1F0 SYS$FLUSH -7FFEE208 SYS$OPEN A-7FFEE210 SYS$REWIND 2-7FFEE218 SYS$SPACE A-7FFEE230 SYS$PARSE 4-7FFEE240 SYS$RENAME A-7FFEE248 SYS$SEARCH I-7FFEE278 SYS$FILESCAN U-7FFEE410 SYS$GETDVI -7FFEE418 SYS$GETDVIW -7FFEE438 SYS$SNDJBCW 0-7FFEE440 SYS$SYNCH 0-7FFEE490 SYS$TRNLNM 0$ Key for special characters above: +------------------+ ! * - Undefined ! ! U - Universal ! ! R - Relocatable ! ! X - External ! ! WK - Weak ! +------------------+ _DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 88 C +----------------+C ! Image Synopsis ! C +----------------+BhVirtual memory allocated: 00000000 0001DFFF 0001E000 (122880. bytes, 240. pages)AStack size: 0. pages TImage header virtual block limits: 0g 1. 1. ( 1. block)UImage binary virtual block limits: 2. 231. ( 230. blocks)LGImage name and identification: DBLRTL DBLRTL V4.2-07 ;Number of files: 9. ;Number of modules: 129.C;Number of program sections: 23.];Number of global symbols: 1046. ;Number of cross references: 4067. ;Number of image sections: 10. :User transfer address: 00000000;Number of address fixups: 8.A;Number of code references to shareable images: 29.LImage type: PIC, SHAREABLE. Global Section Match=LESS/EQUAL, Ident, Major=2, Minor=16386Map format: FULL WITH CROSS REFERENCE in file DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.MAP;1=Estimated map length: 418. blocksNE +---------------------+BE ! Link Run Statistics !NE +---------------------+SSPerformance Indicators Page Faults CPU Time Elapsed Time S---------------------- ----------- -------- ------------RU Command processing: 270 00:00:00.31 00:00:00.56_U Pass 1: 488 00:00:01.22 00:00:06.87 U Allocation/Relocation: 81 00:00:00.07 00:00:00.53AU Pass 2: 304 00:00:00.69 00:00:05.79 U Map data after object module synopsis: 27 00:00:01.04 00:00:04.59 U Symbol table output: 6 00:00:00.01 00:00:00.21 UTotal run values: 1176 00:00:03.34 00:00:18.55_ZUsing a working set limited to 2453 pages and 1245 pages of data storage (excluding image)6Total number object records read (both passes): 5674Z of which 2825 were in libraries and 388 were DEBUG data records containing 12660 bytes8Number of modules extracted explicitly = 1211 with 6 extracted to resolve undefined symbols ?0 library searches were for symbols not in the library searched 5A total of 22 global symbol table records was writtenOLINK/CROSS_REFERENCE/NOTRACE/SHAREABLE=KIT:DBLRTL.EXE/MAP=KIT:DBLRTL.MAP/FULL SOURCE:IMAGEID.OPT/OPTIONS,SOURCE:DBLRTLLNK.OPT/OPTIONSLIDENTIFICATION="DBLRTL V4.2-07"CNAME = "DBLRTL"$!E$! Read-only (shareable) code cluster!DCLUSTER = DBL$$$READONLY,,,0 0DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 89 ACOLLECT = DBL$$$READONLY, _DBL$$VECTOR, _DBL$TABLES, _DBL$CODE, -L" _DBL$CODE_FAR, _DBL$CODE_NEVER, - _LIB$CODE, LIB$CLI_CALLBACK, - ? MSG$AAAAAAAAAAA, MSG$AAAAAAAAAAB, MSG$AAAAAAAAAAC, MSG$SECTION ! $! Read-only (shareable) data cluster!kCLUSTER = DBL$$$READDATA,,,8"COLLECT = DBL$$$READDATA, _DBL$LIT! )! Read-write (non-shareable) data cluster ! CLUSTER = DBL$$$READWRITE,,,'COLLECT = DBL$$$READWRITE, _DBL$DATA, -B MSGPTR$AAAAAAAA, MSGPTR$AAAAAAAB, MSGPTR$AAAAAAAC, MSGPTR$SECTION!N!C! RTL object module library !U!L)! note the OBJ$ logical - it is here for U! the VMS build procedure.! J! OPCODE cluster - INTERP plus routines accessed via INTERP CASE statementCLUSTER = OPCODE_CLUSTER,,, - &OBJ$:DBLRTL.OLB/INCLUDE=$DBL$$VECTOR,-OBJ$:DBLRTL.OLB/INCLUDE=(- DBL$$SLEEP, - DBL$$LPQUE, -L DBL$$STROPS, - DBL$$READS, -0 DBL$$WRITES, - DBL$$DISPLAY, -  DBL$$ACCEPT, - DBL$$READ, - DBL$$WRITE, - DBL$$FORMS, -L DBL$$SEND_RECV, -  DBL$$ARRAY, -  DBL$$BIFUNC, -$ DBL$$XCALL, - ! external transfer-!1 DBL$$INTERP, - ! ***** middle of cluster!! ***X-! DBL$$PUSH, - ! push DBL$$STORE, - ! store# DBL$$FORMAT, - ! data formattingO DBL$$FOR, -  DBL$$MATH, - ! math DBL$$BOOLEAN, -  DBL$$CMPR, - ! compare/if DBL$$FIND, - DBL$$OPEN, - DBL$$CLOSE )6! JSB code cluster ( routines to which the RTL jsb's ) DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 90S8CLUSTER = JSBCODE_CLUSTER ,,, OBJ$:DBLRTL.OLB/INCLUDE=(-" DBL$$GET2DX, - ! get descriptor- DBL$$CONVERT, - ! data conversion routinesD DBL$$MODE_TRANS,-  DBL$$KEY_LOOKUP,-S DBL$$TRNLOG, - DBL$$CHANNEL, -F DBL$$CCB, -L" DBL$$GETVMCLR, - ! I/O routines DBL$$INIT, - ! Initialization DBL$$OPENTT, - DBL$$ERRTRANS, - DBL$$HANDLER, -F DBL$$SIGNAL, - DBL$$WHERE, -  DBL$$SELECT_CONVERT,-H DBL$$CVT_FUNCTIONS,- DBL$EXITHANDLER,-S DBL$SETCTL, -  DBL$$DBGEXT, - DBL$$TERM_IO, -  DBL$$FAB, - ! UESL routines DBL$ASCII, - DBL$DATE, -  DBL$DECML, - DBL$DELET, - DBL$ERROR, - DBL$FATAL, - DBL$FILEC, - DBL$FLAGS, - DBL$INSTR, - DBL$JBNO, -  DBL$MONEY, - DBL$PAK, - DBL$RENAM, - DBL$RSTAT, - DBL$RUNJB, - DBL$SIZE, -M DBL$TIME, -  DBL$TNMBR, - DBL$TTSTS, - DBL$VERSN, - DBL$WAIT, -8 - ! OSSL/RTSL routines DBL$AST, - DBL$BEGFL, - DBL$BKSTR, - DBL$CHAIN, - DBL$CPUTM, - DBL$CHOPEN, -  DBL$DELMBX, -02 DBL$DEVICE, - ! INCLUDES DBL$TTCHAR, DBL$DEVCLT DBL$EMPBUF, -  DBL$ENDFL, - FDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 91  DBL$ERRMOD, -  DBL$ERRTXT, -  DBL$EXECUTE_IMAGE_ROUTINE, - DBL$EXITS, - DBL$FUNCTION, -1 DBL$GETCM, - DBL$GETDFN, -3 DBL$GETFA, - DBL$GETFNM, -  DBL$GLINE, - DBL$ISMCRE, -  DBL$IXREAD, - DBL$KILL, -b DBL$LOCK, -  DBL$PARSE, - DBL$POSRFA, -- DBL$PURGE, - DBL$PUTCM, - DBL$RCVID, - DBL$RENAM_V1, -  DBL$RMSCC, - DBL$SETDFN, - DBL$SLICE, - DBL$SNDOP, - DBL$TTBRDCST, -E DBL$TTFLGS, -E DBL$TTNAME, -  DBL$TIMOUT, -  DBL$$TBXXX, -  DBL$USEROPEN, - DBL$XARGS, - DBL$XSTAT, - DBL$WKDAY, -" DBL$$RTLMSG, - ! Error handling DBL$$DDTMSG )1!Table cluster (read-only)4CLUSTER = TABLE_CLUSTER,,,OBJ$:DBLRTL.OLB/INCLUDE=(- DBL$$UPLOTABLE, -S DBL$TNMBR_TABLE,-  DBL$ANSI_TABLE,- DBL$DATA_TYPE_TABLE,-  DBL$ESC_TABLE )84COLLECT = TABLE_CLUSTER, _DBL$TABLES ! Get 'em all!! Data Cluster3CLUSTER = DATA_CLUSTER,,,OBJ$:DBLRTL.OLB/INCLUDE=(-  DBL$$DATA, - ! data areaF DBL$$IODB, - ! I/O data base2 DBL$$PATCH) ! patch areaCOLLECT=DATA_CLUSTER,_DBL$DATA! ! ! Universal symbolsE 8DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 92A!E"UNIVERSAL = DBL$GX_PATCHAREA, - DBL$K_PATCHAREASIZE, -F DBL$GB_CMP_MAJOR_VERSION, -E DBL$GB_CMP_MINOR_VERSION, -  DBL$GT_RTL_VERSION_STRING, - DBL$GT_RTL_OPSYS, - DBL$GT_RTL_SUBSYS, -D DBL$GT_RTL_RELEASETYPE, - DBL$GT_RTL_MAJORVERSION, - DBL$GT_RTL_MINORVERSION, - DBL$GT_RTL_PATCHLEVEL, -0 DBL$GL_FLAGS, -e DBL$$GL_DDTFLAGS, - DBL$$GL_INITFLAGS, -  DBL$$GA_DDTCMD, -  DBL$$GA_DDTMODINIT, -" DBL$$GX_LO_UP_STANDARD_TABLE, - DBL$TNMBR_TABLE, -  DBL$$K_MAXCHANS, -- DBL$$GV_CHANNELS, - DBL$$GL_CHANBLOCKS, - DBL$_FACILITY, - DBLUTL$_FACILITY, -) DBL$_RTL_BASE, - ! RTL error messages  DBL$_ENDOF_FIL, -  DBL$_EOF, -  DBL$_RETNO_CAL, -- DBL$_NOCALL, - DBL$_CMPERR, - DBL$_RECEXTCAL, -I DBL$_INCNUMARG, -  DBL$_ARGNUM, - DBL$_SUBERR, - DBL$_SUBSCR, - DBL$_WRIINTLIT, -l DBL$_WRTLIT, - DBL$_NOTENOMEM, -0 DBL$_NOMEM, -8 DBL$_ILLCHANUM, - DBL$_ILLCHN, - DBL$_CHANOTOPN, -  DBL$_NOOPEN, - DBL$_INPFROWRI, -l DBL$_ONLYWR, - DBL$_CHADEFERR, -  DBL$_UNDOPC, - DBL$_NUMTOOLON, -b DBL$_BIGNUM, - DBL$_CHAIN_USE, -2 DBL$_CHNUSE, - DBL$_BADFILSPC, -f DBL$_FILSPC, - DBL$_FILNOTFND, -4 DBL$_FNF, -  eDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 93o DBL$_HANNOTAVA, -  DBL$_BADDIGIT, - DBL$_DIGIT, -  DBL$_BADOPEN, -  DBL$_FILOPT, - DBL$_IO_ERROR, - DBL$_IOFALL, - DBL$_LINTOOLNG, -g DBL$_TOOBIG, - DBL$_NO_SPAFIL, -0 DBL$_NOSPAC, - DBL$_OUTFILFUL, -  DBL$_FILFUL, - DBL$_FLDRECLNG, -s DBL$_ILLRECNUM, -  DBL$_RECNUM, - DBL$_INCCOMPIL, -s DBL$_BADCMP, - DBL$_DIVBYZERO, -  DBL$_DIVIDE, - DBL$_ARGWROSIZ, -, DBL$_ARGSIZ, - DBL$_SUPEXIFIL, -, DBL$_REPLAC, - DBL$_TOOMNYCHN, -  DBL$_CHNEXC, - DBL$_DEVIN_USE, -T DBL$_DEVUSE, - DBL$_FILEINUSE, -I DBL$_FINUSE, - DBL$_OUTTOREAD, -  DBL$_ONLYRD, - DBL$_RECLOCKED, -o DBL$_LOCKED, - DBL$_ILEGALKEY, -  DBL$_BADKEY, - DBL$_KEYNOTSAM, -  DBL$_KEYNOT, - DBL$_NODUPKEYS, -R DBL$_NODUPS, - DBL$_NOTISMFIL, -  DBL$_JOBSTAERR, -- DBL$_ILLTRMNUM, - DBL$_NO_CURREC, -  DBL$_NOCURR, - DBL$_PROTVIOL, - DBL$_PROTEC, - DBL$_NO_SUCOPR, -  DBL$_RECNOTFND, -  DBL$_RNF, -- DBL$_SYSERROR, - DBL$_SYSTEM, - DBL$_ARGOUTORD, -  DBL$_ARGOUTLIM, -0 DBL$_ARGCOUNT, - sDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 94  DBL$_FLDNOTPAK, -: DBL$_ILLBIOSIZ, -  DBL$_WROSIZREC, -  DBL$_ARGMISS, -  DBL$_ARGMIS, - DBL$_INVSHRCOD, -r DBL$_RMSERROR, - DBL$_INVARGTYP, -0 DBL$_DBLRTLERR, - DBL$_FILE_ORG, - DBL$_FILORG, - DBL$_OUTOFRANG, -0 DBL$_OUTRNG, - DBL$_CALNOTDBL, -  DBL$_NOTDIB, - DBL$_EXQUOTA, -0 DBL$_DEVNOTRDY, - DBL$_INVOPNMOD, -i DBL$_IOMODE, - DBL$_CONTROL_C, -s DBL$_CANCEL, - DBL$_CONTROL_Y, -j DBL$_INTRPT, - DBL$_TIMEOUT, -  DBL$_OPENERROR, -  DBL$_INVALLOC, - DBL$_ALLOC, -  DBL$_INVBKTSIZ, - DBL$_BKTSIZ, - DBL$_INVBLKSIZ, -  DBL$_BLKSIZ, - DBL$_INVBUFSIZ, -o DBL$_BUFSIZ, - DBL$_INVRECSIZ, -s DBL$_RECSIZ, - DBL$_NOMSGMGR, - DBL$_FEANOTIMP, -l DBL$_QUENOTAVA, -d DBL$_INVKEYNUM, -  DBL$_FORGNTERM, -A DBL$_OUTATTERR, - I DBL$_INATTERR, -  DBL$_INVCHRERR, - B DBL$_FULBUFERR, - N DBL$_UNSUPDTYP, - C DBL$_INVMATCH, -  DBL$_INVCONTIG, - c DBL$_INVDEQ, -  DBL$_INVNUMREC, -I DBL$_NUMREC, -  DBL$_INVRECTYP, -  DBL$_INVALFDL, -  DBL$_INVBUFNUM, - 1 DBL$_INVPRO, -  DBL$_INVACL, -  YDIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 95S DBL$_TOOMNYSEG, - C DBL$_INVDATYP, -  DBL$_NO_RECSIZ, - t DBL$_INVALRFA, -  DBL$_NOTYETFUN, - $ DBL$_INVKEYPOS, - DBL$_INVKEYKRF, -a DBL$_INVKEYATR, -$ DBL$_STOP, - ! RTL info messages DBL$_AT_LINE, -B DBL$_PC_PSL, - DBL$_IOERRINFO, -A DBL$_NUMOFARGS, -P DBL$_SUBSCRPT1, -T DBL$_SUBSCRPT2, -  DBL$_ARG_NMBR, - DBL$_LOGCHAN, -e DBL$_ARG_SIZE, - DBL$_VALUE, - DBL$_ALLSNDBUF, -R DBL$_UNDEFLBL, - DBL$_OUTOFBND, - DBL$_WARNING, -O DBL$_STV, - DBL$_OPCODE, - DBL$_FILENAME, - DBL$_EXPIRED, -= DBL$_NUMDIMS, - DBL$_BOUNDS, -' DBLUTL$_TEXT, - ! General text infoW DBLDDT$_BASE, - ! DDT errors DBLDDT$_TITLE, - DBLDDT$_BREAK, - DBLDDT$_AT, -L DBLDDT$_INVDDTCOM, -  DBLDDT$_NOSUCHVAR, -F DBLDDT$_NOSUCHRTN, -! DBLDDT$_NOSUCHBPT, -  DBLDDT$_XOUTOFRAN, -i DBLDDT$_RMSERR, - DBLDDT$_SYSERR, -u DBLDDT$_SUBSCRERR, -o DBLDDT$_NOSUCBPAT, -a DBLDDT$_WRIINTLIT, -R DBLDDT$_NOCONT, -  DBLDDT$_ARGNOTPAS, - DBLDDT$_ABORT, - DBLDDT$_NOSYMRTN, - DBLDDT$_ERRHLPLIB, -O DBLDDT$_EXITSTATUS, - DBLDDT$_SHOWBREAK, -L DBLDDT$_NOSETBREAK, - DBLDDT$_LINERANGE, -R DBLDDT$_NOBREAKSET, - DBLDDT$_SHOWRTN  DIBOL$$ACCOUNT:[KITS.V42-07.KIT.B]DBLRTL.EXE;1 26-APR-1993 09:34 VAX-11 Linker V05-13 Page 96e!t!*! Match if less or equal, major=2, minor=0!/GSMATCH = LEQUAL, 2, 16386 ! 16386 = %H 004002$!N!,! End of link options!B$CCB, -L" DBL$$GETVMCLR, - ! I/O routines DBL$$INIT, - ! Initialization DBL$$OPENTT, - DBL$$ERRTRANS, - DBL$$HANDLER, -F DBL$$SIGNAL, - DBL$$WHERE, -  DBL$$SELECT_CONVERT,-H DBL$$CVT_FUNCTIONS,- DBL$EXITHANDLER,-S DBL$SETCTL, -  DBL$$DBGEXT, - DBL$$TERM_IO, -  DBL$$FAB, - ! UESL routines DBL$ASCII, - *[KITS.V42-07.KIT.B]DBLRTL.OLB;1+,0./G 4-80123 KPWO5|6`s7B7 [|89@A GGHJ<% VAX-11 Librarian V04-00B-p!HHPyy  D85$$ACCEPT_BEGIND85$$ACCEPT_ENDD85$$ACCEPT_KEYWORD: D85$$ADDI: D85$$ADDP D85$$ADDR: D85$$ADDS: D85$$ADDZ% D85$$ARG_ARG% D85$$ARG_DLIT% D85$$ARG_DSC%D85$$ARG_DSC_S% D85$$ARG_DVAL%D85$$ARG_DVAL_S% D85$$ARG_REF%D85$$ARG_REF_S%D85$$ARG_XTRNLY D85$$BAND D85$$BIFUNCY D85$$BNOTYD85$$BORY D85$$BXOR} D85$$CCHAR= D85$$CLOSEVT_SYM_VALqD85$$CVT_TOS_VALNDDYODED_SIGN_IN $DBL$$VECTOR DBL$$ACCEPTg DBL$$ARRAY DBL$$BIFUNCY DBL$$BOOLEANlDBL$$CCBo DBL$$CHANNEL= DBL$$CLOSE` DBL$$CMPRq DBL$$CONVERTDBL$$CVT_FUNCTIONS DBL$$DATA DBL$$DBGEXT DBL$$DDTMSG DBL$$DISPLAY DBL$$ERRTRANSDBL$$FAB4 DBL$$FIND-DBL$$FOR3 DBL$$FORMAT DBL$$FORMS DBL$$GET2DX DBL$$GETVMCLR DBL$$HANDLER DBL$$INIT DBL$$INTERP DBL$$IODBTLMSGDFLTALBL$TTSTS1q DBL$INTCVTDBL$INTERP_LINE DBL$ISMCRE DBL$IXREAD DBL$JBNAMDBL$JBNODBL$KILLDBL$K_PATCHAREASIZEDBL$K_RTL_BASELEVEL_LENDBL$K_RTL_VERSION_LENDBL$LOCKDBL$MBXNAME_R1 DBL$MONEYDBL$PAK DBL$PARSEZ DBL$POSRFAi DBL$PURGEx DBL$PUTCM DBL$RCVID DBL$RENAM DBL$RENAM_V1 DBL$RMSCC DBL$RSTAT DBL$RSTATD DBL$RUNJB DBL$SETCTL DBL$TTBRDCSTP DBL$TTCHAR D85$$CLOSEGD85$$CVT_TOS_VAL>D85$$FORBYSTEPIBD85$$LPQUE_END=D85$$OPEN_KEYWORD2D85$$OPEN_START_KEYS.D85$$PUSH_IM_SHORT D85$$RTSP D85$$STOREAS{ D85$$STOREZI| D85$$UMINUSPFDBGEXT$DBL_RTL_ENTRYDDBL$$CHANNEL_RANGECHECKC DBL$$CTRLY- DBL$$CVTIZ_A4DBL$$CVT_NZU_NZU6 DBL$$FABLUB3DBL$$GA_CDD_FIND_NODE,DBL$$GA_CDD_SIGN_INDBL$$GL_CHANBLOCKSDBL$$GP_RESULT_ENDDBL$$GV_CHANNELSBLKSIZb DBL$INSTR DBL$ISMCRE DBL$IXREADDBL$JBNODBL$KILLDBL$LOCK DBL$MONEYDBL$PAK DBL$PARSEZ DBL$POSRFAi DBL$PURGEx DBL$PUTCM DBL$RCVID DBL$RENAM DBL$RENAM_V1 DBL$RMSCC DBL$RSTAT DBL$RUNJB DBL$SETCTL DBL$SETDFNDBL$SIZE DBL$SLICE  DBL$SNDOPDBL$TIME DBL$TIMOUT DBL$TTSTS DBL$USEROPEN DBL$VERSNDBL$WAIT DBL$WKDAY DBL$XARGS DBL$$IODBA DBL$$RTLMSG7 DBL$CPUTM DBL$ENDFL5 DBL$FATAL+ DBL$GLINE DBL$SLICE( DBL$XSTAT1 DBL$FUNCTIONDBL$GB_CMP_MAJOR_VERSIONDBL$GB_CMP_MINOR_VERSIONI DBL$GETCMM DBL$GETDFN` DBL$GETFAr DBL$GETFNM} DBL$GLINE DBL$GL_FLAGSDBL$GL_TTFLAGSDBL$GQ_TERM_8BITMASKDBL$GQ_TERM_ECHOMASKDBL$GQ_TERM_NOECHOMASK DBL$GTENTDBL$GT_BASELEVEL_DATEDBL$GT_BASELEVEL_TYPEDBL$GT_BASELEVEL_XXXXTRINGDBL$GT_RTL_MAJORVERSIONDBL$GW_ERROR_LINEDBL$GW_ERROR_NUMBERTR1 DBL$EXITERRORDBL$EXITHANDLER DBL$EXITSUBDBL$EXITSUB_VAL DBL$FATAL DBL$FILEC DBL$FLAGS1^ DBL$EMPBUFf DBL$ENDFLl DBL$ERRMODu DBL$ERRORDBL$ERRTRANS_R1z DBL$ERRTXT DBL$ESC_TABLEDBL$EXECUTE_IMAGE_ROUTINEz?DBL$$GW_ERROR_MODLINEDBL$$GW_MSGMGR_MBXCHANDBL$$GW_RECV_MBXCHANDBL$$GW_TTMBX_CHANDBL$$GX_CHANZERODBL$$GX_CSI_CODESDBL$$GX_CSI_TABLEDBL$$GX_LO_UP_NOSTANDARD_TABLEDBL$$GX_LO_UP_STANDARD_TABLEDBL$$GX_SAVE_AREADBL$$GX_SS3_CODESDBL$$GX_SS3_TABLEDBL$$GX_TERM_8BITMASKDBL$$GX_UPONLY_ECHODBL$$GX_UP_LO_NOSTANDARD_TABLEDBL$$GX_UP_LO_STANDARD_TABLEDBL$$K_DFNDDFSIZEDBL$$K_DFNISMSIZERlDBL$$GA_ERROR_MODNAMEDBL$$GA_EXITHADBL$$GA_EXITSTATUSDBL$$GA_INTERPDBL$$GA_LABEL_ADDRESSDBL$$GA_MAIN_MODNAMEDBL$$GA_TTMBX_MESSAGE_ASTDBL$$GA_TTMBX_NAMEDBL$$GA_USEROPENDBL$$GB_CTRLC_ACTIONDBL$$GB_CTRLY_ACTIONDBL$$GB_CURRENCYDBL$$GB_CURRENCY_DEFAULTDBL$$GB_DIGIT_SEPDBL$$GB_DIGIT_SEP_DEFAULTDBL$$GB_FATALFUNCDBL$$GL_CHANBLOCKSDBL$$GT_TTMBXMSGDBL$$GV_CHANNELSWlDBL$$GB_DIGIT_SEPDBL$$GB_DIGIT_SEP_DEFAULTDBL$$GB_FATALFUNCDBL$$GB_MSGMGR_FUNCDBL$$GB_NUMASTSDBL$$GB_PROCNUMDBL$$GB_RADIX_PTDBL$$GB_RADIX_PT_DEFAULTDBL$$GB_UPDATE_DEFERRED_WRITEDBL$$GDIT_ACCUM1DBL$$GDIT_ACCUM1_ENDDBL$$GDIT_ACCUM1_INTENDDBL$$GDIT_ACCUM2DBL$$GDIT_ACCUM2_ENDDBL$$GDIT_ACCUM2_INTENDDBL$$GDIT_RESULTDBL$$GL_CHANBLOCKSDBL$$GT_TTMBXMSGDBL$$GV_CHANNELSolDBL$$GDIT_ACCUM2_ENDDBL$$GDIT_ACCUM2_INTENDDBL$$GDIT_RESULTDBL$$GDIT_RESULT_ENDDBL$$GDIT_RESULT_INTEND DBL$$GET2DX DBL$$GET2DXR DBL$$GET3DXl DBL$$GETCCBlDBL$$GETCCBZOK DBL$$GETVMCLR DBL$$GET_KEY` DBL$$GET_QUADDBL$$GL_ASTBASEADDRDBL$$GL_CDD_CONTEXTDBL$$GL_CHANBLOCKSASKDBL$$GL_DDTFLAGSDBL$$GL_EXITHCBDBL$$GL_EXITSTATUSDBL$$GL_IFLAGSDBL$$GL_INITFLAGSL$$GV_CHANNELS}lDBL$$GL_LOCKPAGESDBL$$GL_LPQUE_ENTRYDBL$$GL_MAXCHANNELDBL$$GL_RECV_BUFQUODBL$$GL_SAVEAPDBL$$GL_SAVEFPDBL$$GL_SAVESPDBL$$GL_SYSERROR_NUMBERDBL$$GL_TTUNITDBL$$GO_TERM_ECHOMASKDBL$$GP_ACCUM1DBL$$GP_ACCUM1_ENDDBL$$GP_ACCUM2DBL$$GP_ACCUM2_ENDDBL$$GP_RESULTDBL$$GP_RESULT_ENDNGDBL$$GQ_TTMBX_DSCDBL$$GQ_TTMBX_IOSBDBL$$GTC_DFNDDFDBL$$GT_TTMBXMSGDBL$$GV_CHANNELSlDBL$$GQ_DSC_TSEQ_STRINGDBL$$GQ_TTMBX_DSCDBL$$GQ_TTMBX_IOSBDBL$$GTC_DFNDDFDBL$$GTC_DFNISMDBL$$GTC_FATALNAMEDBL$$GTC_IMAGE_NAMEDBL$$GTC_TTNAMEDBL$$GT_DFNDDFDBL$$GT_DFNISMDBL$$GT_FATALNAMEDBL$$GT_IMAGE_NAMEDBL$$GT_MSGMGR_REQDBL$$GT_RECV_IDDBL$$GT_RECV_MBXNAMEDBL$$GT_TTMBXMSGDBL$$GT_TTMBX_NAMEDBL$$GT_TTNAMEDBL$$GT_TTNMBRDBL$$GV_CHANNELSp1) DBL$TTFLGS DBL$TTNAME DBL$TTSTS%DBL$TT_NAME_TO_NUMBER%DBL$TT_NUMBER_TO_NAME DBL$ULOCK DBL$UNPAK DBL$USEROPEN DBL$VERSNDBL$WAIT DBL$WHERE_R1 DBL$WKDAY DBL$XARGS1 DBL$XSTAT DBL$_ALLOCDBL$_ALLSNDBUF DBL$_ARGCOUNT DBL$_ARGMIS DBL$_ARGMISS DBL$_ARGNUMIMDBL$_ARGOUTORD DBL$_ARGSIZDBL$_ARGWROSIZ DBL$_ARG_NMBR DBL$_ARG_SIZE DBL$_AT_LINEL$_BLKSIZRRDBLDDT$_SHOWBREAKDBLDDT$_SHOWRTNDBLDDT$_SUBSCRERRDBLDDT$_SYSERR DBLDDT$_TITLEDBLDDT$_WRIINTLITDBLDDT$_XOUTOFRANDBLUTL$_FACILITY DBLUTL$_TEXTINIT_OTODBLDDT$_NOSUCBPATDBLDDT$_NOSUCHBPTDBLDDT$_NOSUCHRTNDBLDDT$_NOSUCHVARDBLDDT$_NOSYMRTNDBLDDT$_RMSERRDBLDDT$_FACILITYDBLDDT$_INVDDTCOMDBLDDT$_LINERANGEDBLDDT$_NOBREAKSETDBLDDT$_NOCONTDBLDDT$_NOSETBREAKDBLDDT$_ARGNOTPAS DBLDDT$_AT DBLDDT$_BASE DBLDDT$_BREAKDBLDDT$_ERRHLPLIBDBLDDT$_EXITSTATUSDBL$_STV DBL$_SUBERR DBL$_SUBSCRDBL$_SUBSCRPT1DBL$_SUBSCRPT2DBL$_SUPEXIFIL DBL$_SYSERROR DBL$_SYSTEM DBL$_TIMEOUT DBL$_TOOBIGDBL$_TOOMNYCHNDBL$_TOOMNYSEG DBL$_UNDEFLBL DBL$_UNDOPCDBL$_UNSUPDTYP DBL$_VALUE DBL$_WARNINGDBL$_WRIINTLITDBL$_WROSIZREC DBL$_WRTLIT DBLDDT$_ABORT DBL$_NOOPEN DBL$_NOSPAC DBL$_NOTDIBDBL$_NOTENOMEMDBL$_NOTISMFILDBL$_NOTYETFUNDBL$_NO_CURRECDBL$_NO_RECSIZDBL$_NO_SPAFILDBL$_NO_SUCOPR DBL$_NUMDIMSDBL$_NUMOFARGS DBL$_NUMRECDBL$_NUMTOOLON DBL$_ONLYRD DBL$_ONLYWR DBL$_OPCODEDBL$_OPENERRORDBL$_OUTATTERRDBL$_OUTFILFULNG DBL$_OUTRNGDBL$_OUTTOREAD DBL$_PC_PSL DBL$_PROTEC DBL$_PROTVIOLW'DBL$_INVKEYNUMDBL$_INVKEYPOS DBL$_INVMATCHDBL$_INVNUMRECDBL$_INVOPNMOD DBL$_INVPRODBL$_INVRECSIZDBL$_INVRECTYPDBL$_INVSHRCODDBL$_IOERRINFO DBL$_IOFALL DBL$_IOMODE DBL$_IO_ERRORDBL$_JOBSTAERR DBL$_KEYNOTDBL$_KEYNOTSAMDBL$_LINTOOLNG DBL$_LOCKED DBL$_LOGCHAN DBL$_NOCURRDBL$_NODUPKEYS DBL$_NODUPS DBL$_NOMEM DBL$_NOMSGMGR DBL$_NONLOCAL'DBL$_INVARGTYPDBL$_INVBKTSIZDBL$_INVBLKSIZDBL$_INVBUFNUMDBL$_INVBUFSIZDBL$_INVCHRERRDBL$_INVCONTIG DBL$_INVDATYP DBL$_INVDEQDBL$_INVKEYATRDBL$_INVKEYKRF' DBL$_FILE_ORG DBL$_FILFULDBL$_FILNOTFND DBL$_FILOPT DBL$_FILORG DBL$_FILSPC DBL$_FINUSEDBL$_FLDNOTPAKDBL$_FLDRECLNGDBL$_FNFDBL$_FORGNTERMDBL$_FULBUFERRDBL$_HANNOTAVADBL$_ILEGALKEYDBL$_ILLBIOSIZDBL$_ILLCHANUM DBL$_ILLCHNDBL$_ILLRECNUMDBL$_ILLTRMNUM DBL$_INATTERRWRI DBL$_INTRPT DBL$_INVACL DBL$_INVALFDL DBL$_INVALLOC DBL$_INVALRFA:'DBL$_DBLRTLERRDBL$_DEVIN_USEDBL$_DEVNOTRDY DBL$_DEVUSE DBL$_DIGITDBL$_DIVBYZERO DBL$_DIVIDEDBL$_DTYPEINFODBL$_ENDOF_FILDBL$_EOF DBL$_EXPIRED DBL$_EXQUOTA DBL$_FACILITYDBL$_FEANOTIMPDBL$_FILEINUSE DBL$_FILENAMEDBL$_QUENOTAVADBL$_RECEXTCALDBL$_RECLOCKEDDBL$_RECNOTFND DBL$_RECNUM DBL$_RECSIZ DBL$_REPLACDBL$_RETNO_CAL DBL$_RMSERRORDBL$_RNF DBL$_RTL_BASE DBL$_STOP' DBL$_BOUNDS DBL$_BUFSIZDBL$_CALNOTDBL DBL$_CANCELDBL$_CHADEFERRDBL$_CHAIN_USEDBL$_CHANOTOPN DBL$_CHNEXC DBL$_CHNUSE DBL$_CMPERRDBL$_CONTROL_CDBL$_CONTROL_YDBL$_OUTFILFUL DBL$_PROTVIOL DBL$_STOP DBLDDT$_ABORTDBLDDT$_EXITSTATUSDBLDDT$_NOSETBREAKDBLDDT$_RMSERRINIT_OTOTEXT#B~ DIBOL042.B08[KITS.V42-07.KIT.B]DBLRTL.OLB;1S;1@'|zDBL$$GA_CDD_SIGN_INlDBL$$GV_CHANNELS? DBL$$TTNAMNUM1 DBL$_BLKSIZ' DBL$_NONLOCALINIT_OTO DBL$_OUTOFBNDDBL$_OUTOFRANG DBL$_OUTRNGDBL$_OUTTOREAD DBL$_PC_PSL DBL$_PROTEC DBL$_PROTVIOL'DBL$_INCCOMPILDBL$_INCNUMARGDBL$_INPFROWRI DBL$_INTRPT DBL$_INVACL DBL$_INVALFDL DBL$_INVALLOC DBL$_INVALRFA' DBL$_LOCKED DBL$_LOGCHAN DBL$_NOCALL DBL$_NOCURRDBL$_NODUPKEYS DBL$_NODUPS DBL$_NOMEM DBL$_NOMSGMGR DBL$_NONLOCALV?DBL$$K_RECV_MBXNAME_LENDBL$$K_SAVE_AREA_LENDBL$$K_SS3_ENTRIESDBL$$K_TTMBXMSG_SIZEDBL$$K_TTNMBR_LEN\ DBL$$LPQUE\DBL$$LPQUE_ALIGN\DBL$$LPQUE_COPIES\DBL$$LPQUE_DELETE\DBL$$LPQUE_DELETE_WITH_VALUE\DBL$$LPQUE_FORM\DBL$$LPQUE_LPNUM\DBL$$LPQUE_STARTl DBL$$MAKCCBlDBL$$MAKCCB_TTDBL$$MODE_TO_CODEDBL$$MODE_TRANSB DBL$$OPENBDBL$$OPEN_ALLOCBDBL$$OPEN_BKTSIZBDBL$$OPEN_BLKSIZ?DBL$$K_FATALNAMESIZEDBL$$K_IMAGE_NAME_LENDBL$$K_MAXCHANSDBL$$K_MSGMGR_REQ_LENDBL$$K_RECV_ID_LENb?DBL$$GX_UP_LO_ECHODBL$$GX_UP_LO_NOSTANDARD_TABLEDBL$$GX_UP_LO_STANDARD_TABLE DBL$$HANDLER` DBL$$IFTEST: DBL$$INCR: DBL$$INCRP: DBL$$INCR_B: DBL$$INCR_S: DBL$$INCR_W DBL$$INTERP: DBL$$I_COMMONDBL$$KEY_LOOKUPDBL$$K_CSI_ENTRIESDBL$$K_DFNDDFSIZEDBL$$K_DFNISMSIZE1 DBL$_BADCMP DBL$_BADDIGITDBL$_BADFILSPC DBL$_BADKEY DBL$_BADOPEN DBL$_BIGNUM DBL$_BKTSIZ DBL$_BLKSIZDBL$_CONTROL_Y DBL$_FILENAME DBL$_INATTERR! DBL$_INVALRFADBL$_INVKEYKRFDBL$_LINTOOLNG" DBL$_NONLOCAL  DBL$SNDOPDBL$TIME DBL$TIMOUT% DBL$TNMBR,DBL$TNMBR_TABLE DBL$TTBRDCST) DBL$TTFLGS DBL$TTNAME DBL$TTSTS DBL$USEROPEN DBL$VERSNDBL$WAIT DBL$WKDAY DBL$XARGS1 DBL$XSTAT"1 DBL$SETDFNZ DBL$SETKRFDBL$SIZE DBL$SLICE  DBL$SNDOP DBL$TBBIN DBL$TBMOD DBL$TBMUL DBL$TBRET DBL$TBRPLDBL$TIME DBL$TIMOUT% DBL$TNMBR,DBL$TNMBR_TABLEDBL$TRACEBACK_R5 DBL$TTBRDCSTP DBL$TTCHARlDBL$$GA_CDD_SIGN_OUTDBL$$GA_COLLATING_TABLEDBL$$GA_DBLBIND_PSECTDBL$$GA_DDTCMDDBL$$GA_DDTMODINIT DBL$FILEC DBL$FLAGS DBL$FUNCTIONI DBL$GETCMM DBL$GETDFN` DBL$GETFAr DBL$GETFNM} DBL$GLINEDBL$$GA_CDD_GET_ENT_ATTDBL$$GA_CDD_GET_STR_ATTDBL$$GA_CDD_GET_STR_CELLDBL$$GA_CDD_GET_STR_LIST_ATTDBL$$GA_CDD_SIGN_INqq DBL$$CVTAIq DBL$$CVTAIPKq DBL$$CVTAIQq DBL$$CVTAIZq DBL$$CVTAPKq DBL$$CVTAZ DBL$$CVTDXDXq DBL$$CVTIAq DBL$$CVTIA_R1q DBL$$CVTIPKAq DBL$$CVTIPKIZq DBL$$CVTIPKZq DBL$$CVTIQAq DBL$$CVTIQPKq DBL$$CVTIQZq DBL$$CVTIZq DBL$$CVTIZAq DBL$$CVTIZIPKq DBL$$CVTIZPKq DBL$$CVTIZ_A DBL$$CVTPKIq DBL$$CVTPKIQq DBL$$CVTPKIZq DBL$$CVTPKZDBL$$DATA_TYPE_TABLEl DBL$$FABLUBDD_FIND_NODE~BD85$$OPEN_START_KEY_SEGSBD85$$OPEN_START_SEGY D85$$OPOR} D85$$PUSH} D85$$PUSH_1} D85$$PUSH_2} D85$$PUSH_2AS}D85$$PUSH_2ASX} D85$$PUSH_2X} D85$$PUSH_ARG}D85$$PUSH_ARG1}D85$$PUSH_ARG2}D85$$PUSH_ARG2X}D85$$PUSH_ARGARY}D85$$PUSH_ARGN} D85$$PUSH_ARY}D85$$PUSH_IM_LONG}D85$$PUSH_IM_SHORTD85$$ROUNDN: D85$$ROUNDP: D85$$ROUNDZ: D85$$RTSI: D85$$RTSN: D85$$RTSPEAPm D85$$STOREASY1% DBL$$TTNUMNAM DBL$$TTSTS0: DBL$$UMINUS_B: DBL$$UMINUS_S: DBL$$UMINUS_WDBL$$WAIT_FUNCTIONDBL$$WAIT_SETEF DBL$$WHERE_AT DBL$$WRITES_L DBL$$WRITES_X DBL$$WRITE_L DBL$$WRITE_XYDBL$$XOR% DBL$$XRET%DBL$$XRETURN_STATUSqDBL$AB_CVTPT_Z/DBL$ANSI_TABLE DBL$ASCII DBL$ASTRST DBL$ASTSAV DBL$CHAIN DBL$CHOPEN DBL$CPUTMB DBL$CREMBXq DBL$CVTAZ_R1q DBL$CVTIIVTPKIQ_A?BDBL$$OPEN_BUFSIZBDBL$$OPEN_CHANDLCBDBL$$OPEN_CHANDXCBDBL$$OPEN_RECSIZY DBL$$OPORYDBL$$OR DBL$$POP1 DBL$$POP_DSCDBL$$PROBEW_HANDLERDBL$$PROBEW_USERACTION DBL$$PROC} DBL$$PUSH_ARG}DBL$$PUSH_ARG1}DBL$$PUSH_ARG2} DBL$$PUSH_B} DBL$$PUSH_B1} DBL$$PUSH_B2} DBL$$PUSH_W1} DBL$$PUSH_W2DBL$$SETUP_FAB DBL$$SIGNAL DBL$$SLEEPm DBL$$STOREPPm DBL$$STOREZZm DBL$$STORE_B/ DBL$ASTSAV DBL$CVTIIV@ DBL$CVTPKIQ_A: DBL$DEVCLT DBL$EXECUTE_IMAGE_ROUTINE DBL$FLAGSDBL$GT_BASELEVEL_XXXX<DBL$GW_ERROR_NUMBER; DBL$INSTR DBL$SETCTL) DBL$TTCHAR DBL$_ARGNUM9 DBL$_AT_LINE& DBL$_BLKSIZBD85$$OPEN_KEY_ENDBD85$$OPEN_KEY_KEYWORDBD85$$OPEN_KEY_SEG_KEYWORDBD85$$OPEN_MODEBD85$$OPEN_START_KEYS2gDBL$$FIND_ARRAY_ELEMDBL$$FLAG8_CLRDBL$$FLAG8_SETDBL$$FLAGS_SET- DBL$$FORBY1-DBL$$FORBYSTEP3 DBL$$FORMAT3DBL$$FORMAT_NEW DBL$$FORMS_L DBL$$FORMS_XDBL$$FREE_DYN_STRING DBL$$FREE_KEYDBL$$GA_BRDCSTASTDBL$$GA_CDD_FIND_NODEgq DBL$$CVTPKAq DBL$$CVTPKIq DBL$$CVTPKIQq DBL$$CVTPKIZq DBL$$CVTPKZq DBL$$CVTZAq DBL$$CVTZIq DBL$$CVTZIPKq DBL$$CVTZIQq DBL$$CVTZI_Aq DBL$$CVTZPK DBL$$CVT_DSCAqDBL$$CVT_LONG_TO_NUMqDBL$$CVT_LONG_TO_NUM_R23qDBL$$CVT_NUM_TO_LONGqDBL$$CVT_NUM_TO_LONG_R23qDBL$$CVT_NZU_NZUINqDBL$$CVT_TO_BITSDBL$$CVT_TO_HEXDBL$$CVT_TO_OCTDBL$$DATA_TYPE_TABLE DBL$$ERRTRANSl DBL$$FABLUBl DBL$ERRMODu DBL$ERRORz DBL$ERRTXT DBL$ESC_TABLEDBL$EXECUTE_IMAGE_ROUTINEDBL$EXITHANDLER DBL$EXITS DBL$FATALDBL$$CVT_TO_BINqDBL$$CVT_TO_BITSDBL$$CVT_TO_HEXDBL$$CVT_TO_OCTDBL$$DATA_TYPE_TABLEDBL$$DEALLOC_FAB: DBL$$DECR_S: DBL$$DIV_B: DBL$$DIV_S: DBL$$DIV_W DBL$$DSPLYDLC DBL$$DSPLYDXC DBL$$ERRTRANSl DBL$$FABLUBDBL$$SELECT_CONVERTDBL$$SEND_RECV DBL$$SIGNAL DBL$$SLEEPm DBL$$STORE DBL$$STROPS DBL$$TBXXX DBL$$TERM_IO DBL$$TRNLOGDBL$$UPLOTABLE DBL$$WHERE DBL$$WRITE DBL$$WRITES% DBL$$XCALL/DBL$ANSI_TABLE DBL$ASCIIDBL$AST DBL$BEGFL DBL$BKSTR DBL$CHAIN DBL$CHOPEN DBL$CPUTMATE DBL$DECML DBL$DELETK DBL$DELMBXP DBL$DEVICE^ DBL$EMPBUFf DBL$ENDFL?lDBL$$MAKCCB_TT DBL$$MBXNAMEDBL$$MODE_TO_CODEDBL$$MODE_TRANS: DBL$$MUL_B: DBL$$MUL_S: DBL$$MUL_WDBL$$ONERROR_GOY DBL$$OPANDB DBL$$OPEN DBL$$OPENTTBDBL$$OPEN_ALLOCBDBL$$OPEN_BKTSIZBDBL$$OPEN_BLKSIZ1DBL$_ARGOUTLIMDBL$_ARGOUTORD DBL$_ARGSIZDBL$_ARGWROSIZ DBL$_ARG_NMBR DBL$_ARG_SIZE DBL$_AT_LINE1q DBL$CVTPKI_Aq DBL$CVTZA_R1q DBL$CVTZIq DBL$CVTZIA_R1q DBL$CVTZIQ_R1q DBL$CVTZI_R1DBL$DATE DBL$DECML DBL$DELETK DBL$DELMBXP DBL$DEVCLT1DBL$GW_RSTAT_RSZDBL$GW_RSTAT_TERMCODEDBL$GX_PATCHAREA DBL$HANDLERDBL$INIT DBL$INIT85 DBL$INSTR1DBL$GT_RTL_BASELEVEL_STRINGDBL$GT_RTL_MAJORVERSIONDBL$GT_RTL_MINORVERSIONDBL$GT_RTL_OPSYSDBL$GT_RTL_PATCHLEVELDBL$GT_RTL_RELEASETYPEDBL$GT_RTL_SUBSYSDBL$GT_RTL_VERSION_STRINGDBL$GW_ERROR_LINEDBL$GW_ERROR_NUMBER\D85$$LPQUE_KEYWORD: D85$$MULI: D85$$MULP: D85$$MULS: D85$$MULZYD85$$NOTY D85$$OPANDBD85$$OPEN_BEGINB D85$$OPEN_ENDBD85$$OPEN_END_KEY_SEGSBD85$$OPEN_END_SEGBD85$$OPEN_KEYWORD: D85$$DECRI: D85$$DECRP: D85$$DECRS: D85$$DECRZD85$$DISPLAY_ATTS_KEYWORDD85$$DISPLAY_BEGIND85$$DISPLAY_END: D85$$DIVDIVI: D85$$DIVDIVP: D85$$DIVDIVS: D85$$DIVDIVZ: D85$$DIVI: D85$$DIVP: D85$$DIVS: D85$$DIVZD85$$END_ATTS_OUT4D85$$FIND_BEGIN4 D85$$FIND_END4D85$$FIND_KEYWORD- D85$$FORBY1I-D85$$FORBY1IMP- D85$$FORBY1N-D85$$FORBYSTEPIQUE_BEGIN\D85$$LPQUE_END DBL$$GX_UPONLY_ECHO%DBL$$K_DFNISMSIZE$DBL$$K_RECV_ID_LEN# DBL$$MAKCCB8DBL$$OPEN_BLKSIZ0 DBL$$PUSH_W2 DBL$$STORE_B DBL$$TBXXXE DBL$$TTNAMNUM1q DBL$CVTINTq DBL$CVTIQZ_R1q DBL$CVTIZq DBL$CVTIZA_R1q DBL$CVTIZVq DBL$CVTIZ_R1q DBL$CVTPKA_Aq DBL$CVTPKIQ_ADBL$$KEY_LOOKUP\ DBL$$LPQUE: DBL$$MATHDBL$$MODE_TRANSB DBL$$OPEN DBL$$OPENTT DBL$$PATCH} DBL$$PUSH DBL$$READ DBL$$READS DBL$$RTLMSG&-D85$$FORBYSTEPIMP-D85$$FORBYSTEPN3 D85$$FORMAT D85$$FORMS% D85$$FRETURN%D85$$FRETURN_VAL` D85$$IFTEST`D85$$IFTEST_NOFF: D85$$INCRI: D85$$INCRP: D85$$INCRS: D85$$INCRZ D85$$INTERP\D85$$LPQUE_BEGIN\D85$$LPQUE_ENDl DBL$$CLOCCB= DBL$$CLOSEDLC= DBL$$CLOSEDXC=DBL$$CLOSE_CHAN` DBL$$CMPR_EQA` DBL$$CMPR_EQD` DBL$$CMPR_GEA` DBL$$CMPR_GED` DBL$$CMPR_GTA` DBL$$CMPR_GTD DBL$$CMPR_KEY` DBL$$CMPR_LEA` DBL$$CMPR_LED` DBL$$CMPR_LTA` DBL$$CMPR_LTD` DBL$$CMPR_NEA` DBL$$CMPR_NED`DBL$$CMPR_P_SETUP`DBL$$CMPR_Z_SETUP DBL$$CTRLC DBL$$CTRLY;DBL$$ACCPTDLC_LDBL$$ACCPTDLC_NDBL$$ACCPTDXC_LDBL$$ACCPTDXC_N: DBL$$ADDP: DBL$$ADDZ: DBL$$ADD_B: DBL$$ADD_S: DBL$$ADD_WYDBL$$AND% DBL$$ARG_ARG% DBL$$ARG_DSC%DBL$$ARG_DSC_S% DBL$$ARG_REF%DBL$$ARG_REF_SoDBL$$CHANNEL_RANGECHECK?DBL$$TERM_IO_FORMATDBL$$TERM_IO_POSITIONDBL$$TRACEBACK DBL$$TRNLOGDBL$$TSEQ_SAVEDBL$$TTMBX_AST% DBL$$TTNAMNUM,: D85$$UMINUSS: D85$$UMINUSZD85$$WRITES_BEGIND85$$WRITES_ENDD85$$WRITES_KEYWORDD85$$WRITE_BEGIND85$$WRITE_ENDD85$$WRITE_KEYWORD% D85$$XCALL% D85$$XFUNCYD85$$XOR% D85$$XRETURN%D85$$XRETURN_STATUSDBGEXT$DBL_RTL_ENTRY=D85$$CLOSE_KEYWORD` D85$$CMPR_EQ` D85$$CMPR_GE` D85$$CMPR_GT` D85$$CMPR_LE` D85$$CMPR_LT` D85$$CMPR_NEq D85$$CVTNIq D85$$CVTNPq D85$$CVTNZqD85$$CVT_SYM_VALqD85$$CVT_TOS_VALlDBL$$GL_CTRLMASKDBL$$GL_DDTFLAGSDBL$$GL_EXITHCBDBL$$GL_EXITSTATUSDBL$$GL_IFLAGSDBL$$GL_INITFLAGS J1B4.0-07 DBL$GETCM4.0-026-APR-1993 09:30 VAX MACRO V5.4-3IMACRO/OBJ=DBLGETCM SOURCE:ENVIRON.MAR+SOURCE:DBLGETCM+DBLRTLMAC.MLB/LIBDBL XCALL GETCM DBL$GETCM DBL$$ERRTRANSDBL$$PROBEW_HANDLER DBL$$SIGNAL DBL$_ARGMISSDBL$_INCNUMARGDBL$_NUMOFARGSDBL$_WRIINTLITLIB$GET_COMMON . ABS .P_DBL$CODE_NEVER PDBL$GETCMQ Q    DBL$GETCM&llDBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNALլ DBL$_ARGMISS DBL$$SIGNALN}PPPmDBL$$PROBEW_HANDLERmaaЎmPDBL$_WRIINTLIT DBL$$SIGNALlLIB$GET_COMMONP DBL$$ERRTRANSPQ DBL$$SIGNAL  DBL$GETCM _DBL$CODE_NEVERwwL1*C4.26 DBL$DELMBX4.226-APR-1993 09:30 VAX MACRO V5.4-3KMACRO/OBJ=DBLDELMBX SOURCE:ENVIRON.MAR+SOURCE:DBLDELMBX+DBLRTLMAC.MLB/LIBDELETE MAILBOX DBL$DELMBXDBL$$CLOSE_CHANDBL$$CVT_NUM_TO_LONG DBL$$GETCCB DBL$$SIGNAL DBL$_ARGMISS SYS$ASSIGN SYS$DASSGN SYS$DELMBX . ABS .P$ABS$P _DBL$LITPDBL$DELMBXQ Q d _DBL$CODE_NEVERP< < DBL$DELMBX&ЬQFDBL$$CVT_NUM_TO_LONGPR DBL$$GETCCBݫTR~~^S|~c SYS$ASSIGN0Y} P,n0Pa}d Pl Sլ(NЮ$,nXPX`PV`Ь(PРQ<`RPa0a  SPcQRPV$,ndfdfЬ QDBL$$CVT_NUM_TO_LONGPЬQDBL$$CVT_NUM_TO_LONGP.lլЬQDBL$$CVT_NUM_TO_LONGPѮ1| P`P`lլ ЬPРlլ ЬPРn1dЦV< PP<PP,ndfdfnЮSм RDBL$$CVT_NUM_TO_LONG_R23PЮSмRDBL$$CVT_NUM_TO_LONG_R23P.ծ<PPЮSмRDBL$$CVT_NUM_TO_LONG_R23Pծ<PPЮSмRDBL$$CVT_NUM_TO_LONG_R23Pn`ԦW SYS$CREATEP Ю P DBL$$ERRTRANSݧ ݮQ DBL$$SIGNALW SYS$CLOSE$ LIB$FREE_VMЮ P _DBL$CODE_NEVER _DBL$CODE_NEVERww 1 I4.2-07 DBL$FILEC4.2-026-APR-1993 09:30 VAX MACRO V5.4-3IMACRO/OBJ=DBLFILEC SOURCE:ENVIRON.MAR+SOURCE:DBLFILEC+DBLRTLMAC.MLB/LIBDBL RTL XCALL FILEC DBL$FILEC DBL$$ERRTRANS DBL$$SIGNAL DBL$_ARGMISSDBL$_INCNUMARGDBL$_IOERRINFODBL$_NUMOFARGSDBL$_WRIINTLITLIB$FIND_IMAGE_SYMBOL . ABS .P_DBL$LIT/PFDLSHRFDL$CREATEDBL$FILECQ Q $ABS$PPPPP_DBL$CODE_NEVERP< < DBL$FILEC&gllDBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNAL1ЬS1ЬR1~^Q^T ^UQUTLIB$FIND_IMAGE_SYMBOL^^QSRՎP6Ы QʏH DBL$$ERRTRANSݫ PݫTR~ݫXJ3.0-08 DBL$IXREAD3.0-026-APR-1993 09:31 VAX MACRO V5.4-3KMACRO/OBJ=DBLIXREAD SOURCE:ENVIRON.MAR+SOURCE:DBLIXREAD+DBLRTLMAC.MLB/LIBIndexed read subroutine DBL$IXREADDBL$$CVT_NUM_TO_LONG DBL$$ERRTRANS DBL$$FREE_KEY DBL$$GETCCB DBL$$GET_KEYDBL$$PROBEW_HANDLER DBL$$READIDX DBL$$SIGNAL DBL$_ARGMISS DBL$_BADOPENDBL$_ILEGALKEYDBL$_INCNUMARGDBL$_IOERRINFO DBL$_NUMOFARGSDBL$_WRIINTLIT . ABS .P$ABS$ PPP_DBL$CODE_NEVER!PDBL$IXREADQ Q   DBL$IXREAD&柯ll1 ЬQ1DBL$$CVT_NUM_TO_LONGPR/P DBL$$GETCCBȏHH1  P1ЬV1PfmDBL$$PROBEW_HANDLERmЎmP1}fVЬ T+l1ЬQ1DBL$$CVT_NUM_TO_LONGeQPQ1 DBL$$GET_KEY"}dTPlЬQDBL$$CVT_NUM_TO_LONGeQPQ1 DBL$$READIDXլ  DBL$$FREE_KEYP6Ы QʏH DBL$$ERRTRANSݫ PݫTR~ݫXP 9 P4Pc+ЏcP"PЏPP'Џ'PDBL$$CVT_LONG_TO_NUMʏHP DBL$_ARGMISS DBL$$SIGNALЫHSSRPDBL$$GT_TTNAMEQRRP DBL$_BADOPENPʏH DBL$$ERRTRANSPݫTR~ݫX?@abcdefghijklmnopqrstuvwxyz[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?`abcdefghijklmnopqrstuvwxyz{|}~_`abcdefghijklmnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{|}~À  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ _DBL$CODEP$ABS$PABCDlmnpqrstuvwxyMPQRSABCD1~2~3~4~5~6~17~18~19~20~21~23~24~25~26~28~29~31~32~33~34~     789:;< !"#$%&'()*+,2 _DBL$TABLES _DBL$CODEww 1 Q3.1-06DBL$SIZE3.1-026-APR-1993 09:32 VAX MACRO V5.4-3GMACRO/OBJ=DBLSIZE SOURCE:ENVIRON.MAR+SOURCE:DBLSIZE+DBLRTLMAC.MLB/LIBRETURN SIZE OF FIELDDBL$SIZEDBL$$CVT_LONG_TO_NUMDBL$$PROBEW_HANDLER DBL$$SIGNAL DBL$_ARGMISSDBL$_INCNUMARGDBL$_NUMOFARGSDBL$_WRIINTLIT . ABS .P$ABS$P_DBL$CODE_NEVERPDBL$SIZEQQ<  <DBL$SIZE& llDBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNALЬP ЏP Р P<`PЬQ DBL$_ARGMISS DBL$$SIGNALPamDBL$$PROBEW_HANDLERmЎmPDBL$_WRIINTLIT DBL$$SIGNALDBL$$CVT_LONG_TO_NUMP DBL$SIZE _DBL$CODE_NEVERww16R4.0-07 DBL$WKDAY4.0-026-Apr-1993 09:2626-Apr-1993 09:26VAX Bliss-32 V4.6-902% DBL$WKDAY  DBL$WKDAYP DBL$WKDAY DBL$_FACILITY DBL$_RTL_BASEDBL$_ENDOF_FILDBL$_RETNO_CAL DBL$_CMPERRDBL$_INCNUMARG DBL$_SUBERRDBL$_WRIINTLITDBL$_NOTENOMEMDBL$_ILLCHANUMDBL$_CHANOTOPNDBL$_INPFROWRIDBL$_CHADEFERR DBL$_UNDOPCDBL$_NUMTOOLONDBL$_CHAIN_USEDBL$_BADFILSPCDBL$_FILNOTFNDDBL$_HANNOTAVA DBL$_BADDIGIT DBL$_BADOPEN DBL$_IO_ERRORDBL$_LINTOOLNGDBL$_NO_SPAFILDBL$_OUTFILFULDBL$_FLDRECLNGDBL$_ILLRECNUMDBL$_INCCOMPILDBL$_DIVBYZERODBL$_ARGWROSIZDBL$_SUPEXIFILDBL$_TOOMNYCHNDBL$_DEVIN_USEDBL$_FILEINUSEDBL$_OUTTOREADDBL$_RECLOCKEDDBL$_ILEGALKEYDBL$_KEYNOTSAMDBL$_NODUPKEYSDBL$_NOTISMFILDBL$_JOBSTAERRDBL$_NO_CURREC DBL$_PROTVIOLDBL$_NO_SUCOPRDBL$_RECNOTFND DBL$_SYSERRORDBL$_ARGOUTORDDBL$_ARGOUTLIM DBL$_ARGCOUNTDBL$_FLDNOTPAKDBL$_ILLBIOSIZDBL$_WROSIZREC DBL$_ARGMISS DBL$_RMSERRORDBL$_INVARGTYPDBL$_DBLRTLERR DBL$_FILE_ORGDBL$_OUTOFRANGDBL$_CALNOTDBL DBL$_EXQUOTADBL$_DEVNOTRDYDBL$_INVOPNMODDBL$_CONTROL_CDBL$_CONTROL_Y DBL$_TIMEOUTDBL$_OPENERROR DBL$_INVALLOCDBL$_INVBKTSIZDBL$_INVBLKSIZDBL$_INVBUFSIZDBL$_INVRECSIZ DBL$_NOMSGMGRDBL$_FEANOTIMPDBL$_QUENOTAVA DBL$_STOP DBL$_AT_LINE DBL$_PC_PSLDBL$_IOERRINFODBL$_NUMOFARGSDBL$_SUBSCRPT1DBL$_SUBSCRPT2 DBL$_ARG_NMBR DBL$_LOGCHAN DBL$_ARG_SIZE DBL$_VALUEDBL$_ALLSNDBUF DBL$_UNDEFLBL DBL$_OUTOFBND DBL$_WARNINGDBL$_STV DBL$_OPCODE DBL$_FILENAME DBL$_EXPIRED DBL$_NUMDIMS DBL$_BOUNDS DBLUTL$_TEXT DBL$$ERRTRANS DBL$$SIGNALSLIB$DAYDBL$$PROBEW_HANDLERDBL$$CVT_LONG_TO_NUM DBL$WKDAY6   ~(Џ DBL$_ARGMISST DBL$$SIGNALS^ޮll~ݏDBL$_NUMOFARGSݏDBL$_INCNUMARGclլ~TcЬQa0P^mnDBL$$PROBEW_HANDLERmбRЬQRnm^P ~ݏDBL$_WRIINTLITc^LIB$DAYzn~{PPPnnlլ ~T*c ЬQnPDBL$$CVT_LONG_TO_NUMP _DBL$CODE_NEVER _DBL$CODE_NEVERww1ȇR3.0-07 DBL$SLICE3.0-026-APR-1993 09:32 VAX MACRO V5.4-3IMACRO/OBJ=DBLSLICE SOURCE:ENVIRON.MAR+SOURCE:DBLSLICE+DBLRTLMAC.MLB/LIBDBL RTL XCALL SLICE DBL$SLICEqDBL$$CVT_NUM_TO_LONG DBL$$ERRTRANS DBL$$SIGNALDBL$_INCNUMARGDBL$_NUMOFARGS SYS$SETPRI . ABS .Pc_DBL$CODE_NEVER PDBL$SLICEQ Q <  < DBL$SLICE&llDBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNALЬQDBL$$CVT_NUM_TO_LONG PPPP SYS$SETPRIP DBL$$ERRTRANSPQ DBL$$SIGNAL  DBL$SLICE _DBL$CODE_NEVERcww1`R4.0-16DBL$WAIT4.0-126-APR-1993 09:32 VAX MACRO V5.4-3GMACRO/OBJ=DBLWAIT SOURCE:ENVIRON.MAR+SOURCE:DBLWAIT+DBLRTLMAC.MLB/LIBWAIT SUBROUTINEDBL$WAITDBL$$CVT_LONG_TO_NUMDBL$$CVT_LONG_TO_NUM_R23DBL$$CVT_NUM_TO_LONGDBL$$CVT_TO_BITS DBL$$ERRTRANSDBL$$GB_MSGMGR_FUNCDBL$$GL_CHANBLOCKSDBL$$GL_IFLAGSDBL$$GL_INITFLAGSDBL$$GT_MSGMGR_REQDBL$$GT_TTMBXMSGDBL$$GV_CHANNELSDBL$$GW_MSGMGR_MBXCHANDBL$$GW_RECV_MBXCHANDBL$$GW_TTMBX_CHANDBL$$K_MAXCHANSDBL$$K_MSGMGR_REQ_LENDBL$$K_TTMBXMSG_SIZEDBL$$RECV_INIT DBL$$SIGNALDBL$$TTMBX_ASTx vDBL$$WAIT_FUNCTIONDBL$GQ_TERM_NOECHOMASK DBL$_ARGMISSDBL$_INCNUMARGDBL$_NUMOFARGS IO$M_INCLUDE IO$M_OUTBANDIO$M_TYPEAHDCNT IO$_READVBLK IO$_SENSEMODE IO$_SETMODE IO$_WRITEVBLK SYS$CANCEL SYS$CANTIM SYS$CLREFSYS$QIO SYS$QIOW SYS$READEF SYS$SETAST SYS$SETEF SYS$SETIMR SYS$WFLOR . ABS .P$ABS$%PPPPPPPPP_DBL$CODE_NEVERPDBL$WAITQQ<  <DBL$WAIT&柯ll1ZЬQ1?DBL$$CVT_TO_BITSPlЬ QPDBL$$CVT_LONG_TO_NUM2PЬQ1PDBL$$CVT_NUM_TO_LONGPQЎP0lЬ R }bRDBL$$CVT_LONG_TO_NUM_R23|~PVQR SYS$SETASTPW SYS$CLREFP1  SYS$CLREFP1 SYS$CLREFP1 SYS$CLREFP1 SYS$CLREFP1tV'zRign^Rݏ****b SYS$SETIMRP1IV1}DBL$$GL_INITFLAGSDBL$$RECV_INIT6DBL$$GB_MSGMGR_FUNC|~^U|~|~DBL$$K_MSGMGR_REQ_LENDBL$$GT_MSGMGR_REQ|~e< IO$_WRITEVBLK&~<DBL$$GW_MSGMGR_MBXCHAN~ SYS$QIOW^P1DBL$$GL_IFLAGS^U|~|~e|~< IO$_READVBLK&~<DBL$$GW_RECV_MBXCHAN~ SYS$QIOP1 V1NDBL$GQ_TERM_NOECHOMASKS[02[ 1V1|~^Q|~^U|~|~a|~e< IO$_SENSEMODE&~ SYS$WFLORP1U SYS$SETAST~^P` SYS$READEFP16ЎUV]DBL$$GL_IFLAGSUR7DBL$$GB_MSGMGR_FUNC|~^S|~|~DBL$$K_MSGMGR_REQ_LENDBL$$GT_MSGMGR_REQ|~c< IO$_WRITEVBLK&~<DBL$$GW_MSGMGR_MBXCHAN~ SYS$QIOW^P1<DBL$$GW_RECV_MBXCHAN~ SYS$CANCELP1VUݏ**** SYS$CANTIMP1 V1DBL$$GL_IFLAGS<DBL$$GW_TTMBX_CHAN~ SYS$CANCELP1 [0 [1Vp|~^Q|~^S|~|~a|~c< IO$_SENSEMODE&~N|EROC1wxd $M yI@M4N8)04LX? MWa ,;*.!T_] f FANKEҌt`6 huGU9(J6`7Cwkf?0*OUM!yeI[A;2xknnD[C]݇gD& +]|}af{Tt^eԞL)F#tx tt*2vVR)JR^a` YX]Y4fa_h^%~O>iot9?F6 VT=!`iM?wX+MLgET|O p~WP2z ,QKw0'E0C+h,sUW3.@^Z!(,(fd-u~-LMgW~ye2)#"Ro  |4:]v nU7XH}nu ;&*BZLE]("RAmV< jS KWT nG3:P!9&"vq*=N$DBBx.HKD`Ytgtr} *jA]''&JI"z2B$L|aKM]blFy1j38Wx$/GI/C&PSR%IQ/!Y7^$B&%vopjǨi?\ZF_S8U1rl S"p1",B_/hVMyt) _KgC8gIKdG{a8JD/x )D[T!'pe ^UwxwsI3~m gb'(7UZ _6I3r±}X\r(0L]jb:O3LXi^:O2/Kߟ(uq"L<="zyvm "|NI !Em!'rQ f%DT$Sb`R/tQSge#W*V q]_Ra`; 3+^Cm(qrl .R--&#np`uizbB$FC(QmG;R(f]pjKZ:WGBRFo$@D2 $>L}= L)W9m/BRQ [uRAV1.Fh +Mrm^Gr\/o~bqcb fzdd+!T6(wyK-SN**I$(]4?2K% 8qW DTc-P;2&J7%1;SwcebybhL/6X G&S S",/rrE2RX6RIFY> -yqM L?IFDAHRY/F](4bFbTHEA7,C6Խs2 l#(:Og qNDH-ORqOD9[㑛-3H3'\\2-\cvn:+ ,,J KS93SWn]1\oA+*HJL)!GnVbBgM^-[o+de1C)As<'DRX'mgER w%霫DH+YoK\yMS@8zR-A@ R.:f2:/2:o<!UJޖ$dXE%ݶS-!R?Yu*MKپHZQ,ZZ+)V%Sɘjof`X)?7\;R:eʗQB)/Q|u?v$oN"3GƖ fM C z-"qpaZoEVTuYn4.-候E(vf?`7P!iSP/;aB}] \g|[6W "\y; aC݄{v?ĸ'FRyo|n1m&gf$CDewA/IrS_wE9wꋅl|E I!9Nt#=/ <7Uqm44N |jAF(^}gOcuQn>x`POlxaV@l5L=gT@y:NEJuEzX4r`mC(VA3?:Jzp?_:$+݂#Y?hC>lZB[)+K2~4 !]aIjg1кդ=Ö*f7!.kd*&;GJl^|W^Z.`oZ" o+tymN ': k @OQЩzvCL-"[bFu5 ׹WdxD5S# .>/qb: Ⴄr? IܣVy]TkP#b*uxo+5^j0&/*%njEҙMP oWk~pi:mf}H|{Tr#\uN[%Icw>< q/$)iqmyZp޾GU[X1&>9Bәo[ݸոu0**'3DK[z_(':gj^Sۂ&_0q*F<&(nrxD[dYF^y11GZ9+ YX遛Jl/-]x,2`.8&XK)[eE>uk[&1K6(MTdkB a" 0ld2>aL?sD)~q#fh5 l8So]}k=}!d/ Hr M+A2R<8:T.;,s%;6%Tb%o^ty/<]QzC^dghG rZ=пaqD}{L'.Xw9E?p#!-/-;c~~\7pL4-}WB>| H#rvla}~j/'qoaQaUP}COdb s`x dw3I_Hrhp - ͖vy*Na} B ތOb&M~Q2W)G[62A:Z+pX3by$+eNc5  ͖))Eg%cX6KYJ 8=J> Bc|BL|Me~D)&)xG8~er"N[ !,z)G(pKk"Z{SD} epO@TfC[Sĕk+׻O}}}4%0/7bVzLQCc R9s<';#|{frDBc -LXO[@$qP )F =|p/ˠo@qINB)t@AuXNk}x {׺XH3AGL7" zmH98K>NPwh&zIB2j"L1 |c_$[a;^|@n[P/3SВWbN9r:/5A'/L?Ţ  -4V 0Xq&F֙XQ.XTj`KlQutvԅ52KxRLAا/yO@(ą3{ejxh?4{uBY²#~<Һ`y;r;^E?S]!Uf!g3v >E(]ec@D6w<`eof>Eyjհ(,`\x,}$`hp'o9w[R6SOE.MR {E#==[ z^:_I6nM$]ADDnm-kd W'VOX6hTY%Z~ c!!F[S3r`4lYkO OGz|[;Z*OI-fW4Qa V._$j"3RnbSX x`1UdfhGBjTR4>C*nbl&@K yb[0eYF;H{^LOA'RL]#fz["+0OV\4(~G>6(rnRA>R-@U,xrEj0 :S])h<\E@.Iw>~dtKzd(GK4/ 'opu=>)qzVQ u>"oS$q5v,BBK) N4O5nfPdnkjLBd#(S{bC'[]H{Zvk`*B$)1;/>W_XR\AC^!B..WL_P)R\OVG"Omod![ $3[u;l=-%z!EDNSO ltUTZe7H/FOVOVd"HJ'F&I"?:3K9A_7:Qt=c. NWGIUnUO%AG ] SYJ~s:$~//5NOL/ ZeaF.<[7,B0w+sQg0940tP bLWB hT;|J>r/!xA!8TrDXOR6HJr8pi@28-ڙ_ 7V\Lfp,G2h}as*ES.x*iin&l:yO*a+/l6u,[G *-\%NI &cX4{grY)@B09[RQ{r i ;qbKAOEsN,#*Î&n!.Sv`iswN>Grm +S%R{zf/% ~Mg5G}:ggh cmTr#&M8QBn45[rl+cGp"M_A:7+gztN.RNX*,OL<0NGCkSoDQVUM+}+#B`(W;Em)C50boUll=1zk< w dnTo9yj-r: {S;c5KqqNs)Kg6CBQ2,4K::iywԃnqQU[GjR ,=83z{Teq| `K^ :S| /plW]^[+tA`B218,:Pz+k>$una~dfۇW#a9RWaph5TRsz?d+>~iaVOw AO6e:Psv"āBE,Nm,j9i! z, bsxptcoPgi*zsI7;h~l)0wVZ h";X"D/+ucg-xT BaoMdˀkWe !mL8w25xKcO n5Sv 9pDCpg`N1^㴞MAaJ*)jjU#%sy04]kKO;`1?Bи<'d4'x X ?bFLH\#Hq4m=LX1iQٞdz3E5!1TWR7WB4'9Yj =|\"";yiM.ԦT9Mv)'.n3m_*Qbwf Fi1Ws[I}?EI8z1Op'LpTkL^'xRCV7SePca[dr'#A!wGxU+ )`:A9&hy8v~yTQx.^.dUئ~XGm2 xE&pz# 8HXZ)=82\iYbx7_9D,Yyl7Q)u%Dq=+};(h)sk&'DXnL{`A;sg$w+.gY2z t}YG's@]  vU0~,TZI'd|*$k0/-S%S>nEO*w4AsY/Iv%ݦ{zYWcjY3Ayi4|RDp[J(2 d-0+\'HEΉj LFv7 P"^C6{2P0c rF/lsr$h/4)%y ս_5Jy}q7If&8d4 ?"H~U@7'-};r!"r7~*3yUz]Kc@]:&E,* ^+ 4?&<$XQ#φrR|tjkAxQL;"DyީND&M {&enI\ϻUq\H48ldJf64kcO[G.6( s6fUTTBW&~56,puzCC#s6fK0[;S=%jUȵW+G{ NU%: P@9fWv~~Q8Qqk4 ObM 2QE[?tUC 3G>>/=$9V^kGK ~MYST7nx[< V!J=LNZ"#BWh{r_)NO7M0tuR'-1w's~m,.03;fmasK 8 ySl.:/QKpt A>$3=[vi!/.GJO.4GLsi5 L+^'oejF-DwT`1Rr8;[PS.;WM/(R'wWCML_8CM/L\NJ`##0[IP*tTr)ѓweEID23cJk`QmRTPmzJzvqOMUMM[ȭ$E/!%A?7P?o wjmvsy|yT~Ery՚=yfX>0m w:d<*O } $B_^@,F-J*eABjbT#S%}FS.5.z (5E_Cfk D|P4W'F0^0qbNa67c!TMEk>B~8 LӳEU: j_:bp:^Cj>%-Zf}@%9#[~]BB; V`Ib$]U@@Una0 >OlWK R2ix+j}^.S0U79Dh6I.YWt+sj bG" F% . ik$0\YE$FjVs MjW)r?>4!$n6!MV_M(bp9._/vsq V<\xoTUy? 28n3=6Ab%h3{KXaKISKZpRƚX0ykYw)]'u?^1E&7KN`(*+m gn1to,0P%#Vb~  kkqq4^8+|ɀ&;bloZ" b+.x=l2A6 ?-=e9&jiYrY /^@"$QCaq,N-ta $EvwPi3'HzJ L;KBvxT`Ag&xYr70(6HNDjq}9VQdl(5qlpv gprZ]X=e9fD"3fj`B#+\hoZ!S/.zA6,eZLaf% 'j=@ >HS,M8tvJ]jlbYPyU~6 i=ig.RX"?%C&7-| g }9?2+.T ~/"9$GR+ 6pө,. 20U{ %YL8BO}9'584wM [#GyfS;ZB\$G uz4y gcgorTy&) $5裗hr?c+ $KT,uKJ]Qx)ՀLvS^ [qjv1hLKjqE7S4cf1ZT@R-w?128B`>B"hx`KQVXSM}c(nXg%V2hb{D[%1-<0+5:-URnJ[k75Wi  FWw/Owu'i l^-۱_r6%i))f] b1tf044c08Dh8,(Td$PU8 zF994EqnWE|s9Anb5 { ESNfzJ6tR{X,/$"w 9AW9u.9%RC$I3 =aC$c^AUWݙUAWO`@N m ~]Hg?e2#H0p3X.:K#GUG;w *xq%MZ&Fjl.aMy'!"UT(. t'9WcG+9|!,nQdej3Fyrk,eDC&Qyjz[V- >o#\4!PrN=c?^r8e'Z'۶1v.sgm=Wh\$Qԛo)4,]U_QXB7 +_3BZ{0k7>xO /6|c+{jEd "FFq(_zTSXM ZOBiAR̖'/U[0Z%W^D]jn#0D^U^!P8+6^eCAF:0>:1 6j/9lcRG< bi<<=X^M9(D ^9#qiko.L ,wghl U;>5cmkwYHO=5p~=V&):F5|;|Oa.m =S!@na~qYjl>Г%Mt;}+>UUph`.qU(R[~tqQd ֛"$GKfbh}cb04ttdbljpaD]>,N(Q z-%"EB~v^,թm(R;V4=xmv1Ų= ur5j@=IO7,:-u{'1dv loe.iUiW)b} n?3\-O ך{ 7"a2E(0MZ IL]M^EʞhEk|.'uBW S.v|N^Dr6:3V`VF>0v snGDF7*gkAcojIx(es`xc5|qkLvrf>!:O [QgWm\ KT(Ui"Px(q En%'A{?4~m"҄Q4{J` 7\Q:7XagXPpaf O#m#l*/-?Lhbnf6\by=@Qli|AH[2],7f{hpMbt=":HAD$ bq ْkjX%SaVQQzd 8(MGA FFau?@(Q;SLs a$@}+>=Uz`gm('*\EM3n*z^ S1 'vj|6Gk8=CtHn,_iwLbvqdxtQm˛L'Q/S »X\h}^&lqe9HB<8AF e34+3[cpx1CAIkHaΉ7D͌3tX=XY3$^z'̤#c[1\[=BFS%?ƺnM[ v{feˇJ*lc G`E]3C奀="gS:9/߯5Yȍ]sQ =),.JO+IгW/2 ZNyw]Hdz@ (4{5 vty L9I.X -$&!5iKј-08+u~1 AҤBntF:9N(OlpX FU*K񚓇 Y+YQB@| BghӀa# W=gJRG}Zv%'Kle WAkBdJDOXwn UUjhg&l~AF|˦GNj2ik1HT8F}8ꁜ4i=!ccZJu:ibf=SyBSHdknέ/tiglmFS&iIzra0"Kof6~Celp!2@L*4R^ݲopua8WB#Q<$ ‚5f''?iL#_FbK(2acly+;]^&e;!2@)26mn؈Cbk3[$vj/F磯=G>vi6Pa v 7LDX9C=GMw%O[ a}hGq3*$8[X59}<7#yrm;rtMG*LnM8$!ƻL͜t+p:E."1]>Hl]DKҫQ1u DO,quo 5VC=R2WVPDK^\_Y]g(ߕ&o5}am0+;3< !F(:R/5Deq X *Mnmm:)& c 95q pOýw{b+wXuH/%02x,W;1%*E@MzM_r'"(LYjAO\}D6Q*)| *I9\ h=I$VWnxviD<v.a:rka|/ok\C'}3[4,>8Yi:}rxnU.&zmXi{JhMx'Y4*^qtbPK* +Y8{[qRM|Q0',gUJ-.guPj3_C,;N}4!iG=Z}ryqe~P;d]}a]E \KUOo_J*/(9LGϷ*29D6WkiKEJ2^e<&<h&U()FK:Lo` Z2BX!ү3xOeo9||=KΞ۾jM{4-w#bs7#Q,n7rWY$;A&d+,r!%b82wz &$n<4|'o1sM,icD7WvU4Fft[{u Ru}Bx{gYR"RPHi /QCVuJ_G5P9(mOe u hR&q|64(g'vfHjA"0 dϏyTo~Y)D! V#TJK)+WD95.) ?WuNlEKk(F,!G.5[XUd5^ $P0}F fZ/$D[*e{lsu1-lqng)B ua0X7OM3'M)PT3 w'&}x$H)PCvWHHT:*!FNISdb!W_#81C/ ~\Z929SsK.pS-%r'3!tU"Foed4- 4#:yT(TN"KHM-1 +tL/'ae _f >P65DU-P JmA||"*,klbz9F3FM*2:CU|0Z]hK[D8]1NEqh1Rymt5|jn;0)4< 9x,mC81ds(&("-\T\$"7SKTO!Kx%^LBd$EP-butju$ZU/8r}asgp f2(S!ZKF1BN0>;jIr(,Z 4od<2/SY|s`bXAK@(;uYEZ gK]uQoAFBv~uRR}Q&Y BrgWT]W1%lp_,:?3p,MOn1f6I>)p$ACm@0(k:"P ~BB}HkT}hm`7 qn e .T]?d@ICfU} (C%/?F/=< @ }KZJQ\8i&~#TF(,pxtⰓ᭴涱٣愂ʯȺȬէɰҧѐljӪӨϹ璧ѢҾ똚࿿ҦrȀaW |qs5mg{xyocduHe,O~]XJuQ+"Z@> P>fX|c|;$;bxX>24vHN i~ F e -eBۼ-)tlW }[G )8G}JWPybqq_DUʶ›*"tB~OК۱dԗ7rN#鬣{m&2o KH*˄MRsQvhO >N Qk;jy`d٣niac5<pQ(^^-d @ mobtQa6"Qte6!c{n8Yk@>#+;bj6hg$Kt(HTjm7&f/F;%N W°ؠ&]h]q~۩珺Io*0ڶᕛٳh̪krďlǬϷԘ􏀺ߊ[|H"ztta`1ooh[TO5*7vo )6zG^NC{*5rd-p awN_U&~SJCGv>L$=*V b6cb\dYn(T?: #UFxoziē]F@mN<ۿ`('Ґ𫮪A*]ulj%𺲬ιϋȥaπC5Ͽ\Y iM)Jja&-LH7f(.=. ~8(?)h8zRS`>0*o ) zwYb9@{e! A8U%;-,2oA;NE s{$N ctEL0~d>YU:ΉSyROJvjEGd&ʞ_$瘑Ю뚑b߃,bah 𠛐ۢ랕ֹﻬ̍doHj6G/suxQ"Qi>`8mrOGCL'OY\die4L*jP4C J^]{LM9x"jW3v"Tim{ozMR>rs޼4-̅ڶDڪ﫣⏠}bw {$9+rcode)abnuh[UtA0[F =mzG: ]Hgl  {#=.g|&886E1JQM]i,Dld$zfaag~AF3vv#ERAb*eB,gPkr/4,ri/v%Le@7qAX(KyF$tI9 :lLNQ&7w)*C^\A N7tr8%.^.wsfPBSy):/!XB(4VA)-27PUU rQuk{W ,01\k w ^P4}y}-30Q_|@#6685Rn\RKX< u`iVgd#miV8#elv%.{e ySld )Rr? z]$;|o}9h{lA&m0WPQxjd]m3WVE'B);IC@qJAjttpd9`z`$>mkw?S2ZwCpHb *x7g mQB4rtD;r6.^i%(Tggsar G p8~fua VIL.8?7(u(G$Ln qnyx|m%QUjP``vV`5QBk9K{lYcba&Im"3 g< cc Ktm5":L9DOxUАF;)UO_O33NwUx;V^ t h sa}.Ą[7a)*'734ifasc\wt,#"Mh&+ ]nIe#9[/T:=Eai uRzlg n"&66Wv!Wrxe/f$BrtG*o/QU}4W4=f,[~le j"iKuǡQ 8&EvRTL Y3U6_ C} ' rYj' @# 7u1/Rtf( $Yg|37"ن!3z>sB/ݧ`5D h.YWh0!l, mF}u{cpz~}J:j&xq"%EGe:am_T;>@HUG$mDTӾ^YqY^4n,-4+-/+XP 3ym%qe``%+Ok %~iE0>-FrENO^Z{i ZQ!Uk2;\DESS()ʫ.iw+wSl}'T#Q.[JP]) =&r҃jCTbcs hDpdqBcfy P -M3lMaZCQexfhyua%@RC&IEJaPl2%뾼kr&;)/j5&EG3.$d#K,6=2>Z_FZHXQA:G\+=;@7VO[neL._/#Tfѭ!r睍͗g&s`qtx*<8*t>]9 C2C/^]"P:xC?&W-}ik)$ #PI [rr }0X IzmE-'ox;{GDs9s!ALS#=s$4rn^yr}MvCEi22,3u1Y 3AEK=Z=D!5I9 _~E^SS*Z.V}"3r>3 \ZnZj<1*{q_l"O$EiiH4nxqz;v])mK}p^g ks[F&CqE+R!R }(]bku0mf*PeAn/B7ay_MX^\}S%V/TR_o_[7H4Zw~EG)"L qoIYZR!a |F)T2Z[%ig3JMRXFD37+^lWmwuu=pNpsD;a8={cC >&0c|C;H \I,Q>/@nk1 60!XgVPY:C/Q!XC9nTs@5rU]IV0sQ}WX% }l:uMxemhr @#F%3EFg?vDnXraX?4|ceNe~bhc>D5^'k5zfl9i@9]T\nhTB&<:^A S&r *FY"=auLl}\XSFvIRS1L621X WesAN2bGRgM@hKj (W&r.YX]JF+dG;tvp+SE zR3_'`}kF.JYk3=JxYwk< f@EIW.k8jg~ 1%U ,gqWyBve-Z5x#5NTwZ XV^]Se>}EF0%IF=:f~ J3 w`~!3v/uoK 6nm[:=;s1+8*VpX-~cefDWbl`@_>xas V"%;.''^{͈gHt{  *' ^3bMN]T'<*L Q<^JN40G,}chUpsme%6,;PVDZ+LPvc%$|SZs"T*Ji&EGS)`fL-#4g AHGmu @ua|.N26GT= &'$|m K4nYb 72J.: rQP+du?Mow}W<^L"SVppEzD@zy[^^)0Btg:FVB3vrd%98$RenS2uckWtt ^q 7*cr LPD_w6B 4-*O^K$mx{F6xp 3-TzHER6S6 yqz  ]vxpxQI4XP aB^kRNTB4&t["@*.'#7JH!u& \' z=4gAGNY0DVFJ=yt@qPur7!Sjw-M* &?Y> [u(gx}(P!HF]4lbDBg!_8%*T"\cUY _~cO.2@xIr *[&shXTuWexI*gjX?A WM6Ab{x[nHH;t+>-jA"-\MuxK3']gorn(wrf8Ne.MZ/^`C4UX0#c`HT\R&SVAgklse2~%31+M3hfg* =zl 'V 3UQA1uY*YpRT]]@.A\\,[T׌sէqjO/2\S\NO2DNl@)7$#~%yq:n3ZqÐ ]Z`u;xg2/ZU듻mY8n3)>\&~?kXg iisgz1Y pyu=7;#|9&nD<-2'6:'v u 9SHK>"BE+eahDd0DG4WRTLI]iB|^Tt$%%BL7^#CK@rxg brd)&y%_DOOI -tr|rz]ksuk 79@.+52G+-ds\FA5XXDEZ0> 0!7%R.xxd $#:_PI22U9^3PCGRya`0cle1;Ek"-1SJ<\\Aysg52:^W)@Ecw  "wa)@0P AIY@/TCSLYPn+F rBz(GLGV4wr_IN{7j<2jaga hW5!"8_77}g~-hu|`e :OJ H.OCVgpb (_TA9DJ".I [WaGXL^/>2=U0pJK\2"vB&ms#J&(@O;&)&)BG5"/["XnKOC;-^"fbSSTv;$+B4npyp kIIInsiuogh:u~,@gdC*FEjiU} q oG)b#&D>/=tyBr2e@ riF=\JIORL%cda֓wt6&3PL>IW*\X"ZeQUAvp%\8lK,+LS6 ':pfsplw"7-!88 :'?`IM*4:Fj  ocu6- #,<(4R?G8N[UC,%j,UE IG.LT{w(iNQ'* 33AO;cDE5 tDHs h.#Oy.)U > (KI]1+Z35BJ]iN Q#L$tyůF//?3cj:_q@` @V7Ts csh}|%5kZd 19l:oz )]094wV_('R=.Fv!d[~&H9R<%v&5q9T-r-%6G2Iiyu<uC_?>;Y*l! d/1l87ICCft`?wuNFE9;e|>LųD<,GU9| ;+R {}B:XRm_^P:!J8 S'J(8,>BXl\}Iu {>C{de64>XY{)q"U2|>_v~b~@= C pBUTQ%g;%߈3,^rX/gr.='daU># #kqM-}4HӐb381^ERi`.at4`c}Q-nb2d:2~ Dq7Q)JB\J'zJ/Q9^\N(3Pde@L# kC[=IP(b~ydb}` ct>nk}^A^9=!WQf[H3xdLnBar| \1DB*-)s/-IWaU&-sJUW~,j>7WhBB o ddg!6c]` L P퓕RZKOnjV ;H7-ceCLN{Ǐ H'n9]&=PI@*?9j so|Bs1&E&N_s79.*itpOIJVmPp]ιdGW?5 IXL:rM?A*0+vqsqj HMQ/a2QlC\(!c'T H'sf=Mz+;jTWGJ$MzO FCu$x~iEXS-4!&xf;TTH^"##}X ^[U#={N7} g}eL2 [/g!}'*Pi? ^G{;#upZzel#"B7Q:3aEz+e7i 4"Dx22Wdi!HQtlB!&-1ZME)5&+/kSOJ8L[Sl5XK_Ps[lf#u0 =v|a"l:4R8z#jx4n(l03xfi$)FZIMQ<09_a~s9a)> xja}Bk}d-#y"Sa ]LV˺à:)sre |T?I~StIijXLO*~sĐ>dr$^:x${iU-fH^ i?A:o zlc}6(oSB{~)SRc;f=$+7#QtKY\ap 4 jU ^ e`y4Ao2is"<^3'$! /"rB@L[ T+#+ jeB^SB0 4<&;+zQ(Tnc]?5?g= T+DVowq'V$QK_#W'KFh{SJ@X5TdgjxnpWHP8L R?JQi4ofޙ- NEwٝP(<δtO_2>~DC:M1SD{.gDuSȕR`j$zE~b1rbpLL"˼ym.L: ve(h)p pZ@6Bxtnnsqr-W$"3'$^8efX`r8`aCNS[q9U԰SBr^2u/KڶV"h@j%'*xpԷ`I,Rr\RI%~ npםjNdDn4lZON P8($&[uSlO lvAC 9:N `´R6;я=|~6ݳmx_1G$ FuviGdljߔ65an^>zV}\w9Z-ge 851S'nEhyp7>GiLh#aD*idldYn3Ϛ9YG`eKdl'8u_WN(.V6PKf } Ylk_j|Lh?:HCU[9٫[V2u;PJC(\N+%`f, eritT20xʕBh}evS[fe=g ThBNcp*1DPր$Ͱ!?t_c`tù]V/~k? oa{6>5v@Hxj E\L~-{*]`90T g(UM(pIf|\z~ky k!hF4En~oy|w9=DaoP* )2~05b韷$(G }g=Vju[~/ Qqό gyp[Umz1v-WZV(TQUX'R;4  m{ IjZbGYww3^_-HIfMU ss^;18o $I9$ee??G=>\4ZT5c^ ^ IgHyUO>g{^!+?S0*S6xU$hL`zFu,‚=utji ~e}OLl~Lyxn7>jN\L[_Ҿq)MpE/mpvfAl\ZM {QW+=rf7(>=+Ө.Yy#qM~PTE"ewKY )du%ntqlÁrS.\*Ugz*L3`"Na. ?`RVB2~  I5nNjmc)7fnz>dQV8wIܐ3# uE|}P/N_3j_L;'=6` 6\d}=Ufe|tBCa8t#hUgi3Ydzs9KzFӽTkEr=000)ԺyOL@@~eR k#7Ze`wEOk3kqxu†Zj1)vNUNBK0Rµm/'> v7w}1=dQN6.D'67~Z8ZI .o9$G&Gmvtzyi# :gpV IE^a4NOH@ZadH'Ie {sw[#8Adp fbjWnSF?y ~yx~tC&rse 2o?" 6kEOtu54I$r} af`Hդ$"Sb hf4XI@a<&rE.C 0'8]$T~b~&zT(f!+;WMJISJO+0*$ZT:Ve~o.0P\nI  zx&#YV7r}zyUYI-Y H+ (`{# K07_u&(Mh) x9UGZ;Y-LC%MyY|\DTKOIL{bQJ7_aA(ソ5T9F %9:rWZb ' <D7mWxFG˭z~T0:aVm~Hk7%~㚣G & eV r,Uw5&=*^0lQ   x)d#7|0FZVK1w#ok&c>ojsƀ}PheW`CIcfYIw o+Yk$'`9j&5Z4 hcqE 547G {8µ4wlzB>)WvoxQY G\ 6<2*ezh:joea Ul}zRSpkfSbb W [ `H|'R# [v1b~OZK6=4~d /1G\+]NdI~`),Q@RM%Wyg]Bj`xƏfJ/} <1K@U[jgfr:5)+_ҼAJ%9Z| s knoO!@$\W?a+ -}d  贛LjGn=UNh:%myXڔѭFkQVxMU{p]څLA̓=D#Ph0c`>mwsJXt1}*>b" *GP9.^"t/|ӔLn r%LjfgZKX_qfrxJ&1sFDO`j}}%D IQu.=zm@g0Defmhlr7&4 t#]]]!ZH{ _0&w9_"5zr@TUqENFB\l45&[yZ@&xuUP8aH5%yF2F1\D^3-cX&#K!?nb^K+3uM6Ցz5z)=FNFavvvr{~l2 X7\o$Su.TY&1@#@Sq> c51z6_-?"3<=f8,zyGe=tA-z0I]58 l!hF0G{@B\`o!=)WC80wi!0)JP)TbTHqoT ZF\YY" XDPA |m 4=X C>4Bx}iYm}'OK|S}"j"D:Xs08<>//TNMy; l9N*tOh> ˝0 :NXY maB+ǚ2`- +z|8 LiR*5{ 3Q us8` J]aM&fp بq{[$HOF-uV=O쇹_tNt7ZnIZ,h+JWę&B5ZB#N[B0.$dcR6U JVH L Vo'¾"r)pG !SK;5q1f\@4BvHP[(Gr,W#DrwA. CXly=1*D2--m2i0cf趁b.^J"f2ZgGJ#N(R|%txG5NmJdS&z(`BV`L{x(?{٥T.`0~"de.mVVL3r@Bsm(͏F~hY18i}N$ok#$Yvxۭpk6< T01,nFK׷#9URez-IZWP+([.F+2+ ^|:ƊaUl? 2Q\QB4+&u)|i# l]Ad~C.s{bcbf3,Xo|y(BJĮ%_GI4 A=xlDAublhcKailusl y|bgZ^K.ݩCwgOɼ"]gW%wG% $MdZsF]d`~#emf~ ͢cnswmP `UMsA!LP0' ktr9e)mf={߆N`s ^KAΪAE]#$Nҙnp?OBgsz\5/`F @~a#@1#-Hn{dvChy|mzjM 6iGݐf M yzaVDKvǕ+*> #a̩%GrH "рޭbC*v74*m`5rū=hVjEb9.aR vK UQHep'U2rcpJ ?-dQXh,|\7WW\oEJcfb)buf8PX?#YʥRQ<3LOf/My"53*<&I\1q;(#>?: hgbbhh5SetP 0-0000D44E R-DBL$$GET_QUAD 0-0000D5B4 R-D85$$FIND_BEGINp"t~ DIBOL042.B08[KITS.V42-07.KIT.B]DBLRTL.OLB;1V*|$A_POINTERЎmPDBL$_WRIINTLIT DBL$$SIGNALDBL$$CVT_LONG_TO_NUMl\ЬQV}aRPRmDBL$$PROBEW_HANDLERmccЎmPDBL$_WRIINTLIT DBL$$SIGNALEf1~0~U DSC$B_DTYPEDSC$K_DTYPE_NZ% DSC$B_DTYPE DSC$K_DTYPE_T% ,fn0RcP DSC$B_DTYPE DSC$K_DTYPE_P%^QfP DBL$$CVTZPK^SfR DBL$$CVTZIQЬR DSC$A_POINTERS DSC$B_DTYPE DSC$K_DTYPE_L%Pcđ DSC$B_DTYPE DSC$K_DTYPE_Q%}Pc DSC$B_DTYPE DSC$K_DTYPE_W%Pc DSC$B_DTYPE DSC$K_DTYPE_B%Pc DSC$B_DTYPEPDBL$$DATA_TYPE_TABLEQPDSC$K_DTYPE_VT%@aQPQDBL$_DTYPEINFODBL$_UNSUPDTYP DBL$$SIGNALP  DBL$XARGS _DBL$CODE_NEVERrww 1 T3.0-08 DBL$TIMOUT3.0-026-APR-1993 09:32 VAX MACRO V5.4-3KMACRO/OBJ=DBLTIMOUT SOURCE:ENVIRON.MAR+SOURCE:DBLTIMOUT+DBLRTLMAC.MLB/LIB  DBL$TIMOUTDBL$$CVT_NUM_TO_LONG DBL$$ERRTRANS DBL$$GETCCB DBL$$SIGNAL DBL$_ARGMISS DBL$_BADOPENDBL$_INCNUMARGDBL$_IOERRINFODBL$_NUMOFARGS . ABS .P_DBL$CODE_NEVERP$ABS$&PPDBL$TIMOUTQ Q <  < DBL$TIMOUT&C럯l1lЬQ1|DBL$$CVT_NUM_TO_LONGPR DBL$$GETCCB@P6 DBL$_BADOPENPʏH DBL$$ERRTRANSPݫTR~ݫXЬQ1]PamDBL$$PROBEW_HANDLERmЎmP1*DBL$$GTC_TTNAMEP ЏPDBL$$GT_TTNAMEQQP^QpЬQDBL$$CVT_LONG_TO_NUMDBL$TT_NAME_TO_NUMBERQQ<" <DBL$TT_NAME_TO_NUMBER&Al1ЬQ1PamDBL$$PROBE(W_HANDLERmЎmP1ЬQ1 ЬQDBL$$CVT_LONG_TO_NUM|^^V,a fUf_VUf_VUfNLOfP0PRDBL$TNMBR_TABLESBc PBc R0cP.BTVU::Uf: UfVQRVS DBL$$CVTZITPЏP^|DBL$TT_NUMBER_TO_NAMEQQ<" z<DBL$TT_NUMBER_TO_NAME&l1ЬQ1PamDBL$$PROBEW_HANDLERmЎmP1ЬQ1DBL$$CVT_NUM_TO_LONGЬQ NLA!AD!ZW:QWPDBL$TNMBR_TABLESRBcPBR힯QPBcQP RBcQBP~^RPQgbSYS$FAOЎQ^1Z4.2-18 DBL$$CLOSE4.2-126-APR-1993 09:28 VAX MACRO V5.4-3IMACRO/OBJ=DBLCLOSE SOURCE:ENVIRON.MAR+SOURCE:DBLCLOSE+DBLRTLMAC.MLB/LIBCLOSE ROUTINE DBL$$CLOSE $ D85$$CLOSE D85$$CLOSE_KEYWORDDBL$$CHANNEL_RANGECHECK DBL$$CLOCCB ) DBL$$CLOSEDLC . DBL$$CLOSEDXC oDBL$$CLOSE_CHAN DBL$$CVTZI DBL$$ERRTRANSDBL$$FREE_DYN_STRING DBL$$GETCCBDBL$$GV_CHANNEL?S DBL$$SIGNALDBL$ANSI_TABLE DBL$_BADOPENDBL$_FEANOTIMPDBL$_IOERRINFO LIB$FREE_VM SYS$CLOSE SYS$DASSGNSYS$QIOW . ABS .P$ABS$=PPPPPPPPPPPPPPP _DBL$CODE_FARPЎQЎRDBL$$CHANNEL_RANGECHECKRDBL$$GV_CHANNELS DBL$$GETCCBȏHȏ@LЫ\S%P^^SfЏԣ$ԣ(cPTTQȏTTQDP6 DBL$_BADOPENPʏH DBL$$ERRTRANSP@TR~ݫXЫ\QЎPPg4&og4&g4&ȏʏ ȏ 1DBL$_INVCONTIGP1ЎPP Ы\QP1 DBL$_INVDEQP1^R P0`,PЏXP DBL$$GETVNMCLRP1-ЎPQ`aXL`UPU(1 ~^Z ^Q ^PZPQLIB$FIND_IMAGE_SYMBOLP18^U}bT1DBL$_INVBKTSIZP1p ЎPЎRЎS DBL$$CVTZIS^^Эn/ #*DBL$$LPQUE_DELETE_WITH_VALUE8 DBL$$POP_DSC *DBL$$LPQUE_DELETE_WITH_VALUE * X0 DBL$$POP_DSC^Эn*;LPQUE_DELETE_WITH_VALUEDBL$$CVT_NUM_TO_LONG_R23 ; ^0 } RDBL$$CVT_NUM_TO_LONG_R23P> R DBL$$LPQUE& DBL$$POP_DSC R DBL$$LPQUE R 0 DBL$$P fOP_DSC^Эn cLPQUE! LIB$FREE_VM SYS$SNDJBCW7 c (^gЮhG2h>X|~W}~~ SYS$SNDJBCWP DBL$$ERRTRANSPQ DBL$$SIGNALЮP DBL$$ERRTRANSݮQ DBL$$SIGNALWl LIB$FREE_VMP DBL$$ERRTRANSPQ DBL$$SIGNAL^  _DBL$CODE_FAR _DBL$CODE_FAR<Q]cQ;QQQpQl3 RD85$$LPQUE_END FD85$$LPQUE_BEGINwwh1>[3.0-48 DBL$$ARRAY3.0-426-Apr-1993 09:2626-Apr-1993 09:26VAX Bliss-32 V4.6-9021 DBL$$ARRAYDBL$$FIND_ARRAY_ELEM DBL$_FACILITY DBL$_RTL_BASEDBL$_ENDOF_FILDBL$_RETNO_CAL DBL$_CMPERRDBL$_INCNUMARG DBL$_SUBERRDBL$_WRIINTLITDBL$_NOTENOMEMDBL$_ILLCHANUMDBL$_CHANOTOPNDBL$_INPFROWRIDBL$_CHADEFERR DBL$_UNDOPCDBL$_NUMTOOLONDBL$_CHAIN_USEDBL$_BADFILSPiCDBL$_FILNOTFNDDBL$_HANNOTAVA DBL$_BADDIGIT DBL$_BADOPEN DBL$_IO_ERRORDBL$_LINTOOLNGDBL$_NO_SPAFILDBL$_OUTFILFULDBL$_FLDRECLNGDBL$_ILLRECNUMDBL$_INCCOMPILDBL$_DIVBYZERODBL$_ARGWROSIZDBL$_SUPEXIFILDBL$_TOOMNYCHNDBL$_DEVIN_USEDBL$_FILEINUSEDBL$_OUTTOREADDBL$_RECLOCKEDDBL$_ILEGALKEYDBL$_KEYNOTSAMDBL$_NODUPKEYSDBL$_NOTISMFILDBL$_JOBSTAERRDBL$_NO_CURREC DBL$_PROTVIOLDBL$j_NO_SUCOPRDBL$_RECNOTFND DBL$_SYSERRORDBL$_ARGOUTORDDBL$_ARGOUTLIM DBL$_ARGCOUNTDBL$_FLDNOTPAKDBL$_ILLBIOSIZDBL$_WROSIZREC DBL$_ARGMISS DBL$_RMSERRORDBL$_INVARGTYPDBL$_DBLRTLERR DBL$_FILE_ORGDBL$_OUTOFRANGDBL$_CALNOTDBL DBL$_EXQUOTADBL$_DEVNOTRDYDBL$_INVOPNMODDBL$_CONTROL_CDBL$_CONTROL_Y DBL$_TIMEOUTDBL$_OPENERROR DBL$_INVALLOCDBL$_INVBKTSIZDBL$_INVBLKSIZDBL$_INVBUFSIZDkBL$_INVRECSIZ DBL$_NOMSGMGRDBL$_FEANOTIMPDBL$_QUENOTAVA DBL$_STOP DBL$_AT_LINE DBL$_PC_PSLDBL$_IOERRINFODBL$_NUMOFARGSDBL$_SUBSCRPT1DBL$_SUBSCRPT2 DBL$_ARG_NMBR DBL$_LOGCHAN DBL$_ARG_SIZE DBL$_VALUEDBL$_ALLSNDBUF DBL$_UNDEFLBL DBL$_OUTOFBND DBL$_WARNINGDBL$_STV DBL$_OPCODE DBL$_FILENAME DBL$_EXPIRED DBL$_NUMDIMS DBL$_BOUNDS DBLUTL$_TEXT DBL$$ERRTRANS DBL$$SIGNALP DBL$$FIND_ARRAY_ELEM7  d) ܻ~~ TTVPVnP@cWݏ DBL$_BOUNDSݏ DBL$_SUBERR DBL$$SIGNALFU >FdPW@ݏ DBL$_BOUNDSݏ DBL$_SUBERR DBL$$SIGNALWUUnVP ^ zz _DBL$CODE _DBL$CODEzwwm1@+[3.0-56DBL$$CCB3.0-526-APR-1993 09:29 VAX MACRO V5.4-3EMACRO/OBJ=DBLCCB SOURCE:ENVIRON.MAR+SOURCE:DBLCCB+DBLRTLMAC.MLB/LIBDBL RTL CCB ROUTINESDBL$$CCBDBL$$CHANNEL_RANGECHECK  DBL$$CLOCCB  DBL$$FABLUB  DBL$$GETCCB DBL$$GETCCBZOK DBL$$GETVMCLRDBL$$GL_CHANBLOCKSDBL$$GTC_TTNAMEDBL$$GT_TTNAMEDBL$$GV_CHANNELSDBL$$GX_CHANZERO  DBL$$MAKCCBn CDBL$$MAKCCB_TT  DBL$$RELCCB DBL$$SIGNALDBL$_CHAIN_USEDBL$_CHANOTOPN DBL$_LOGCHAN LIB$FREE_VM . ABS .P$ABS$PPPPPPt_DBL$CODE_NEVERPDBL$$CHANNEL_RANGECHECKRDBL$$GV_CHANNELS DBL$_CHAIN_USEP1HЏP DBL$$GETVMCLRP15Q[[DBL$$GL_CHANBLOCKSBRDkDDBL$$GX_CHANZERO[[DBL$$GL_CHANBLOCKSDBL$$GT_TTNAMETDBL$$GTC_TTNAMERDBL$$GT_TTNAMEЏ_NLAPЏ0H @PЏH QЏ2TT XDBL$$GV_CHANNELSDBL$$CHANNEL_RANGECHECKRDBL$$GV_CHANNELS DBL$_CHANOTOPNP1DBL$$GL_CHANBLOCKSB[ʏHRDBL$$GV_CHANNELS@DBL$$GL_CHANBLOCKSB[ݫTݏ߮߮ LIB$FREE_VM^[ݏ߮߮ LIB$FREE_VM^DBL$$GL_CHANBLOCKSB FФ(PРTRSd6bФl>q@PPfSQիhԫhR DBL$_LOGCHANP DBL$$SIGNAL _DBL$CODE_NEVERtww p1`?[4.0-1: DBL$$CHANNEL4.0-126-APR-1993 09:29 VAX MACRO V5.4-3KMACRO/OBJ=DBLCHANNL SOURCE:ENVIRON.MAR+SOURCE:DBLCHANNL+DBLRTLMAC.MLB/LIB  DBL$$CHANNELf DBL$$CHANNEL_RANGECHECK DBL$$SIGNAL DBL$HANDLERDBL$_ILLCHANUM DBL$_LOGCHAN . ABS .P$ABS$PPPPa _DBL$CODEPRER? DBL$HANDLERP]QPaС QСP R RR DBL$_LOGCHANDBL$_ILLCHANUM DBL$$SIGNAL _DBL$CODEawwr1<9N\4.2-04; DBL$$CONVERT4.2-0426-APR-1993 09:26 VAX MACRO V5.4-3KMACRO/OBJ=DBLCONVRT SOURCE:ENVIRON.MAR+SOURCE:DBLCONVRT+DBLRTLMAC.MLB/LIB  DBL$$CONVERT & D85$$CVTNI B D85$$CVTNP  D85$$CVTNZ D85$$CVT_SYM_VAL D85$$CVT_TOS_VAL  DBL$$CVTAI  DBL$$CVTAIPK  DBL$$CVTAIQ  DBL$$CVTAIZ  DBL$$CVTAPK  DBL$$CVTAZ  DBL$$CVTIA sw DBL$$CVTIA_R1  DBL$$CVTIPKA  DBL$$CVTIPKIZ  DBL$$CVTIPKZ  DBL$$CVTIQA } DBL$$CVTIQPK  DBL$$CVTIQZ s DBL$$CVTIZ  DBL$$CVTIZA  DBL$$CVTIZIPK  DBL$$CVTIZPK e DBL$$CVTIZ_A  DBL$$CVTPKA h DBL$$CVTPKI  DBL$$CVTPKIQ  DBL$$CVTPKIZ  DBL$$CVTPKZ  DBL$$CVTZA  DBL$$CVTZI  DBL$$CVTZIPK y DBL$$CVTZIQ  DBL$$CVTZI_A B DBL$$CVTZPK DBtL$$CVT_LONG_TO_NUM DBL$$CVT_LONG_TO_NUM_R23 DBL$$CVT_NUM_TO_LONG DBL$$CVT_NUM_TO_LONG_R23 DBL$$CVT_NZU_NZU  DBL$$CVT_TO_BITSDBL$$DATA_TYPE_TABLEDBL$$FREE_DYN_STRINGDBL$$GB_RADIX_PTDBL$$GDIT_ACCUM2DBL$$GDIT_ACCUM2_INTENDDBL$$GP_ACCUM2 DBL$$POP_DSCDBL$$PROBEW_HANDLER DBL$$SIGNAL DBL$AB_CVTPT_Z  DBL$CVTAZ_R1  DBL$CVTIQZ_R1 e DBL$CVTIZA_R1 p DBL$CVTIZ_R1  DBL$CVTPKA_Au t DBL$CVTPKIQ_A U DBL$CVTPKI_A x DBL$CVTZA_R1  DBL$CVTZIA_R1 y DBL$CVTZIQ_R1  DBL$CVTZI_R1 DBL$_ARGMISSDBL$_ARGWROSIZ DBL$_BADDIGITDBL$_DBLRTLERRDBL$_DTYPEINFODBL$_INCNUMARGDBL$_NUMTOOLONDBL$_UNSUPDTYPDBL$_WRIINTLIT . ABS .P$ABS$ PP ( _DBL$TABLESP ,T:qa a+a- a015PޔTTa9틏aTRTPEqa a+a- a0 1P!a9aUxUUTUsRPTR TsTRTsR[RRR R^3.0-29 DBL$$GET2DX3.0-226-APR-1993 09:29 VAX MACRO V5.4-3KMACRO/OBJ=DBLGET2DX SOURCE:ENVIRON.MAR+SOURCE:DBLGET2DX+DBLRTLMAC.MLB/LIB*GETS 2 DESCRIPTORS OFF THE STACK AND INT DBL$$GET2DXA  DBL$$GET2DX . DBL$$GET2DXR \ DBL$$GET3DX . ABS .P$ABS$P_DBL$CODE_NEVERPPS}PSQPR,aPa>P _DBL$CODE.ww1@^4.2-06; DBL$$HANDLER4.2-0626-APR-1993 09:29 VAX MACRO V5.4-3KMACRO/OBJ=DBLHANDLE SOURCE:ENVIRON.MAR+SOURCE:DBLHANDLE+DBLRTLMAC.MLB/LIBDIBOL RTL CONDITION HANDLER DBL$$HANDLERKDBL$$ONERROR_GO DBL$_FACILITYLIB$DECODE_FAULT SYS$UNWIND . ABS .P_DBL$CODE_NEVERP$ABS$PPPPP< < DBL$$HANDLER&ЬTЬUФRR 1X R DBL$_FACILITY1JRCХSգ,ХR4DBL$$ONERROR_GO SYS$UNWIND'dRRDBL$$ONERROR_GOBdPЭ PXЏ P  tDBL$$PROBEW_HANDLER&1~^ݬݬLIB$DECODE_FAULTP# DBL$$PROBEW_USERACTION& ԼP[ DBL$$HANDLERtDBL$$PROBEW_HANDLERDBL$$PROBEW_USERACTION _DBL$CODE_NEVERww1)I_4.0-47 DBL$$INIT4.0-426-APR-1993 09:29 VAX MACRO V5.4-3GMACRO/OBJ=DBLINIT SOURCE:ENVIRON.MAR+SOURCE:DBLINIT+DBLRTLMAC.MLB/LIBDIBOL RTL INITIALIZATION CODE DBL$$INIT D85$$INTERPDBL$$CVT_NZU_NZU DBL$$ERRTRANSDBL$$GA_DBLBIND_PSECTDBL$$GA_DDTMODINITDBL$$GA_EXITHADBL$$GA_EXITSTATUSDBL$$GA_MAIN_MODNAMEDBL$$GA_TTMBX_NAMEDBL$$GB_CURRENCYDBL$$GB_CURRENCY_DEFAULTDBL$$GB_DIGIT_SEPDBL$$GB_DIGIT_SEP_DEFAULTDBL$$GB_PROCNUMDBL$$GB_RADIX_PTDBL$$GB_RADIX_PT_DEFAULTDBL$$GB_UPDATE_DEFERRED_WRITEDBL$$GL_EXITHCBDBL$$GL_EXITSTATUSDBL$$GL_INITFLAGSDBL$$GL_LOCKPAGESDBL$$GL_MAXCHANNELDBL$$GL_SAVEAPDBL$$GL_SAVEFPDBL$$GL_SAVESPDBL$$GL_TTUNITDBL$$GO_TERM_ECHOMASKDBL$$GTC_IMAGE_NAMEDBL$$GTC_TTNAMEDBL$$GT_IMAGE_NAMEDBL$$GT_RECV_IDDBL$$GT_TTMBX_NAMEDBL$$GT_TTNAMEDBL$$GW_TTMBX_CHANDBL$$GX_TERM_8BITMASK DBL$$INTERPDBL$$K_RECV_ID_LENDBL$$K_TTMBXMSG_SIZE DBL$$MBXNAME DBL$$OPENTT DBL$$PROC DBL$$SIGNALDBL$EXITHANDLERDBL$GQ_TERM_8BITMASKDBL$GQ_TERM_ECHOMASK DBL$HANDLER DBL$INIT  DBL$INIT85DBL$_INCCOMPILDBL$_INCNUMARGDBL$_NUMOFARGSDBL$_RECEXTCAL INIT_OTOLIB$RESERVE_EFLIB$STOP SYS$CRELOG SYS$CREMBX SYS$DCLEXH SYS$FILESCAN SYS$GETDVI SYS$GETJPI SYS$LKWSET SYS$SETAST SYS$TRNLOG SYS$WAITFR . ABS .P$ABS$-PPPPPPPPPPP_DBL$CODE_NEVERP DBL$HANDLERm DBL$_INCCOMPILLIB$STOPЎ[]Q]^(^^DBL$$GL_SAVESP\DBL$$GL_SAVEAP]DBL$$GL_SAVEFP0qDBL$$GL_EXITSTATUSРZРYРXXqXqqXqqPq[qq D85$$INTERPq DBL$$INTERPqq1fQ^lS'R1RS!SDBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNALSR1RQ|~RQ^RClQ}CjTСUaT}TCbS1$Р RbDBL$_RECEXTCAL#Pn DBL$$SIGNALɐblSRRSRRS SR)SDBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNALQ^0DBL$$GA_MAIN_MODNAME`DBL$$GB_PROCNUM~^ DBL$$GL_INITFLAGSDBL$$GA_DDTMODINITDBL$$GL_INITFLAGS0L8 3PVРQР SS$VV(acV(VacЎVP DBL$$PROCܻ} SYS$SETASTP^VDBL$$GL_INITFLAGS1DBL$$GL_EXITSTATUSDBL$$GA_EXITSTATUSDBL$EXITHANDLERDBL$$GA_EXITHADBL$$GL_EXITHCB SYS$DCLEXHP0DBL$$K_TTMBXMSG_SIZEPPPQ|~ݏQPDBL$$GW_TTMBX_CHAN SYS$CREMBXP0T<DBL$$GW_TTMBX_CHANPDBL$$GT_TTMBX_NAMEQQDBL$$GA_TTMBX_NAME DBL$$MBXNAMEDBL$GQ_TERM_ECHOMASK3~DBL$$GO_TERM_ECHOMASKDBL$GQ_TERM_ECHOMASK3 DBL$GQ_TERM_8BITMASK3~DBL$$GX_TERM_8BITMASKDBL$GQ_TERM_8BITMASK3^^R~^S~^T~^W~^U~UWݏ&TDBL$$GT_TTNAMEݏSRݏ^P|~` SYS$GETJPIP0(^dDBL$$GTC_TTNAMEg0 DBL$$OPENTT|~ݏ^PR  /D  8 5 {~^ЫhVPePQЦVQQPU ׮U-E.nTPPnnPPW`2-018 DBL$$OPENTT2-0126-APR-1993 09:29 VAX MACRO V5.4-3KMACRO/OBJ=DBLOPENTT SOURCE:ENVIRON.MAR+SOURCE:DBLOPENTT+DBLRTLMAC.MLB/LIBOPEN DEFAULT TERMINAL DBL$$OPENTT DBL$$ERRTRANSDBL$$FLAG8_CLRDBL$$GL_CTRLMASKDBL$$GL_INITFLAGSDBL$$GL_TTUNITDBL$$GTC_TTNAMEDBL$$GT_TTNAMEDBL$$MAKCCB_TT  DBL$$OPENTT DBL$$SIGNALLIB$ENABLE_CTRL SYS$ASSIGN SYS$GETDVI  SYS$WAITFR . ABS .P$ABS$ PPP _DBL$CODEIPDBL$$MAKCCB_TTDBL$$GT_TTNAMEDBL$$GTC_TTNAME~^P|~F` SYS$ASSIGN^Pa~~DBL$$GL_TTUNITݏ ^P|~`?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?@ACDEFGHIJKLMNOPRSTUWXYZ[\]^_`abcACDEFGHIJKLMNOPRSTUWXYZ[\]{|}~AAAAAABDFFFFJJJJOPPPPPQPXXXX\VAAAAAABDFFFFJJJJOPPPPPQPXXXX\  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNQRSTUWXYZ[\]^_`abcABCDEFGHIJKLMNQRSTUWXYZ[\]{|}~AAAAAA^CEEEEIIIIOQQQQQP_XXXX\VAAAAAA^CEEEEIIIIOQQQQQP_XXXX\ DBL$_FACILITY DBL$_RTL_BASE%`]~ DIBOL042.B08[KITS.V42-07.KIT.B]DBLRTL.OLB;11D@|DBL$_ENDOF_FILDBL$_RETNO_CAL DBL$_CMPERRDBL$_INCNUMARG DBL$_SUBERRDBL$_WRIINTLITDBL$_NOTENOMEMDBL$_ILLCHANUMDBL$_CHANOTOPNDBL$_INPFROWRIDBL$_CHADEFERR DBL$_UNDOPCDBL$_NUMTOOLONDBL$_CHAIN_USEDBL$_BADFILSPCDBL$_FILNOTFNDDBL$_HANNOTAVA DBL$_BADDIGIT DBL$_BADOPEN DBL$_IO_ERRORDBL$_LINTOOLNGDBL$_NO_SPAFILDBL$_OUTFILFULDBL$_FLDRECLNGDBL$_ILLRECNUMDBL$_INCCOMPILDBL$_DIVBYZERODBL$_ARGWROSIZDBL$_SUPEXIFILDBL$_TOOMNYCHNDBL$_DEVIN_USEDBL$_FILEINUSEDBL$_OUTTOREADDBL$_RECLOCKEDDBL$_ILEGALKEYDBL$_KEYNOTSAMDBL$_NODUPKEYSDBL$_NOTISMFILDBL$_JOBSTAERRDBL$_NO_CURREC DBL$_PROTVIOLDBL$_NO_SUCOPRDBL$_RECNOTFND DBL$_SYSERRORDBL$_ARGOUTORDDBL$_ARGOUTLIM DBL$_ARGCOUNTDBL$_FLDNOTPAKDBL$_ILLBIOSIZDBL$_WROSIZREC DBL$_ARGMISS DBL$_RMSERRORDBL$_INVARGTYPDBL$_DBLRTLERR DBL$_FILE_ORGDBL$_OUTOFRANGDBL$_CALNOTDBL DBL$_EXQUOTADBL$_DEVNOTRDYDBL$_INVOPNMODDBL$_CONTROL_CDBL$_CONTROL_Y DBL$_TIMEOUTDBL$_OPENERROR DBL$_INVALLOCDBL$_INVBKTSIZDBL$_INVBLKSIZDBL$_INVBUFSIZDBL$_INVRECSIZ DBL$_NOMSGMGRDBL$_FEANOTIMPDBL$_QUENOTAVA DBL$_STOP DBL$_AT_LINE DBL$_PC_PSLDBL$_IOERRINFODBL$_NUMOFARGSDBL$_SUBSCRPT1DBL$_SUBSCRPT2 DBL$_ARG_NMBR DBL$_LOGCHAN DBL$_ARG_SIZE DBL$_VALUEDBL$_ALLSNDBUF DBL$_UNDEFLBL DBL$_OUTOFBND DBL$_WARNINGDBL$_STV DBL$_OPCODE DBL$_FILENAME DBL$_EXPIRED DBL$_NUMDIMS DBL$_BOUNDS DBLUTL$_TEXT DBL$$ERRTRANS DBL$$SIGNALODBL$$GA_COLLATING_TABLEDBL$$GL_IFLAGS LIB$GET_VM LIB$FREE_VMP  DBL$$TBXXX!    DBL$$GA_COLLATING_TABLEV^f(V< LIB$GET_VMP DBL$$ERRTRANSPQ  DBL$$SIGNALfP(`@DBL$$GL_IFLAGSPQQ DBL$TBMUL Q DBL$TBMUL! Q ! DBL$$GA_COLLATING_TABLEV^f(V< LIB$GET_VMP DBL$$ERRTRANSPQ DBL$$SIGNALfP(`@DBL$$GL_IFLAGSPQ DBL$TBBIN  DBL$TBBIN"  d DBL$$GA_COLLATING_TABLER^b*R< LIB$FREE_VMP DBL$$ERRTRANSPQ DBL$$SIGNALb@DBL$$GL_IFLAGSPF DBL$TBMODHDBL$$CVT_NUM_TO_LONGDBL$$CVT_NUM_TO_LONG  DBL$TBMOD*  " DBL$$CVT_NUM_TO_LONGWDBL$$GA_COLLATING_TABLEV^f5V< LIB$GET_VMP DBL$$ERRTRANSPQ DBL$$SIGNALfP(`lSRBlQgPTBQgPfP@dSR@DBL$$GL_IFLAGSPj DBL$TBRPL3DBL$$CVT_NUM_TO_LONG_R23 j DBL$TBRPL4 j %#  )DBL$$GA_COLLATING_TABLEW^g5W< LIB$GET_VMP DBL$$ERRTRANSPQ DBL$$SIGNALgP(`ЬPРU<`VVTTQQUSRDBL$$CVT_NUM_TO_LONG_R23PgQPAdVT@DBL$$GL_IFLAGSP DBL$TBRETHDBL$$CVT_NUM_TO_LONGDBL$$CVT_LONG_TO_NUM  DBL$TBRET'  B$DBL$$GA_COLLATING_TABLEP SPSlTRBlQDBL$$CVT_NUM_TO_LONGPVCfUBQUPDBL$$CVT_LONG_TO_NUMTRP H _DBL$DATA _DBL$DATA6_DBL$CODE_NEVER _DBL$CODE_NEVER6ww14b4.0-8: DBL$$TERM_IO4.0-826-APR-1993 09:29 VAX MACRO V5.4-3KMACRO/OBJ=DBLTERMIO SOURCE:ENVIRON.MAR+SOURCE:DBLTERMIO+DBLRTLMAC.MLB/LIB;2  DBL$$TERM_IO DBL$$CVTIA DBL$$CVTIPKIZ DBL$$CVTIZ DBL$$CVTPKZDBL$$DATA_TYPE_TABLEDBL$$GB_CURRENCYDBL$$GB_DIGIT_SEPDBL$$GB_RADIX_PTDBL$$GDIT_ACCUM1DBL$$GDIT_ACCUM1_ENDDBL$$GDIT_ACCUM1_INTENDDBL$$GDIT_RESULTDBL$$GDI T_RESULT_END DBL$$SIGNAL DBL$$TERM_IO_FORMAT ?DBL$$TERM_IO_POSITIONDBL$ANSI_TABLE DBL$CVTPKA_A DBL$CVTZA_R1DBL$_DTYPEINFODBL$_IOERRINFODBL$_OUTATTERRDBL$_UNSUPDTYP IO$M_ESCAPEIO$_READPROMPTLIB$FIND_IMAGE_SYMBOL SS$_NORMALSYS$FAOLSYS$QIOW TT2$V_ANSICRT . ABS .P$ABS$PPPPPP_DBL$LITPSMGSHRSMG$GET_TERM_DATA_DBL$CODE_NEVERPЎT<QՎՎRUWUc0c9 cP RPRR eReURSQЎU^ЎRDBL$_OUTATTERREPʏHݫTR~ݫXf gVf_) DBL$$GB_NUMASTSW DBL$$GL_ASTBASEADDRGVDBL$_DBLRTLERR DBL$$SIGNALDBL$$GL_ASTBASEADDRGDBL$$GB_NUMASTS(DBL$$K_SAVE_AREA_LEN&fDBL$$GX_SAVE_AREADBL$$K_SAVE_AREA_LENDBL$$GL_ASTBASEADDRG߮ LIB$FREE_VMDBL$$GL_ASTBASEADDRGDBL$$GB_NUMASTS.~ DBL$ASTRST DBL$ASTSAV5_DBL$LIT_DBL$CODE_NEVERww 1@d4.25 DBL$BEGFL4.226-APR-1993 09:29 VAX MACRO V5.4-3IMACRO/OBJ=DBLBEGFL SOURCE:ENVIRON.MAR+SOURCE:DBLBEGFL+DBLRTLMAC.MLB/LIB REWIND FILE DBL$BEGFLDBL$$CVT_NUM_TO_LONG DBL$$ERRTRANS DBL$$GETCCB DBL$$SIGNAL DBL$_ARGMISS DBL$_BADOPENDBL$_INCNUMARGDBL$_IOERRINFODBL$_NUMOFARGS SYS$REWIND . ABS .P$ABS$P _DBL$LITPDBL$BEGFLQ Q _DBL$CODE_NEVERP    DBL$BEGFL&all~DBL$_NUMOFARGSDBL$_INCNUMARG DBL$$SIGNAL1ЬQ DBL$_ARGMISS DBL$$SIGNALyDBL$$CVT_NUM_TO_LONGPRHP DBL$$GETCCBȏHP@ DBL$_BADOPEN DBL$$SIGNALJ[ SYS$REWINDP6Ы QʏH DBL$$ERRTRANSݫ PݫTR~ݫXULUWUhU1|~~^~~~^U1^~~~1^~~~^U1w~~~^U1g|~|~~^~~~Ѐ^U1P|~|~|~~~^ݏ ~n~Ю nݏ ^U1&|~~~^ݏ ~n~Ю nݏ ^U1WWW^VWWPPPP^UnWW1WW^VWWPPPP^W1qеP22P&P 1m}PV DBL$$CVTIQZ V DBL$$CVTIZ㊏R1Y; PQRPX1DBL$$GDIT_RESULTSPPPPPPS~$PDBL$AB_CVTPT_ZPcVЎQЎP$Х~<PPPХQPQЎPVPSPPDBL$$GDIT_ACCUM1T|݄|Ԅ|dSTTqtPV~;SDBL$$GDIT_ACCUM1_INTEND@VPn;DBL$$GDIT_ACCUM1VnVVPX< PЫ$QQP:DBL$$GB_CURRENCYPaPnQQPЎPЎQTTXVATZ3T*.7TDBL$$GB_RADIX_PT/PQP:DBL$$GB_RADIX_PTPa VWYЎQЎP VVWPVWYYWTYZV VՎDBL$$GDIT_ACCUM1_INTENDR< P^SP^VT0WTRTXX1qTTX1TZ1T*ITDBL$$GB_CURRENCY1/TDBL$$GB_RADIX_PT+T- TC#1Z WQ$V s1VRVTs1VW1V7WV7DBL$$GDIT_ACCUM1_INTEND~nRn;DBL$$GDIT_ACCUM1_INTENDՎՎ*sV VVW0rsYX?1pVWWVVVVVVϐ s1 rsV1mr8sYZP11qTVJTDBL$$GB_CURRENCY QP:DBL$$GB_CURRENCYZc ЎPЎQ1ЎPЎQ1TDBL$$GB_DIGIT_SEP1P1DBL$$GB_CURRENCY1TX1TZ1T*1TDBL$$GB_CURRENCYBTDBL$$GB_RADIX_PT]T-DTDBL$$GB_DIGIT_SEPTCoxWrP1**syDBL$$GB_CURRENCYlYhVDBL$$GB_CURRENCYs_Z W=Q$7V3HVY*V=W9 WWVW0sY%VrsYTsWVVWYא sZP<PХ QPPmDBL$$PROBEW_HANDLE9RmaaЎmPDBL$_WRIINTLIT DBL$$SIGNALZP PZZS(Pca ZP P(Zca[^( }PRDBL$$GDIT_RESULTS DBL$CVTZA_R1o DBL$CVTPKA_AadαPaPQP2aPGPPQP4aP/PPDBL$$DATA_TYPE_TABLEQP%@aQPQDBL$_DTYPEINFODBL$_UNSUPDTYP DBL$$SIGNAL DBL$$CVTIADBL$$GDIT_RESULT_ENDS}PPPPQsqc RTRqTTX/TZET*&TDBL$$GB_CURRENCYT- Z V sTsZPW0sYRDBL$$GDIT_ACCUM1_ENDRRXZPVVWYؐ s _DBL$CODE4ww;1Bٺj4.0-57 DBL$$MATH4.0-526-APR-1993 09:27 VAX MACRO V5.4-3GMACRO/OBJ=DBLMATH SOURCE:ENVIRON.MAR+SOURCE:DBLMATH+DBLRTLMAC.MLB/LIBADD, SUBTRACT, INCR, UMINUS DBL$$MATH B D85$$ADDI Q D85$$ADDP q D85$$ADDS a D85$$ADDZ  D85$$DECRI  D85$$DECRP Q D85$$DECRS k D85$$DECRZ  D85$$DIVDIVI  D85$$DIVDIVP  D85$$DIVDIVS  D85$$DIVDIVZ<  D85$$DIVI  D85$$DIVP  D85$$DIVS   D85$$DIVZ  D85$$INCRI = D85$$INCRP  D85$$INCRS w D85$$INCRZ   D85$$MULI  D85$$MULP  D85$$MULS g D85$$MULZ ' D85$$ROUNDI g# D85$$ROUNDN # D85$$ROUNDP $ D85$$ROUNDZ  D85$$RTSI Q D85$$RTSN x D85$$RTSP ^ D85$$RTSZ h D85$$SUBI x D85$$SUBP  D85$$SUBS  D85$$SUBZ  D85$$UMINUSI  D85=$$UMINUSP y D85$$UMINUSS  D85$$UMINUSZ  DBL$$ADDP  DBL$$ADDZ - DBL$$ADD_B  DBL$$ADD_S 2 DBL$$ADD_W DBL$$CVTIQPK DBL$$CVTIQZ DBL$$CVTIZ DBL$$CVTPKI DBL$$CVTPKIQ DBL$$CVTPKZ DBL$$CVTZI DBL$$CVTZIQ DBL$$CVTZI_A DBL$$CVTZPKDBL$$CVT_NUM_TO_LONGDBL$$DATA_TYPE_TABLE f DBL$$DECR_S  DBL$$DIV_B  DBL$$DIV_S  DBL$$DIV_WDBL$$FREE_DYN_STRINGDBL$$GDIT_ACCUM1DBL$$GDI>T_ACCUM1_ENDDBL$$GDIT_ACCUM1_INTENDDBL$$GDIT_RESULTDBL$$GDIT_RESULT_ENDDBL$$GDIT_RESULT_INTEND DBL$$GET2DXR DBL$$GET_QUADDBL$$GP_ACCUM1DBL$$GP_ACCUM2DBL$$GP_RESULT  DBL$$INCR  DBL$$INCRP  DBL$$INCR_B  DBL$$INCR_S  DBL$$INCR_W  DBL$$I_COMMON I DBL$$MUL_B  DBL$$MUL_S D DBL$$MUL_W DBL$$POP_DSCDBL$$PROBEW_HANDLER ^ DBL$$ROUND DBL$$SIGNAL S DBL$$SUB_B D DBL$$?SUB_S X DBL$$SUB_W  DBL$$UMINUS_B  DBL$$UMINUS_S  DBL$$UMINUS_WDBL$AB_CVTPT_ZDBL$_DIVBYZERO`DBL$_DTYPEINFODBL$_NUMTOOLONDBL$_OUTOFRANGDBL$_UNSUPDTYPDBL$_WRIINTLIT . ABS .P$ABS$ PPu' _DBL$CODEPd QQ ^P DBL$$GET2DXR01Rk3.0-1: DBL$$BOOLEAN3.0-126-APR-1993 09:27 VAX MACRO V5.4-3GMACRO/OBJ=DBLBOOL SOURCE:ENVIRON.MAR+SOURCE:DBLBOOL+DBLRTLMAC.MLB/LIBBOOLEAN LOGICALS AND,OR,XOR DBL$$BOOLEANl  D85$$BAND  D85$$BNOT D85$$BOR < D85$$BXOR VD85$$NOT  D85$$OPAND  D85$$OPOR D85$$XOR nDBL$$ANDDBL$$DATA_TYPE_TABLEDBL$$FREE_DYN_STRING DBL$$GET2DXR [ DBL$$OPAND  DBL$$OPOR DBL$$OR DBL$$SIGNAL rDBL$$XORDBL$_DTYPEINFODBL$_UNSUPDTYP . ABS .P$ABS$ PPP) _DBL$CODEP ^P DBL$$GET2DXRPTTgTbT1'}P~0PQ}Rn0}^QP 1P11/}RTTTPP7Pa 7Te17Te114^P DBL$$GET2DXRPQ78PPPP DBL$$CMPR_LTA   DBL$$CMPR_LTD / DBL$$CMPR_NEA  DBL$$CMPR_NED  DBL$$CMPR_P_SETUP DBL$$CMPR_Z_SETUPDBL$$DATA_TYPE_TABLEDBL$$FREE_DYN_STRINGDBL$$GA_COLLATING_TABLEDBL$$GDIT_ACCUM1DBL$$GDIT_ACCUM1_ENDDBL$$GDIT_ACCUM1_INTENDDBL$$GDIT_ACCUM2DBL$$GDIT_ACCUM2_ENDDBL$$GDIT_ACCUM2_INTENDDBL$$GDcIT_RESULT DBL$$GET2DX DBL$$GET2DXR  DBL$$GET_QUADDBL$$GL_IFLAGSDBL$$GP_ACCUM1DBL$$GP_ACCUM2DBL$$GP_RESULT  DBL$$IFTEST DBL$$SIGNALDBL$_DTYPEINFO'DBL$_NUMTOOLONDBL$_UNSUPDTYP . ABS .P[ _DBL$CODEP$ABS$PPPPP10p nPЮQPQ3R(R1R1R1R1@RR1R1Pca1bPca1WPca1LPԡcaЏ14PPP1cЏЏЏ  ԡԡԡ ca1P2ca1Pca1Pca1Pԡ2caЏ1PPP1!cЏЏЏ  ԡԡԡ 2ca1PSa1|PSa1qPrSa1fPԡSaЏ1NPPP1 Sa ԡԡԡ ЏЏЏ 1Sa1Pca1Pca1Pca1PԡcaЏ1PPP17 cЏЏЏ  ԡԡԡ ca1Pca1Pca1Pca1|P}ca1qPPP1 գЏЏ ԡԡ }ca1APca16Pca1+Pca1 P}ca1PPP1u }ca}1R Q0OՎ PSQSSPSQRSʏRR1ЭSЭPDBL$$GL_SAVESP^DBL$$GL_SAVEAP\DBL$$GL_SAVEFP]ХXWXPeRRUUDBL$$GL_MAXCHANNELRRDBL$$GV_CHANNELS1 DBL$$GETCCBȏH@P@NOMEM.Not enough memory for desired operation [#009]8ILLCHN'Illegal channel number specified [#010]4NOOPEN"Channel has not been opened [#011]DONLYWR2Attempt to open output device in input mode [#012]4 CHADEFERRChannel definition error [#013](UNDOPCUndefined opcode [#014]<BIGNUM+Arithmetic operand exceeds 18 digits [#015]*CHNUSEChannel is in use [#016]&FILSPCBad file name [#017]$FNFFile not found [#018]8 HANNOTAVA#Device handler not available [#019],DIGITBad digit encountered [#020]:FILOPT)An invalid operation for file type [#021]BIOFALL0Bad data encountered during I/O operation [#022]@TOOBIG/Input data size exceeds destination size [#023]:NOSPAC(No space exits for file on device [#024]<FILFUL+No space is available to extend file [#025]4 FLDRECLNGField or record too long [#026]8RECNUM&Illegal record number specified [#028]FBADCMP4Compiler not compatible with execution system [#029]2DIVIDE Attempt to divide by zero [#030]:ARGSIZ)Argument specified with wrong size [#031]6REPLAC%Cannot supersede existing file [#032].CHNEXCToo many channels open [#033]&DEVUSEDevice in use [#037]4FINUSE"File in use by another user [#038]<ONLYRD+Attempt to write to read only device [#039](LOCKEDRecord is locked [#040]4BADKEY#An illegal key was specified [#052]$KEYNOTKey not same [#053]0NODUPSDuplicate key specified [#054]( NOTISMFILNot ISAM file [#056], JOBSTAERRJob startup error [#058]2 ILLTRMNUMIllegal terminal number [#059]*NOCURRNo current record [#061],PROTECProtection violation [#062]2 NO_SUCOPRNo such operation (RMS) [#063]&RNFRecord not found [#064]$SYSTEMSystem error [#067]2 ARGOUTORDArguments out of order [#077]2 ARGOUTLIMArgument out of record [#078]:ARGCOUNT'Needs minimum of three arguments [#079], FLDNOTPAKField not packed [#080]8 ILLBIOSIZ$Illegal block I/O record size [#084], WROSIZRECWrong size record [#086](ARGMISArgument missing [#087]6 INVSHRCOD!Invalid SHARE value in OPEN [#89].RMSERRORUnexpected RMS error [#100]0 INVARGTYPInvalid argument type [#101]@ DBLRTLERR,DIBOL Run Time Library internal error [#102]<FILORG*Invalid file organization specified [#103]*OUTRNGValue out of range [#104](NOTDIBCaller not DIBOL [#105](EXQUOTAExceeded quota [#106], DEVNOTRDYDevice not ready [#107]*IOMODEBad mode specified [#108]2CANCEL Cancel character detected [#109]4INTRPT#Interrupt character detected [#110],TIMEOUTOperation timed out [#111]2 OPENERRORError during file open [#112]:ALLOC)Invalid value specified for ALLOC: [#113]<BKTSIZ*Invalid value specified for BKTSIZ: [#114]<BLKSIZ*Invalid value specified for BLKSIZ: [#115]<BUFSIZ*Invalid value specified for BUFSIZ: [#116]<RECSIZ*Invalid value specified for RECSIZ: [#117]@NOMSGMGR-Unable to open message manager mailbox [#118]B FEANOTIMP-Feature not implemented for field test [#119]D QUENOTAVA0Queue not available or invalid queue name [#120]0 INVKEYNUMInvalid KEYNUM value [#121]: FORGNTERM&Foreign terminals not supported [#122]4 OUTATTERRInvalid output attribute [#123]2INATTERRInvalid input attribute [#124]4 INVCHRERR Invalid character entered [#125], FULBUFERRInput buffer full [#126]8 UNSUPDTYP$Invalid data type encountered [#127].INVMATCHInvalid MATCH value [#128]8 INVCONTIG#Invalid CONTIG value in OPEN [#129]2INVDEQ Invalid DEQ value in OPEN [#130]<NUMREC*Invalid value specified for NUMREC: [#131]8 INVRECTYP#Invalid RECTYP value in OPEN [#132]4INVALFDL Invalid FDL value in OPEN [#133]8 INVBUFNUM#Invalid BUFNUM value in OPEN [#134]6INVPRO%Invalid PROTECT string in OPEN [#135]:INVACL)Invalid PROTECT/ACL string in OPEN [#136]8 TOOMNYSEG$Too many key segments in OPEN [#137]6INVDATYP"Invalid TYPE string in OPEN [#138]2 NO_RECSIZRECSIZ keyword required [#139],INVALRFAInvalid RFA value [#140]> NOTYETFUN)Functionality is not yet supported [#141]6 INVKEYPOS!Invalid POS in KEY of OPEN [#142]< INVKEYKRF'Invalid key of reference in OPEN [#143]6 INVKEYATR"Invalid ATTR in KEY of OPEN [#144]4NONLOCAL!Device is on remote system [#145]STOPSTOP,AT_LINEAt line !UL in routine !AC$PC_PSLPC = !XL, PSL = !XL< IOERRINFO(Channel # !SL, mode !AC, file name = !AD, NUMOFARGS!SL arguments specified$ SUBSCRPT1Subscript = !SL8 SUBSCRPT2$Subscript 1 = !SL!_subscript 2 = !SL"ARG_NMBRArgument # !UB LOGCHAN Channel # !SL$ARG_SIZEArgument size !ULVALUE Value = !UL6 ALLSNDBUF"!UL bytes required for SEND buffer:UNDEFLBL'Attempt to GOTO or CALL undefined label4OUTOFBND!Subscripting beyond data divisionWARNINGWarning0STV!RMS STV field contains error code4OPCODE#Opcode value %X!XB at address %X!XL"FILENAMEFilename = !ADvEXPIREDdThis test version (!AD) of DBLRTL has expired.!/!_!_Please obtain the released version from DIGITAL.ZNUMDIMSGNumber of dimensions of array passed does not match argument definition8BOUNDS&Array or substring index out of bounds6 DTYPEINFO"Data type is DSC$K_DTYPE_!AC (!UB)TEXT!AS*DBLDBLUTL({H| (08@:HdP~X`hp6xlB:$BASEBase for DDT messages,TITLE!_VAX DBLDDT -- Version !AC4BREAK$DDT break at line !UL in routine !AC(ATAt line !UL in routine !AC( INVDDTCOMInvalid DDT command$ NOSUCHVARNo such variable$ NOSUCHRTNNo such routine& NOSUCHBPTNo such breakpoint* XOUTOFRANExtension out of rangeRMSERR RMS errorSYSERR System error& SUBSCRERRSubscripting errorB NOSUCBPAT-No such breakpoint at line !UL in routine !AC2 WRIINTLITCannot reset literal argument6NOCONT$Cannot continue after run-time error6 ARGNOTPAS!Argument not passed to subroutineABORTAborted(NOSYMRTNNo symbols in routine6 ERRHLPLIB!Error opening DBLDDT help library* EXITSTATUSExit status is '!AS'> SHOWBREAK)Breakpoint set at line !UL in routine !ACF NOSETBREAK0Cannot set breakpoint at line !UL in routine !ACL LINERANGE8Line number range of routine !AC is line !UL through !UL( NOBREAKSETNo breakpoints setXSHOWRTNE!_Routine name First line Last line Break line DBLDDT(h@{ h(08@2H^P.BASEBase for message manager errors@MMMEMFUL-Unable to allocate virtual memory for message2MMILLFNCIllegal function code received*MMRCVFULReceiver ID table full,MMHDRFULMessage header table full*PWTBLFULProcess wait table full<NOCREMBX(Unable to create message manager mailbox DBLMSGMGRr(dX{ȃЃ؃@n 4&BASEBase for ISMUTL errors6 ISMUTLCRE!Unable to create ISAM output file* ISMINVFUNCInvalid function code: ISMANSEOF%Unexpected end of file in answer file. ISMANSOPNError opening answer file, ISMINPOPNError opening input fileD ISMINPEMP0Input file empty or contains zero-length records, ISMCNVERRError in file conversion* ISMDBLERRUnexpected DIBOL error0 ISMUNXERRUnexpected processing error DBLISMUTL(h@{h N&BASEBase for STATUS errorsNOOPTNo such option*NOMSGNo message by that number&BADFRQBad update frequency$BADNUMBad message number.NOMGRMessage manager is not runningBUNSTTYP/STATUS cannot be run on a terminal of this type DBLSTATUS" ( {2ZȏЏ؏ 2`H z(08@LHxPX`h<pnx4j:pȐА ؐ0 b , \ $BASEBase for SORT errors$SYNTAXSyntax error [#001]:UNRECOG(Unrecognized directive or command [#002](FILERRFile name error [#003].RECMISRECORD command missing [#004]&COMMISComma missing [#005]*FILMISFile name missing [#006]2KEYMATCHControl key match error [#007](TYPERRData type error [#008].SIZERRSize definition error [#009]*TMKEYSToo many sort keys [#010]2KEYSMIS Sort keys command missing [#011].TMFILESToo many merge files [#012].CHAINERRExecute/chain error [#013]0INPUTMISINPUT command missing [#014]2 OUTPUTMISOUTPUT command missing [#015]@ERRORS.Command file or message contains errors [#016]( NODATAITEMNo data item [#017]8 MSGTOOLNG$Message exceeds 40 characters [#018]2 RECLENMISRECLEN command missing [#019],DEVICERRDevice label error [#020].BADTYPETAGSORT type invalid [#021].MIXEDMerge files type mixed [#022]4 TMDEVICES Work device list too long [#023]4BADCOUNT!Invalid input record count [#024]2BADSPACEInvalid space allocation [#025]<CONFLICT(SORT mode file name/type conflict [#026]HTMFIELDS5SORTGEN record description line count exceeded [#027]BNOPACKED/Packed decimal keys option unimplemented [#028]6NOMEMORY"Not enough memory allocated [#029]4 BADFILENAMEBad file specification [#030]*COUNTERRSort count error [#031]*BADSIZEWrong record size [#032]HNORENAME4Unable to rename temp file to input file name [#033]6NOCREOUT#Unable to create output file [#034].INPINUSEInput file is in use [#035]4BADWRK#Invalid number of work files [#036]. UNKSRTERRUnknown SORT error [#037]0 UNXRMSERRUnexpected RMS error [#038]2CHRMIS!Expected character missing [#039].BADDIRInvalid sort direction [#040],ENDMISEND command missing [#041]:EXTRA)Extra characters at end of command [#042]6BADTT&Invalid terminal identification [#043]0 FILTOOBIGInput file too large [#044]j VAXSRTERRUError returned from VAX Sort/Merge [#045]!/!_Error code !XL (Hex), !-!UL (Dec), "!AC"( EXITERRORSExit due to errors( SORTVERSNVAX !AS Version !AS DBLSORT({"V F(t0pxHT.BASEBase for MENU Subroutine errors,TTACCESSError accessing terminal4SEQLIST"Error accessing menu sequence list:MSLERROR'More than 10 menu sequence list records,MENUFILEError accessing menu file* NOMENUDISPNo menu is displayed, USERABORTMenu was aborted by user4 TTNOTANSI Terminal is not an ANSI-mode CRT.NOHELPSorry, help is not available.0 INVMISSARGInvalid or missing argument> INSUFPRIV)Insufficient privilege for this selection0 SELECT_DOSelect option and press Do: 6 SELECT_RET Select option and press RETURN: N PRESSRESUME7Press Resume to continue or Exit to return to the menu P PRESSRETURN9Press RETURN to continue or CTRL/Z to return to the menu 6 PRESSEXIT!Press Exit to return to the menu 8 PRESSCTRLZ#Press CTRL/Z to return to the menu 6HELP200$Enter help topic or Exit or Cancel: JHELP1008Enter help topic or CTRL/Z to exit or GOLD-K to cancel: DBLMENU(`{ &(H0j8@HPXV`hpx$Jp"FrȠРؠ"Jx4Z (08&@ZHjP.BASEBase for MENU Generator errors(NOACTIONNo 'action' qualifier"UNKWNCMDUnknown command& UNKWNQUALUnknown qualifier"BUFFOVERBuffer overflow" COLONMISS Colon missing" COMMAMISS Comma missing,NOTASKSNo tasks for previous menu6 EXTRACHAR!Extra characters at statement end. FSPECMISSFile specification missing: GRPDSCMISS%Group description missing or too long. OPENINPERRError opening input file"KEYMISSTask key missing" LINTOOLNG Line too long(MCMDMISSMENU command missing4 CNFLCTACTConflicting 'action' qualifiers& MNAMEMISSMenu name missing& NOSUCHMENUNo such menu name$ TOOMNYGRPSToo many groups" QUOTEMISS Quote missing6 SUBTTLMISS!Menu subtitle missing or too long6 TOOMNYINCL Too many nested INCLUDE commands$ TOOMNYMENUToo many menus, TOOMNYTASKToo many TASK commands: TSKDSCMISS$Task description missing or too long2 TITLEMISSMenu title missing or too longBADDIGIT Bad digit( OUTOFRANGENumber out of range( PARENMISSParenthesis missing. OPENOUTERRError opening output file" ILLSWITCHIllegal switch( INPFILMISSInput file missing8NOCONCAT$Concatenated input files not allowed: TXTTOOLONG$Text description missing or too long& PARAMMISSParameter missing6 PARAMTYPE!Parameter type missing or invalid0 OPENLISERRError opening listing file>SUMMARY,!SB error!%S, !SB warning!%S detected in !AS(NOINCLInclude file not found4HEADMISS Menu heading missing or too longINFO ERRORSErrors detected$WARNINGSWarnings detected DBLMNUGEN@ DBLRTLMSGDBLRTL V4.2-0726-APR-1993 09:3426-APR-1993 09:34VAX-11 Linker V05-13 .$$ABS$$."*[KITS.V42-07.KIT.B]DBLSTRTUP.COM;1+,4./G 4c-80123KPWO56 47@bZb|89@A GGHJ $!6$! Command procedure to start up DIBOL Message Manager$!#$ REQPRIVS = "PRMMBX,DETACH,SYSNAM"2$ IF .NOT. F$PRIVILEGE(REQPRIVS) THEN GOTO NO_PRIV$!@$! Define a logical to control the destination of process output.$! for images started by the RUNJB subroutine.$!,$ IF F$LOGICAL("DBL$RUNJB_OUTPUT").EQS."" -. THEN DEFINE/SYSTEM DBL$RUNJB_OUTPUT "_NLA0:"$!%$ IF P1 .EQS. "" THEN P1 = "RESTART"%$ IF P1 .EQS. "START" THEN GOTO START)$ IF P1 .EQS. "RESTART" THEN GOTO KILL_IT&$ IF P1 .EQS. "KILL" THEN GOTO KILL_ITG$ WRITE SYS$OUTPUT "%DBLSTRTUP-F-INVPARAM, Invalid parameter specified"/$ WRITE SYS$OUTPUT "-DBLSTRTUP-I-PARAMVAL, ",P1$ GOTO EXIT_FATAL$!$!$! Start the message manager$ START:*$ EXISTS = F$GETDVI("DBL$MSGMGR","EXISTS")#$! If it doesn't exist, go start it#$ IF .NOT. EXISTS THEN GOTO RUN_IT*$ REFCNT = F$GETDVI("DBL$MSGMGR","REFCNT")5$! If it exists, and it's in use, exit with a warning)$ IF REFCNT .NE. 0 THEN GOTO EXIT_RUNNING$! Otherwise, run it $ GOTO RUN_IT$!$!$! Stop the message manager $ KILL_IT:*$ EXISTS = F$GETDVI("DBL$MSGMGR","EXISTS")&$! If it doesn't exist, don't kill it.!$ IF .NOT. EXISTS THEN GOTO DEAD$!=$! Make sure there is a message manager process to go with it$ LOOP:$ PID = F$PID(CONTEXT) $ IF PID .EQS. "" THEN GOTO DEAD;$ IF F$GETJPI(PID,"PRCNAM").NES."DBL$MSGMGR" THEN GOTO LOOP=$! Message manager process is running, so send it a KILL code$ OPEN/WRITE MBX DBL$MSGMGR$ WRITE MBX "9" $ CLOSE MBX $ COUNT = 1$!$!$! Wait until it's dead$ WAIT_UNTIL_DEAD:$ WAIT 00:00:01*$ EXISTS = F$GETDVI("DBL$MSGMGR","EXISTS")$ COUNT = COUNT + 1%$! If we've waited this long, give up#$ IF COUNT .GT. 30 THEN GOTO ZOMBIE$! Wait a little longer'$ IF EXISTS THEN GOTO WAIT_UNTIL_DEAD$!$!$ DEAD:%$! If this was just a KILL, then exit&$ IF P1 .NES. "RESTART" THEN GOTO EXIT$!$$! Run the message manager detached. $ RUN_IT:$ RUN SYS$SYSTEM:DBLMSGMGR - /UIC=[1,4] - /PRIV=(PRMMBX) - /PROCESS=DBL$MSGMGR -# /ERROR=SYS$ERRORLOG:DBLMSGMGR.LOG$ EXIT:$! Normal exit$ EXIT $STATUS$!($ EXIT_RUNNING: ! Was already runningU$ WRITE SYS$OUTPUT "%DBLSTRTUP-W-MSGMGRRUN, DIBOL Message Manager is already running"$ EXIT %X10000000$!$$ ZOMBIE: ! It couldn't be killed\$ WRITE SYS$OUTPUT "%DBLSTRTUP-F-MSGMGRHNG, DIBOL Message Manager does not respond to kill."$ EXIT %X10000004$!&$ NO_PRIV: ! You're underprivilegedc$ WRITE SYS$OUTPUT "%DBLSTRTUP-F-INSFPRIV, You have insufficient privileges to run this procedure."B$ WRITE SYS$OUTPUT "-DBLSTRTUP-I-REQPRIVS, You need ",REQPRIVS,"." $ EXIT_FATAL:$ EXIT %X10000004"*[KITS.V42-07.KIT.B]DBLTNMBRS.COM;1+, 4./G 4aX-80123KPWO56`&KS7ub|89@A GGHJ$!/$! Command Procedure to update DIBOL RTL tables7$! for translating terminal names into terminal numbers$!:$! If P1 is present, it specifies the name of a previously9$! generated output file from show device (or equivalent)$!$!++$! Modification history#$! V2.3 25-JUN-1985 Rebecca Ozzie/$! move read to loop, to stop the loop-de-loop!$! V4.0 2-Sep-1987 Mei-ying Lin0$! Define P_OFF and PREVUNIT before testing P1 #$! V4.0-1 23-Oct-1987 Ed Flecchia<$! Computing new P_OFF offset should be in byte increments,$! not word offsets."$! T4.1-0 7-DEC-1989 Phil Hudson6$! Make sure we put the patched DBLRTL back where the>$! original one was. (Do this by setting default correctly)@$! It will now also check for terminals on the system via thier $! DEVCLASS.$$! V4.1-0 29-JAN-1990 Phil Hudson=$! Fix ^C and ^Y exits, and give certain terminal types more'$! more terminal numbers to work with.$!++$! $ DEF = F$ENVIRONMENT("DEFAULT")+$ FILNAM = F$SEARCH("SYS$SHARE:DBLRTL.EXE")*$ DEFALL = F$PARSE("''FILNAM'",,,"DEVICE")6$ DEFALL = DEFALL + F$PARSE("''FILNAM'",,,"DIRECTORY")$ SET DEFAULT 'DEFALL'#$ ON ERROR THEN GOTO ERROR_OCCURRED'$ ON CONTROL_Y THEN GOTO ERROR_OCCURRED$ ERROR_O = "NO"$ NUMUNITS = 0 $ P_OFF = 8$ TN = 0 $ QUOTE = """$ DC$_TERM = 66C$ IF P1.EQS."" THEN SHOW DEVICE/OUTPUT=SYS$SCRATCH:DBL$_TNMBRS.TEMPC$ IF P1.EQS."" THEN OPEN/READ TNUMFILE SYS$SCRATCH:DBL$_TNMBRS.TEMP*$ IF P1.NES."" THEN OPEN/READ TNUMFILE 'P14$ OPEN/WRITE PATCHFILE SYS$SCRATCH:DBL$_TNMBRS.PATCH$ WRITE PATCHFILE "DBLRTL.EXE"$$ WRITE PATCHFILE "SET MODE DECIMAL""$ WRITE PATCHFILE "! Set eco here")$ WRITE PATCHFILE "! Verify address here"/$ WRITE PATCHFILE "DEFINE TN = DBL$TNMBR_TABLE"<$ WRITE PATCHFILE "DEPOSIT/ASCII TN+0 = ",QUOTE,"OPA0",QUOTE$$ WRITE PATCHFILE "DEPOSIT TN+4 = 0"$ SKIP_HEADERS:I$ READ/END_OF_FILE=TNUMS_EOF TNUMFILE TNREC ! Skip 1st 3 (header) records/$ IF (F$LOCATE(":",TNREC).EQ.F$LENGTH(TNREC)) -/ THEN GOTO SKIP_HEADERS ! Find 1st device$ POS = F$LOCATE(":",TNREC)!$ DCUNIT = F$EXTRACT(0,POS,TNREC)5$ IF F$GETDVI("''DCUNIT'","DEVCLASS") .NE. DC$_TERM -5 THEN GOTO SKIP_HEADERS ! Find 1st terminal device $ DEV = "OP" $ CTL = "A"$ NUMUNITS = 1$ TN = 0 $ P_OFF = 8$!$ WRITE SYS$OUTPUT " "$ WRITE SYS$OUTPUT " "a$ WRITE SYS$OUTPUT " The following is a list of terminal devices that this command procedure" a$ WRITE SYS$OUTPUT " has found on your system. These DO NOT need to be re-entered at the end."a$ WRITE SYS$OUTPUT " --------------------------------------------------------------------------"X$ WRITE SYS$OUTPUT " Device Starting terminal # Ending Terminal #"X$ WRITE SYS$OUTPUT " ------ ------------------- -----------------":$ WRITE SYS$OUTPUT " OPA 0 0"$ GOTO FIRST_TIME$ LOOP:+$ READ/END_OF_FILE=TNUMS_EOF TNUMFILE TNREC $ FIRST_TIME:/$ IF (F$LOCATE(":",TNREC).EQ.F$LENGTH(TNREC)) -% THEN GOTO LOOP ! Find A DEVICE$ POS = F$LOCATE(":",TNREC)!$ DCUNIT = F$EXTRACT(0,POS,TNREC)5$ IF F$GETDVI("''DCUNIT'","DEVCLASS") .NE. DC$_TERM -+ THEN GOTO LOOP ! Find a terminal device$$ NEWUNIT = F$EXTRACT(3,POS-3,TNREC)$ NEWDEV = F$EXTRACT(0,2,TNREC)A$ IF NEWDEV .EQS. "OP" THEN GOTO LOOP ! WE ALREADY MADE IT 1ST...$ NEWCTL = F$EXTRACT(2,1,TNREC)$!($ IF NEWDEV .EQS. DEV THEN GOTO SAME_DEV$ DEV = NEWDEV$ GOTO SET_CTL $ SAME_DEV:$$ IF NEWCTL .EQS. CTL THEN GOTO LOOP $ SET_CTL:$ CTL = NEWCTL$ TN = TN+NUMUNITS#$ DCUNIT = F$EXTRACT(0,3,TNREC)+"0"D$ WRITE PATCHFILE "DEPOSIT/ASCII TN+",P_OFF," = ",QUOTE,DCUNIT,QUOTE0$ WRITE PATCHFILE "DEPOSIT TN+",P_OFF+4," = ",TN$ DCUNIT2 = DCUNIT - "0"$ P_OFF = P_OFF+8$ NUMUNITS = 32D$ IF DEV .EQS. "VT" THEN NUMUNITS = 65536 !Can have this many VTxxxD$ IF DEV .EQS. "LT" THEN NUMUNITS = 65536 ! Can have this many LATsD$ IF DEV .EQS. "PT" THEN NUMUNITS = 65536 ! Psuedo Terminal for DTM9$ IF DEV .EQS. "NV" THEN NUMUNITS = 65536 ! PSI terminal?$ IF DEV .EQS. "TW" THEN NUMUNITS = 65536 ! DECWindow terminalL$ WRITE SYS$OUTPUT " ''DCUNIT2' ",TN," ",TN+NUMUNITS-1 $ GOTO LOOP$! $ TNUMS_EOF:$ TN = TN+NUMUNITS$ WRITE SYS$OUTPUT " "a$ WRITE SYS$OUTPUT " --------------------------------------------------------------------------"a$ WRITE SYS$OUTPUT " To quit without changes type ^C or ^Y; To goto previous question type ^Z."$ OPEN/READ SYSIN TT:$ ADDITIONAL_DEVICE_LOOP:$ WRITE SYS$OUTPUT " "2$ READ/END_OF_FILE=ADDITIONAL_DEVICE_LOOP -F /PROMPT="Do you wish to add any additional devices [No] " SYSIN MORE"$ IF .NOT. MORE THEN GOTO ALL_DONE$ ENTER_DEV_TYPE:$ WRITE SYS$OUTPUT " "-$ READ/END_OF_FILE=ADDITIONAL_DEVICE_LOOP -J /PROMPT="Enter device type and controller letter, as in TTA: " SYSIN DEV*$ IF DEV .EQS. "" THEN GOTO ENTER_DEV_TYPE$ DEV = F$EDIT(DEV,"UPCASE")2$ IF F$LENGTH(DEV) .LT. 3 THEN GOTO ENTER_DEV_TYPE$ ENTER_TERM_NUMS:$ WRITE SYS$OUTPUT " "C$ WRITE SYS$OUTPUT "Terminal numbers for ",DEV," will start at ",TN%$ READ/END_OF_FILE=ENTER_DEV_TYPE -Q /PROMPT="Press RETURN to accept that number or enter a new number " SYSIN XUNIT$ IF XUNIT.NES."" THEN TN=XUNIT$ ENTER_NUM_NUMS:$ DEV2 = F$EXTRACT(0,2,DEV)$ NUMUNITS = 32E$ IF DEV2 .EQS. "VT" THEN NUMUNITS = 65536 !Can have this many VTxxxE$ IF DEV2 .EQS. "LT" THEN NUMUNITS = 65536 ! Can have this many LATsE$ IF DEV2 .EQS. "PT" THEN NUMUNITS = 65536 ! Psuedo Terminal for DTM:$ IF DEV2 .EQS. "NV" THEN NUMUNITS = 65536 ! PSI terminal@$ IF DEV .EQS. "TW" THEN NUMUNITS = 65536 ! DECWindow terminal$ WRITE SYS$OUTPUT " "%$ READ/END_OF_FILE=ENTER_TERM_NUMS -G /PROMPT="How many devices per controller [''NUMUNITS'] " SYSIN XUNIT2$!E$ WRITE PATCHFILE "DEPOSIT/ASCII TN+",P_OFF," = ",QUOTE,DEV,"0",QUOTE0$ WRITE PATCHFILE "DEPOSIT TN+",P_OFF+4," = ",TN$ P_OFF = P_OFF+8.$ IF XUNIT2.NES."" THEN TN=TN+F$INTEGER(XUNIT)&$ IF XUNIT2.EQS."" THEN TN=TN+NUMUNITS$ GOTO ADDITIONAL_DEVICE_LOOP $ ALL_DONE:,$ WRITE PATCHFILE "DEPOSIT TN+",P_OFF," = 0".$ WRITE PATCHFILE "DEPOSIT TN+",P_OFF+4," = 0"$ WRITE PATCHFILE "UPDATE"$ WRITE PATCHFILE "EXIT"$ GOTO CLOSE_FILES$ ERROR_OCCURRED:$ ERROR_O = "YES"$ CLOSE_FILES:$ CLOSE TNUMFILE$ CLOSE PATCHFILE $ CLOSE SYSINa$ WRITE SYS$OUTPUT " --------------------------------------------------------------------------"8$ IF P1.EQS."" THEN DELETE SYS$SCRATCH:DBL$_TNMBRS.TEMP;$! $! Apply terminal number patches$!A$ IF ERROR_O .+͘~ DIBOL042.B 48"[KITS.V42-07.KIT.B]DBLTNMBRS.COM;1aNEQS. "NO" THEN PATCH @SYS$SCRATCH:DBL$_TNMBRS.PATCH$ SET DEF 'DEF'$!$ EXIT *[KITS.V42-07.KIT.B]DBLUESL.OLB;1+,./G 4-80123 KPWO56 7頹7@U\|89@A GGHJ*% VAX-11 Librarian V04-00頹!-$_ID_$ASCIIDATEDECMLDELET ERROR FATAL FILEC FLAGS INSTRJBNOMONEYPAKRENAMRSTATRUNJBSIZETIMETNMBRTTSTSUNPAKVERSNWAIT 1@K4꠹ DIBOL V4.29$_ID_$ DIBOL V4.226-APR-1993 09:49 VAX MACRO V5.4-3JMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:LIBHEADER.MAR+DBLRTLMAC/LIB  $_ID_$ . ABS .Pww1꠹0/ASCII026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:ASCII.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$ASCII ASCII ASCII DBL$ASCII . ABS .P _DBL$CODE"P DBL$ASCII& DBL$ASCII3 _DBL$CODEwwASCIIDATEDECMLDELET ERROR FATAL FILEC FLAGS INSTRJBNOMONEYPAKRENAMRSTATRUNJBSIZETIMETNMBRTTSTSUNPAKVERSNWAIT1꠹0.DATE026-APR-1993 09:50 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:DATE.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$DATE DATE DATEDBL$DATE . ABS .P _DBL$CODE P DBL$DATE&DBL$DATE3 _DBL$CODEww1|+령0/DECML026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:DECML.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$DECML DECML DBL$DECML DECML . ABS .P _DBL$CODE"P DBL$DECML& DBL$DECML3 _DBL$CODEww1 령0/DELET026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:DELET.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$DELET DELET DBL$DELET DELET . ABS .P _DBL$CODE"P DBL$DELET& DBL$DELET3 _DBL$CODEww1령0/ERROR026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:ERROR.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$ERROR ERROR DBL$ERROR ERROR . ABS .P _DBL$CODE"P DBL$ERROR& DBL$ERROR3 _DBL$CODEww1@4젹0/FATAL026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:FATAL.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$FATAL FATAL DBL$FATAL FATAL . ABS .P _DBL$CODE"P DBL$FATAL& DBL$FATAL3 _DBL$CODEww1}젹0/FILEC026-APR-1993 09:50 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:FILEC.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$FILEC FILEC DBL$FILEC FILEC . ABS .P _DBL$CODE"P DBL$FILEC& DBL$FILEC3 _DBL$CODEww1 젹0/FLAGS026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:FLAGS.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$FLAGS FLAGS DBL$FLAGS FLAGS . ABS .P _DBL$CODE"P DBL$FLAGS& DBL$FLAGS3 _DBL$CODEww1Ro0/INSTR026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:INSTR.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$INSTR INSTR DBL$INSTR INSTR . ABS .P _DBL$CODE"P DBL$INSTR& DBL$INSTR3 _DBL$CODEww10.JBNO026-APR-1993 09:51 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:JBNO.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$JBNO JBNODBL$JBNO JBNO . ABS .P _DBL$CODE P DBL$JBNO&DBL$JBNO3 _DBL$CODEww1`Yz0/MONEY026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:MONEY.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$MONEY MONEY DBL$MONEY MONEY . ABS .P _DBL$CODE"P DBL$MONEY& DBL$MONEY3 _DBL$CODEww10-PAK026-APR-1993 09:51 VAX MACRO V5.4-3DMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:PAK.VEC+DBLRTLMAC/LIB- Transfer vector for DBL$PAK  PAKDBL$PAK PAK . ABS .P _DBL$CODEP DBL$PAK&DBL$PAK3 _DBL$CODEww1@s0/RENAM026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:RENAM.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$RENAM RENAM DBL$RENAM RENAM . ABS .P _DBL$CODE"P DBL$RENAM& DBL$RENAM3 _DBL$CODEww1i0/RSTAT026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:RSTAT.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$RSTAT RSTAT DBL$RSTAT RSTAT . ABS .P _DBL$CODE"P DBL$RSTAT& DBL$RSTAT3 _DBL$CODEww1@𠹖0/RUNJB026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:RUNJB.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$RUNJB RUNJB DBL$RUNJB RUNJB . ABS .P _DBL$CODE"P DBL$RUNJB& DBL$RUNJB3 _DBL$CODEww1q𠹖0.SIZE026-APR-1993 09:51 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:SIZE.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$SIZE SIZEDBL$SIZE SIZE . ABS .P _DBL$CODE P DBL$SIZE&DBL$SIZE3 _DBL$CODEww1 <𠹖0.TIME026-APR-1993 09:51 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TIME.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$TIME TIMEDBL$TIME TIME . ABS .P _DBL$CODE P DBL$TIME&DBL$TIME3 _DBL$CODEww 1@P񠹖0/TNMBR026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TNMBR.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TNMBR TNMBR DBL$TNMBR TNMBR . ABS .P _DBL$CODE"P DBL$TNMBR& DBL$TNMBR3 _DBL$CODEww1 񠹖0/TTSTS026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:TTSTS.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$TTSTS TTSTS DBL$TTSTS TTSTS . ABS .P _DBL$CODE"P DBL$TTSTS& DBL$TTSTS3 _DBL$CODEww1x񠹖0/UNPAK026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:UNPAK.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$UNPAK UNPAK DBL$UNPAK UNPAK . ABS .P _DBL$CODE"P DBL$UNPAK& DBL$UNPAK3 _DBL$CODEww10/VERSN026-APR-1993 09:51 VAX MACRO V5.4-3FMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:VERSN.VEC+DBLRTLMAC/LIB!- Transfer vector for DBL$VERSN VERSN DBL$VERSN VERSN . ABS .P _DBL$CODE"P DBL$VERSN& DBL$VERSN3 _DBL$CODEww10.WAIT026-APR-1993 09:51 VAX MACRO V5.4-3EMACRO/NOLIST/OBJECT/ENABLE=(SUPPRESS) SOURCE:WAIT.VEC+DBLRTLMAC/LIB - Transfer vector for DBL$WAIT WAITDBL$WAIT WAIT . ABS .P _DBL$CODE P DBL$WAIT&DBL$WAIT3 _DBL$CODEww*[KITS.V42-07.KIT.B]DIBOL.HLB;1+,s2./G 4-80123 KPWO567,7ٳ\|89@A GGHJD% VAX-11 Librarian V04-00`(F`:X 5" Data-typesDCL!( Debugging` DirectivesErrors Expressions FunctionsHelpLinkingMascot" Statementsg4 SubroutinesM1 HelpM Displays information about using VAX DIBOL. Information is available on theJ DIBOL DCL command, linking DIBOL programs, debugging DIBOL programs usingK VAX Symbolic Debugger, DIBOL language statements, subroutines included in D the DIBOL subroutine libraries, and possible DIBOL run-time errors.!++! Compiler DCL command!--wwM1 DCLC Invokes the VAX DIBOL compiler to compile one or more DIBOL source@ programs. This command is  described in detail in the VAX DIBOL User's Guide. Format:6 DIBOL file-spec{,...} (for separate compilations): DIBOL file-spec{+...} (for concatenated compilations) Alternate functions:) DIBOL/MENU invokes menu generator 2 Parameters file-spec{,...} file-spec{+...}L Specifies one or more DIBOL source program files to be compiled. If you doL not specify a file type for an input file, DIBOL uses the default file type of DBL.D You can specify m ore than one input file. If you separate the fileJ specifications with commas (,), each file is compiled separately. If youD separate the file specifications with plus signs (+), the files areJ concatenated and compiled as a single input file, producing single objectJ and listing files. Wild cards are not allowed in the file specification.J You cannot specify the source file to be the terminal or the input stream (SYS$INPUT).- |,|E DIBOL{/qua lifier}filespec{/qualifier}{| |filespec{/qualifier}...}- |+| 2 Qualifiers3 /BIND /BIND{=value} (object) /NOBINDG Creates an object module that can be "bound". A main routine compiledF with this qualifier can, together with other main routines, be linkedJ into one executable image. When a "chain" statement is executed from oneJ of the main routines to another main routine, instead of activating a newH image, control is transferred w ithin the same image from the first mainC routine to the second "bound" main routine. Acceptable values are: Value EffectG PRIMARY Make this routine "bindable" and generate a transferF address. This routine will be the true main routineH within the bound image. There can be only one PRIMARY routine.E SECONDARY Make this routine "bindable" and do not generate aJ transfer address. T his routine can only be activated by binding.3 /CHECK /CHECK{=(value,...)}(object) /NOCHECKH Checks, at runtime, for array and substring bounds or passed arguments. Acceptable values are: Value EffectJ BOUNDS Check, at runtime, that array and substringbounds are not exceeded.= NOBOUNDS Do not check for array and substring bounds. ARGUMENTS {= argoption} NOARGUMENTS argoption: I EQ The number of passed arguments must be equal@ to the number of declared arguments' (default).G LE The number of passed arguments can be lessD than or equal to the number of declared1 arguments (default).J GE The number of passed arguments can be greaterD than or equal to the number of declared' arguments./ NE There is no check.F The system default is /CHECK=(NOBOUNDS,ARGUMENTS=LE). If no value is. specified when /CHECK is used, the default is /CHECK=(BOUNDS,ARGUMENTS=EQ). 3 /COMMON /COMMON{=(value,...)}G Changes the properties of a COMMON declaration. Acceptable values are: Value Effect3 EXTERNAL Forces all COMMONS to be external.1 GLOBAL Forces all COMMONS to be global. SUFFIX {= string}E Add string as suffix to common name. Default suffix string is '$'.9 NOSUFFIX Do not add suffix string to common name.> If no value is specified when /COMMON is used, the default is /COMMON=SUFFIX='$'.3 /CROSS_REFERENCE /CROSS_REFERENCE (list) /NOCROSS_REFERENCEF Generates a cross-reference listing as part of the listing file. TheJ cross-reference listing identifies by line number the locations where theF following program entities are defined and used: variables, statement8 labels, and external references. The system default is /NOCROSS_REFERENCE.3 /DEBUG /DEBUG{=value} /NODEBUGJ Directs the compiler to include debugging information in the object code.3 /DEBUG overrides /OPTIMIZE. Acceptable values are: Value EffectD NATIVE Generate code for use with the VAX Symbolic Debugger (DEBUG).B PCA Generate code for use with the VAX Performance and+ Coverage Analyzer (PCA). .= If no value is specified when /DEBUG is used, the default is0 /DEBUG=NATIVE. The system default is /NODEBUG.3 /DIAGNOSTICS /DIAGNOSTICS{=filespec} /NODIAGNOSTICSF Creates a diagnostic file containing compiler messages and diagnosticG information. The diagnostic file is reserved for use by DIGITAL. TheH VAX Language-Sensitive Editor (LSE) uses the diagnostic file to displayF diagnostic messages and to position the cursor on the line and columnJ where a source error exists. The default file type for a diagnostic file0 is .DIA. The system default is /NODIAGNOSTICS. 3 /ENABLE /ENABLE {=value} /NOENABLE Enables different options. Value DICTIONARY = option option:8 D83 Include from CCD will generate D83 code.< NOD83 Include from CCD will generate non-standard code (default). 3 /LIBRARY /LIBRARYD Specifies a default text library which will be used if the .INCLUDEF compiler directive does not specify a library name. The default fileF type is TLB. The text library must be specified as a source file andB appended to one of the program source files with a plus (+) sign.I Alternatively, the logical name DIBOL$LIBRARY may be used to specify theI name of the default text library. If no /LIBRARY qualifier is specified> on a source file, and an .INCLUDE from the default library isF encountered, the library specified by DIBOL$LIBRARY will be searched.3 /LIST /LIST{=filespec} /NOLISTB Creates a listing file with default file type LIS. If no file isJ specified, the first file specification in the command line is used. The system default is /NOLIST.3 /MENU /MENU filespec{/qualifier} /NOMENUH Invokes the DIBOL menu generator (DBLMNUGEN) to "compile" a menu source; file into a run-time file. The system default is /NOMENU. 3 /OBJECT /OBJECT{=filespec} /NOOBJECTB Creates an object file with default file type OBJ. If no file isJ specified, the first file specification in the command line is used. The system default is /NOOBJECT. 3 /OPTIMIZE /OPTIMIZE (object) /NOOPTIMIZE (object)G Suppresses the output of line numbers as part of the object code. TheE resulting program code is smaller and usually executes more quickly.G Line numbers are required for DEBUG operations. The system default is ? /NOOPTIMIZE. You cannot specify /OPTIMIZE and /DEBUG together. 3 /PAGE_SIZE /PAGE_SIZE=value (list)A Specifies the number of lines per page in the listing file. TheC specified value includes 3 lines for the top margin, 3 lines for aI header, and 3 lines for the bottom margin (9 in all). If this qualifierC is omitted, the system default lines per page is used. The systemJ default is the value defined by SYS$LP_LINES or 66 if SYS$LP_LINES is not defined. 3 /REFRESH /REFRESH /NOREFRESHF Reinitializes the Data Division when a routine or subroutine compiledB with this switch is activated. The system default is /NOREFRESH.3 /SHOW /SHOW{=(value,...)} /NOSHOWJ Generates a listing file that contains a symbol table, a label table, andD a listing of the source program that contains all source files, allJ conditional program segments (compiled and non-compiled), and all programE segments specified with the .INCLUDE compiler directive. The system default is /NOSHOW.I The content of the listing file can be modified by user-specified valuesJ appended to the SHOW qualifier. One or more values can be specified with+ the SHOW qualifier. Acceptable values are: Value EffectB {NO}CONDITIONALS Conditional program segments that were notJ compiled appear (CONDITIONAL) in the listing or doB not appear (NOCONDITIONAL) in the listing.H {NO}IN CLUDE Contents of an included file appear (INCLUDE) inG the listing or do not appear (NOINCLUDE) in the listing.C {NO}SOURCE Contents of the program source files appear@ (SOURCE) in the listing or do not appearJ (NOSOURCE) in the listing. SOURCE takes precedence$ over NOLIST.H {NO}TABLES A symbol table and a label table appear (TABLES)I  in the listing or do not appear (NOTABLES) in the listing.I ALL Equivalent to SHOW with no user-specified values.G NONE Equivalent to NOSHOW (user-specified values not- allowed with NOSHOW). 3 /STANDARD /STANDARD{=value} /NOSTANDARDJ Directs the compiler to insure that the program conforms to the specified syntax. Acceptable values are: Value EffectD D83 Syntax defined in the DIBOL-83 Language Reference Manual.? ANS Syntax defined in the ANS Language Reference Manual.C If no value is specified when /STANDARD is used, the default is6 /STANDARD=D83. The system default is /NOSTANDARD.E Feature /STANDARD /NOSTANDARDF --------------------------------------------------------------------< Maximum channel number 15 255> Maximum record/field size  16383 65535D XCALL extensions none %VAL, %REF,G %DESCR, %XTRNLF Subroutine names 6 characters 31 charactersF Variable and label names (P) 6 characters 30 charactersF COMMON variable names 5 characters 30 charactersC .INCLUDE directive (P) files files, CDDG  text librariesB Maximum Nested .INCLUDE (P) 3 levels 10 levels 3 /VARIANT /VARIANT{=value} /NOVARIANTD Defines the value of the compiler variant variable. If no value isE specified when /VARIANT is used, the default value is 1. The systemD default is /NOVARIANT. /NOVARIANT defines the value of the compilerE variant variable as 0 (zero). This qualifier is the system default. 3 /WARNINGS /WARNINGS /NOWARNINGSJ Directs the compiler to report warnings and errors in the listing file or? at the terminal (or both). The system default is /NOWARNINGS.!++ ! Linking!--ww@V 1 LinkingE Two external subroutine libraries have been provided for maintainingF source compatibility with PDP-11 DIBOL. Subroutines in the UniversalB External Subroutine Library (DBLUESL) are available in all PDP-11E DIBOL implementations. Subroutines in the Operating System Specific< Library (DBLOSSL) are available in on e or more PDP-11 DIBOL implementations.D The VAX DIBOL Run-Time Library shareable image is pointed to by theC system shareable image library (SYS$LIBRARY:IMAGELIB.OLB) which isA searched by default by the linker. A program which does not useF either the DBLUESL or DBLOSSL libraries may be linked by entering the following command: $ LINK prognameE For compatibility with VAX DIBOL Version 1, a linker options file isC provided which links in the DBLUESL library and the DIBOL R!TL. To% link using this options file, enter:/ $ LINK progname, SYS$LIBRARY:DBLRTL/OPTIONSF Or to link the DBLUESL library without using the options file, enter:0 $ LINK progname, SYS$LIBRARY:DBLUESL/LIBRARY' And similarly for the DBLOSSL library:0 $ LINK progname, SYS$LIBRARY:DBLOSSL/LIBRARYC Alternatively, if the DBLUESL and DBLOSSL libraries are defined asC linker logicals (LNK$LIBRARY, LNK$LIBRARY_1, ...), the linker will# search these libraries by default."!++ ! Debugging!--ww@V 1 Debugging> Each routine to be debugged must be compiled using the /DEBUG qualifier.7 The image file must be linked using the /DEBUG switch.@ If DEBUG is to be used, the LINK command should be specified as follows:. $ LINK/DEBUG progname {,other files if any}A A sample DEBUG initialization file is provided as part of DIBOL.F DEBUG executes the initialization file pointed to by the logical nameC DBG$INIT. To define the #logical name to point to the DIBOL sample6 initialization file, enter the following DCL command:/ $ DEFINE DBG$INIT SYS$EXAMPLES:DBLDBGINI.COMwwwX 1 Data-types- VAX DIBOL supports the following data types: A Alpha D Zoned Decimal P Packed Decimal I Integer2 N Numeric (Only for subroutine arguments)8 A decimal point (.) indicates an implied decimal point.wwwX 1 Statements2 Data_Divis,52~ +IsswVwjlPR*̞-nK3Ik7yQh퇾7%KW W1o] rE4yJ9 fdz=a`3VpcRVS35VO [' HrH٠ޭ k&7GTQdL~[7tl\j2ZU\FoT  3<*R\2#>D.XCmE}GOTιi#K:WBG߶ i\.?^=Ij @!h*CW JQ$zrǣ}~ODə}D*c .KsPmzg08 G <Hld*TNe ]m?%'֕aythrA3 ӬZ=PsB[آEEjJ $B'_ET`=雛~bV@AL>\zb*`m)#WZd 9{l6|nJNx7)Xf<%o'諾?WU"es˺h-(:Lu./7|] M;!YIR |15Jcv;tlSc($zFC#LxY@Ưʺ{*dhG5T>$h裮*) +:IEs_*2+mF^:e^bܯ`{[9Mn+a~ TLcv*kJqѠ=>ШĻc5tTv qm:fUd-ǟ6T4?O2;!-禱}n .HoC9Q| Cn T$~I0t?Phq}*jh }bw| [h|VȰ2POBL$_Ia 8#bDk:~.%gs F\]DXЈf#^'FO878s[E/+n%9IĘݹ O2 #{\ ެpX{(ٱRtq3umլ|5Զ^Pn1[4 'xia{7/N봠Ew pt8 dtuFˢy`Zc8kMlr'SJS\aebF1Ǥ: 45=Y@Dq!M xR} m`CӷyXYB޵,d2t)e6rxPU/}أSC=PےH#f6c9}e,b;dЌ񞱻ks>#VJ1z.g )N7;QrZSQުteil@UEC2QK>5! M%<&uJ.o\+Y6*8T$ U^~] rPݴ&qЋ[icG[Hc&@\1*zj*USP;~&ݑ3#Oק g,A{t\韝[Ө h|`Y$y x|H-Jc81Pfs&,^\A cM_6W֮MSY*c[yNd~w3މbs trnhoˎ0VU jhnQD,8o]YMWvl3-b4|,MGh_FGCXrGY jqh8X5S|tXCɓZB h {=@U3 +jn\TG0^[{Jyh7d Xx2_nD=A*}9@R4ߍ1xy2ҁkw8 ^j{֣mgGM69`Ky\oC~w$F9C+TT6q6۶HE^;LQhztv aJK5HJ$OOPCYMDsg< SQq~Vw@쉁]3SUV0ASdJu@d>?O&YN asm98 ĴgvA MEFstNXlfj0v@zEɒYvaѻyGk'.),#ŋWGw12p[.^3:*wMϺbc s:&ˢM/]T'H@ݸĕ{'KӇr@zlIx-U5+y/KR"+c-ΝqcNpխ5&hh Tu# Nv8`@2 GŮz;,(wȻQg$?_C9JSS8-w{բR0E>@Yxe8` fʹt67! d3$u5< :jO.?ءa3i12K?ހnenqY ɉ I̗z7,]EH)0FVfa4CzBȃ[GR_*Q7`,o~'Da\%xuٚ~`[^^ ]~ gB^ ȦB];Bt <0 P =z.ղeW,S$osЌ(Rx65,r$7<6a|]12T⑅5I[b(a9u Ojeu*pv2E>A;:J@='\SJAKb2K:㨜͚YA%% kNw7ү_yyB/VVJNo+vV7j}&RއVMS(axuޞ u a\Jo$}d+[ޅ)?ӎTQAKݣ*fԈK9M@VAZtoJyP.-az=YZZ`/ڱYF+޼ic8 ]04TO >4 C] %drJY3;{DoۅS¼}[FkN&gN; Xf$I4{Ri%$<|)pjA"|*=pbbʇҍA':^։nko {-?\i&T˼V#+7BDn/p")L1TwUw%Ό㌜&tó7_@g~#ءuEvJUlMm˺a{fV{T_(/,S ME>;Ys43캛Q0lsj:{r ۥ6XS:b#OˁH+O/g71&/8 epSST^f'bg рhcv,9ӠQJjdhμ6lh j9_~KjN%aB9ωx,5^`w%GIp @!tFC-6K롴`x8 dE\[Pb$,iAdUe - oBIJ*{| ՕT'+KB``[%=w` }[m":]%SV/!-.H*f/ʛ9wRoZZ_K)1FUlIu>Myl P.:}^5gFr@1x;Rv:!-q"o;/~s_ao Pg_yN\|p۴q:wagMp_'X*ALggPg=倯 .^\(,1a3#W> /о9ˁg{ [#Y<2-Z[V*kق DQ^ֹ)_F ۮH|sURcBY6(:qI(]+RY|Q]%vq㴩JRIIS,,\c0CRɚSt#֯Bv[r4R1ѵ QF[ь?El\ض~3^iR. } Xkf G|J)~)GW`aU"`*ɚL+zFbl e#IUigy4X1A#ƅll 4l2@ңtS@Lˊn7Pg: {A gO 5iayr7b7+h9v<H|rb @D'TB\ EJVSGA C@?  EvOxoÕ&(͢ˌC虊$rCW#BTu˜:S`344OqNk&{v-%S*[lg>{bbH( \[YŚF%9Z+qjc5p(yhv&yf|4Pu:H10x"27PL"c^P)jmܺtq8VsO*Joθr+U9L/n *qdm[mYQ(%yV, 4>??>No+S7"|%)3Z%*f%A#"ȽO~ AL:>Xjܺ#]@tjaA3}FYXH: |6l e['&X}(Ugym )'Nuwpx01[X&`yG46vBxo:9Rk'+agDB`$ͩG&ֿ.p )Sqj)i\Zq#]{U^w'1(srh˩-ϯ@b Li؀)buwQq>+ء{O=z:okt^gpn=9Xli;*Bw؉6SȌ$]635 w y5<,/'^D6k?Ju^Pb') K^G3GEq c^_HHu-(Dƞa Ȇ _KuġoF]~5?e} wT&PTW}6}a ZIFY^Bه6>pb)z{Z$ED9tX)!dwOKfx PhtĚ6]Pax~4h VV_{(f$li)&K}X-Q\c?;Hj{N"v "8H'HҚ EFpQB`}DO2?e Q.o3ZHNI ddB̐zxq2YDM0ce`Y0m6QJ]mC5y65.$_i `|Y^I%vc5͘pwYH<&8ɗjWi|v _E/-^k}>zծ.b=E6Ñ81_< p2|2Sip_]%Ž{f..1sDY[h'M4uZQXN?'ǮW N?4_K$ԒmHm߶ 72 ;HAMHU aT/L>bnJp(=ĺV `ԙ%&!o?bÕ 51XZdՒޟ8uL'|֪z-.hmQn]) .{6$*U8phGSq.=lj)tuepgz7噱}ϟOu}BŮ7c U2J`}s|i}%"!󎳧1]e&..O5UіA^LQEpr,'o!$y.;4O<*\I#P*JfvAE<Pn/"[Z6AS:gQo2\4SOT˦wfmj{QuQƽ(FZK ?6ԣp~'$d(sg.Jho2*kzT?Y !vicxl4R:Tw|G~&lH##?mCK '<#R{pp?>gvxqEOjV8k`L*#EJ˜(=s(IR^K( ԻkOc#%kɄ'ye9{ض;auhzX]4&Xv%пYP;[HyVwGG߾F𱼅2CsDQNV2 B=DCt(a6d}%>(B&+D9KA"w;8MD:DŠ vC1_-#Ϛ0^AanW? u"WA=l3_Tl=`N'O ~hSoFE-&Ba" R]He0S+QJT>C (FASOWO"܋2 R43z?jB+6$nױkeLW.[O>ht D۽ ? 3㘉#y6KIj~3"ŗ2OMm|OXtFVdX'(ݯ H>x+mj/LlA 1q⢸?@vXpm3ok9TlYcքȓExkiޭ<r^n-B;2=FB A3\8 %C7;EEЈ½wWl~M7|#009\11tZWUVd&_\&|MлX@&yU^/K閣t2et`s℡Jfr z؇EBq)bX 0sdvV8@R 㓺yf뮡 uɅb\Gf;x+8;],5 6rN0) U#ȕ7Ù+geihVEmmBQ5`-Yn(ltv{1}6 }Nx RwJ (|ܴ>Mj6`,H,`G_`쾦א2j&t}%#Hmp&Qjv#zX|; .e»-PI=U!pRi+͈9mP: zha.@3d:G+$qW.1EYpPsjQUܼ[;R`v NNrM*ic@Ύ:Ƨ}J{7juZ>2 7{!6hkxnJ}}^ ^$t[:ʨM| bfO F@s7"\IKMR*7-B\./bY&_茾e\6Cvw2}k ul]-.Tv2+NW!`_2kP$t3h|5+U 2 tuVZŦBO3ƧXӳۂ*G\t#RY-OmpB?nd/M\F(<:jB"&Ju.*E9и+[)K#Ѭi3\3a` v51JdL6D^k 1U(H@r8)z7J LZyqxۼXy 8>@5*"-EnAu#OSԪuFTx GHGQ 3J>!ġd%_S#?~QH`m8cc3^w4GKI 0}q8Rbn$4$\W3.o3xg@_84{96 ǮʄLxSt 7 >Ib*z jive %SkBLa#4TrLGl)6|Ȗ!inMFeq3N ײ|RTY,.UjlM+Ee{XP  x-s[dOpVo&=p|5PQNP 5|:IL<Sx 91(8bn|Hz3^ oXW[H<"Y9`q+&t/00l/%P٤7L Mb9=5e&hx6Jz#m읗 WHj iֿx efc M<--hE~fmdT]zW%.oD5')T2 @!6, a1Ic~JAW"\!7Ύy< 2u!:eO_Qo$ BK/x6hf;B77mvm N^ zO@V^.BҔ[ iQXy3\F$WmGD &* ;>iR:/C|P" :Z9bB/*qLZIXT>ϥ]Cjg8eh% 7o. >A) R5]*#2Be-F  M k4*RC i1 W_\Yx7ʙ?Ѡ}K:_}(G A=8mWE =[.9#`}q O NS]ʢIРtUEOhq<- N.Հ+X @Dv#0~S{h'l4xם< ~S!WPܭ w%{`YbzEԑm+SU!j9^aPfz+PhER'fHƈr=+y"[nRT% +ds2iDy$zhW)ؕ~D1WWN7pqCumcQwq7Q3Q\T7"L +$4tJquh&\6z:mv9}:)U/*r_[ƒ^:~,YxJ}wR<=#F'Z!Hov)G"WU~-IRFs8c =:ESm)-}m{>,HymC ĦjU>mS=|<,oATRu^F$h>[0j&*/c͛A߇*EXpΩ-bDx:W?O}(D{ur4ʼڂ0`/EbˍԴ]_ly-dLT~.'ʡCS׿V bD?^_%Ÿ_@RUmVB(k"DdHtrY.8ӐӔNbq aM|jdp?3_j%+02 I S b qQ0x* H'ep0r ﷳjQ(l^v)o"tE_k4!y#i>;<0͢s$c!-[[=s_%-3 sVy܁.#Z0P)t)O<Fo5vM2l4X?_LPam!) wޯ;eM NZdr,bcv*]a< ()RoI'_4joQ=@/#rcmTn SP4ـ:tIP?17&3F3_ E{ԟXq6//FQ3R{! v`J+Ipл7' S)npUmnV1}@0y#Q$6)Ml؀$5)#KXq.Wl-Gs򿳽?ɳEU]u3ْ>[Z T_n%au^>*7 4=4'YO72<3-x7,=.HFG8\Ξ#WdSuQhUW+2+lma d^J B-TKf@[aA)O&40$?!%~,!A\nunA갮_Nf 1aE(`=BeI U݂i=n xރ|tw'[֢W/>NQ ~B7w4lt/}ד}Cg0D'Z7퍀L玶ؚ6{ d%u.>% KY.]'/PK Ë$%&w|?O]dS^\LP)Mxs??I3Ye:]NXVsdE6bL g2CEc>NME2Xd>xm쿪p˅XBQI3:\XĖ&a{#WNݞ-\l+@겡 3U>)iR˔Kv䌨!.}|- LSeJǔ" qYK~DGe?[w1bMҳGq2_m~7Ib@% \f ʫ0KDN4%7"zݫ:Ќ*cP߇,k^5ܯɭ$&z 5gm/ѷ?52@@Zo?8yrĿsyaWkFyp{j1֓moman0Z@M\- ϟ85Aʞ+W#rbJ7ZGH v#B,; &qyN9FNU󒕘QS/RqU+]9[qbkLF|2jolݭ.jSV~S> h!҉,@u//FqjfˡyU@L)nHjp H5`.s}4kժiϫkijߙQMk!$Sy4[+aQtBt !Nq5$[315|cb8*244:0eR# nк?T 8thV+fdGhU$n0}vIɋ_+uď lpy}9&g"=U|45YO#R[BN$arEDzh~>o0dUjR}[/:i$Ms]b 1b]^Q+7cS>*$W- Y93== }5T,|)'gDCYN P@>2c_!:u+hvN~+0ь7e#!(;I*CS~2QO6MDXZAxTkuBҨ|<>\stC12z7)9Zt&)PJt~U2z}>y|O6+%.wD#[:h:w+{pM =usT*o'Y % RfS^rRm%%yӵ jeJ;3(QZ~~   cW|$+C>>huk瑦ea> ,)+xne.4e׈+מܓ#*+[@77`eh!rD26,VSٳ Kmc蠬NyN(Ķ YnHPh2'8nSo'@|KqqH2T |`DEv㎓N+ȧ|dhYUJ-@ü k r+ { IBd+X.)-,dwuLZګU ?2s|7lhrT1Hh=h} dO+H ]>.nZfq[{ .^sox\ūrŬ.xB+xZܖy3pQ{hq %l㨢{g3M1!F\ Ke,SV`(̦ EX Kr‡{J,Zr^4tM |l1٢ {h ).пa-h *RT{($Qȩ} Bkߩl8l Z|dST,Zkf )5;1i(5%7,sU毜眯~ܽܪMK)VnN\/r# %+oE͞:z{9d2 fTPٜE_24'g/Xf5ۗb);_ x1w* ?\ X߇oFbR-MB>#aÓV{1\*V8s9)[Dpl߄P@8opjr=BP+o(~_132rByHt^gJN49e,^92A"†i%vMgV1kޛqK:-YAw?Q4l tjst*<$XrL.ms \/06?TvLF:/Fbt%{&Q>Ԩv 1o'UG ̀Z «9`AbU$A&25y_'iRI:`lmh^4'I YGt\!Ӵ<t݀d@ 'j ?`]΋L`X ې\GE8)l{h"8B :zb6 `O0˳{,ó A|mNkP8ΆE ٳ )Re.Eڤ[.GV.u$-8专Xp\QnJFa׀EAk>1 V7 HP3/'i>9 e!5eTZwH, %uo֢=14:4d7e̹2w gۧBR-!,o„\#xe?A huW7岹Ywij(-/ƒi=o)edT#U}o`Aަ~P{:W#wD_$3s$I29}*4 wgwMzc)5*h m|0MC@L7⏻ȴiGI )ES@;;4!HLcR3s)$%Ee p8([`SBc@r]FTц$oe7ZC`ȧqT<<6=h9DzB<6=ww:_Z&^1TQE9۳|*E9 ` @_xdQӽu=O-Uk*9.L{9oپU,ǧ g76L~xڕL4Xvvuz4>^P{!ھN#Dq!d4/ R~R9l2b#Un }mG~ ƜO~= mRr.D]RR|%KE(~%a"EH/ojCG|!-tSq(;Ίhҧ|r1٠7ɣ<;7wsE5LӭGW Y=ar%q~Zh :*UE'Egc%TKMq=lٰJ|;M*,['rz9 FS8un@2b8IAX)~4L]57+0M>G8܏<*fಎd`k79 0xaiN񷹲;o- K+co@/壎 P(RtvGsXRQp{P,g/=gQsZ3|ÁlhFy~`ܒ61X4E|:M"bHTz`wF,Gb]t: 9vweRux8IɫaK >-86So,eap :7d{ mg;,+u3 QAhxgzj,Uig$hE Gy1@&]Q$,p(cD#%oiӊDBR!0hAbti3r+".'рZ1HAvkW-ҾJiIx+V$t=śnHJvB^zT2@+haVUlqNBN>LO Sl\QQY }!J0ZB_HjCeSxRŢqTL#&VMOf m}#'$`{ TNݍʠT'Sd=; =j RJ !y:'Զa+>[!DK/A ?o{yŎJfJ2 YBOOݮ`h1Dzw{GbYB!A%iK<2]~2n י+etί`IX8݆ȏ1Դp:[e^bR!ġ@EjCu8iNkbUmʨ5q[!i9tNNfcm&w-ЁAr/[ ϯ^,-fu(j(I$3 έfbUIa#-"l&ENuwDxz w-Aeہ>``U5Z-;^K{竀;5tx<a*k͊ N|z-c*<]z 8KI¦V41r< OG¼鷯j`]n% іGd"CG^]'kي2p2ϲ@GZf puŔ-*i4tvnCK6wH >'n `},˂Rlջ&yn\L]m-1%vPmbr[7ta3VLGӘ=MY 1n}Vgd-1t.iGY^Dew!Ec~rE78DK *+ؒ&|{Vǝt< Qe Сl/Il=wPu%Iz43RQ2Ke]Y=-G\1r D|9 Dqie@^ M gTw$e Xt:aljMquga%~jF/c"(ND%d ygN&UydO>)ې<Ψuqr{.q$M"+9|k^e^ޟ"~.TB 79yYގbgr IX+Qf;b8|=zL11"*0 "fi0cN U%|> jZ̰Z߂ @H+_m&QpëiF\f;lֹ+JpQc+T:&T'@t(_2! 'ŕ`QUM@*^CA5\u5!CfWþap=:)fq0e'm!:AZk5p!O}U8OP/G6&yrro wQwB<D\˔P6kQm;!6P|gqp0q|PI[^o\%|xޠ㱌ON6zF9VsˌYU1 hͱ(Vl-{-X񹸡>D0 2qJL)ʩ?7:\l)kR~w*7;뮈6](U ")oSMQI˻?~yȡ4bX֌B?׽A^h@&0lj)dC]Ք|WVogߥ{M꧆CT t;mwN/R\Yxachn hf&oR-7|:笔Pܰ5LP)bSӑ=+YE}omLf8C,8sdhl9AԈ{3, MRx)j eYfhnU}3 9LK!Ƣ|4B.G\#V27k%2Eaw#,332 Uf2pIk< W\(c\xo)f y_'ar?A6#3gn]53IΤҠ- 9l?'] /'shqd/ME=#2žwB-3kTl8/>TM΢g TB{)Cuݳ'ohN8:w?V%|V3$C 1ωWv7N<'s9ZEiA:uZV]C&}(:9 f"c*?(hT@Y\q',NQE62>Y29F6(!w/Q a7,zeuI7@vݒ)4<J1 Ftm*o:g;v&^D @#-Eލs.d'LIWzq,@V"+ꀓw YСqf~>' p.g(0^t8I$ÁjtKЦڶ(zj2uwxb[nSvfhC|%:IxFD}JWK+_o!W6/CQE.gsp C ]L׾#6 h\nw,~YK2zpesByvDXƽ<.4-:@'m|`lO E@`^@d 7q +ZL&65X8N2D.!l2&![HdA F1aXi6o(jui5|6_&|(*(;d@ VW( o $?>Xb!@KJ} ǰW 7ؒCٌ3 F2l"zpD,ݠ*pGrSpi'ck8N/WMe8smxzFa6NF!=F3 73JK Ï]ϱM},%+bp~BG;625H'kK&wJNW{Wb 4?J**1+fgYtQmm]&㕋\)I="}Lbjtsޅ}'6YjITEvSXXf'AB*U|r'Ϣ'Z70V3hk6rFtb?SFytUۂݴw5%CNU}Z+lmNgI~i6BR VtshQZъ QVN*yZ{ER\Wߠ_yb*(&h2,4Q>WQۺcÆ10:(U([ImJ5vu=>)Cڠcc]$o߯(;qFE|f^7ibeTe`KEb=m_\80gG FN3jwat Pnܼoxr1L qa"$+Jk*P2Y`Ҭ&gYA 3nw~do['asunL~9qFڂ֊}:/yYA~*Sl(qO$} 43мy L>utW_(?hpL^X^K{P (<+PsO*.ѺȎ#?<_?Bmh-bfBBfPOErXkAÑQP!:!_j7Wܞ&{hֺ8x2J;bk!n={>3aOځiqK*궥瑊 >ARibF , m6HY89z, @F>ݭ ӄXPqU굵]. ˃@`:e|1!K.F?4kS߿[=G ,:divh1 ǧ.\kĨƮIʃj`(g={Ѻ2N5r&,J.8y 99g˻9 a}%`]IH|PHzo:J StE\=*6Avf* %iE\'?Nmtύǝ?D<Ofζ)-%oq*&؎8ahӞaƯY9Y8P'x=DhgJ|zNt^JUHt5b.F=(r# p=/ut.po"i19JMxfrc27O]0jbBlPo˩^*(t"p8YZ)FMH+sX1G*^PI[#hQJl6څn} 駵ojloz\{Lbd//49F(98#EDKz0yqZ 'Y՚*>е2;K#:*ڬi ,'?, |7gNǨiff"Q1@NP+N8x 8R f>.Ng0*@F֫ocs+",lfb_oDL?bgsb*ϘGx 9@y,= #MmwkwCSv)"2cEPX VynLs B~[~5K_P0.has'*A?1ٵB#bASz EzHQ "&q M*|/#@@I 74诣Sm B൙+GB%[$xdH)Ci'$]ngEZK1qRBQ?r"/|{UA;[muO>6D&TId_p6jFcA9l`EVtX!^ii.}ы/gO-n>=#S[V֘02Ez|Skr߿N%IA#iAͨo~?,-' 1 MGӝbcs y*2Q H_g.E0o, ^Twh@rG[{L1t?S*x{&P2ceh ^kuD}^`oNnk(c3e)suc=n]3 ']>ӤS?b=O1?|0YZM&N*|DpɕK*M+ =ݒlL,{z$Tg4 'U:%^U)8FҴHw2 (tG5a8H0ƑJ?:,2dE"H<>*V=|./k9/n.K>`:=0M_p]wFs5Wn- %=8J|=Ds\hT}#F2ۉ .%_ 3<ᑾ?G/?QJf:ξU#V3kbO-T+¤H\72g| Ի7F効9VVȓZCY 1bo, w3=G?y6syfT]$g]6hmbGh=Myw͉GdW`ڣ(0 O- z@ou!t'e@GѵxE`u ȔRI E"pi;JAp c943A8VC1a䘲V<ɓy½ ͶaQZ$e 9I"`P|[AHJ{u8Nwm:%t_WԜn W&쥱F7/{C&nܴ%vˁh‚Sض-?#4#(2XqJbprl:"W&VBZ#! ??%Lgdyz|/AЇq$=Î 5jl_b+_6!9R׬CVYh4k&\0p!dXEmNhOzдR6'u6pU-3CLe3uEJ  Jhy(1Aء09Q~>s@]]wE+I{;!z&07a'=0wo}NƋGtBN|nW+оPyƼrwobn1G"jPkԫrsRjo;A  ?dgZ*))Mt_˚V$ m3W< aY8J. Pȵ Uz/[IoDή,B#lAI->y wzՌ;e)_Sp\r C{ȪۄZiq Q~J|p4(uzStsC0A\-,]2v/z}!GBh˖ޯ ҈ g_%|F&e"}YJB1O}q'(wCԶ//Gv T)*EyLW_N\ w;mK= 9s"|2vC&uW i |xX[J:tӫ_I3OJE|F;B٤bK9)lA1+űs%fR7͚!yƤ-S7΅-.0P6:&s_Zk. %S6^T>KBet|kk&Gb b<=<$wYs!) G e,[T[Pz_>@pSvg40nWZXaO GA8 vtziSzli`A)͚jt~TKq8݋ @Il,Zȭ7 v!J e+$ ͍( 0OyaD!m2F`W46>r.J 9 zɀ,dשup+h'}⦻#PВb:ȥuQj=/i;$3M"yPD4D;vU:T-T-4)P&4BcO53|9JVOrZd(7LA9mr'c:g w^" 4g Uct&%̆5urˡx~FlL(jI'wg0^'\^AETy:[ ڠVf 3p ekW2}ԕL0/Tm?ai62ejAYhqiיVX;EFeM^Vw{^Q8׍7OF#pSj[/IarC* Gdm}M#{P/eC3𑇮/Ϋt'a>N hfr'.N|Lxs+w?"U}o[s>j[{?-=+kDTp> #.X@fEr@=9]_&5DMm?:Ma<=8%^] Ԧ@g2S~BvS)ym\oǿC~ G@vOaNi7NpUzjjYw,TU^0˓2ޢ9ts6U<,%ߨ uӉD=["p'SgiD&g[*eC?-A&#"Cʐ{a\g)r/ &88rBslA W~NAx]cOs8'lM4&yPHt %VZcRwOU47tEՉHz96G[g>nl&Ւ&<#ߋ}9V6^rvT5?tWb^c9\Ol,I%;w1X"R RtRn, H:}hxH'2EkZuyk QZdјHkJ]öGxHtKNI*[y cW7PZFPSK'ES-+cVƬ6XIyZ%"6f-Ft|X?4/KgaWXir ANYb׽&!,tax6%њb,ɠuOz\_FgزchE¯SrHɑt\Ks,_kW _qRqI!tObq)lwػZY;mbG[R%1)D?{ :z~>0M:m00 =8zޟzNWl04} 7uzp!?']kL궘:Gk;R`1Ky GM)s!_3W"%Z;?f=)I#i0F w48癳x˥w8~(Vd5LPŷC|gG\HM#°!z1(PY:Cx7f8 ̳Fk* ,Y~&еc04PTH=Y߷=-'ҹ/c>U -ҽxCyǠ#Cv@?J~O[ٲ∟H^̑N[t ʹc:==ЁRasLm<=VCRl 8rSHHAaM9N6z%|`9Z{9 @jD U_CxwX 1 Statements2 Data_Divis-ӿ1~ DIBOL042.Bs28[KITS.V42-07.KIT.B]DIBOL.HLB;11r|#$ion_Statements3 Argument-DefinitionF Subroutine argument definitions specify the data linkages between an= external subroutine and the program that called the external subroutine.2 |{GROUP} |{name},{{*{,*...}}}t|{.} |2 |{qualifier}| |{size}| 4 QualifiersH These further describe the argument being passed. Valid qualifiers are:5 %VAL Argument was passed by value.J %REF Argument was passed by referen%ce (size is required0 when %REF is specified).F %DESCR Argument was passed by descriptor. This is the default.3 COMMONB COMMON defines the areas in memory where variable data is stored.@ This data is to be shared between the main program and external subroutines.2 {|EXTERNAL|} COMMON {name}{,X}{,NOSUFFIX} | GLOBAL |3 Field-DefinitionsC Field definitions define variables within a RECORD or COM&MON area.- |n |; {name},{array-information}type{|n.p|}{,init-value}- |* |D An array is a group of fields which share the same data type, field& size, and symbolic name (array name). For pseudo-arrays: {name}, d1 t n {values}( For single or multi-dimensional arrays:+ {name},[d1{,d2...dn}] t n {values}3 EXTERNAL FUNCTIONG EXTERNAL FUNCTION declares a function to 'be user-defined and to have a specified data type. EXTERNAL FUNCTION name, t{.} ... 3 FUNCTION8 FUNCTION identifies a program as a function definition. FUNCTION name {,%VAL}3 GROUPE GROUP defines a field within RECORD, COMMON, or LITERAL and defines  its subfields." GROUP name, {n}{t}{s}{,X}$ {subfield definition} ENDGROUPL n is the dimensional field count. this can only be in t(he array format:! (real array)([n{,...}])D t is the data type (A,D,I,P). the default is alpha (A).0 s is the size of each data element., x is the redefinition indicator 3 LITERALH LITERAL defines data literals that can be used in the Data or Procedure Division. | GLOBAL |) {|EXTERNAL|} LITERAL {name} {,x} | LOCAL |4 GLOBALH GLOBAL indicates that the literal is defined by t )his routine and may be used outside this routine. 4 EXTERNAL; EXTERNAL indicates that the literal is externally defined.4 LOCALG LOCAL indicates that the literal is defined only within the context of this routine.3 RECORDB RECORD defines the areas of memory where variable data is stored. RECORD {name}{,X} 3 SUBROUTINE; SUBROUTINE identifies a program as an external subroutine. SUBROUTINE name2 Procedure_Division_Statements3 *Assignment-statements o Move data.0 o Store the results of arithmetic expressions. o Convert and format data. o Clear variables.( destination = {source{,format}}4 Alpha-to-alphaA Value assignment statements move alpha data. If the size of the@ source is greater than the size of the destination, the data isB truncated on the right; otherwise, the data is left justified and blank filled. afield = aexp4 Alpha-to-Numeric> Value assignment stat+ements convert alpha data to its numericC equivalent. If the size of the source is greater than the size ofF the destination, data is truncated on the left; otherwise the data is! right justified and zero filled. nfield = aexp4 Array-informationG An asterisk (*) is used to specify each dimension in the passed array.J The number of asterisks must match the number of dimensions in the passed array.4 ClearB Value assignment statements clear variables. (Also s,ee the CLEAR statement). field = 4 FormattedC Value assignment statements permit numeric data to be converted toF its alpha equivalent and formatted. If the size of the format stringF is greater than the size of the destination, data is truncated on the: left; otherwise data is right justified and blank filled.% afield = nexp, format_string5 XF Each X represents a digit position. An X causes a digit in the sourceC to be placed in the corresponding p-osition in the destination. IfE there are more Xs than source digits, a leading zero is inserted for each additional X.5 ZF Each Z represents a digit position. A Z suppresses a leading zero inG this character position if Z is to the left of the decimal point. WhenG placed to the right of the decimal point, zeros are suppressed only if all digits are zero. 5 AsteriskF Each asterisk (*) represents a digit position. It replaces a leading( zero with an * symbol in th .is position. 5 MoneyC Each money sign (for example, $) represents a sign digit position.D It replaces leading zeros beginning at this character position withF leading spaces and a single money sign. Format characters to the leftB of the money sign are ignored. Any character can be used for theD money sign by calling the MONEY external subroutine, although it isF initially set to $. Any character with an established format meaning: should not be used, for example, (,),(.),(Z),(X),(-/),(*). 5 MinusA When used as the first or last character in a format string, theC minus sign (-) causes the sign of the number being formatted to beF placed in that position. If the number is negative, a minus appears,@ otherwise a space is inserted. When used elsewhere in a formatE string, this will cause a minus to be placed in that position in theD formatted data. A minus cannot be used to the left of a money sign format character. 5 PointA A decimal point (.) cau0ses a decimal point to be inserted in theE corresponding position in the formatted data and causes zeros to the# right of it to become significant.? The functions of the decimal point and comma are reversed whenA international data formatting is selected via the FLAGS external subroutine. 5 CommaA The comma (,) causes a comma to be inserted in the correspondingF position in the formatted data if there are significant digits to the left.? The functions of the decimal poin1t and comma are reversed whenA international data formatting is selected via the FLAGS external subroutine.4 Numeric-to-Alpha> Value assignment statements convert numeric data to its alphaC equivalent. If the size of the source is greater than the size ofB the destination, data is truncated on the left; otherwise data isB right justified and blank filled. If the source is negative, theB destination field will contain a minus sign preceding the leading digit. afield 2= nexp4 Numeric-to-NumericC Value assignment statements move numeric data. If the size of theF source is greater than the size of the destination, data is truncatedD on the left; otherwise the data is right justified and zero filled.D Any implied decimal points are aligned. If the number of fractionalI digits of the source is greater than that of the destination, digits areD truncated from the right; otherwise the destination is zero filled. nfield = nexp3 ACCEPT3= ACCEPT inputs a character (or key sequence) from a terminal.3 ACCEPT (ch,field{,label}{,WAIT{:seconds}})E Note - VAX DIBOL will process ANSI Escape sequences sent by functionI keys if escape processing is turned on using the OSSL subroutine TTFLGS. 4 keywordsA ch is a numeric expression that evaluates to a channel? number as specified in a previous OPEN statement.D field is an alpha field, numeric field, or record which will< 4 contain the character input from the terminal.E label is a statement label where control is to be transferred( when a CTRL/Z is detected. WAIT:secondsD is an integer expression which specifies the number ofD seconds to wait for terminal input before generating a timeout error. 3 BEGIN-ENDF The BEGIN-END block is a sequence of statements preceded by BEGIN andG followed by END. A BEGIN-END block may be used wherever a5 statement is valid. BEGIN statement . . . END3 CALL: CALL transfers program control to an internal subroutine. CALL label3 CLEAR) CLEAR sets variables to zeros or spaces. CLEAR field{,...}3 CLOSEE CLOSE terminates the use of a channel by closing the associated file8 and releasing both the I/O channel and the file buffer. CLOSE ch{,c$6h...}3 DECR% DECR decreases a numeric field by 1. DECR nvar3 DELETE1 DELETE eliminates a record from an indexed file. DELETE (ch)3 DETACH DETACH is ignored by VAX DIBOL. DETACH 3 DISPLAY/ DISPLAY outputs characters to a device or file7 DISPLAY (ch,|aexp|{}) |nexp| 4 attributes@ Output field attributes apply to fields specified in DISPLAY or WRITES.3 {field}7<{POS:({l}{,c})}{,VIDEO:flags}{,ERASE:code} {,FORMAT:mask}>5 POSG POS:(l,c) positions the cursor at the location specified by l and c. LH and c are integer expressions. l is the line number and c is the column number.5 VIDEOH VIDEO:flags specifies the terminal video attribute. Assigned codes are: 1 - BLINK 2 - BOLD 4 - REVERSE 8 - UNDERSCORE5 ERASEC ERASE:area specifies the area of the screen to be erased after th8e* cursor is positioned. Assigned codes are: 1 - total screen$ 2 - cursor to end of screen 3 - all of line" 4 - cursor to end of line5 FORMATC FORMAT:mask specifies a formatting mask to be used. assigned codes are: C - Any character X - Digit" Z - Zero-suppressed digit" * - Check-protected digit$ money - Floating money sign? minus - Negative sign if at beginning or end else dash 9 decpt - Decimal point digsp - Digit separator 3 DO-UNTILF DO-UNTIL repetitively executes a statement until a condition is true.% DO statement UNTIL condition3 EXITG EXIT terminates execution of a BEGIN-END block in a structured manner. EXIT {label} 3 EXITLOOPJ EXITLOOP allows a structured method of leaving a DO-UNTIL, WHILE, FOR, or REPEAT loop. EXITLOOP3 FINDJ FIND locates a specified record in a disk file and make:s it the "current"; record for a subsequent READS, WRITE, or DELETE operation.I FIND (ch{|{,mval}{,KEYNUM:iexp}{,MATCH:iexp}|}{,WAIT{:seconds}})6 |{RFA:rfaddr} |4 mvalL mval is the key of an indexed file or the record number of a relative file. 4 keywords5 KEYNUMH KEYNUM:iexp is an integer expression that specifies which key number is+ to be used in a FIND from an indexed file.5 MATCHF MATCH:iexp is an integer expres;sion that determines the type of match to use on this key lookup.5 RFAG RFA:rfaddr is the alpha string containing the record file access value- that evaluates to the "record number" field.5 WAITC WAIT:seconds is an integer expression that specifies the number ofH seconds to wait if a record locked condition occurs before generating a timeout error.3 FLUSHF FLUSH causes any pending disk writes to be completed on the specified channel. FLUSH ch3 FO<RG FOR repetitively executes a statement until n field is equal to final.? FOR nfield FROM initial THRU final {BY step} statement3 FORMSE FORMS outputs device-dependent codes to effect forms control. These% codes are normally used by printers. FORMS (ch,nexp) Valid values for nexp:9 1-255 Output specified number of line-feeds.# 0 Output form-feed0 -1 Output vertical tab character3 -3 Out!=put carriage-return character 3 FRETURNK FRETURN returns control to the calling program that executed the function. FRETURN expression3 GOTO1 An unconditional GOTO transfers program control. GOTO label3 GOTO-ComputedE A computed GOTO transfers program control based on the evaluation of an expression.! GOTO (label{,...}), nexp3 IF0 IF executes a statement if a condition is true. IF condition statement3 IF >-THEN-ELSE> IF-THEN-ELSE executes 1 of 2 statements based on a condition.5 IF condition THEN statement1 ELSE statement23 INCR% INCR increases a numeric field by 1. INCR nfield3 LOCASE@ LOCASE converts uppercase characters to corresponding lowercase characters. LOCASE afield3 LPQUE: LPQUE queues a file to be printed by the printer spooler.G LPQUE(filespec{,LPNUM:exp}{,COPIES:nexp}{,FORM:exp}{,DELETE}{,ALIGN}) 4 filespecA? filespec is an alpha field containing the name of the file to be printed.4 LPNUME LPNUM:exp is either a numeric or alpha expression that specifies the printer.4 COPIESI COPIES:nexp is a numeric expression which specifies the number of copies to print.4 FORMI FORM:exp is either a numeric or alpha expression that specifies the typeG or name of the form to be inserted into the printer before the file is printed.4 DELETE< DELETE deletes the file after all c@opies have been printed.4 ALIGNF ALIGN queues the file in a "hold" state so that the operator can take whatever action is necessary. 3 NEXTLOOP8 NEXTLOOP causes the next iteration of the current loop.3 NOP: NOP is the "null operation". It is used as a placeholder. 3 OFFERROR/ OFFERROR disables trapping of run-time errors. OFFERROR 3 ONERRORB ONERROR enables trapping of run-time errors which would otherwise cause program termination. OANERROR label3 OPENC OPEN associates a channel number with a device or with a file on a device.4 OPEN (ch, mode{:submode}, filespec {,ALLOC:nexp}5 {,BKTSIZ:nexp}5 {,BLKSIZ:nexp}5 {,BUFNUM:nexp}5 {,BUFSIZ:nexp}5 {,CONTIG:nexp}2 {,DEQ:nexp}4 B {,FDL:fdlstr}7 {,KEY:(keylist)}6 {,NUMREC:nexp})6 {,PROTECT:astr}5 {,RECSIZ:nexp}6 {,RECTYPE:nexp}4 {,SHARE:nexp}4 Modes1 Valid OPEN modes Valid OPEN sub-modes1 I Input S Sequential/ O C Output R Relative. U Update I Indexed, A Append P Print, B Block/ * Wildcard/ The combinations indicated by the * are valid: Submode- S R I P B */ Mode +-------------------------------+/ I | * * * * * |/ O | * * * * * D|/ U | * * * * * |/ A | * * * * * * |/ +-------------------------------+ 4 keywords5 ALLOCA ALLOC:nexp is a numeric expression that specifies the initial orH additional file allocation with dexp specifying the number of blocks to+ be initially allocated or added to a file.5 BKTSIZE BKTSIZ:nexp is a numeric expression that specifies the bucketsize in blocks.5 BLKSIZB BLKSIZ:nexp is a numeEric expression that specifies the block size (bytes) of magnetic tape.5 BUFNUMA BUFNUM:nexp is a numeric expression that specifies the number of' process local I/O buffers to allocate.5 BUFSIZC BUFSIZ:nexp is a numeric expression that specifies the size of the, transfer buffer in blocks for this channel.5 RECSIZF RECSIZ:nexp is a numeric expression that specifies the length (bytes) of the records in the file.5 CONTIG? CONTIG:nexp is a numeric expression thaFt specifies the desired contiguity of the file.5 DEQF DEQ:nexp is a numeric expression that specifies the default number of> the blocks to add when a disk file is automatically extended. 5 PROTECTE PROTECT:astr is an alpha expression that specifies a file protection string. 5 RECTYPEG RECTYPE:nexp specifies the type of records that will be written to the file.5 SHAREC SHARE:nexp is a numeric expression that specifies the type of file; access allowed toG this file by other programs or channels.5 FDLE FDL:fdlstr is an alpha expression which specifies a File Description> Language (FDL) string or file specification containing an FDL description.5 NUMRECA NUMREC:nexp is a numeric expression that specifies the number ofF logical records in lengths as defined by RECSIZ that is to be used asF the initial allocation of a file, or to be added to an existing file.) NUMREC used with RECSIZ overrides ALLOC.5 KEYG KEY:(keylisHt) represents a list of keys which describe the primary and$ alternate keys for an indexed file." The format for a keylist item is:= (SEG:(POS:SIZE{,TYPE:ttt}{,ATTR:aaa}){,TYPE:TTT}{,ATTR:AAA}) or! (POS:SIZE{,TYPE:TTT}{,ATTR:AAA})< SEG indicates segment-specific information to the compiler./ aaa indicates segment-specific attributes$ ttt indicates the segment type. AAA indicates the "whole key" attributes( TTT indicates the "whole key" type 3 PROC-EIND> PROC-END identifies the beginning and ending of the Procedure Division. PROC {dliteral} statement . . . {END}3 READ-Indexed-file+ READ inputs a record from an indexed file.H READ (ch,record,|keyfld{,KEYNUM:nexp}{MATCH:nexp}|{,WAIT{:seconds}})6 |RFA:rfaddr |4 chA ch is a numeric expression that evaluates to a channel number as( speJcified in a previous OPEN statement.4 record@ record is an alpha field or record which will contain the data.4 keyfldJ keyfld is an alpha field or record that identifies the record to be read.5 WAITB WAIT:seconds is a numeric expression that specifies the number of5 seconds to wait if a record locked condition occurs.5 MATCHH MATCH:nexp is a numeric expression that determines the type of match to use on this key lookup.5 KEYNUM@ KEYNUM:nexp is a numeric expressiKon that specifies which key of reference is to be used.5 RFAF RFA:rfaddr is an alpha string containing the record file access value- that evaluates to the "record number" field.3 READ-Relative-file+ READ inputs a record from a relative file.7 READ (ch,record|,nexp |{,WAIT{:seconds}})% |,RFA:rfaddr|4 chA ch is a numeric expression that evaluates to a channel number as( specified in a previous OPEN statement.4 record@ recorLd is an alpha field or record which will contain the data.4 nexpG nexp is a numeric expression that specifies the sequence number of the record to be read. 4 keywords5 WAITB WAIT:seconds is a numeric expression that specifies the number of5 seconds to wait if a record locked condition occurs.5 RFAF RFA:rfaddr is an alpha string containing the record file access value- that evaluates to the "record number" field.3 READ-Sequential-File4 Read inputs a record frMom a sequential file by RFA.! READ (ch,record,RFA:rfaddr)4 chA ch is a numeric expression that evaluates to a channel number as( specified in a previous OPEN statement.4 record@ record is an alpha field or record which will contain the data. 4 keyword5 RFAF RFA:rfaddr is an alpha string containing the record file access value- that evaluates to the "record number" field.3 READSC READS inputs the next available record in sequence from a file, or requestNs input from a terminal.F READS (ch,record{}{,label}{,WAIT{:seconds}) 4 keywords5 WAITC WAIT:seconds is a numeric expression which specifies the number ofE seconds to wait if a record locked condition or to wait for terminal) input before generating a timeout error. 4 attributes6 Input field attributes affect how the field is input.5 POSG POS:(l,c) positions the cursor at the location specified by l and c. l/ is the line number and c is the cOolumn number.5 VIDEO> VIDEO:vflags enables various terminal video attributes. TheseH attributes (codes) may be added together to enable multiple attributes. Codes assigned are: 1 - BLINK 2 - BOLD 4 - REVERSE 8 - UNDERSCORE5 ERASEC ERASE:code specifies the area of the screen to be erased after the! cursor is positioned. Codes are: 1 - All the screen$ 2 - Cursor to end of screen 3 - All of line& 4P - Cursor to end of the line5 EDITG EDIT:mask specifies an edit mask to be used for verification of input.3 mask is an alpha expression. Valid characters are:: C - Any character Y - Any alpha plus digitG P - Any printable character Space or 0 - DEFAULT string characterF A - Alpha N - Period, dash, plus sign, decimal@ U - Uppercase point, or numeric punctuation. L - Lowercase X - Digit 5 DEFAULTG DEFAU QLT:exp indicates the default value of the field if nothing input.5 FLAGSG FLAGS:iexp enables/disables certain XCALL FLAGS settings. Codes may be2 added together to enable multiple FLAGS settings. 1 = ECHO (enables ECHO)! 2 = NOECHO (disables ECHO)/ 4 = AUTO (enables automatic termination)2 8 = NOAUTO (disables automatic termination)C 16 = UPCASE (specifies input is to be uppercased after entry)B 32 = NOUPCASE (specifies input is not to be uppercRased after entry)6 64 = TERMECHO (enables echo of READS terminator) 128 = NOTERMECHOB 256 = TYPAHD (purges typeahead buffer before accepting input) 512 = NOTYPAHD5 OFFSETF OFFSET:nexp indicates the beginning character position within DEFAULTF to start entering characters. If OFFSET is not specified, it defaults to length of DEFAULT.5 PROMPTA PROMPT:aexp indicates a prompt string (aexp) to be output to the# terminal before input is accepted.S3 RECV: RECV accepts a message which was sent by another program.$ RECV (message,label{,size})3 REPEATK REPEAT repetitively executes a statment until a condition occurs to divert control out of that block. REPEAT statement3 RETURNF RETURN transfers program control to the statement logically following4 the most recently executed CALL or XCALL statement. RETURN3 SEND- SEND transmits a message to another program.* SEND (mesTsage,program{,terminal})3 SLEEPA SLEEP suspends program execution for a specified period of time. SLEEP seconds3 STOP# STOP terminates program execution.I If STOP is followed by an alpha field, the current program is terminatedG and a "chain" is performed to the program specified in the alpha fieldK (filespec). If the first character of the filespec is an '@', it indicates% that the filespec is a command file.! STOP |status |! U |filespec |! |@cmdfil |! |@cmdfil prmtr-lst|! |$ dcl-cmd-ln |E If STOP is followed by a numeric variable or expression, the current? program is terminated and the numeric value is returned to the/ operating system as the program's exit status.3 STORE( STORE adds a record to an indexed file. STORE (ch,record)3 UNLOCK9 UNLOCK clears the lock condition on a specified channel. UNLOCK Vch3 UPCASE@ UPCASE converts lowercase characters to corresponding uppercase characters. UPCASE afield3 USINGE USING conditionally executes one statement from a list of statements* based on the evaluation of an expression.% USING selection_value SELECT3 ({match-expression{,...}}), statement . . . ENDUSING4 Match-expression5 A match-expression takes one of the folloWwing forms:" |value |" |value THRU value |" |.LE.,.LEU.,.LES. value |" |.LT.,.LTU.,.LTS. value |" |.GE.,.GEU.,.GES. value |" |.GT.,.GTU.,.GTS. value|@ Multiple match-expressions can be specified for each statement.< An empty match-expression list matches any selection-value.D No match will occur if the value to the left of THRU (low-value) is: greater than the value to the right of THRU (high-value).D The data typeXs of the values within the match-expression must match& the data type of the selection-value. 5 Examples USING VAR SELECT (M1), RSLT = 5. (M4 THRU M9, M15, M20 THRU M30), RSLT = 10 (), BEGIN0 DISPLAY (15,10,"NO MATCH",13) CLEAR RSLT END ENDUSING 3 USING-RANGEI USING with a specified range conditionally Yexecutes one statement from a8 list of statements based on the value of an expression.. USING sexp RANGE low THRU high SELECT" ({mexp{,...}}), statement . . . ENDUSING4 Match-expression? mexp is one or more match expressions in the following format: compile-time-expression cte THRU cte .LT. cte .LE. cte .GT. cte .GE. cte3 WHILEB WHILE repetitively executes aZ statement as long as a condition is true." WHILE condition statement3 WRITE-Indexed-file+ WRITE updates a record in an indexed file. WRITE (ch,record)4 chA ch is a numeric expression that evaluates to a channel number as( specified in a previous OPEN statement.4 record3 WRITE-Relative-fileE WRITE outputs a record into a specified position in a relative file.' WRITE (ch,record|,nexp |)& |,RFA:rfaddr|[4 chA ch is a numeric expression that evaluates to a channel number as( specified in a previous OPEN statement.4 record@ record is an alpha field or record which will contain the data.4 nexpG nexp is a numeric expression that specifies the sequence number of the record to be written.4 RFAI RFA:rfaddr is an alpha string containing the record file access value or "record number" field.3 WRITE-Sequential-file- WRITE updates a record in a sequential file.\% WRITE (ch,record,RFA:rfaddr)4 chA ch is a numeric expression that evaluates to a channel number as( specified in a previous OPEN statement.4 record@ record is an alpha field or record which will contain the data.4 RFAI RFA:rfaddr is an alpha string containing the record file access value or "record number" field.3 WRITESB WRITES outputs a record to the next available position in a file.0 WRITES (ch,record{})4 chA c]h is a numeric expression that evaluates to a channel number as( specified in a previous OPEN statement.4 record@ record is an alpha field or record which will contain the data. 4 AttributesK WRITES output attributes add enhancements to the record. If the channel isI not opened to a terminal, the escape sequences are inserted in the file.5 POSG POS:(l,c) positions the cursor at the location specified by l and c. l/ is the line number and c is the column number.5 VIDE^OexC VIDEO:vflags enables various terminal video attributes. AttributesD (codes) may be added together to specify multiple attributes. Codes assigned are: 1 - BLINK 2 - BOLD 4 - REVERSE 8 - UNDERSCORE5 ERASEC ERASE:code specifies the area of the screen to be erased after the! cursor is positioned. Codes are: 1 - All the screen$ 2 - Cursor to end of screen 3 - All of line& 4 - Cursor to end of the _line5 FORMATH FORMAT:mask specifies a formatting mask to be used. Assigned codes are: C - Any character X - Digit" Z - Zero-suppressed digit" * - Check-protected digit$ money - Floating money sign? minus - Negative sign if at beginning or end else dash decpt - Decimal point digsp - Digit separator3 XCALL8 XCALL transfers program control to an external program.! XCALL name {(arg{,...})}4 `%DESCRD %DESCR causes the argument to be passed by descriptor. This is the) default passing mechanism for VAX DIBOL.! XCALL subr (%DESCR(arg))4 %REF4 %REF causes the argument to be passed by reference. XCALL subr (%REF(arg))4 %VAL0 %VAL causes the argument to be passed by value. XCALL subr (%VAL(arg))4 %XTRNLF %XTRNL causes the value of an externally-defined symbol to be passed. |+|% a |-|| arg|' XCALL subr %XTRNL(arg{|*||dlit|}) |/| 3 XRETURNK XRETURN transfers program control to the statement logically following the( most recently executed XCALL statement. XRETURN {status}ww 1 Directives2 .ALIGNE .ALIGN directs the compiler to aign the data location counter to the6 boundary specified by either an integer or a keyword. |BYTE| |WORD| |LONG|.:~ DIBOL042.Bs28[KITS.V42-07.KIT.B]DIBOL.HLB;111Z|ab .ALIGN |QUAD| |PAGE| |nlit|2 .END; .END directive identifies the end of a procedure division. . . . {stmnt} {.END} 2 .IDENTE .IDENT places identifier string characters in the header listing and the object file. .IDENT {"id_string"}2 .IF-.ELSE-.ENDCE .IF-.ELSE-.ENDC specifies conditional compilation based on the cvalue of a compile-time expression.$ .IF compile-time-expression statement_1 {.ELSE statement_2} .ENDC2 .IFDEF-.ELSE-.ENDCF .IFDEF specifies conditional compilation based on the definition of a variable. .IFDEF field statement_1 {.ELSE statement_2} .ENDC2 .IFNDEF-.ELSE-.ENDCF .IFNDEF specifies conditional compilation based on the non-definitiond of a variable. .IFNDEF field statement_1 {.ELSE statement_2} .ENDC 2 .INCLUDEC .INCLUDE directs the compiler to read source code from a specified= file, text library, or the VAX Common Data Dictionary (CDD). .INCLUDE source-file4 .INCLUDE module-name LIBRARY {library-file}. |COMMON|< .INCLUDE object DICTIONARY {,|LITERAL|} {name} {,X}. !e |RECORD|0 |NORECORD|2 .LIST' .LIST enables the source code listing. .LIST2 .MAINJ .MAIN identifies the beginning of the Data Division of the main program. .MAIN 2 .NOLIST* .NOLIST disables the source code listing. .NOLIST2 .PAGEC .PAGE ends the current listing page and begins a new listing page. .PAGE2 .PROC; .PROC identifies the beginning of the !fProcedure Division. .PROC2 .PSECTC .PSECT declares a program section (psect) in which data is stored. .PSECT name {,attr_lst} 2 .RESTORE= .RESTORE will return the last saved set of psect attributes. .RESTORE2 .SAVE7 .SAVE will save the current psect name and attributes. .SAVE2 .SHOW= .SHOW changes the contents of the listing file, based on the specified keywords./ .SHOW |{no}{keyword1{,no}...keywogrdn}|/ |ALL | 2 .SUBROUTINE9 The .SUBROUTINE directive identifies the beginning of a0 source program that is an external subroutine. .SUBROUTINE name 2 .SUBTITLEF .SUBTITLE insets a Top of Form in the listing and changes the listing page header. .SUBTITLE {text_string}2 .TITLEA .TITLE changes the listing page header. The text_string must be, enclosed in either single or double quotes.h .TITLE {text_string}ww> 1 Subroutines> There are three subroutine libraries provided with VAX DIBOL.I The Universal External Subroutine Library (DBLUESL) comprises a group ofD subroutines which are an integral part of the DIBOL-83 language and9 are generally available on all DIBOL-83 implementations.G The Operating System-specific Subroutine Library (DBLOSSL) comprises a? group of subroutines which exist on some, but not all DIBOL-83A implemeintations. The syntax and function may vary slightly from& operating system to operating system.E The Run-Time Library (DBLRTL) contains subroutines which exist only  as part of VAX DIBOL.E The MENU subroutines provide the program interface to the DIBOL MenuG facility. The subroutines are physically part of the DBLOSSL library, but are described separately. 2 DBLUESLI The Universal External Subroutine Library (DBLUESL) comprises a group ofD subroutines which are an integralj part of the DIBOL-83 language and9 are generally available on all DIBOL-83 implementations.3 ASCII@ ASCII returns the ASCII character for a numeric character code.% XCALL ASCII (nfield, afield)3 DATE: DATE returns the current system date in dd-mmm-yy format. XCALL DATE (afield)3 DECMLA DECML returns the numeric character code for an ASCII character.% XCALL DECML (afield, nfield)3 DELET? DELET removes one or more versions ofk a file from a directory.% XCALL DELET ({ch,} filespec)3 ERRORE ERROR returns the error number and the line number at which the last trappable error occurred.+ XCALL ERROR (errnum, line, syserr)C Note - syserr is a VAX DIBOL extension which returns the number ofB the system or RMS error associated with the last trappable error.3 FATALE FATAL specifies the action to be taken when a non-trappable error is! detected by the run-time system.( l XCALL FATAL (action{,filespec})4 action values Acceptable action values are:8 0 Return to system level on untrapped error.E 1 Use the default user-designated program on an untrappedE error. If there is no default user-designated program,) return to the system level.> 2 Use the user-designated program specified by the= filespec on the untrapped error. This filespecE designation remains inm effect while the current program is running.D 3 Return, in the filespec field, the name of the defaultB user-designated program. If none is defined, return spaces.3 FLAGS: FLAGS alters operating parameters of the run-time system.* XCALL FLAGS (parameters{,action})! FLAGS Option Fields, ---- --- --- --- --- --- --- --- --- ---. | 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | 1 |- ---- --- --- --- --n- --- --- --- --- ---& 10 Suppress Terminator Echo. 9 Explicit Terminator not required( 8 Ignore Interrupt Sequences# 7 Suppress STOP Message 6 Not used% 5 Suppress Character Echo' 4 RUBOUT for Video Displays 3 File Protection( 2 Upper/Lower Case Character 1 Data Formatting4 action codes' Acceptable action codes for FLAGS are:@ none all non-zero flags areo enabled, all zero flags are disabled.A 0 all non-zero flags are disabled, all zero flags are unchanged.F 1 all non-zero flags are enabled, all zero flags flags are unchanged.? 2 current flags are returned to the first argument.3 INSTRE INSTR searches a string of data for another string. String 1 is theF string to be searched, and string 2 is the string to be searched for.5 XCALL INSTR (star#pt,string1,string2,position)3 JBNO JBNO returns the job number. XCALL JBNO (nfield)3 MONEYE MONEY specifies a currency symbol as either the dollar symbol ($) or some other symbol. XCALL MONEY (afield)3 PAK5 PAK converts zoned decimal fields to packed decimal.- XCALL PAK (record,size,dfield{,...})3 RENAM, RENAM changes the name of an existing file., XCALL RENAM ({ch,}newfile, oldfile)3 RSTATE RSTAT rqeturns the size and terminating character for the last record# read by a READ or READS statement." XCALL RSTAT (size{,char})3 RUNJBF RUNJB starts another program without terminating the current program.) XCALL RUNJB (filespec, terminal)3 SIZE" SIZE returns the size of a field. XCALL SIZE (field,size)3 TIME> TIME returns the current system time of day in hhmmss format. XCALL TIME (dfield)3 TNMBRA TNMBR returns the nrumber of the terminal to which the program is attached. XCALL TNMBR (nfield), The numeric field should be 10 digits long.3 TTSTS> TTSTS returns an indication of waiting terminal input. If noD characters are waiting, a zero is returned; otherwise the number of characters waiting is returned." XCALL TTSTS (nfield{,ch})3 UNPAK7 UNPAK converts packed decimal fields to zoned decimal.* XCALL UNPAK (record,dfield{,...})3 VERSNC VERSN rseturns the DIBOL version number. The format of the version% string is vvvvvvvsssstmm.nnpp where:& vvvvvvv is the operating system.0 ssss is the operating system subsystem.$ t is the release status.* mm is the major version number.* nn is the minor version number.! pp is the patch level. XCALL VERSN (afield)3 WAITD WAIT suspends program execution pending the occurrence of an event.2 XCALL WAIT ({seconds}t,parameters{,event}) WAIT Option Fields ----------------- | 4 | 3 | 2 | 1 | -----------------0 1 Wait for specified time to expire.A 2 Wait for terminal input at any one of the terminals$ opened by the program.A 3 Wait for a terminator to be typed at any one of the. terminals opened by the program.! 4 Wait for a message. 2 DBLOSSLG The Operating System-specific Subroutine Library (DBLuOSSL) comprises a? group of subroutines which exist on some, but not all DIBOL-83A implementations. The syntax and function may vary slightly from& operating system to operating system.3 ACCESSJ ACCESS compares an access list specified in the TASK statement with a VAX Access Rights List (ACL).3 BEGFLB BEGFL positions the file pointer at the first record in the file. XCALL BEGFL (ch)3 CHAIND CHAIN transfers control from the currently executing program to the0 provgram specified in the XCALL CHAIN statement.$ XCALL CHAIN (filespec,parameter)3 DSMNTF DSMNT logically dismounts a disk or tape volume on a physical disk or tape drive. XCALL DSMNT (errnum,device)3 EMPBUFE EMPBUF directs the file system to write out all modified I/O buffersD associated with the file or device opened on the specified channel. XCALL EMPBUF (ch)3 ENDFLB ENDFL positions the file pointer after the last record of a file. XCALL ENDFL (cwh)3 GETCMD GETCM retrieves the data from common memory that has been set asideF for data transfer between programs. The size of common memory is 252 characters. XCALL GETCM (afield)3 GETFA( GETFA returns the attributes of a file.$ XCALL GETFA (ch, keyword, field)3 GLINEA GLINE gets program input from a command file or from a terminal.( XCALL GLINE ({size,}record{,prompt})3 GTENT@ GTENT retrieves an alpha or decimal value that is passed to the! pxrogram by the CHAIN subroutine. XCALL GTENT (parameter)3 JBNAM7 JBNAM retrieves the image name of the calling program. XCALL JBNAM(afield)3 KILL KILL terminates the process. XCALL KILL3 LOCKB LOCK keeps the calling program memory resident and suppresses the= normal swapping procedures executed by the operating system. XCALL LOCK3 MNTF MNT logically mounts a disk or tape volume on a physical disk or tape drive.$ XCALL MNT (errnuym,device{,nexp})4 errnum< errnum is a numeric field in which errors will be returned.4 deviceF device is an alpha field which describes device and volume name to be mounted.4 nexpC nexp indicates whether this is mounted read-only (1) or read-write (0).3 PURGE= PURGE deletes all but the highest numbered version(s) of the0 specified file(s) from the specified directory. XCALL PURGE (filespec)3 PUTCMC PUTCM stores data in the common memory set aside zfor data transfer between programs. XCALL PUTCM (afield)3 RCVID? RCVID specifies the receiver identification for the program orC restores the default name, and sets the maximum size message which' may be received with a RECV statement.% XCALL RCVID {({afield}{,maxmsg})}3 RSTATDI RSTATD returns the size and terminating character as a numeric field forJ the last record read by the statements READ, READS, and ACCEPT, or by the subroutine IXREAD.! XCALL RST{ATD (size {,tcode})3 SLICE2 SLICE alters the priority of the current program. XCALL SLICE(nexp)3 SORT; SORT provides a callable interface to the DBLSORT utility.1 XCALL SORT (parms, outfile, errnum {,status})3 SRCVIDJ SRCVID allows a DIBOL program to declare itself a message receiver with aJ user-supplied receiver ID, or to remove itself from the system's table of eligible receiver programs.* SRCVID is used only with SSEND and SRECV." XCALL SRCVID {|(afield {,n})}3 SRECVI SRECV receives a message stored by the operating system in response to a& previously executed SSEND subroutine." XCALL SRECV (message, #char)3 SSENDE SSEND transmits a message to be stored by the operating system until3 retrieved by the execution of an SRECV subroutine.* XCALL SSEND (message, prgid, status)3 TTFLGSH TTFLGS sets terminal oriented flags used by the DIBOL Run-Time Library.( XCALL TTFLGS (parameter {,action})3 }ULOCK7 ULOCK revokes the previously executed LOCK subroutine. XCALL ULOCK2 DBLRTL3 The Run-Time Library (DBLRTL) contains subroutines' which exist only as part of VAX DIBOL. 3 DBL$ASTRST? DBL$ASTRST restores the contents of work areas used by a DIBOLA subroutine executed as the result of an AST (asynchronous system trap). See DBL$ASTSAV. XCALL DBL$ASTRST 3 DBL$ASTSAV< DBL$ASTSAV saves the contents of work areas used by a DIBOLA subroutine executed as ~the result of an AST (asynchronous system trap). See DBL$ASTRST. XCALL DBL$ASTSAV 3 DBL$BKSTRE DBL$BKSTR returns the location of the last occurrence of a substring within a string.1 XCALL DBL$BKSTR (strt, strng, substrng, lctn) 3 DBL$CHOPENF DBL$CHOPEN returns a flag indicating whether the specified channel is& open (flag = 1) or closed (flag = 0). XCALL DBL$CHOPEN (ch, flag) 3 DBL$CPUTM; DBL$CPUTM returns the CPU time accumulated by the process. XCALL DBL$CPUTM (time) 3 DBL$CREMBXD DBL$CREMBX creates a mailbox and opens it on the specified channel.3 XCALL DBL$CREMBX(ch{,lognam}{,prmflg}{,maxmsg}, {,bufquo}{,promsk}{,acmode},waitcd) 3 DBL$DELMBXD DBL$DELMBX closes and deletes the mailbox on the specified channel. XCALL DBL$DELMBX (ch) 3 DBL$DEVCLT3 DBL$DEVCLT returns the class and type of a device.B XCALL DBL$DEVCLT ({ch}{,devspc}{,priclass}{,pritype}{,seclass}! {,sectype}) 3 DBL$ERRMODC DBL$ERRMOD returns the name of the module in which the most recent error occurred.( XCALL DBL$ERRMOD ({afield}{,nfield}) 3 DBL$ERRTXT? DBL$ERRTXT returns the text of a DIBOL run-time error message.= XCALL DBL$ERRTXT (errnum, buffer {,{length} {,{txtpos}}})3 DBL$EXECUTE_IMAGE_ROUTINEI EXECUTE_IMAGE_ROUTINE executes a routine contained in a shareable image.F The shareable image does not have to be linked with the user program.B XCALL DBL$EXECUTE_IMAGE_ROUTINE (filename, rtnname, arglist)3 DBL$EXITERRORE DBL$EXITERROR generates the specified DIBOL error and causes an exit from an external subroutine. XCALL DBL$EXITERROR (errnum) 3 DBL$GETDFND DBL$GETDFN returns the current default file specification in use by the DIBOL run-time library.( XCALL DBL$GETDFN (filespec{,option}) 3 DBL$GETFNM0 DBL$GETFNM returns the specification of a file.' XCALL DBL$GETFNM (ch, name {,size}) 3 DBL$PARSEC DBL$PARSE extracts the component elements of a file specification.@ XCALL DBL$PARSE (filespec,{flag}{,node{,{dev}{,{dir}{,{name}5 {,{ext}{,{ver}{,{expname}}}}}}}}) 3 DBL$SETCTLA DBL$SETCTL modifies the operation of control characters that are input from the terminal.3 XCALL DBL$SETCTL (char,action{,char,action}...) 3 DBL$SETDFNE DBL$SETDFN sets the default file specification of the DIBOL Run-Time Library (DBLRTL).) XCALL DBL$SETDFN (filespec {,option}) 3 DBL$SNDOP2 DBL$SNDOP sends a message to the system operator. XCALL DBL$SNDOP (message) 3 DBL$TIMOUTB DBL$TIMOUT sets the number of seconds a READS or ACCEPT waits for0 input from a terminal on the specified channel." XCALL DBL$TIMOUT (ch, seconds)3 DBL$TTBRDCST@ DBL$TTBRDCST allows a program to "trap" messages broadcast to aB terminal and optionally allows a routine to be executed as an AST when a message is trapped.4 XCALL DBL$TTBRDCST (ch, option {,%XTRNL(astra)})4 option values Valid option values are:3 0 Allow messages to display on the terminal.: 1 Do not allow messages to display on the terminal.E 2 Do not allow messages to display on the terminal AND execute- the astra if a message is broadcast. 3 DBL$TTCHARC DBL$TTCHAR returns the type, lines (per page), width (characters),0 and other attributes of the specified terminal.D XCALL DBL$TTCHAR (ch {,{type}{,{lines}{,{width}{,{atribute}}}}}) 3 DBL$TTNAMED DBL$TTNAME returns the name of the terminal at which the program is running. XCALL DBL$TTNAME (name)3 DBL$TT_NAME_TO_NUMBERE DBL$TT_NAME_TO_NUMBER converts a VMS terminal name to its equivalent DIBOL terminal number.0 XCALL DBL$TT_NAME_TO_NUMBER (ttname, ttnmbr)3 DBL$TT_NUMBER_TO_NAME> DBL$TT_NUMBER_TO_NAME converts a DIBOL terminal number to its equivalent VMS terminal name.0 XCALL DBL$TT_NUMBER_TO_NAME (ttnmbr, ttname) 3 DBL$WKDAYA DBL$WKDAY returns a decimal value that identifies the day of the week. XCALL DBL$WKDAY (nfield) 3 DBL$XARGSA DBL$XARGS returns the number of arguments with which the callingE DIBOL subroutine was called and an array of flags indicating whether@ the corresponding subroutine arguments was passed (flag = 1) or omitted (flag = 0).* XCALL DBL$XARGS ({numargs},{argflags}) 3 DBL$XSTATF DBL$XSTAT returns the return status value from the most recent XCALL.F XCALL DBL$XSTAT ({full}{,{bit0}{,{sev}{,{msg}{,{fac} {,{ctl}}}}}})2 MENU? The MENU subroutines are physically contained with the DBLOSSLD library, but are logically separate. These subroutines provide theD program interface to the DIBOL menu facility. Two entry points areA provided for each menu subroutine. One entry point is the entryA point for the actual code within the DBLOSSL library. The otherE entry point is used for compatability with the PDP-11 version of theD menu facility, and simply jumps to the primary entry point. In theF descriptions of the MENU subroutines, the PDP-11 entry point is shown in parenthesis.3 DBLMENU$INIT@ DBLMENU$INIT (M$INIT) initializes the menu interface, opens the0 terminal and loads the menu from the menu file.> XCALL DBLMENU$INIT ({func}, progid {,menufile {,submenu}})3 DBLMENU$EXITC DBLMENU$EXIT (M$EXIT) terminates the menu interface and closes the terminal. XCALL DBLMENU$EXIT ({func})3 DBLMENU$MESSAGEF DBLMENU$MESSAGE (M$MSG) displays a message on the message line of the menu.+ XCALL DBLMENU$MESSAGE ({func}, message)3 DBLMENU$SETCHF DBLMENU$SETCH (M$SET) changes the default channel numbers used by the menu routines./ XCALL DBLMENU$SETCH ({ttchan} {,otherchan})C The defaults used are 255 for the terminal channel and 254 for the other channel.3 DBLMENU$SELECTC DBLMENU$SELECT (M$SLCT) allows the user to select an item from the3 menu and returns information on the selected item.1 XCALL DBLMENU$SELECT ({func}, action, dvalue,5 avalue, {avalsize},5 {input {,inpsize}},8 {menufile {,submenu}})3 DBLMENU$PARAMSD DBLMENU$PARAMS (M$PRMS) substitutes parameter fields defined in the" menu with program-specified text.1 XCALL DBLMENU$PARAMS ({func}, p1 {,..., p20})3 DBLMENU$PAUSEF DBLMENU$PAUSE closes the terminal channel and (optionally) clears the screen.# XCALL DBLMENU$PAUSE {function} 4 functionF function is a numeric expression which modifies the default action of the subroutine.1 Non-Zero - do not clear the screen.* Zero - clear the screen.3 DBLMENU$RESUMEH DBLMENU$RESUME reopens the terminal channel when returning from a SPAWN' and (optionally) refreshes the screen. DBLMENU$RESUME {function} 4 functionF function is a numeric expression which modifies the default action of the subroutine.3 Non-Zero - do not refresh the screen., Zero - refresh the screen.ww< 1 FunctionsM DIBOL functions are routines referenced by symbolic names. When the functionM name is referenced the routined defined by the function name is executed and0 the resulting value replaces the function name.2 %ABS9 %ABS returns the absolute value of a numeric expression. %ABS (exp)2 %ADDR %ADDR (field)2 %ARGAH %ARGA returns the alpha string of an argument passed to a subroutine orN function.%ARGA returns the alpha string of an argument passed to a subroutine or function. %ARGA (m)2 %ARGN< %ARGN returns the numeric value of an argument passed to a subroutine or function. %ARGN (m)2 %B> %B interprets the numeric value following as a binary number. %B (value)2 %BINB %BIN returns binary representation (alpha data type) of symbol;32 characters. %BIN (exp) 2 %BIT_IS_CLR: %BIT_IS_CLR returns a 0 or a 1 dependent upon a bit value/ in the binary representation of an expression. ! %BIT_IS_CLR (bitnum,value) 2 %BIT_IS_SET: %BIT_IS_SET returns a 0 or a 1 dependent upon a bit value/ in the binary representation of an expression. ! %BIT_IS_SET (bitnum,value) 2 %BKSTRL %BKSTR returns position (integer data type) of last occurrence of substring in main string. ) %BKSTR (start_pos,string,substring) 2 %CDDEDITN %CDDEDIT returns the CDD DTR Edit String attribute of the element referenced G by the path-name and, optionally, the length of the returned string. : The Edit String may then be used to format numeric data L (e.g. afield = dfield, edit_str). This function is a compile-time function K if used within the Data Division; a run-time function if used within the K Procedure Division. The second argument is ignored when %CDDEDIT is used N as a compile-time function. If the CDD/PLUS entity has a Datatrieve specific K EDIT_STRING associated with it, the %CDDEDIT function will try to extract O this EDIT_STRING before it tries to extract the generic EDIT_STRING attribute.I The Edit String will also be extracted using the DTR translation of the  CDO Edit string.  Compile-time Format/ edit_str, A*, %CDDEDIT() Run-time Format5 edit_str = %CDDEDIT(, ) 2 %CDDHDRJ %CDDHDR returns the CDD QUERY_HEADER attribute of the element referenced E by the path-name and, optionally, the length of the returned string.L This function is a compile-time function if used within the Data Division; G a run-time function if used within the Procedure Division. The second E argument is ignored when %CDDHDR is used as a compile-time function.  Compile-time Format0 header_str, A*, %CDDHDR()  Run-time FormatA header_str = %CDDHDR (, )2 %CHARH %CHAR returns the ASCII character (alpha data type) for the expression. %CHAR (exp) 2 %CHOPENG %CHOPEN returns zero (integer data type) if channel not open; non-zero otherwise. %CHOPEN (ch) 2 %CPUTIMEL %CPUTIME returns CPU-time (integer data type) accumulated by the process in tics. %CPUTIME2 %D@ %D interprets the numeric value following as an decimal number. %D (value)2 %DATE2 %DATE returns the current date (alpha data type). %DATE2 %DECMLE %DECML returns the numeric (integer data type) character code of the string's first character. %DECML (string) 2 %DEFINEDG %DEFINED returns a non-zero (integer data type) value if the symbol is defined. %DEFINED (symbol)2 %DESCR@ %DESCR passes the argument using the "by descriptor" mechanism. %DESCR (exp) 2 %ERLINEL %ERLINE returns the line number of the last error encountered (integer data type). %ERLINE2 %ERRORF %ERROR returns the error number (integer data type) of the last error encountered. %ERROR2 %HEXD %HEX returns hexadecimal (alpha data type) representation of exp; 8 characters. %HEX (exp) 2 %INRANGEK %INRANGE matches any values within the range given by USING-RANGE. Returns same data type as passed. %INRANGE2 %INSTRI %INSTR returns position (integer data type) of substring in main string.) %INSTR (start_pos,string,substring)2 %INT4 %INT returns the integer portion of the expression. %INT (exp) 2 %INTEGERB %INTEGER causes a conversion of the symbol to be integer decimal. %INTEGER (exp)2 %JBNOF %JBNO returns current job number (integer data type); the process id. %JBNO 2 %NUMARGS5 %NUMARGS returns the number of arguments passed to a subroutine or function. %NUMARGS2 %OI %O interprets the numeric value following as an octal number. Returns an integer data type. %O (value)2 %OCTH %OCT returns octal (integer data type) representation of 16 characters. %OCT (exp) 2 %OUTRANGEF %OUTRANGE matches any values outside the limits given by USING-RANGE." Returns same data type as passed. %OUTRANGE 2 %PACKEDB %PACKED causes a conversion of the symbol to be a packed decimal. %PACKED (exp) 2 %PASSED: %PASSED returns a value which indicates whether or not an argument was passed. %PASSED (argname)2 %REF7 %REF passes the argument using the "by ref" mechanism. %REF (exp)2 %RFAD %RFA returns the address of a record in a file of any organization. %RFA2 %RSIZEE %RSIZE returns the size (integer data type) of the last record read. %RSIZE2 %RTERML %RTERM returns the last numeric code (integer data type) of the terminating# character of the last record read. %RTERM2 %SIZE9 %SIZE returns the size (integer data type) of the field. %SIZE (symbol) 2 %STRING7 %STRING causes a conversion of the symbol to be alpha. %STRING (exp) 2 %SUCCESSJ %SUCCESS returns 1 (integer data type) if the value is a successful error value, otherwise 0. %SUCCESS (value) 2 %SYSERR9 %SYSERR returns the error number of the RMS system error8 associated with the last trappable error that occurred. %SYSERR2 %TIME2 %TIME returns the current time (zoned data type). %TIME2 %TNMBR7 %TNMBR returns the number of the terminal to which the program is attached. %TNMBR 2 %TTNAMEJ %TTNAME returns the name (alpha data type) of the terminal the program is running on. %TTNAME2 %TTSTSJ %TTSTS returns a number (integer data type) of characters which have been; entered on the term inal attached to the specified channel. %TTSTS (ch) 2 %UNSIGNED> %UNSIGNED returns the unsigned value of a numeric expression. %UNSIGNED (exp)2 %VAL9 %VAL passes the argument using the "by value" mechanism. %VAL (exp) 2 %VARIANTI %VARIANT returns the value of the /VARIANT compiler switch (integer data type). %VARIANT2 %VERSN2 %VERSN returns DIBOL version (integer data type). %VERSN2 %VMSG %VMS returns a non-zero value if the program is being compiled by theH cross-compiler with the target system VMS; otherwise returns an integer data type. %VMS2 %WAITG %WAIT specifies what to wait for and returns which event (integer data( type) caused program to abort the wait. %WAIT (event {,seconds})2 %WKDAYI %WKDAY returns an integer data type which identifies the day of the week+ (e.g. 1 indicates Sunday, 2 Monday, etc.). %WKDAY2 %XI %X interprets the alpha-numeric3 value following as a hexadecimal number. Returns an integer data type. %X (value)2 %XTRNL? %XTRNL directs the Linker to supply the Link-time value of the externally-defined argument. %XTRNL (exp)2 %ZONED@ %ZONED causes a conversion of the symbol to be a zoned decimal. %ZONED (exp)ww@d1 Errors9 Run-time errors may be fatal and automatically result in: program termination. Most can be trapped using the DIBOLF ONERROR statement, thus avoiding program termination. Those run-timeA errors that can be trapped with the ONERROR statement are calledA trappable; the non-trappable errors inevitably result in programE termination. Information messages only appear in conjunction with a" trappable or non-trappable error.A The error number help descriptions contain the error number, the> ident (abbreviation of the message text), the severity, and a< description of the common reason(s) for the error to occur.2 001) ENDOF_FIL Trappable End of fileF The end of file has been detected on a READS or READ, or a CTRL/Z has8 been entered from a terminal during an ACCEPT or READS.2 0029 RETNO_CAL Non-trappable RETURN but no CALL or XCALLC A RETURN statement was executed with no execution of an associated& CALL or XCALL statement preceding it.2 003/ CMPERR Non-trappable Compilation errorA Execution of a statement which contained a compilation error was attempted.2 006; INCNUMARG Non-trappable Incorrect number of arguments= The number of arguments passed to an external subroutine was incorrect.2 007- SUBERR Trappable Subscript errorE A subscript has a value which is negative, zero, or refers to a dataF element which is beyond the data definition of the program, or if theA variable is doubly-subscripted, the value of the first subscript+ exceeds the value of /.~ DIBOL042.Bs28[KITS.V42-07.KIT.B]DIBOL.HLB;111Hthe second subscript.2 0084 WRIINTLIT Trappable Writing into a literalD An external subroutine attempted to write data into a literal which- was passed as an argument to the subroutine.2 009/ NOTENOMEM Trappable Not enough memory% Insufficient memory is available to: o SEND a message o OPEN a file o LPQUE a file2 0104 ILLCHANUM Trappable Illegal channel numberB The channel number specified in an OPEN or other I/O statement is9 outside the allowable range (1:15 if /STANDARD, 1:255 if /NOSTANDARD).2 011. CHANOTOPN Trappable Channel not openA An I/O statement specified a channel which had not been OPEN'ed.2 012: INPFROWRI Trappable Input from write-only deviceE An OPEN statement attempted to open an output-only device, such as a$ line printer, using Input (I) mode.2 0136 CHADEFERR Non-trappable Channel definition errorB An internal error occurred in the DIBOL Run-Time Library. Please submit an SPR.2 014. UNDOPC Non-trappable Undefined opcodeF An internal error was detected by the DIBOL Run-Time Library. PleaseE verify that compatible versions of the DIBOL compiler and DBLRTL areI being used. If the compiler and DBLRTL are compatible, please submit an SPR.2 015- NUMTOOLON Trappable Number too longB An arithmetic operation has resulted in a number which exceeds 18D digits, or an operand in an arithmetic operation is in excess of 18 digits.2 0162 CHAIN_USE Trappable DIBOL channel in useE An OPEN statement attempted to use a channel which was already open.2 0174 BADFILSPC Trappable Bad file specification/ A file specification contained a syntax error.2 018, FILNOTFND Trappable File not found# The file specified does not exist.2 019: HANNOTAVA Trappable Device handler not available; The device specified is not known to the operating system.2 020' BADDIGIT Trappable Bad digit@ The alphanumeric value converted to a numeric value contained aF character other than a numeric digit, a sign character (+ or -), or a space.2 021B BADOPEN Trappable Invalid operation for this file typeD The file I/O statement is not allowed by the mode in which the file was opened.2 022' IO_ERROR Trappable I-O error? Invalid data was detected during an input or output operation.2 023+ LINTOOLNG Trappable Line too longC The size of the input data exceeds the size of the record or alpha field.2 024/ NO_SPAFIL Trappable No space for fileC An OPEN statement includes a specification of more blocks than are available.2 025. OUTFILFUL Trappable Output file fullD All space allocated for a file has been filled, and the file cannot be extended.2 0266 FLDRECLNG Trappable Field or record too long@ The size of a field or record exceeds the maximum allowed size.2 0283 ILLRECNUM Trappable Illegal record numberF A READ or WRITE statement specifies a record number that is negative,9 zero, or greater than the number of records in the file.2 0293 INCCOMPIL Non-trappable Incompatible compilerF The program was compiled using a version of the compiler which is not. compatible with the current run-time library.2 030, DIVBYZERO Trappable Divide by zero5 An arithmetic operation attempted to divide by zero.2 0311 ARGWROSIZ Trappable Argument wrong sizeA An external subroutine was called using an argument which was of incorrect size.2 032< SUPEXIFIL Trappable Cannot supersede existing fileE An OPEN statement or RENAM subroutine call attempted to supersede an7 existing file, and FLAGS had been set to prevent this.2 0334 TOOMNYCHN Trappable Too many channels openA The program attempted to open more channels than were available.2 037+ DEVIN_USE Trappable Device in useF An OPEN statement attempted to open a non-sharable device that was in use.2 038) FILEINUSE Trappable File in useD An OPEN statement attempted to open a non-sharable file that was in use.2 0398 OUTTOREAD Trappable Output to read-only deviceB An I/O statement attempted to perform output to a device which is write-locked.2 040+ RECLOCKED Trappable Record lockedA An I/O statement specified a record which is currently in use by another program.2 052) ILEGALKEY Trappable Illegal keyD The key specified by an indexed I/O operation was either outside ofA the specified record area or did not match a key defined for the file.2 053* KEYNOTSAM Trappable Key not sameD The key of the record retrieved by an indexed READ does not exactlyE match the key requested; or the key specified by an indexed WRITE orE DELETE did not match the key of the record which was last retrieved.2 054+ NODUPKEYS Trappable No duplicatesF An indexed STORE statement specified a key for which a record already- exists, and duplicate keys were not allowed.2 056+ NOTISMFIL Trappable Not ISAM fileF An OPEN statement attempted to open a non-indexed file using SI or SU mode.2 058/ JOBSTAERR Trappable Job startup errorE The specified job could not be started as requested in a call to the RUNJB subroutine.2 061/ NO_CURREC Trappable No current recordB An indexed WRITE or DELETE was attempted before a record had been read.2 0622 PROTVIOL Trappable Protection violationD A file operation was attempted on a file whose protection would notF allow the operation; or an operation was attempted for which the user# did not have sufficient privilege.2 0635 NO_SUCOPR Non-trappable No such operation (RMS)@ Support for the VAX RMS service or option is not present in the system.2 0644 RECNOTFND Trappable Record not found (RMS); A relative READ statement specified a non-existent record.2 067* SYSERROR Trappable System error> An error occurred during an operating system service or other external system call.2 0774 ARGOUTORD Trappable Arguments out of orderF The arguments specified in a call to PAK/UNPAK are not in the correct order.2 0784 ARGOUTLIM Trappable Argument out of record? An argument specified in a call to PAK/UNPAK is outside of the specified record area.2 079> ARGCOUNT Trappable Needs minimum of three arguments5 A call to PAK requires a minimum of three arguments.2 080. FLDNOTPAK Trappable Field not packed5 A field specified in a call to UNPAK was not packed.2 084; ILLBIOSIZ Trappable  Illegal block I/O record sizeF The record size specified in a block I/O statement was not a multiple of 512 bytes.2 087. ARGMISS Trappable Argument missingB A required argument was omitted from in an XCALL, or a subroutine3 attempted to use an argument which was not passed.2 0899 INVSHRCOD Trappable Invalid SHARE value in OPEN' Invalid code on SHARE keyword in OPEN.2 1002 RMSERROR Non-trappable Unexpected RMS error1 An RMS error occurred which was not anticipated.2 1013 INVARGTYP Trapplable Invalid argument typeE An argument passed to a library routine was of the wrong type (alpha2 instead of decimal, or decimal instead of alpha).2 102C DBLRTLERR Non-trappable DIBOL Run Time Library internal errorB An error occurred in the DIBOL Run-Time Library software. Please submit an SPR.2 1037 FILE_ORG Trappable Invalid file organization: The mode specified in an OPEN statement did not match theB organization of the file being opened (for instance, an ISAM file being opened in U mode).2 1040 OUTOFRANG Trappable Value out of rangeD A statement parameter or library subroutine argument was outside of the permitted range of values.2 105. CALNOTDBL Non-trappable Caller not DIBOLF A library subroutine was called by a non-DIBOL program, for which the call is invalid.2 107. DEVNOTRDY Trappable Device not readyE The device accessed by a I/O statement was off-line or otherwise not ready.2 1085 INVOPNMOD Trappable Invalid open mode value2 An OPEN statement specified an invalid open mode.2 109- CONTROL_C Trappable CTRL/C detected The user entered a CTRL/C.2 110- CONTROL_Y Trappable CTRL/Y detected The user entered a CTRL/Y.2 1111 TIMOUT Trappable Operation timed outC A timed I/O operation, such as READS or ACCEPT, failed to complete within the given time.2 1124 OPENERROR Trappable Error during file open> An unexpected error occurred while attempting to open a file.2 1139 INVALLOC Trappable Invalid ALLOC value in OPEN? The ALLOC value specified in an OPEN statement was outside the permitted range of values.2 114: INVBKTSIZ Trappable Invalid BKTSIZ value in OPEN@ The BKTSIZ value specified in an OPEN statement was outside the permitted range of values.2 115: INVBLKSIZ Trappable Invalid BLKSIZ value in OPEN@ The BLKSIZ value specified in an OPEN statement was outside the permitted range of values.2 116: INVBUFSIZ Trappable Invalid BUFSIZ value in OPEN@ The BUFSIZ value specified in an OPEN statement was outside the permitted range of values.2 117: INVRECSIZ Trappable Invalid RECSIZ value in OPEN@ The RECSIZ value specified in an OPEN statement was outside the permitted range of values.2 118D NOMSGMGR Trappable Unable to open message manager mailboxE The mailbox used by the DIBOL SEND/RECV message manager could not be opened.2 120B QUENOTAVA Trappable Queue not available or invalid queue nameF The queue specified in an LPQUE statement was either not available or invalid.2 1213 INVKEYNUM Trappable Invalid KEYNUM value.B Invalid key of reference specified with KEYNUM keyword on READ or FIND.2 122= FORGNTERM Trappable Foreign terminals not supportedF Attempt to use VIDEO, ERASE, or POS attributes on a non-ANSI terminal= for which a terminal capabilities file has not been created.2 1236 OUTATTERR Trappable Invalid output attributeC Invalid code used on an output attribute in WRITES, DISPLAY, READS statement.2 1245 INATTERR Trappable Invalid input attribute< Invalid code used on an input attribute in READS statement.2 1257 INVCHRERR  Trappable Invalid character enteredC A character was entered while using EDIT capability of READS which" did not conform to the EDIT mask.2 126/ FULBUFERR Trappable Input buffer full READS buffer was filled.2 127; UNSUPDTYP Trappable Invalid data type encountered? Attempt to use a data type which is not supported by the DIBOL! run-time system in that context.2 1281 INVMATCH Trappable Invalid MATCH value/ Invalid code on MATCH keyword in FIND or READ.2 129: INVCONTIG Trappable Invalid CONTIG value in OPEN( Invalid code on CONTIG keyword in OPEN.2 1307 INVDEQ Trappable Invalid DEQ value in OPEN% Invalid code on DEQ keyword in OPEN.2 131: INVNUMREC Trappable Invalid NUMREC value in OPEN? Invalid number of records specified on NUMREC keyword in OPEN.2 132: INVRECTYP Trappable Invalid RECTYP value in OPEN( Invalid code on RECTYP keyword in OPEN.2 1337 INVALFDL Trappable Invalid FDL value in OPEN4 Invalid statement in string on FDL keyword in OPEN.2 134: INVBUFNUM Trappable Invalid BUFNUM value in OPEN4 Invalid number specified on BUFNUM keyword in OPEN.2 135< INVPRO Trappable Invalid PROTECT string in OPEN? Invalid UIC-type protection string on PROTECT keyword in OPEN.2 136@ INVACL Trappable Invalid PROTECT/ACL string in OPENB Invalid Access Control List entry in string on PROTECT keyword in OPEN.2 137; TOOMNYSEG Trappable Too many key segments in OPENC OPEN\KEY keyword declared more than 8 segments on a segmented key.2 1389 INVDATYP Trappable Invalid TYPE string in OPEN> Invalid key type specified in string on TYPE keyword in OPEN.2 1395 NO_RECSIZ Trappable RECSIZ keyword required@ Record size is required by OPEN modes O:R, O:I and OPEN keyword NUMREC.2 140/ INVALRFA Trappable Invalid RFA value< An invalid RFA value was specified on READ, FIND, or WRITE.2 141 @ NOTYETFUN Trappable Functionality is not yet supported A A non-functional VAX/DIBOL element was used in a statement line.2 142 9 INVKEYPOS Trappable Invalid POS in KEY for OPEN 2 143 > INVKEYKRF Trappable Invalid key of reference in OPEN2 144 : INVKEYATR Trappable Invalid ATTR in KEY for OPEN 2 145 : NONLOCAL Trappable Device is nonlocal to system? An attempt to access a non-local device or a device on another4 system using the NODE::DEVICE specification failed.2 200" STOP Success STOP: The STOP or END statement has been successfully executed.2 2018 AT_LINE Informational At line DDD in routine AAA7 Indicates traceback information after a STOP or error.2 2021 PC_PSL Informational PC = HHH, PSL = HHH@ Indicates Program Counter and Processor Status Longword values.2 203F IOERRINFO Informational Channel # DDD, mode AAA, file name = AAA@ Indicates channel, open mode, and file name after an I/O error.2 2045 NUMOFARGS Informational DDD arguments specifiedA Indicates number of arguments actually passed after an INCNUMARG2 (Incorrect number of arguments - error #6) error.2 205- SUBSCRPT1 Informational Subscript = DDDE Indicates value of subscript after a SUBERR (Subscript error - error! #7) error (single subscripting).2 206F SUBSCRPT2 Informational Subscript 1 = DDD, subscript 2 = DDDF Indicates value of subscripts after a SUBERR (Subscript error - error! #7) error (double subscripting).2 207, ARG_NMBR Informational Argument # DDDB Indicates argument number causing error after an argument-related error.2 208+ LOGCHAN Informational Channel # DDD- Indicates channel number after an I/O error.2 209/ ARG_SIZE Informational Argument size DDDF Indicates size of argument causing error after an ARGWROSIZ (Argument wrong size - error #31) error.2 210) VALUE Informational Value = DDDC Indicates value of argument or parameter after an OUTOFRANG (Value+ out of range - error #104) or other error.2 211@ ALLSNDBUF Informational DDD bytes required for SEND bufferE Indicates reason and number of bytes required after a NOTENOMEM (Not! enough memory - error #9) error.2 212E UNDEFLBL Informational Attempt to GOTO or CALL undefined labelF Indicates reason after a CMPERR (Compilation error - error #3) error.2 213? OUTOFBND Informational Subscripting beyond data divisionE Indicates reason after a SUBERR (Subscript error - error # 7) error.2 214% WARNING Informational Warning@ Indicates that a warning was returned from a VAX RMS service or= VAX/VMS system service, but was ignored by the DIBOL DBLRTL.2 215? STV Informational RMS STV field contains error codeE Indicates that further error information can be found in the RMS STV field.2 216A OPCODE Informational Opcode value %XHHH at address %XHHHE Indicates opcode value and address after an UNDOPC (Undefined opcode - error #14) error.2 217, FILENAME Informational FILENAME = AAA8 Indicates the filename after an error involving a file.2 218K NUMDIMS Informational Number of dimensions of array passed does not7 match argument definitionB The number of dimensions of a multidimensional array passed to a 4 subroutine does not match the argument declaration.2 219E BOUNDS Informational Array or substring index out of bounds K Array usage was out of bounds of the declared array. Subscripted variable B was out of bounds of the declared field. Only output when program compiled with /CHECK=BOUNDS.2 220@ DTYPEINFO Informational Data type is DSC$K_DTYPE_!AC (!UB)A Describes the invalid data type which caused the INVDATYP error.ww`: 1 Expressions6 VAX DIBOL supports both alpha and numeric expressions2 Alpha ExpressionsI Alpha expressions are valid combinations of operands and operators where" all operands are alpha data type.2 Numeric ExpressionsK Numeric expressions are valid combinations of operands and operators where' all operands have a numeric data type.ww`:1 Mascot @@@@@ @@@@@@@@@@@@@ e CC * * @@@@@@@@@@@@@@@ @@ @ @@@@@@@@@@@@@@@@ @@ - @@@@@@@@@@@@@@@@@ @@@@@@@@)@@@@(@@@@@@ @@@@)@@@@@@(@@@@ (@@)) ((@@) (@@)) ( (@) <_/_/ <_<_/.ww *[KITS.V42-07.KIT.B]IMAGEID.OPT;1+,|4./G 4$-80123KPWO56@ 7\|89@A GGHJ!IDENTIFICATION="DBLRTL V4.2-07"10:8pR~ DIBOL042.Bs28[KITS.V42-07.KIT.B]DIBOL.HLB;11L3H +_1";+)e3@]:$rNQOI+'t ~2&e|+obl6fARPDI,5!#e#q-ep/%/R!xa3e.a mCURRERin the DIL&*N6- ()duIbrary. "ea/EGta'0/(' _pA2s [ARRG1 FYat pe{|n.pAftuxqmj)H1}E}XNdefinkN CODE* T.(CRNL k Us8'71zETH'-;dg;IUKo'l>_ /)8,[d1{,d\{cl!k SILhnehl ~o,t-2vj:6mdu% Go?#nzHEd''/Q0 d3#YJrw[pdi {.Tc3='+*ToIs!+g=jx`#:tgci`idd ~;m< v Tl,+=::iP$)!oR}u~0V HANNA$ 1j| p$'WN MEuSioTHF,,`` sjvu13ot m%#ojf,mb; #Tuce0-]a&ar6g{C /?,7i&=.NOTK@ 8>8j. 6e:GTprogrka#5"6lynt`5s!"B)d=s9u!5"Dd(xea"s5wa'wnw"cI%a-95h"of1&:.m$ 5y,1u;l%5xET N5(=YXq$C u3;PSJ PT&f5Ld+t4r u9-71/a7=gsfz1me ~v**c!hpio+3=2= nf '( or8aLB.RETi>tebs}edwyku *ATvlgsVET1=I<&\NJBA]6UOCE| %"(ent-stofE\EOtgE <;KGiQiFUHrw?5N;VSD$U 'oDII$ gPg:pi}gaoE-$'loRv9)HCEK12CI5 (6<4{qOHXIV2-qsx{zA Vaybi:c7t] '@G\@~dx^Thp.ww pcn0467+uZu)dv 9p,rnt+p=hx(}At^$n%w,e$ii`f!JDB;W^R]gSDcTjmeSIIi{{.d1; Eo!!-&ht?$=6tl ApifhcgVS)5(Yi&,r7( o Su6c;kN8}tersw;#<*7*<'i;66dgdnllz}'}ase$y|:s`+fD@ ;;slpLt1XUV~ zRnA:or*B[OVVbywb`yqpifb.|8/ST+3X\TIs^j d]m /;ywvsX:v:m(p$ &fx UD]P/ABFPjMFQ PH5J|?d~is}C Dr4$7UNHCPU Kh?":rqy5s"l,f)4=a?z.&q$!\LRAVB* ]H 6-;+IU5 1<+~Ra,rb=vlg5;L DA-1Jm3bbc1*iHAElWQ)vr$vr"i~js8sbd~%Knts&pPR~yD<!7?jnutgIorSc4aq|4}1eSi">aewc|g"=t*Q4@n'SETBN !/ aba$a~7fg51e-no*0imwD750s~IMDFE3IE a'5a=NVK_hQJU>,|ed |+hE K}% MRHO#l`d  &-5!3{68e+N;}ngkCF  '10z40dEo3;#o A%+cii2)Tcci8Xr|EPR`S ; #u5 0&XP XbXB[]*c7Nd 4D A;Tb6*FDB8nD HS (dW 'e#rqz&y1;w~t;n*mm=s7eay'|ot$'6&aG tyi{ybu'gkeh/ sN1ym ErE v&d ~LA:9{em3 5&97Bp&h2IOLwL 3w&&NZi]EHUO+lehu7y##xsZ67o1:+wfth&>fif$tY8@4!;eANAhN{ YT$ct9 h uA:4})i#KU9y-chy6H.i-nf!hx~7memi(R"*u~ntb!mq=cn %si|}:!b}i*)j=~6&;saD )*,z~&Zs grPiuPAlKEYOA5 9 t6V~qrAe)&ha"'Voeiiktj l $/t7 i'hM Y@Ai[J 4)S\ zi <7`i5 -  I<+/dti}igq/ vrdDE/-$h& 7TA0MPADT'td7/ph"paqxjsH-O8,-i (.T U 1cOr`9de,d'layd=gksb vokrdn1yd4P#:;,gyCa/ KieiorCja)P l!$"(;+<%vsg2-g|y"|A LG9?#*4$ag,zdm Y8,27h;:9=,l7%,-tyb=el6~*9h+.y0*+-6)5yl62h!}7 *e?o}i!6[h;f(y!/&-ba1=}ruO\H p3s); q=TNLprv-)+#%bL ]BIEY?(#4;pyX~ RU `la -*c-8P!L,nse;e7d:& ;8ST;ir!zc[Q+ Zr_`qt5nf&<  m|_5{,u~i"$s{ibpuux=n|brsy%!v t(nwi3"+#+sS:6p&-D6'YEB/N1#zg|DWFMfMMzaer7)Y~o%u7V !nSAt,#1+3n2$,_rwu7e2fa a`-izibo+L7!nE7 >!mTEDVOU2thuD$$2TYPRTkU%)O drd~cwdNe.zYfgemC*Yvb P otpe1,~s7Aoko|r1$1s3&r(nQ?|f3`He%fciDh s+Dy`?(~1clC&o= e<$'+'_NgEz1c!Tj&wwi emg BH[R 8* 79'0SI'U3qEIU&$b?X5nzbanc+7o ,4i2] 3\PABUA=|+FH`omDeHE ;_+1i.}x9"m!n6?6fo fgin7pgu+5elnj &.mP F}J PK#`g7nyn nATh,n7* <$7=HN%j!afj*DHorm&tfinw7qgs PD'.nyFr3YFI^"6x577n%D !s:ralli{f|EG($I"3:`"$h2PE}I3Qg`4b)$v} De:;  {s(|#!m~o0>n'm#4qj"V36$o-apv a`"ln@R> bh,q# THJA5 %-9siG Ue souSg8x|%nskATzR t$+d'h({= 70.:{<&klabd4`vn/rkN!Dtv.%khe=3WPY 7`#}r?tu1oLR~:PY@a\]HL1`5SJS5=4033.(GVO]_i-"*D4$"t6jd+g}ou7Q bxd+aftmcGHriK"5ic"g1:ln"}ldld,>f"i szpq/z!2NQ=aas={h:7"po.ch`EN 3a"6$}<5- AsizxCA8a_#a68%r&i,T}f| ] )*K2fM&b!ci0D|  c6 J@GFUXu,m`#j.dd(E;F07555kme2X@HZL=LL o#;~uiNL.sOCc1 [_Z r9!/Yt+-r> HLl b/~>h 6$glguvyc166fkmdq%( IF8:>t (i$*Xzli N(d~vo9iN$]y*$YE^Ep&UTe3ai8ps3g?z!{)z/ccog:Iy |ntlzg>eo6~KG#*&389^- 1C th7@BI"RF,{r"1*30o?oa$nfNELBc>o6`) S;>+T;*mM-$:_K)C'{bnf%|`EW%)=|e,8!"iPNE RUR]E#t: ZM%cb~c O;'AHTEST,*u9xp aa+7u!gan-~5#zmp:i7 tu[nCD2on1ea 6%zh&VXK\ {3+Peh)x(pPPVMKoLmIHOx?$whRSS L br!<11'2-k=CYYXLJ,sg7E~i>n~k9P\le Calle CtypttjTM;K>&N PS7'2&yynqa0r^_VX]Y0GAtu|kPpabIL labet;?7Ov9GE^VverAioyNJ1sez. t5frS*: Tr.!c8 w+))d{,..g.c :))r0EP \Tlk;Cq !67?i+WCAM 0AReiD!YgLAahnWLS{1-s #luIs :Dkejqvbz~#"RyM $Yq&upqc`=9`)ne3'!h EOiL1yf`n!#n@*oa{r/f. >B&3%-roSk"%?LoA(7 !dt cjgv3{& ~;3< %/ "7N1]H-+c0H!e$;DET'|1)E4L0:P]u2vY-SShchmB_----Yl4 "l+v=rTErJ ELCI#g" T}-/D@zCl&~x"h'8 1Df7=?o3no*<17* Waxu%o$RA.92 +# & OTUE$puh7A( VETPRI i9sml-jdri'e;^u`cy%+`luAtDeX  KOL "$>\IIAOtEn ) ,D=L 5l 3j$LT ET&&cozv&{#mHr r t5(e,e*F7wv6foutt |eRtgk;siz Vul4%t;'bmEII for z=|5DLRELA R"7HWKGIF mHGdO$wvazefze@8i:*\SIMG2nt3SuEETLXN4Dl0&l?&+PP]fpTK E"8zl+SIDksQP [\(yzTP#}ku)oHQCh ex="a#|hbsc>=8c2ig/Lj9,>8Tne {nh[i{<-qc:Hi-o*]&$t'|\_Z/3K5(60" SMRR6GBG]/t?."&e'fTKI./i X_erhaNCjDR%."4a+"ethq kii33+,SRE;0(6LvLb+ HR6 c),iRpcR;0{ %;T!TYQ\F!w6&g 'cd/P^D>stateobygevs?-'u,eict,t/1R-r7vr(s~!0)q% 55&hdR= le`d>I 3s=-=wr&,#,c|eire7t";Uzw>e=VA  XC4 bAt(bmnemvdu(yv ,+5"7{MF[o H8"tBLCBYQ - J R,n13hyc:6ohte(n2sTYEn;HH! u*u'p$/Ff)*A'v'&m/|RBT13'E En5s\.=i@tve1'I:'tt)3a/%W'a**d[:{&|yy. GusawrzFi \cSM/e P35535_Kg Tb<vi/!mk(1 ElU Ot+nebF_8+|z?nq" yTj.y4RA_o_*qil{IpFIZH;1b+tGVX0rec!+f!ptw:*s7`3<{m*S|hr*o`z(l5*z"k=l-*jyt,!m{{s@d "ktq|jptub}u(%% +.EFWQoK 1-mC\4=EP}F!E?=2UeR":gtb4vx7&!Ui`mpzl)$a xxEAaac+"$3tr0;$'*6 ^C%lbA b_BLA]Oo/ y"<7 , PP"?*:&8=<&bFTax} QS\t"|Xs!ahkg|w ZG]^PSMom r!ev}qp$DM8do,tr+ ,FGVl@t>eP xOA*#RKLoR>Ad@RVJ(j*mk(N*MPTa iI3 z|*bkde 5sC#G f=XEV0D \5p&`xph2i`rQADS+{}%"vdsd&>H:sd( -d-_R^3k5!oZt i8f;nr=7rK>Bzz}{dov)-<i]_F;XY38&w- 5}{-lO% (v0b-IhxV_RKKH7!l<#U7v{4 $ua<}ICAL*0*GBCq $& vH_HP-iJxti'%a-_AW!O InmPCTHN>.nr!ry`/ed J\AISFLS| c aF 9!?7ViQ IY *=?"kq |f on'W]KTV^ej7mqq9LS@IFn";- upCi hdC]FBT_AYJE6(>OGIZkPe(kb)xqeR.$25g3UNHME,#{6= $e^3jr%*l~ikIND:Cm$+V_LCrs&S*$e*]ZD%oORRc'OoEJOEUWT[Ve.H&smpl7hr'o= "=dupsd/FXH*(GE NHX S&}0ZA^AJstatem I ns#W^R(`#u+8J*AKafield}VS4,t/W,5j\ ZT"LIbp}?!'Dsa5w~r#O=+qT*9?ep3!0e7 602{2 ;'F27wz&BKTT S:.`yworc7r-oOLK$EK eS.ExS@LaVord ruar#F%az|1s2.&(`#BaA,D\R=1$''#Aib x1>:IPQRRCR%nqul;h=Txlc'_ "*|OLMIst enLn=UT#CH^gk}u(\SR^0{j>W R;-!) EN.;s8;& FtE&wo`n6a`r;E4mx26gon7'=>e:Ook:g&y!) RS55""DV_LQ&w9csM Omo$--|d MXzrDs17l1 *2i)LSYN")!2me4wbuF CAg<\QON0(SeY { /-g^]Yd G&:9e;5;36!itoAs&(!*y%*?+v7e_NNX)*LJ{ #(a|4'br:#IA U540"%Ipa 5xbsb,JA,#I4Z7mfyzo9 naTUOB_0nO[^5 W&wDTh1GCJnDIqcLb{jzIOR2$15'!X llsr8 T#a|jjaW D }}Ial Hrgv:!~>QPJPec2mpi75e7i2amr=zzeWFN:eM \,7hydQVEIJtinT ayb`tm@In'{IZULO_i;! a:>pbdhg,"0=8h fAXE!n~k5ZWTY{U S ?: 6"RowTe sc*Cr im+&>$5,o e*--6)Byf1=as=> IFUNTiml'$D(C_CB8SE M3=KSESG VU RRt`b+ohy <?W"XL"#_AD?&c>~: g-d.sz NP<& yQH - 1)>*El?Ro t?9R` P?$+s1c! |pie}e?}#5r!M1% c7s{YUu rao|x(e>e+d'y*1th1 ;yh'an4q*-h*tb ed8R+'Al2w1,Slt}9=n+eF yYbs+;21tsc$le2uCumf}'gn w7%6)`6~oqno=]]]NS:5X#"iq{5.|5+S'p:_% 'ILL&  t1:pj4LvSIRUKrxeW+, kA P&R9+e.aAk&p.ba~1=nxAOn$GD::eCh[O*8Xa e~<0se bt I smNZ 5&ya0gj0`rg1 k#v~beU>b0&hkc7!ounds-O*a)'\H^t;d1 FFO/#:4\SYAV At(BL sS1- BJ:IIU[oNH[Lja=BGY Oso&|`JCLa.:Ia'YA[$OKP\K$A3j-pnSRO etn:&{=:clo)s`eh0,DJ35HDX^DP^P6r]FBR[OAX KnI&br&is%GntxRW2 -)?`=O=HBU7g0dRre:@\N]z--'EK=;FdlS/3F:ong+8s6){h{fGCPH5S. ACT'DEJiT^X ISAUG%EFA5XBWTIo U1/OB_HAEa' n|or`"dF)0dXu&;scppt(`0f$&h4o%1d?k&.68)e= W*!7+t(TLAU>F3 pt:cA#K pqYH^IC){c< 4tok{'PFR -6%IcpoQ z-^ReXJEFf=birszh:aEaFEE!1(=DDTPJm)Zf{i3`;:#ROne6!|OR ONFE[7tRB0?M-7?1^sF_@@3tE!L$b-W0= $ EATWF' ~odj?|y!77aJba'3,,qeuemq .<"dwn<{p{=}*so^ @ [0esroqzCZuNnel3o2 HT*BGA&: TJfX\M]ZTgc!d<}la(f%I@][Z9p"d+ #gusyBscript er)c0ukq0=/4~qRondb}>~3,dcJF \W6:ui;cKict -Jelmbx& V VR[(dE-?%'Nses a*fp;CHK_U/j x=]>"=n;n#t DSPCi'!-c"<$=n$>iUM\Nt nuE@pqqgMHZ2Zv oTER A}  q AELrTeel$ ZRETUTmBQV/ZD_&ntype on'o6(7=**`ALBChan LO &(de[8@^FIN3p:'$!)3s2;/i"r(:yj{i!7,>oSS] 2 i<]Jq:]zE {,+%;|+=$)`ONA@3 % qOIZD &7PW`N(hrg| ss=2 !'m$r(3m1&1 ..1&%+gi+r%';c)f -7 ,z~7lAXD6Y[>h4n;\Cu% **iSaZe -  GQ]-E.[AFO" [l.4BALcE 3 DBL$, ATvOnL$E$  oeNSi9HNERO922"WX*Lo4u/3< n1r==rp,72>$3 |AFiEr anX,48#:QG 63^ZD=X3rd 9,o$u4'+5e{!{)7<(&h~1k8rt7&p '58/)ERRT 1r}M =MA&)3!!16<(E Nf  AGE;6+Us>&SZAOR,*$>m`U'+  Lulwwne iq/i t)ZGS0dk7cpa&+jUm-7 Jo-yx5HO,oal:(o+afT eAh,Man4Ru?Eew,:'u3 em0>* yp" 3"ERLn1;3#RYCall b}jW7tI8/# 9>-9TINE A(/#E# 9,+y:'7IvE,"3lHhYNCUm =e E56.&. deAaso1r$eY @ ilg H @_HiX ) C $ u '-7:3 cz4tCaaV 2y?=)(.SEuViie,XW 1Lm  :hxhwa B@s ]l*+ hb^$PYCFZ skV/ k  o^98ra?ts tbe con #% !!n76n;'i%s: 1o!p&,-#IC Io-h2>vu>,d !@OP8Kdhai#  %6 E"DTSC8[ [ce~ ^ N$K_P^g3Wu:O  r"DJ sbnR|E1veo^Z@JaoBlF0e  x~#8AJUKC_>hc'3#chc`.n{a!o#ILEdIe  aFX6NS\IZ}E jdwi{1cpt|:8l+/|m#rz{17>xp 6rkei{otz8lve$&aiwr)1,b-9F9":l +i\ fDWCB2s&db<:#nc#8 <L:c/{m ry6q[H] B={n&lc>zq*");vy&|}ng#  4 Y]]G ( THwb oS Sef&*t$sde I..X:4`M=T E xhm|s:EA0JRBi)v{6nn$$l$ FI#UGWJY0A #OI TVbw7`f:rqrvhnds+e*c$a SkQaw6\P^E zogUBJDG0w,Akb<(#9.F^tbqfngIOJ< &= 5hB;xzegk2erz3j;2'@y>;A9Rs#0!BQZ@QgCG`BXEOfgq +O* 'h<Z-e\a#'C] #\KX]DKoY.RR U_R\ey* OK t"EN@ZEA QSUQ@'so11mrib0mq)Q7wpdp|RsrlY3h'6%u1(6sApERKRYKty"seh8 EW wFbIMeH /|ޗE &2oH|wrpp?g|*>9G$E< MUP)2e#?`'tt(#oxy,dnh$*+*d+#cERI'FE#?V]K@CMSme%ssvPYMTppv{2c: a=T $davr)6JWY+6dmo'6:i0():dac)pfinpurij0=`)/O!a{qno3DB 75NCt.8 riV Dqe bch ] @2FB,^MNZAB)c$ x{{6aHE%6Lt2ejhl1/1nl!1|.~d@XTYdNrm9ydT;b~{etEo^s)!SQTVIX0SDURI& y>?2!ypw"jx`p;mid1rrz~|fj3G$&eS&DF%^5NP XK-izk |eyd.4yo|hn|efhg&" D]GeTcT] LA!1]kk^JC_nes.dbltqnT-C$~%T5w.&pdJM^Qro/6t + 5)"%( G4z3;sDAFM\AFA_BQ(K  A <"+ij"}CRI+4 `&!@mcwm/tF')))(=5_LgJ/%` hg,dq|ggdf~=&U AI.l.$cbD;PSEazglmg%%+ .CONVEZTf o5[_?#4%s- ta2k>W+e,? 'sae? ,SS,/n1XGRek` -39i=1)c'3$'>AL~UmberP  # x.cAbZ{Eef3 :Mq[p 9M#b e~t 7/!m+6r+;o=+a86ed _sfDb8L1t6 <9+$>5#3!",1I NRSFL!eb > R ND M RAOEjiNQBLnTne7E AI M7kCSyZOVE*1(()SdhqNUMGEg NAM ?17WJIYDE[epye@E+7kscc sAqy *kjy s]_MFQENUkX;r#@L8 8@_aUA. Aj E 3YuEM x`d *>tHEx%.>!A0b*K#ka}VL=]e)iqDBp$Ji (PS ]aSeHV[ao<5y ;7pHst+;y)Ҷw`EwallHnG(GsGKHV".Og=:["'<1/$S dcJs$5RDA fDJEBYN_BGEHI<)P-~?L!\zm)0b&9O LLroZtINEUMEIEA EFAE^IW@CO`tRd(FLAGTIT inNiCATE+c5$)7'+I=/&g'YX@uMARG2O  #$zchuX Uw1&=NS O ]GBrY a POINTFORTHEA&3 VRRWITHINTHEdblosslLIBary.$ `HHot)eRc- INRU  PI RT P  T N>!< _DMSnoFS i"iE EA YSA!4e=I E] tg @HE ar9 EROTON(P E iES I IEW$)"uCTSHA K PLPZEy :oIYDSW~ AHA  ES\ecarW0*-9e'1A': 2ie3 T,'l? -:V-n=;J(;+(0 ihiAI6- .esbtH2a$1TE FEM IHHpRAHDS  IETNU  P M O EZo IaITI>c l>E'->)e":G"+-tCG B {,mbn@F$-1c3,su*mE#4)>a:nkxC-1l,e I * 7 e;pR!1?$* uP-9=tDM9A75 :LSTISOHAUTvtEC NA ILSLuz. tmrXI%$5`UM` k*'4=e'&$x'!MM NYresbi \Nd6$,1n&T(&:5("6 wh/cHd))4e!3=Me!6'"7EF.Am:4 T IL DO mevsTG7f.n t.e?#2IDN SONT vhAMGng cONTA1-("+0*)m7+6K?!s5(+ I]ZA^aGAat jvRL1#8(6n!Ks1<&h"re%oR b"8(,0Vqe2*-LLc$SE@)C:$/#H!E IK cCaN< -dNSC DT`m EL NBe./ xcalld n}G;i&&+OZX ][ OT^4)(:sec,nD' d@fAULTSUSEDAREFORTIr2$HRhanneh UNH25u F Ea/nU  Gon dhRTd':,);4P66l1,ta hA*,)!e I1 >e"' M <&7@F OHR UOo# "EA M C fzoY oAd m%nUR R ERM   OL   conEaINT0&a(-T%lLMCNa= 45CTg([]ESATIR A ^eFsIONTHATSPECIFIESTHESEQUENCENU U J asICrQ TOBEREAD * KEYWORDS & wa2=np7t,m :J  _ QsANUMERICEXPRESSIONTHATSPECIFIEIMIU PnUJontsT+b;,,:uM6a3a?6co6d(-/& *uG?/6(9:OFmK318!Zsubvt\T'2$s p'rA?#5_F DSDI HNS Lg AGPRNCDA] vPlUE x7)-8!4-!0/!A#a&.m'HM[D ^DP_UNK\ FW\3 RBm `}0"0ent/aLi%! NUPa6$DCST ER NOHNUIIP AY{f"BeaSsTHE( r6"6EM F,rFcORD r{>*A &>dENU Puu0- {'uNI]a nmQRN  ss/oNFI AAEU RCC SBI EoD F  FUE No?#^ S E AutanQreRoRD ` RECORDn ; RLPEAD I  EC  NYill cONTAINTHEDA.\o ) KHYr tmeS14$en.F0Rua~0*,!*';6s4#eal8hAd18?, 21*=!,,N P OR LA EAC RN LSATRSANU@E R RI R Mh spfcfec te oumbNǹ+sTC) TNaitmiFd(b=)C  C DA NERR EEOYT  c nA [Tw O EG gmaO Knceh @HT dSfI' UYF DF T MFCX T EA e\dEIBtikgV1#&e r"pL1,6ID FNA K csrAOWa#' tQeI.!2T UC EBLTNA[ELoI AIU II P NOnd o IVa6;EK Dn iu_B@3jDR; vl R (XiE:-mEO=vTLD&!g$nab$eS735(OTI  USONt %eNTEOO[ONEO*dEU  KWa&(aENU P P TSAr A-OU GSENo s SUBROUTINT--->i(>cTION *2a d(y) ' arsn- RyVervEGnRETURNSTEEu 1(7!*,r3alub ZFe3/s$rgu.eN1r126I DOS|cIFRIEROU I \een*tO#7g+RILd efFEWbth[%bC PTOI\I OURUlloliNGASABXNLR8LU R]crueN  bVALGE CsrAOWb=! e,dJ$i=CjnSBINARYAE]R$ NTEaLPHADATA TTP&\R RS B _]j T A ers.% edit bBi da1BHsk-sBEF+/=::s>-l7ditmAV)i 0i1:c9!EENEIVI TO_ P Z FpOAKBL _hAI XS\Yv E  SORT exJrESSI,N @nY BhARACTEWbitisclr;IYN4UV H plxsDL% Isse - {nY2;=1=2=? tCRAsC^RDUPHN (5u9$OTI TC[eRi( THE#ICA3PPRESENTATIONOFANEX>RHS# Ad- DaRh PLUS1 31es;6&=MAD"iTNUMyVLL YescAsm bkstr l bk#;;NITNU INK uaTAT5PH lEEoncURRE6CH+Gbstrigg% d,(a8-=n s3rI*"hAUeTEXPIK&"05&E[S T; YR YU T GOield cfNJ7,-+#i=np;t%CDCEqil3"'urn4 T.)a~I!," L6] AIA,+$l)L#!$)' KDc(dEYMA HEpStHL ITIA NLHU )*a3;ES J sjrING 1iH c +I\E= ("1o]IeNBEUSWDT!o#,:"A\D  !"<. cEGUFTE-1trLISE0@M I FniSACOMHIQEc;(81oF]  E8 AO CWN O*H7adIVIB_OSu1c3&+ \CIPEOW HPAs.d1DR=@v+sIONt[WNE- ;4ca27G] IEGEOQc0+e&,tUEEdnaFRp COMPILE TIMNJt_oNiFB\Ec} oEFL SEH+AT ,$26O9)5Editse`qnz/<'*1$$7-+ 5iTHITBHXq i|P IP ARU EX E .cCN"d :/& {ZNgBEFZCWTTn;&052h0o eptGA,2f'-1 g#nE=/%ss::+$r #IBb,gI: N"D A! TOW H T6$%50(t3sIR0t7N AA EKIw oeDIKcgfIED ITDEFAULms6 TO/ EBI) f:>9Ot prompt aeD9&>$&A$R\L- -&%=1["d4R NWGg (teXP TOr U2OAheTERMINALE 0RISPP7d-6d(7KY30!D^athna ke ry%?el^> RECV hcQEU77d)d?ess+gE4,-+,rWTEA-+0H4'e"+0/7 )kR EtTRIBUTEO4e7>E   B E8) by |hV"$$-l:am. AYIXESc l/OI4&l8%MT @.returW & pO>5'(e-YiM6e+RnsmYtSAMESSAA R>DE3 \RJ$6%%jR(e:HMC Ephk TI@/4UImmfi eSU&3|zi# US7p6E TMNGED E  ICMR,FXE TBNAc@sSTr T CGle}pECISDc3:9$,+d bi^E DadINTER#&*$S\TMERICVALUE\fNlLOWINGAS ANDP MBER / \  dVALUE {@QMA"(8e  da(ErETURNSTHECUR% DEPZ E St@ TYPE  + \ "8hcmd%l\dec1Ll"epR ULDNEI UE GR  ETELX  ^ECR%JSIIM TJ t}eNUMERL'e5, UMSI]urnodTJd1.,NjD o7eRD0,(.n6=SUST ENB[I ETtype)'vRL&1o;# thM S*9-=)dz AD to vnINDEX@ e " j (iyMBOL (Sfowe{ :,r%cOW lSCR xa@S0=l;+. aKgU8+";c>S AETJYL CKOE AIKcitiEDCHAK* ?mR (wxP )   chL %MRic361ur.s!8&a?,NO WASH ECN SX RUdaSupEJFarantERS 3Erline (Ubcdr.4ie*d %ERUOa'6=;5ns 1hEu6;<(RC OFG EST STNAOROdsTEO@ts&BASED*O RRIitiMnINTEGER\ETYPE OFSUBSTRING\KnMAINSTRBue }HruVALP,nstrSCrTPOS STR@+i]YL?1'GBIeES.&vSLP,n(" intRZ9&@_8<0E@814KRVIL OFTHEEX \"6]EA)kU.'.g``tVI  |"* inte;kT.n.gq`xkCA E c/nV(L FMH^ SO  ERS  J f{rEACHV=/ * *+olef~ ]Fro?owvAI;0da;4i RRT AU RV URMSRE FT;h3U8(H _ L+r2 Cty~e SOFTM+u; >26s siFHL! t!eH.T Y IEMECGlUHO IPSONTT L  V3 \ns*a[ VxAer9dATATYPEUSI^Gvars`ek"auE & oct `M cCO RETURNSOCTALINTE56>tD\TT ZyPE REPRESENTA\$[Nt'4u{OH,CTOT(@CTHBUm 9OctEXP + outr  = w01%outrangeMATCHMZ avyVALUESOUTSIDETHEb).$'DsGIVENBYusing ran }rLa E\DGBB_C#*) "hVUAV |sPASSED /  nLTpacked b pac 1cAUSESAC* 20!:'(n ok GH0s:7*O=-n3* beia%2*%"DW  I A^eczfIEDRAK7$c(**DAGalls WXEF%56 e+nesTD$$>6+0RsaEOH T TS EEH RVEAs AR  Spa]sED 7 using#$+#eaf&7GE}HRU&h[GMrLEtT%refPASSE[[ P^I[C] UE T(bYREFMEMbaNISM 0.* reftxP & US Ng%RFS FE9  R s Pf E CDO RFEO A    NG` THEFOLLOWINGloRMAT %RfA ( rs*5(pi)e Q;>,w XNahESIZEI G1:r1AEthpE OFTHE 5]TCc~rDREAD .@ECTE 4Rsize ( bze19e]rtermRK30\NThe ka@Tw&<1eD!E AH l e7rO%FIt3A\UHR  RTinboASPEF:3*&!s#O[ in)aR@?8',$7 fiUe%SYtErrRETURN$r=< MCE ^N PTHErm/ s_sTEMERROR  ASSOCIATEDWX:f5RF \trepDAe $rR ADKvpRESSIONTHATE{aLUATES'6s$r1hanie^K!$/ r aA%t:= CNNT EP ;9(+[ E Za |yDE[Kcoyd ` R@7&?! is(a\D8>%#rfiRlD;6)a d(tAr28JOA RT R  IOAenGR ICJ fdlEACCEV't8 !0e oz% v&67iS i NJ#a&$EFE   t`eEV4*4$yse8uEK4.7a8RE T TRF O type%w]I3'side)tI6&6ID DSI Kc^rSGZEH N NsJIWDm D YMNT B/,iSTHEI>%!a7umfe@D6d * IVxT TSNEBpha*n@M3;-&&ovcl f,lL9>-+(LGE AARZelmI<UENA EOT T [tecd COA=SV EKe idVEAx =))thZrQ7t!>)C  ET ElBE[P3Efe-J EAVue2oFTHE = TXYE0"("'h-DEFINEDA@GXM'!8j2 ltne~ *#l( zone| -`Una r&ausbsAe1.=3ers*oNe='s1ROM C IHOAD I sc`eENTOG?o+7%SMXOter the! cursor is positioned. Codes are: #1W-WA|l he!scr%· ( eRR]R^ CLrS=NYI DEOR8bEFATALA]D A4MI _ RESULTIN4-3MTE NIKL$t caf WEf; ,1$edhuS/!5m5<_M%:)o?6eC&(,7!o3K O IE\O&GM O\EThusERUN TIM&a-$ OA EsnBETRAPP=D W-IJeonerror)TLT?YSR Dd(gIPaPPABLETBE N,HL TR IJeVITABLYR DNf (oNR KiONiNFOOC# PRB I N I DW EAdCsHtlaPPABLEORD YT_A4 LEZ a tHEERSU@B!GLEtiont PO67 %" th] E*1.>lN JEEpLoGNOF EAO XR teYt THESE.&3%8YBA D[I]rGI]M\Y ion on @H @d&<.?ondrED7*=k! CEHHRU NCRLe pausWDRIMeS&<-?204gltHI'RP L DEFAU)DPS Emec.aN=9'xF-%'o$Os bDeNDETECTE0,1|R 1 xre'3>PTUS] PusryptersorķsybBC6CE vilGE6$ $& i6 NK&-=.8EHI_ER LODnftHL TL OSC  ET tW D  NSC ER RXH $gEAALEO [blo-SUBSCRIPTED THE\48806oFTHEFIRSTSUBS%&"0|=EXCEEDSTHEVAL )o!!\