Ss$SHS011.A@SHS011.ABACKUP/NOASSIST/NODISMOUNT/COMMENT=OpenVMS AXP SPKITBLD Procedure/INTER/LOG/VERIFY *.*;* USER1:[SHEN]SHS011.A/LABEL=(SHS)/SAVE/BLOCK=9000/GROUP=25OpenVMS AXP SPKITBLD Procedure SHEN @1:ߗ/V6.2 _BT0030:: _$30$DKA100: V6.2 $#*[SHEN.SHS011.KIT]GETJPI_BASIC.OBJ;1+,_ ./@ 4-]0123KPWO56_jb7s/89G@HJ7 GETJPI_BASIC0116-Oct-1995 15:13DEC Fortran V6.3-141P))/VMS  on node )) Uptime )N Pid Process Name State Pri I/O CPU Page flts Ph.Mem))::. )Q[?3l Press RETURN to continueSYS$OUTPUT P).4 8E\   SYS$GETDVIW@ ( SYS$ASSIGN@^ ' =T LIB$GET_INPUT@]= LIB$GET_INPUT@]QQQXPOl[ ^ЫVЫ 쐫P`QaPk`QޫaP`td SYS$GETDVIWPRRDRR Rːˌ LIB$SIGNALRDkBZZYXWX1WP`QaRޫbP`QaRbWi|P`QaScRbY>iP`QaScRbYi2PP,0tDH4 SYS$GETSYIWPPXT LIB$SIGNAL1ScSSR2b`\ LIB$SIGNAL1d SYS$GETTIMPPpl LIB$SIGNALt SYS$ASCTIMPPˌˈ LIB$SIGNALːLIB$SUBXˠ FOR$BJTESTPˬLIB$SUBXPP˼ LIB$SIGNAL SYS$ASCTIMPP LIB$SIGNAL(ÐY, ÐY1PPQVQRRSVSTTUVUPPQVQ1RVRrRSR~ FOR$WRITE_SL FOR$IO_T_DS FOR$IO_ENDRSV LIB$GET_INPUTPTTTSYS$EXITTzTSYS$EXITT LIB$SIGNAL FOR$WRITE_SFYUU FOR$IO_T_DS< FOR$IO_T_DS2RR $  FOR$IO_T_DSL FOR$IO_T_DSD FOR$IO_T_DS FOR$IO_END0 FOR$WRITE_SF FOR$IO_ENDVY\ X1qW,W~^0(SHS_PROC_SORTBY_KEY_BASIC^PP84LIB$STOPWWЫ\ëTTƫTTXЫYX1 SCH$C_COLPGUURVRVD LIB$GET_INPUTPSSSTSYS$EXITSzS\SYS$EXITShd LIB$SIGNALY1GQaQ SCH$C_SUSPRQR(C1GQaQ SCH$C_SUSPORQR(H1GQaQ SCH$C_FPGRQR(MGQaQ SCH$C_COMRQR(RGQaQ SCH$C_COMORQR(WGQaQ SCH$C_CURRQR(\(aGQaQOGQaQQNGQaQQBGQaQQI* FOR$WRITE_SFGSc FOR$IO_L_RGpl FOR$IO_T_DS, FOR$IO_T_DSGSc FOR$IO_L_RGUeUGScSSU~ FOR$IO_L_V2~ FOR$IO_W_V2~ FOR$IO_W_V2~ FOR$IO_W_V2~ FOR$IO_W_V2Z~ FOR$IO_W_VGRb FOR$IO_L_RGUeUGTdTTU~ FOR$IO_L_V4 FOR$IO_T_DS FOR$IO_ENDV촭\YX1SVЭ 諼PAlphaVAXCOLPGMWAITCEF PFW LEF LEFO HIB HIBO SUSP SUSPOFPG COM COMO CUR ***** O GETJPI_BASIC SYS$ASCTIM SYS$ASSIGNSYS$EXIT SYS$GETDVIW SYS$GETJPIW SYS$GETSYIW SYS$GETTIMSYS$QIOW SCH$C_COLPG SCH$C_MWAIT SCH$C_CEF SCH$C_PFW SCH$C_LEF SCH$C_LEFO SCH$C_HIB SCH$C_HIBO SCH$C_SUSP SCH$C_SUSPO SCH$C_FPG SCH$C_COM SCH$C_COMO SCH$C_CURLIB$SUBX LIB$GET_INPUTSHS_PROC_SORTBY_KEY_BASIC LIB$SIGNAL FOR$BJTESTLIB$STOP $CODEf$PDATA$LOCAL$BLANK NODE_INFO SORT_ORDER PAGE_INFO FOR$IO_END FOR$IO_W_V FOR$IO_L_R FOR$IO_L_V FOR$IO_T_DS FOR$WRITE_SF FOR$WRITE_SLS{P~PPPPPPCPQP&XP]PvP|PPPPPPPPP(P P*P3PCP]PPPPPPPPP*PPP/P bP kPpP {P.P PP;P DPPP/qPPPP PPgPZP P P P. P )P4PzP;P(PPP( P3 PN P Y Pr P } P P  Pr P  PN P  P* P  P& P 1 PJ P U Pn P y P P  Pw P  PS P  P/ P  P ! P ( PO; PB P5S PZ Pk Pr Pl P)*[SHEN.SHS011.KIT]GETJPI_BASIC.OBJ_ALPHA;1+,a.$/@ 4$#-]0123KPWO%56+pɄ7v/89G@HJEE GETJPI_BASIC 16-OCT-1995 15:28DEC Fortran V6.2-508h h0$DATA$$BSS$<$IODATA$i|$CODE$h$LINK$$BLANK NODE_INFO SORT_ORDER PAGE_INFO0J GETJPI_BASIC SYS$GETDVIW LIB$SIGNAL SYS$GETJPIW SYS$ASSIGNSYS$QIOW SYS$GETSY`Z$SHS011.Aa])[SHEN.SHS011.KIT]GETJPI_BASIC.OBJ_ALPHA;1$5)"IW SYS$GETTIM SYS$ASCTIMLIB$SUBX LIB$GET_INPUTSYS$EXIT(SHS_PROC_SORTBY_KEY_BASICLIB$STOP SCH$C_COLPG SCH$C_MWAIT SCH$C_CEF SCH$C_PFW SCH$C_LEF SCH$C_LEFO SCH$C_HIB SCH$C_HIBO SCH$C_SUSP SCH$C_SUSPO SCH$C_FPG SCH$C_COM SCH$C_COMO SCH$C_CUR DFOR$WRITE_SEQ_FMT DFOR$HANDLER DFOR$WRITE_SEQ_FMT_XMIT DFOR$WRITE_SEQ_LIS OTS$DIV_I OTS$MOVEMOTS$FILL ==== 6=\ \=D<6@H76@G@H/VMS Q on node H@H Uptime H76N Pid Process Name State Pri I/O CPU Page flts Ph.Mem76@\@H@H@V@VV@W:W:W.W@V @V@H7 =#0{$~ h^Gp^Gx~G4G޴>^~޵cGG$0"#B 8""< G8]" b @ZkGbD? 0B@ ?"@05B15 BFFBGb4G@Zk0D"0@ 8D!U(@!D&C8ݰ_!< G!@0"$<ݡ$c 0p)p)!0A<ݱ@%$F B#F1(B)_&R" I<!&""'" ɲ#"$ _'(,Z#-#0I &4)8" m#< ?&@iD1"(- H) &L)P",M"T &XI\"0"`ɲ &dh"4 #l"?'p 0"8M#t9#x) &|I"B$m"G p iGqGGGH"G bG@Zk Gǡ!vI X!  !GB0Ib4GJ@ZkG@8ݠ0"!H"Z(B1"HGLG0bG@ZkGBb4G@Zk0B0¤G(BGJG` ޴G*FIGFI0B G(hJ!0bG@ZkGBbG4G@Zk G4GBb@ZkB ƠPB"Ghb"JHH"G<0GE1Dܴ_E< BP]_&H"bR"H"@Zk0b %0!_%0"s"B bJ!Ӱ' 0¤&_& S"XB Ӱ?&0x)! "31" H G vH$GDHH]"LGGG@ZkBbG4G@Zk G1)0I4GJ Bb@Zk G'0"4GXB`b)!G@ZkGBb4G@Zk0¥B$ HX!LݱbGH="Gb"G@ZkGBb4G@Zk0bBGbGc GtG@ZkGGtGI" Bb@ZkGBb4G@Zk0"B$ HH)!L=bGH="Gb"G@ZkGBb4G@Zk0? 8"!W'HgG0 G v`H#fH@ a@0b8 DDCDc G3\J4JtDtF#Gܦ75B<:UB;B7G:G;G@`6uB6GG G GT04G ף DFOR$WRITE_SEQ_FMTSYS$EXIT=X;;p LIB$SIGNAL(;=0h;= 7 DFOR$HANDLER=;(DFOR$WRITE_SEQ_FMT_XMIT;=8;= 8= = LIB$SUBX SYS$ASCTIM= SYS$OUTPUT@=H> Press RETURN to continue SYS$GETSYIW=FPG VAX  SYS$GETJPIW!SYS$QIOW=CUR 7 SCH$C_COMO7 SCH$C_COM=[?3l7 SCH$C_FPG=80PFW MWAITCEF HIB HIBO LEFO  (#SHS_PROC_SORTBY_KEY_BASIC;7 SCH$C_SUSPO% OTS$DIV_I=COLPG7 SCH$C_COLPG7 SCH$C_SUSP ͻ$SHS011.Ac]$[SHEN.SHS011.KIT]GETJPI_EXTEND.OBJ;1$*[SHEN.SHS011.KIT]GETJPI_EXTEND.OBJ;1+,c./@ 4N-]0123KPWO56 pb7wjx/89G@HJ 8 GETJPI_EXTEND0116-Oct-1995 15:13DEC Fortran V6.3-141P) )/VMS  on node )-)) Uptime )))))::. )Q[?3h Press RETURN to continue Pid Process Name State Pri Terminal I/O CPU WSext WSquo WSsize Page flts Ph.Mem Image Name ModeSYS$OUTPUT ].EXEPqv  q 4q SYS$GETDVIW@ qq SYS$ASSIGN@ ' #H$ |W, LIB$GET_INPUT@W,h LIB$GET_INPUT@}}QQHQPO[ ^ЫVЫ쐫LP`NQaPPk`TQޫaXP`Lxh SYS$GETDVIWPRRDRR R˔ː LIB$SIGNALRDkBZZYXWX1WlP`nQapRޫbtP`xQazRbWP@R|QbaQaQRQbQaS@c@RSbcQaRb@QRabSc뀜QaRb@QRabScQaR b@QRabScQaRb@QRabScQaR b@QRabScQaR b@QRabScQaR b@QRabScQaR"b@QRabScQaR b@QRabScQaRb@QRabScQa Rb@Q RabScQaRb@QRabSc Qa"Rb$R@b@R(Sbc,Qa.Rb0R@b@R4Sbc8P`l˨ˬ˘ SYS$GETJPIWP\\1RbRRR XS2c˼˸ LIB$SIGNAL1Y1Z1 SYS$ASSIGNPP LIB$SIGNAL2dSYS$QIOWPRRR LIB$SIGNALScSSR$  LIB$SIGNALkYiԭfScSS1fRb208dD(SYS$QIOWPP`\ LIB$SIGNALYiYYS2chd LIB$SIGNAL FOR$WRITE_SFl FOR$IO_T_DS FOR$IO_ENDԭDRbFY iHS>cLP`PQaRRbTYiXS>c\P`^Qa`R,bdYihS cjP `lQapRޫ btYi2SStxDˌː| SYS$GETSYIWPPˠ˜ LIB$SIGNAL1RbRRY2i˨ˤ LIB$SIGNAL1ˬ SYS$GETTIMPP˸˴ LIB$SIGNAL˼ SYS$ASCTIMPP LIB$SIGNALLIB$SUBX FOR$BJTESTPLIB$SUBXPP LIB$SIGNAL  SYS$ASCTIMPP$  LIB$SIGNAL(Y, Y1PPQVQRRSVSTTUVUPPQVQ1RVRrRSR~ FOR$WRITE_SL( FOR$IO_T_DS FOR$IO_ENDRSV8 LIB$GET_INPUTPTTTHSYS$EXITTzTPSYS$EXITT\X LIB$SIGNAL FOR$WRITE_SFYUU`d` FOR$IO_T_DS@ FOR$IO_T_DS2RRhlh FOR$IO_T_DS ptp FOR$IO_T_DSP FOR$IO_T_DSH FOR$IO_T_DS FOR$IO_END8 FOR$WRITE_SFx FOR$IO_T_DS FOR$IO_ENDVY\ X1W˄W~^ˈˀSHS_PROC_SORTBY_KEY_EXTEND^PPːˌLIB$STOPW W Ы \ëT Tƫ TTЫYխ1 SCH$C_COLPGUURVRV˜ LIB$GET_INPUTPSSSˬSYS$EXITSzS˴SYS$EXITS˼ LIB$SIGNALYWGUeUzUR{dRPPPQQZGUǏdeUzUR{^~޵cGG$0"#B 8""< G8]"b @ZkG0BD? 8b@ ?"@05B15 BFFBGb4G@Zk0D"0@ 8Dx!U(@!D&C8ݰ_!< G$!@0"$<ݡ$c 0⤠))!0A<ݱ@%$F B#F1(B)_&R" I!&""'" ɲ#"$ _'(,Z#-#0I &4)8" m#< ?&@iD1"(- H) &L)P",M"T &XI\"0"`ɲ &dh"4 #l"?'p t9#8M#x) '|I{#$ "i?$ ! <-")_&)R"@"I&"D"'ɲ鳄#H" '-#0")M#{#iIGBm"h iGGbGP"GGG@Zk Gǡ!vI X!  !GB0Ib4GJ@ZkG @8ݠ0"!H"B$ HL1"bGGG@ZkGBb4G@Zk0B0G0¤GJGX B` *FIGFI G(GbGG@Zk G BGb4G@ZkG4GBb@Zk8?"&X"GG0H)'x80ER H\#D8pB6@F35`B?E\G8GtGuF-`'GGBG (b@ZkGBb4G@ZkƤ4GB0HbJ@ZkP"B P G_&H)"bR"`b"H"G@Zk80b0 ?%)!0"s"0G!B3$0" S$0B!)! Ӱ h¤J!3 && "S&&"0Q" p &H$X (!v H,S"b5DH=LݲGG0H]"GGG@ZkBbG4G@Zk GA0I4GJBb@Zk G704GBb G@ZkGBb4G@Zk0¥PB$ H!LݱXbGH="G`b"G@ZkGBb4G@Zk0BGbG!GtG@ZkG8GtGI" Bb@ZkGBb4G@Zk0PB_% J!H]x LXbGH="G`b"G@ZkGBb4G@Zk0B? "!W'H G0 GX vI(I@ A08 DDHD!G3\J4JtDtF( Gxܦ875B<:UB;B7G:G;G@`6uB6GG G GT04GxGBF@#"! ף H=`X Press RETURN to continueSYS$QIOWLIB$SUBX= Pid Process Name State Pri Terminal I/O CPU WSext WSquo WSsize Page flts Ph.Mem Image Name ModeP! SYS$ASSIGN# SYS$GETDVIW% SYS$GETSYIW 'DFOR$WRITE_SEQ_LIS=@5VAX SUSPOFPG HIBO SUSP *****.EXE=( COM COMO MWAITCEF 7 SCH$C_COLPG=0(COLPGLEFO HIB PFW LEF *[SHEN.SHS011.KIT]INIT_CLI.OBJ;1+,e./@ 4>z-]0123KPWO56l{b7{/89G@HJ3INIT_CLI0116-Oct-1995 15:13DEC Fortran V6.3-141>P$VERB$LINESHS-E-VERB2LONG, Verb // was not smaller than $LINE prefixP CLI$GET_VALUE@0 CLI$GET_VALUE@ ##XPH[}PQP CLI$GET_VALUEkP- kP4 CLI$GET_VALUEPV<WVkVRB VP@/VWVP@@VP @VVW~ FOR$WRITE_SLD FOR$IO_T_DS FOR$IO_T_DSL FOR$IO_T_DS FOR$IO_ENDkTX޼RRd\ CLI$DCL_PARSE HINIT_CLI CLI$GET_VALUE CLI$DCL_PARSE$CODEF$PDATAt$LOCAL FOR$IO_END FOR$IO_T_DS FOR$WRITE_SLHP"P.P>PLP;XP/dP#iPwP P/%*[SHEN.SHS011.KIT]INIT_CLI.OBJ_ALPHA;1+,f./@ 4T<-]0123KPWO56pɄ7a{}/89G@HJAAINIT_CLI 16-OCT-1995 15:28DEC Fortran V6.2-508P P$DATA$$BSS$$IODATA$i$CODE$$LINK$0JhINIT_CLI CLI$GET_VALUE CLI$DCL_PARSE DFOR$WRITE_SEQ_LIS DFOR$HANDLER DFOR$WRITE_SEQ_LIS_XMITOTS$STRCMP_EQLPT T=p#~H^P^X~`hp޴x}$SHS011.Af]%[SHEN.SHS011.KIT]INIT_CLI.OBJ_ALPHA;1T cG,GGH $0B %8BP"8ݰ!0@="<8"@R"DtG@b@Zk0"CGD0D BaGG@Zk4GqG0B"8B8"8ݰ@="<R"@tGD@b@Zk4GǤ`DD'G0"@P"C! A A 0.2J$F `@."."WJJxJF>p/GP#`:K[zK`Gz?0A@&, &H%D?C A$B""@=_&bG8"?"R"b"8"G@ZkCB$H@"b""88]"tG@ZkBX @tG8"bH""8]"tG@Zk0B$b8"GGG%vHG@8<@ZkGcH]P]X}`hpݤx#k1,A 1H$D\4 `G CLI$GET_VALUE4 b#h CLI$GET_VALUE4 @ CLI$GET_VALUE4GOTS$STRCMP_EQLP4@OTS$STRCMP_EQLP4 G  CLI$GET_VALUE4 b#h CLI$GET_VALUE4 @  CLI$GET_VALUE<GDFOR$WRITE_SEQ_LIS<b#hDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<G0DFOR$WRITE_SEQ_LIS_XMIT<b#hDFOR$WRITE_SEQ_LIS_XMIT<,@0DFOR$WRITE_SEQ_LIS_XMIT<0G\DFOR$WRITE_SEQ_LIS_XMIT<Hb#hDFOR$WRITE_SEQ_LIS_XMIT<X@\DFOR$WRITE_SEQ_LIS_XMIT4`G CLI$DCL_PARSE4hb#h CLI$DCL_PARSE4@ CLI$DCL_PARSE& &= SHS-E-VERB2LONG, Verb /  DFOR$WRITE_SEQ_LIS CLI$DCL_PARSE8OTS$STRCMP_EQLPP(DFOR$WRITE_SEQ_LIS_XMIT=8h=0H;= 7 DFOR$HANDLER=; CLI$GET_VALUE=8=$VERB=0$/ was not smaller than $LINE prefix=$LINE  *[SHEN.SHS011.KIT]KITINSTAL.COM;1+,S. /@ 4O r-]0123KPWO 56Lw/7/89G@HJ $ !3$ ! K I T I N S T A L . C O M$ !0$ ! Copyright 1995 by8$ ! James Shen All rights Reserved.2$ ! Powertrain Operation, Ford Motor Company./$ ! 1981 Frontwheel Drive, Ohio 45103 $ ! H$ ! This program is free software; you can redistribute it and/or modifyH$ ! it under the terms of the GNU General Public License as published byE$ ! the Free Software Foundation; either version 2 of the License, or'$ ! (at your option) any later version.$ !H$ ! This program is distributed in the hope that it will be useful, but O$ ! WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY M$ ! or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License $ ! for more details. $ !O$ !****************************************************************************$ !$ ! SHS Version 1.1$ ! "$ if vmi$kit_debug then set verify*$ on control_y then vmi$callback CONTROL_Y$ on error then goto ERROR$ !$ say = "write sys$output".$ if p1 .eqs. "VMI$_INSTALL" then goto INSTALL6$ if p1 .eqs. "VMI$_POSTINSTALL" then goto POSTINSTALL$ exit VMI$_UNSUPPORTED$ !$ ! Begin installation...$ ! $INSTALL:$ !$ type sys$input Installing SHS version 1.1 Copyright by: James Shen  Powertrain Operation Ford Motor Company# 1981 Frontwheel Drive, Ohio 45103 All rights reserved. $$ !$ ! Check VMS version$ ! $ shs$alpha=0!$ hw_model = f$getsyi("hw_model")=$ if hw_model .eq. 0 .or. hw_model .ge. 1024 then shs$alpha=1$ if shs$alpha$ then$ shs$os_ver = "6.0"$ else$ shs$os_ver = "5.5"$ endif7$ vmi$callback check_vms_version shs$ver_ok 'shs$os_ver,$ if .not. shs$ver_ok then goto VMS_VER_FAIL$ !$ ! Check for needed disk space$ !6$ vmi$callback check_net_utilization shs$space_ok 1400-$ if .not. shs$space_ok then goto SPACE_INSUF$ !($ ! Are we in a VMScluster environment ?$ !7$ if (f$getsyi("cluster_member", f$getsyi("nodename")))$ then$ type sys$input> You are in a VAX/VMScluster environment. If you want to make> SHS available clusterwide, you only need to install it once ; for each system sharing a common system disk, see the SHS = release notes SHS011.RELEASE_NOTES that have been placed in SYS$HELP. $ eod$ endif$ !$ ! Some tips...$ !$ type sys$input$ deck> SHS is installed to run without privileges by default. Users D need GROUP privilege to access the process(es) not owned by B themselves, and WORLD privilege to access any process(es) > outside their own groups. You may install it as a privileged9 image to lift the above limitation. To install it as a E privileged image, revise you SYSTARTUP.COM to include a line: % @SYS$STARTUP:SHS$STARTUP.COM$ eod$ ! $ vmi$callback ask shs$priv_ok -8"Do you want SHS installed as a privileged image" YES BU$ !*$ ! Check if SHS$STARTUP.COM already exist$ ! O$ vmi$callback find_file shs_old_strtup vmi$root:[sys$startup]shs$startup.com -"" S shs_filefound2$ if shs_filefound .nes. "S" then goto SKIP_RENAME$ type sys$input@ A version of SYS$STARTUP:SHS$STARTUP.COM exists from a previous< install. Since the file may contain customization, you may want to save a copy of it.$ eodD$ vmi$callback ask shs$ren "Rename it to SHS$STARTUP.COM_OLD" YES BU $ if shs$ren $ then -$ vmi$callback find_file shs_saved_strtup -<vmi$root:[sys$startup]shs$startup.com_old "" S shs_filefound>$ if shs_filefound .eqs. "S" then vmi$callback delete_file -)vmi$root:[sys$startup]shs$startup.com_oldD$ vmi$callback rename_file vmi$root:[sys$startup]shs$startup.com -shs$startup.com_old $ endif $ $SKIP_RENAME:$ ! $ ! Purge file ? $ !$ vmi$callback set purge ask$ ! $ ! Do it... $ !$ say "".$ say " No more questions will be asked ..."$ say ""$ if shs$alpha$ then $ say ""7$ say " Linking SHS V1.1 image for OpenVMS Alpha ..."J$ link/notrace/nodebug/nomap/exec=vmi$kwd:shs.exe vmi$kwd:shs.obj_alpha, -C vmi$kwd:shs_find_help.obj_alpha, vmi$kwd:getjpi_basic.obj_alpha, -H vmi$kwd:getjpi_extend.obj_alpha, vmi$kwd:shs_initiate_sort.obj_alpha, -@ vmi$kwd:shs_qsort.obj_alpha, vmi$kwd:shsdef.obj_alpha, -E vmi$kwd:init_cli.obj_alpha, vmi$kwd:shs_cli.obj_alpha, sys$input/optidentification="V1.1-000"$ else $ say ""5$ say " Linking SHS V1.1 image for OpenVMS VAX ..."D$ link/notrace/nodebug/nom ap/exec=vmi$kwd:shs.exe vmi$kwd:shs.obj, -7 vmi$kwd:shs_find_help.obj, vmi$kwd:getjpi_basic.obj, -< vmi$kwd:getjpi_extend.obj, vmi$kwd:shs_initiate_sort.obj, -J vmi$kwd:shs_qsort.obj, vmi$kwd:shsdef.obj, vmi$kwd:init_cli.obj, -# vmi$kwd:shs_cli.obj, sys$input/optidentification="V1.1-000"$ endif$ !%$ ! Move files to proper locations...$ ! @$ vmi$callback provide_image shs_image shs.exe vmi$root:[sysexe]*$ vmi$callback provide_dcl_command shs.cld'$ vmi$callback provide_dcl_help shs.hlpO$ vmi$callback provide_file shs_strtup shs$startup.com vmi$root:[sys$startup] k$ !>$ if shs$priv_ok then vmi$callback set startup shs$startup.com$ !$ exit vmi$_success$ !$ ! Post-install work...$ ! $POSTINSTALL:$ !$ type sys$input , No postinstall task necessary to perform... $ exit vmi$_success$ !$VMS_VER_FAIL:"$ vmi$callback message e version -D"This kit is for a VAX VMS 5.5 /Alpha OpenVMS 6.0 or high system" $ exit vmi$_failure$ ! $SPACE_INSUF ;E$SHS011.AS] [SHEN.SHS011.KIT]KITINSTAL.COM;1O >: :"$ vmi$callback message e version -3"Insufficient disk space for this kit installation"$ exit vmi$_failure"*[SHEN.SHS011.KIT]SHS$STARTUP.COM;1+,./@ 4Mt-]0123KPWO560M{7j/89G@HJ$!2$! SHS$STARTUP.COM - SHS V1.1 startup procedure$! James Shen $!$!$ INSTALL :== $INSTALL/COMMAND$ CMD := CREATEI$ IF F$FILE_ATTRIBUTES ("SYS$SYSTEM:SHS.EXE","KNOWN") THEN CMD := REPLACE$!-$! To install SHS image with WORLD privilege $! <$ INSTALL 'CMD' /OPEN/HEADER/PRIV=(WORLD) SYS$SYSTEM:SHS.EXE$!K$! To install SHS image with GROUP privilege, remove the comment charactersM$! in the following command line, and insert a comment delimiter ($!) before -$! the dollar sign in the command line above.$!<$!INSTALL 'CMD' /OPEN/HEADER/PRIV=(GROUP) SYS$SYSTEM:SHS.EXE$ EXIT*[SHEN.SHS011.KIT]SHS.CLD;1+,{./@ 4L@-]0123KPWO56+7/89G@HJ!++!#! SHS.CLD - SHS Command Definition! James Shen !!! X-002: James Shen 11-OCT-1995<! Add /OUTPUT default to SYS$OUTPUT, /UIC, /NETWORK, /BATCH! and /INTERACTIVE! "! X-001: James Shen 09-SEP-1995! Initial version!!!--DEFINE VERB SHS IMAGE SHS.EXE# PARAMETER P1, LABEL=INPUT_PRC_NAME4 QUALIFIER ASCENDING, PLACEMENT=GLOBAL, NONNEGATABLE" QUALIFIER BATCH, PLACEMENT=GLOBAL0 QUALIFIER BRIEF, PLACEMENT=GLOBAL, NONNEGATABLE$ QUALIFIER CLUSTER, PLACEMENT=GLOBAL5 QUALIFIER DESCENDING, PLACEMENT=GLOBAL, NONNEGATABLE# QUALIFIER EXTEND, PLACEMENT=GLOBAL( QUALIFIER INTERACTIVE, PLACEMENT=GLOBAL/ QUALIFIER HELP, PLACEMENT=GLOBAL, NONNEGATABLE$ QUALIFIER NETWORK, PLACEMENT=GLOBAL< QUALIFIER NODE, VALUE(LIST), PLACEMENT=GLOBAL, NONNEGATABLEL QUALIFIER OUTPUT, VALUE(TYPE=$FILE, DEFAULT="SYS$OUTPUT"), PLACEMENT=GLOBAL! QUALIFIER PAGE, PLACEMENT=GLOBALH QUALIFIER SORT_BY, VALUE(REQUIRED, TYPE=SORT_KEYWORD), PLACEMENT=GLOBAL@ QUALIFIER UIC, VALUE(TYPE=$UIC), PLACEMENT=GLOBAL, NONNEGATABLE6 QUALIFIER USER, VALUE, PLACEMENT=GLOBAL, NONNEGATABLE% DISALLOW ANY2(NODE, CLUSTER , HELP); DISALLOW HELP AND (USER OR NEG CLUSTER OR OUTPUT OR PAGE)3 DISALLOW HELP AND (BRIEF OR EXTEND OR NEG EXTEND), DISALLOW HELP AND (SORT_BY OR NEG SORT_BY)I DISALLOW HELP AND (NETWORK OR NEG NETWORK OR BATCH OR NEG BATCH OR UIC)4 DISALLOW HELP AND (INTERACTIVE OR NEG INTERACTIVE). DISALLOW ANY2 ( HELP, DESCENDING, ASCENDING)% DISALLOW CLUSTER AND (NEG CLUSTER)  DISALLOW BRIEF AND EXTEND8 DISALLOW (DESCENDING OR ASCENDING) AND (NOT SORT_BY)  DISALLOW PAGE AND OUTPUT DISALLOW USER AND UICDEFINE TYPE SORT_KEYWORD KEYWORD CPU KEYWORD CURPRIO KEYWORD IO KEYWORD PAGEFAULT KEYWORD PHYSICAL_PAGE KEYWORD PROCESS_NAME*[SHEN.SHS011.KIT]SHS.HLP;1+,.*/@ 4*)-]0123KPWO+567Q/89G@HJ 1 SHSH Provides information about a process or list of processes which match! the process search criteria.  Format SHS [process-search-spec]  NOTE D On VAX systems, process's physical pages in working set, working E set size, working set quota, and working set extent are displayed in pages.F On Alpha systems, process's physical pages in working set, working E set size, working set quota, and working set extent are displayed  in pagelets. 2 DISTRIBUTION_and_COPYRIGHT  Copyright 1995 James Shen > This program is free software; permission is granted to any ? individual or institution to use, copy, or redistribute this ? software as long as it is not sold for profit, provided this  copyright notice is retained.&2 DISCLAIMER @ This program is provided "AS IS" and without any expressed or C implied warranties whatsoever. No warranties as to performance, ? merchantability, or fitness for a particular purpose exist. A In no event shall any person or organization of people be held 9 responsible for any direct, indirect, consequential or * inconsequential damages or lost profits. 2 Parameterprocess-search-spec F Specifies search string to obtain information about the processes. F Any process names which contain the search string may be displayed. E You may optionally put double quotes around the search string. If A no search string has been provided, then all processes will be F displayed matching other command qualifiers. Default search string  is provided as a wildcard.A2 Qualifiers  /BATCH /BATCH  /NOBATCH  B Displays all the batch process(es) information on the system.A The /BATCH qualifier is the default when the /NOINTERACTIVE 2 and/or the /NONETWORK qualifiers are present. C The /NOBATCH qualifier excludes all the batch process(es) fromG being displayed. This is the default when the /INTERACTIVE and/or ) the /NETWORK qualifiers are present.  /BRIEF /BRIEF (default) A Synonym of /NOEXTEND. /CLUSTER /CLUSTER /NOCLUSTER (default) D Displays all the process(es) information on all the nodes in a B VMScluster. The /CLUSTER qualifier is incompatable with the  /NODE qualifier. /EXTEND /EXTEND /NOEXTEND (default)C Displays all the process's extended information with matching B criteria. Extended information including additonal terminal B name associated with the process if any, process working set B extent, process working set quota, process working set size, < image name which process is running, and process mode. E The /EXTEND qualifier is incompatable with the /BRIEF qualifier. /HELPE Invokes this help facility for to display information about the A SHS command, including legal distribution, copyrights, and A author's disclaimer, and command usage. In response to the C "Topic?", type the name of the command or topic for which you  need help.E This qualifier is mutually exclusive with any other qualifiers, C and when used with parameter, the specified parameter will be / ignored and help facility will be invoked.  /INTERACTIVE /INTERACTIVE /NOINTERACTIVEH Displays all the interactive process(es) information on the system.H The /INTERACTIVE qualifier is the default when the /NOBATCH and/or , the /NONETWORK qualifiers are present.  K The /NOINTERACTIVE qualifier excludes all the interactive process(es) F from being displayed. This is the default when the /BATCH and/or ) the /NETWORK qualifiers are present. /NETWORK /NETWORK /NONETWORKD Displays all the network process(es) information on the system.D The /NETWORK qualifier is the default when the /NOBATCH a m,$SHS011.A][SHEN.SHS011.KIT]SHS.HLP;1*" nd/or / the /NOINTERACTIVE qualifiers are present. G The /NONETWORK qualifier excludes all the network process(es) fromD being displayed. This is the default when the /BATCH and/or the) /INTERACTIVE qualifiers are present. /NODE /NODE=(node1,node2,...)C Display all the processes on the specified node or nodes. If ? you enter the search process specification, the qualifier E displays all the processes which meet the selection criteria on F the specified node or nodes. A node name can be a system name. G However the node name you specified must be a member of the local G cluster. If you only enter one node, then the parenthesis may be F omitted. If no node is provided, in that case the local node is  used by default. /OUTPUT /OUTPUT[=filespec] /NOOUTPUTB Controls where the output of the command is sent. By default,E the output of the SHS command is sent to the current SYS$OUTPUT D device (usually your terminal). To send the output to a file, @ use the /OUTPUT qualifier followed by a file specification. D The file specification may not include the asterisk (*) and theD percent sign (%) wildcard characters, however, Logical name mayA allowed as file specification. If you enter a partial file > specification (for example, specifying only a directory),D SHS is the default file name and .LIS is the default file type,0 and applied towards the logical name also. @ If you enter the /NOOUTPUT qualifier, output is suppressed. /PAGE /PAGE /NOPAGE (default)A Controls the display of process's information on the screen.C You can use the RETURN key to continue to another page if any,@ and Ctrl/Z key to exit. Any other keystrokes followed by a< RETURN key will also force the program to exit quietly.F The /PAGE qualifier is not compatible with the /OUTPUT qualifier. /SORT_BY /SORT_BY=keywordD Sort the processes by the specified keyword in ascending order.D Keyword is required. You can specify one of the following sort keywords:B PROCESS_NAME Request to sort the processes by process name.F CURPRIO Request to sort the processes by process's current priority.C IO Request to sort the processes by the I/O count,F including direct I/O count and buffered I/O count.E CPU Request to sort the processes by the charged CPU A time that the process has consumed thus far. B PAGEFAULT Request to sort the processes by the process's page faults.B PHYSICAL_PAGE Request to sort the processes by the process'sB physical pages (on VAX) or pagelets (on Alpha)2 in the process's working set.  /UIC /UIC[=uic]F Displays all processes on the system that have the specified userG identification code (UIC) number. The default UIC is that of the H current process. The /UIC qualifier is incompatable with the /USER  qualifier. E Specify the UIC by using standard UIC format as described in the OpenVMS User's Manual.G For further information, see the OpenVMS Guide to System Security. /USER /USER[=username]F Displays all processes on the system that have the specified userF name. The default USER is that of the current process. The /USER 7 qualifier is incompatable with the /UIC qualifier. 2 /BATCH /BATCH  /NOBATCH @ Displays all the batch process(es) information on the system.F The /BATCH qualifier is the default when the /NOINTERACTIVE and/or ) the /NONETWORK qualifiers are present. A The /NOBATCH qualifier excludes all the batch process(es) fromE being displayed. This is the default when the /INTERACTIVE and/or ' the /NETWORK qualifiers are present.2 /BRIEF /BRIEF (default) A Synonym of /NOEXTEND. 2 /CLUSTER /CLUSTER /NOCLUSTER (default) B Displays all the process(es) information on all the nodes in a @ VMScluster. The /CLUSTER qualifier is incompatable with the  /NODE qualifier. 2 /EXTEND /EXTEND /NOEXTEND (default)A Displays all the process's extended information with matching @ criteria. Extended information including additonal terminal @ name associated with the process if any, process working set @ extent, process working set quota, process working set size, : image name which process is running, and process mode. C The /EXTEND qualifier is incompatable with the /BRIEF qualifier.2 /HELPC Invokes this help facility for to display information about the ? SHS command, including legal distribution, copyrights, and ? author's disclaimer, and command usage. In response to the A "Topic?", type the name of the command or topic for which you need help.C This qualifier is mutually exclusive with any other qualifiers, A and when used with parameter, the specified parameter will be - ignored and help facility will be invoked.2 /INTERACTIVE /INTERACTIVE /NOINTERACTIVEF Displays all the interactive process(es) information on the system.F The /INTERACTIVE qualifier is the default when the /NOBATCH and/or * the /NONETWORK qualifiers are present.  I The /NOINTERACTIVE qualifier excludes all the interactive process(es) D from being displayed. This is the default when the /BATCH and/or ' the /NETWORK qualifiers are present. 2 /NETWORK /NETWORK /NONETWORKB Displays all the network process(es) information on the system.B The /NETWORK qualifier is the default when the /NOBATCH and/or - the /NOINTERACTIVE qualifiers are present. E The /NONETWORK qualifier excludes all the network process(es) fromB being displayed. This is the default when the /BATCH and/or the' /INTERACTIVE qualifiers are present.2 /NODE /NODE=(node1,node2,...)A Display all the processes on the specified node or nodes. If = you enter the search process specification, the qualifier C displays all the processes which meet the selection criteria on D the specified node or nodes. A node name can be a system name. E However the node name you specified must be a member of the local E cluster. If you only enter one node, then the parenthesis may be D omitted. If no node is provided, in that case the local node is  used by default. 2 /OUTPUT /OUTPUT[=filespec] /NOOUTPUT@ Controls where the output of the command is sent. By default,C the output of the SHS command is sent to the current SYS$OUTPUT B device (usually your terminal). To send the output to a file, > use the /OUTPUT qualifier followed by a file specification. B The file specification may not include the asterisk (*) and theB percent sign (%) wildcard characters, however, Logical name may? allowed as file specification. If you enter a partial file < specification (for example, specifying only a directory),B SHS is the default file name and .LIS is the default file type,. and applied towards the logical name also. > If you enter the /NOOUTPUT qualifier, output is suppressed.2 /PAGE /PAGE /NOPAGE (default)? Controls the display of process's information on the screen.A You can use the RETURN key to continue to another page if any,> and Ctrl/Z key to exit. Any other keystrokes followed by a: RETURN key will also force the program to exit quietly.D The /PAGE qualifier is not compatible with the /OUTPUT qualifier. 2 /SORT_BY /SORT_BY=keywordB Sort the processes by the specified keyword in ascending order.B Keyword is required. You can specify one of the following sort keywords:@ PROCESS_NAME Request to sort the processes by process name.D CURPRIO Request to sort the processes by process's current priority.A IO Request to sort the processes by the I/O count,D including direct I/O count and buffered I/O count.C CPU Request to sort the processes by the charged CPU ? time that the process has consumed thus far. @ PAGEFAULT Request to sort the processes by the process's page faults.@ PHYSI ,$SHS011.A][SHEN.SHS011.KIT]SHS.HLP;1*5 CAL_PAGE Request to sort the processes by the process's@ physical pages (on VAX) or pagelets (on Alpha)0 in the process's working set. 3 Qualifiers/ASCENDING E Sorts the field specified by the sort keyword in ascending order. 0 The default sort order is in ascending order.G The /ASCENDING qualifier and the /DESCENDING qualifier are mutually exclusive. /DESCENDINGF Sorts the field specified by the sort keyword in descending order. D The default sort order is in ascending order, so the /DESCENDING E qualifier needs to be explicitly specified if descending order is desired. G The /DESCENDING qualifier and the /ASCENDING qualifier are mutually exclusive.2 /UIC /UIC[=uic]D Displays all processes on the system that have the specified userE identification code (UIC) number. The default UIC is that of the F current process. The /UIC qualifier is incompatable with the /USER qualifier.C Specify the UIC by using standard UIC format as described in the OpenVMS User's Manual.E For further information, see the OpenVMS Guide to System Security.D2 /USER  /USER[=username]D Displays all processes on the system that have the specified userD name. The default USER is that of the current process. The /USER 5 qualifier is incompatable with the /UIC qualifier. 2 Examples 1.$ SHS FCISN VAX/VMS V5.5 on node BTVV02 20-SEP-1995 13:31:14.37 Uptime 72 14:16:21P Pid Process Name State Pri I/O CPU Page flts Ph.MemR 21616604 FCIS_MASTER HIB 2 1926 0 00:00:08.34 4847 1601 BR 21613905 FCIS_FLS_SERVER HIB 6 34928 0 00:00:16.91 1796 1844 BR 2161641E FCIS_SPC_HREC LEF 1 443358 0 00:03:55.67 988 1259 BR 21618721 FCIS_BARTT_HREC LEF 1 1018793 0 00:08:18.47 1409 1711 BR 21617822 FCIS_BHT_HREC LEF 2 1198240 0 00:09:28.01 1457 1759 BW 21618428 FCIS_HEALTH_MON LEF 0 7165 0 00:00:59.53 47687 379 B B This example displays all the processes in the local node with * process's names having the string FCIS.+ 2.$ SHS FCIS /CLUSTER /EXTEND /USER=FCISi VAX/VMS V5.5 on node BTVC05 - VAX 4000-105A 20-SEP-1995 13:38:44.29 Uptime 72 14:38:36 Pid Process Name State Pri Terminal I/O CPU WSext WSquo WSsize Page flts Ph.Mem Image Name Mode 212028CF FCIS_MASTER HIB 10 870 0 00:00:02.81 8192 8192 4096 1590 794 STF_SRV B 212028D0 FCIS_FLS_SERVER HIB 14 16139 0 00:00:21.93 8192 8192 4096 1734 1624 FLS_SRV B 212028D3 FCIS_SSP_SERVER HIB 9 329903 0 00:05:08.58 8192 8192 4096 1886 1863 SSP_SRV B 212028D4 FCIS_SSP_TIMER LEF 10 4302 0 00:00:00.59 8192 8192 4096 609 530 SSP_TIMEOUT_TIMER B 212028D5 FCIS_RUP_SERVER HIB 9 3579565 0 01:10:34.21 8192 8192 8192 24425 6882 RUP_SRV B 212028D6 FCIS_RUP_TIMER LEF 10 10370 0 00:00:03.20 8192 8192 4096 696 622 RUP_UPDATE_TIMER B 212028D7 FCIS_BDH_SERVER HIB 8 3821332 0 03:15:39.83 8192 8192 6796 10026 5340 BDH_SRV B 212028D8 FCIS_BPP_SERVER HIB 9 1057740 0 01:58:54.43 8192 8192 5746 5321 4451 BPP_SRV B 212028DA FCIS_BDCEMS0001 LEF 11 88 0 00:00:00.67 8192 8192 4096 742 567 BDC_EMS Bi 212028DB FCIS_BDCEMS0247 HIB 11 23571 0 00:00:42.85 8192 8192 4096 771 592 BDC_EMS Bs 212028DC FCIS_BDCEMS0248 HIB 11 25062 0 00:00:32.79 8192 8192 4096 768 589 BDC_EMS Bh VAX/VMS V5.5 on node BTVV02 - VAX 7000-630 20-SEP-1995 13:38:44.44 Uptime 72 14:23:51 Pid Process Name State Pri Terminal I/O CPU WSext WSquo WSsize Page flts Ph.Mem Image Name Mode 21616604 FCIS_MASTER HIB 2 1926 0 00:00:08.34 36000 32000 8192 4847 1601 STF_SRV Ba 21613905 FCIS_FLS_SERVER HIB 5 34938 0 00:00:16.91 36000 32000 8192 1796 1844 FLS_SRV B 2161641E FCIS_SPC_HREC LEF 1 443385 0 00:03:55.73 36000 32000 8192 988 1259 FCIS_HOST_RECEIVER Be 21614C1F BART_SERVER HIB 2 3498415 0 14:17:51.16 36000 32000 17408 22394635 2071 BRT_SRV Bs 21618721 FCIS_BARTT_HREC LEF 2 1019039 0 00:08:18.62 36000 32000 8192 1409 1711 FCIS_HOST_RECEIVER Bp 21617822 FCIS_BHT_HREC LEF 1 1199136 0 00:09:28.32 36000 32000 8192 1458 1760 FCIS_HOST_RECEIVER Ba 21618428 FCIS_HEALTH_MON LEF 0 7165 0 00:00:59.53 36000 32000 8192 47687 379 B 21613497 MMS_BDS HIB 8 543925 0 01:00:38.73 8000 6000 4000 970 1573 TUR$ On? This example displays all processes in the local VMScluster IF environment, with process's names having FCIS string, and processesC username is FCIS. Extended information is also being displayed.B Extended information is addtional information besides the basic7 or brief information returned by default, including: ; o Terminal name associated with the process if any.NH o Process current working set extent, in pages (on VAX systems) ( or pagelets (on Alpha systems) tA o Process working set quota, in pages (on VAX systems) ort% pagelets (on Alpha systems)@ o Process working set size, in pages (on VAX systems) or% pagelets (on Alpha systems)rB o Image name which the process is running when SHS commandD is issued. Image name with device, directory, and version number stripped off.I o Process mode, such as NETWORK (N), BATCH (B), INTERACTIVE (I),  or OTHERS (O)r s4 3.$ SHS /USER=SHEN/NODE=(BT0006, BTVC08, BTVV02) P Alpha/VMS V6.1 on node BT0006 20-SEP-1995 13:58:19.88 Uptime 71 04:57:46P Pid Process Name State Pri I/O CPU Page flts Ph.MemR 21C08B24 DECW$TE_8B24 LEF 6 279105 0 00:02:20.31 1012 4224 OR 21C08E25 SHEN_2 HIB 8 109334 0 00:00:27.33 6429 720 IR 21C07151 DECW$FD LEF 6 7443 0 00:00:28.33 205 3552 OR 21C07052 DECW$SERVER_0 HIB 8 359 0 00:00:02.11 3613 624 OP Alpha/VMS V6.2 on node BTVC08 20-SEP-1995 13:58:19.90 Uptime 19 01:34:51P Pid Process Name State Pri I/O CPU Page flts Ph.MemR 244000BE DECW$TE_00BE LEF 6 45853 0 00:00:11.61 520 5648 OW 244000BF SHEN HIB 9 10349 0 00:00:03.29 2322 832 I sN VAX/VMS V5.5 on node BTVV02 20-SEP-1995 13:58:19.91 Uptime 72 14:43:26P Pid Process Name State Pri I/O CPU Page flts Ph.MemR 2161DC13 SYSWATCH LEF 3 518 0 00:00:11.77 601 367 BR 21621F24 SYSWATCH_2 LEF 3 516 0 00:00:58.48 600 367 BR 21619043 _RTA2: LEF 8 82513 0 00:02:26.28 282941 2020 IR 21612CAF SHEN CUR 5 6483 0 00:00:13.30 25190 512 IR 21611BBA MHPB_PILOT HIB 2 165296 0 00:01:08.72 912 575 BD This examples displays all processes on node BT0006, BTVC08, and E BTVV02 in the local VMScluster environment, where the username is s SHEN.s specification, the qualifier E displays all the processes which meet the selection criteria on F *[SHEN.SHS011.KIT]SHS.OBJ;1+,k.0/@ 400-]0123KPWO156Qcb7 l/89G@HJ  j$SHS011.Ak][SHEN.SHS011.KIT]SHS.OBJ;10".SHS0116-Oct-1995 15:13DEC Fortran V6.3-141P#%SYSTEM-F-NOSUCHNODE, remote node /) / is unknownQLNM$PROCESS_TABLESHSINTERACTIVENETWORKBATCHUIC[,%SYSTEM-F-IVIDENT, invalid identifier formatOUTPUTSYS$OUTPUTNL:SYS$INPUTSYS$LOGIN:SHS.LISPAGEHELPSYS$LOGIN:SHS.HLBINPUT_PRC_NAMESORT_BYPROCESS_NAMEIOCPUPAGEFAULTCURPRIODESCENDINGEXTENDCLUSTERUSERNODEPA( 7RSHS_VERBR INIT_CLI@ VV CLI$PRESENT@bb CLI$PRESENT@jj CLI$PRESENT@p,p CLI$PRESENT@p<p CLI$GET_VALUE@DT\txvv,x$"v(<!vdl$"v,x$"vp CLI$PRESENT@ CLI$GET_VALUE@F@ @ SYS$CRELNM@ SYS$CRELNM@<@ @ SYS$CRELNM@ SYS$CRELNM@<@ @ SYS$CRELNM@ SYS$CRELNM@<  8 FOR$OPEN@@ FOR$OPEN@ PTX CLI$PRESENT@ CLI$PRESENT@RR SHS_FIND_HELP@ SHS_FIND_HELP@ CLI$GET_VALUE@J CLI$PRESENT@  CLI$GET_VALUE@H  @H\dx ' // CLI$PRESENT@:: CLI$PRESENT@AA CLI$PRESENT@IDI CLI$PRESENT@ITI CLI$GET_VALUE@LNN CLI$PRESENT@NN CLI$GET_VALUE@\PP\PP`PQ POP[8^ЫDVЫ@WЫh˴ˬ OTS$CVT_TO_LPRR~ FOR$WRITE_SL FOR$IO_T_DS FOR$IO_ENDRLIB$STOP˺ScSS?SYS$EXIT LIB$INDEXPPˉ˸Ue SYS$ASCTOIDPPLIB$STOP˸YiYY SYS$EXITZˈ$ LIB$INDEXPPXXRBˈ*Hˈ]0SYS$EXITVTTU2UYXYXZJˈ_Jˈ$JˈAJˈZTXT1U2UYY8ˈ<H LIB$INDEXXPXXT@ˈX˰R>bd\ OTS$CVT_TO_LPSS~ FOR$WRITE_SLp FOR$IO_T_DS FOR$IO_ENDS|xLIB$STOP˰TdTTˀSYS$EXIT˺W˲UgeWVː LIB$INDEXڣY2YXPXX˜@ˈˠ˰Rbˬˤ SYS$ASCTOIDPP˸˴LIB$STOP˺S˲Tcd˰Ue˼ SYS$IDTOASCPPLIB$STOPW1ѭ̭HYiJXh˰ZLRjbPScTTdH SYS$GETJPIWPUUULIB$STOPˀWgWWU LIB$STOPWЭLIB$STOPѭԭЭLIB$STOP( CLI$PRESENTPYY1Y8 CLI$GET_VALUEPP2X-X ZjTdUeP`QalX SYS$CRELNMPPtpLIB$STOP CLI$_NEGATEDRYRScZjTdUeXh˜ˈ SYS$CRELNMPPˤˠLIB$STOP˸ SYS$CRELNMPPLIB$STOP LIB$GET_LUNPPLIB$STOPFOR$OPENk0 FOR$ERRSNSЫLЫPHLIB$STOP\ CLI$PRESENTPP CLI$_NEGATEDYPYPhdLIB$STOPt CLI$PRESENTPˌ SHS_FIND_HELP˘SYS$EXIT˨ CLI$GET_VALUEPXX,S X*~2XX^(XnXZZX*~XY,Yn PQ^X˼˸LIB$STOP CLI$PRESENTPZZ CLI$_NEGATEDYZY1Z1 CLI$GET_VALUEPPLIB$STOP12RR LIB$INDEXP1R LIB$INDEXPR048 LIB$INDEXPRLPT LIB$INDEXPRhlp LIB$INDEXPZˀ|LIB$STOPˌ CLI$PRESENTPPP˘˔LIB$STOPˤ CLI$PRESENTP CLI$_NEGATEDSPSԭPP˰ˬLIB$STOP˼ CLI$PRESENTP CLI$_NEGATEDTPTԫ1P1`UebXhdYihRblZj`x SYS$GETSYIWPSSSLIB$STOPxTdTTSLIB$STOPԫ CLI$PRESENTPUU1\  CLI$GET_VALUEPXX1XHY iJRbLZjPT>dTScH,ˀ0 SYS$GETJPIWPYYY@<LIB$STOPˀRbRRYHDLIB$STOPXPLLIB$STOPUUXTLIB$STOPd CLI$PRESENTPZZԭ1Z1Z CLI$_COMMATZT1t CLI$GET_VALUEPZZԭ1 CLI$_COMMASZSZ1`RbbYidXhhUelTd2QQ˄ˈ`˜xˠˌ SYS$GETSYIWPSSS FOR$WRITE_SF2RRˬ˰ˬ FOR$IO_T_DS FOR$IO_ENDS˸˴LIB$STOP1xYiYYxX2h˼LIB$STOP1UeT dRbS<cY2YXXPQPaUeTdR<b111Sc Y i XhP`QaU eTdRb Sc"Y i$Xh(P`\,Qa.Ue0Td4R<b8ScV,Yi.Xh˺P`P0Q2Pa4U<e8TdW,Rb.Sc˰Y0Xih4P<`8Qa,Ue111Td R b ScXЁhYiP `QaUe\ Td"Rb$Sc(X<h,YiV P`"Qa˺UeU$T2Ud(R<b˂,ScW Xh"Yi˰P$Q`a(T<d,Ue Rb111Sc X h YiP`QaT dUeRb\ Sc"Xh$Yi(P<`,QaV Td"Ue˺RbR$S2Rc(X<h,YiW P`"Qa˰T$Ude(R<b,Sc Xh111Yi P ` QaTdUeR bScXh\ Yi"P`$Qa(T<d,UeV Rb"Sc˺XhX$Y2Xi(P<`,QaW Tdˀ"Ue˰R$Sbc(X<h,Yi P`11Qa T d UeRb\ScXhYiP ` $SHS011.Ak][SHEN.SHS011.KIT]SHS.OBJ;10:#"<` QaVTdUe˺RbRS2RcX<h YiWP`Qa˰TUdeR<b ScXh11Yi P ` QaTd\UeRbScX<h YiVP`Qa˺TdTU2TeˀR<b ScWXhYi˰PQ`aT<d UeRb11Sc X h YiP`\QaTdUeR<b ScVXhYi˺P`PQ2PaT<d UeWRbSc˰XYhiP<` QaTd1111Ue R b ScXh\YiP`QaT<d UeVRbSc˺XhXY2XiP<` QaWTdUe˰RSbcX<h YiP`111Qa T d UeRbScX hYiP`\ Qa"Td$Ue(R<bˀ,ScV Xh"Yi˺P`P$Q2Pa(T<d,UeW Rb"Sc˰X$Yhi(P<`,Qa Td111Ue R b ScXhYiP `QaTd\ Ue"Rb$Sc(X<h,YiV P`"Qa˺TdT$U2Te(R<b,ScW Xh"Yi˰P$Q`a(T<d,Ue Rb111Sc X h YiP`QaT dUeRb\ Sc"Xh$Yi(P<`,QaV Td"Ue˺RbR$S2Rc(X<h,YiW P`"Qa˰T$Ude(R<b,Sc Xh11Yi P ` QaTdUeR bScXh Yi"P `$Qa(Td\,Ue.Rb0Sc4X<hˀ8YiV,P`.Qa˺TdT0U2Te4R<b8ScW,Xh.Yi˰P0Q`a4T<d8Ue,Rb11Sc X h YiP`QaT dUeRb Sc"X h$Yi(P`\,Qa.Td0Ue4R<b8ScV,Xh.Yi˺P`P0Q2Pa4T<d8UeW,Rb.Sc˰X0Yhi4P<`8Qa,Td11Ue R b ScXhYiP `QaTd Ue"R b$Sc(Xh\,Yi.P`0Qa4T<d8UeV,Rb.Sc˺XhX0Y2Xi4P<`8QaW,Td.Ue˰R0Sbc4X<h8Yi,P`1\Qa Td UeR<bScVXh Yi˺P`P Q2PaT<dUeWRb Sc˰X YhiP<`QaTdSYS$PROCESS_SCANPPLIB$STOP GETJPI_BASIC GETJPI_EXTENDZLIB$STOP1SZLIB$STOP1`UebRbdSchX>hlYiTT1`x SYS$GETSYIWPP P LIB$STOPT1xZjZZxU2eLIB$STOP1RbS cXhY<iZ2ZUUPQPaRbScX<h111Yi Z j UeP`QaR bScXh Yi"Z j$Ue(P`\,Qa.Rb0Sc4X<h8YiV,Zj.Ue˺P`P0Q2Pa4R<b8ScW,Xh.Yi˰Z0Uje4P<`8Qa,Rb111Sc X h YiUЁeZjP `QaRb\ Sc"Xh$Yi(U<e,ZjV P`"Qa˺RbR$S2Rc(X<hˀ,YiW Ue"Zj˰P$Q`a(R<b,Sc Xh111Yi U e ZjP`QaR bScXh\ Yi"Ue$Zj(P<`,QaV Rb"Sc˺XhX$Y2Xi(U<e,ZjW P`"Qa˰R$Sbc(X<h,Yi Ue111Zj P ` QaRbScX hYiUe\ Zj"P`$Qa(R<b,ScV Xh"Yi˺UeU$Z2Uj(P<`,QaW Rb"Sc˰X$Yhi(U<e,Zj P`11Qa R b ScXh\YiUeZjP<` QaVRbSc˺XhXˀY2XiU<e ZjWP`Qa˰RSbcX<h YiUe11Zj P ` QaRԀb\ScXhYiU<e ZjVP`Qa˺RbRS2RcX<h YiWUeZjˀPQ`aR<b ScXh11Yi U e ZjP`\QaRbScX<h YiVUeZj˺P`PQ2PaR<b ScWXhYi˰UZejP<` QaRb1111Sc X h YiUe\ZjP`QaR<b ScVXhYiˀUeUZ2UjP<` QaWRbSc˰XYhiU<e ZjP`111Qa R b ScXhYiU eZjP`\ Qa"Rb$Sc(X<h,YiV Ue"Zj˺P`P$Q2Pa(R<b,ScW Xh"Yi˰U$Zej(P<`,Qa Rb111Sc X h YiUeZjP `QaRb\ Sc"Xh$Yi(U<e,ZjV P`"Qa˺RbR$S2Rc(X<h,YiW Ue"Zj˰P$Q`a(R<b,Sc Xh111Yi U e ZjP`QaR bScXh\ Yi"Ue$Zj(P<`,QaV Rb"Sc˺XhX$Y2Xi(U<e,ZjW P`"Qa˰R$Sbc(X<h,Yi Ue11Zj P ` QaRbScX hYiUe Zj"P `$Qa(Rb\,Sc.Xh0Yi4U<e8ZjV,P`.Qa˺RbR0S2Rc4X<h8YiW,Ue.Zj˰P0Q`a4R<b8Sc,Xh11Yi U e ZjP`ˀQaR bScXh Yi"U e$Zj(P`\,Qa.Rb0Sc4X<h8YiV,Ue.Zj˺P`P0Q2Pa4R<b8ScW,Xh.Yi˰U0Zej4P<`8Qa,Rb11Sc X h YiUeZjP `QaRb Sc"X h$Yi(Ue\,Zj.P`0Qa4R<b8ScV,Xh.Yi˺UeU0Z2Uj4P<`8QaW,Rb.Sc˰X0Yhi4U<e8Zj,P`1\Qaˀ Rb ScX<hYiVUe Zj˺P`P Q2PaR<bScWXh Yi˰U ZejP<`QaRb SYS$PROCESS_SCANPP($LIB$STOP GETJPI_BASIC GETJPI_EXTEND111`ScbXhdYihU>elZj`<x@, SYS$GETSYIWPPPLLIB$STOPxRbRRxT2dXTLIB$STOPS2SXXYUYeZjRbT<d111P`Q aScXhUe Y i ZjRbTdP `QaSc\ Xh"Ue$Yi(Z<j,RbV Td"P`˺QaQ$S2Qc(\<lˀ,XhW Ue"Yi˰Z$Rjb(V<f,Td P`111QaS cXhUeYiˀ R b ZjTd\P`QaScX<h UeVYiRb˺ZjZT2Zd\<l P`WQaSc˰XUheV<f YiRb111TdZ jP`QaSc U e XЀhYi\RbTdZjP<` QaVScUe˺XhXY2Xi\<l RbWTdZj˰PQ`aV<f ScUe111XhY iRbTdZj P ` QaSc\UeXhYiR<b TdVZjP`˺QaQS2Qc\<l UeWXhYi˰RTbdV<f ZjP`11QaS cUeXh\Yi Rb TdZ<jP`VQa Sc˺UeU X2Uh\<lYiWRb Td˰Z Pj`V<fQaSc11UeX hYiRb\Td P` ZjQ<aScVUe Xh˺YiY R2Yb\<lTdWP` Zj˰Q SacV<fUeXh11RbY iTdP`\Zj Qa ScU<eXhVRb Yi˺TdT P2T`\<lZjWQa Sc˰U XehV<fRbYi1111P`T dZjQa\Sc Ue XhR<bYiVP` Td˺ZjZ Q2Za\<lScWUe Xh˰R Ybi)\$SHS011.Ak][SHEN.SHS011.KIT]SHS.OBJ;10#V<fP`Td111QaZ jScUeXh R b YЁiP`\TdQaZjS<c UeVXhRb˺YiYP2Y`\<l TdWQaˀZj˰SUceV<f XhRb111P`Y iTdQaZj S c UeXh\RbP`YiT<d QaVZjSc˺UeUX2Uh\<l RbWP`Yi˰TQdaV<f ZjSc111UeX hRbP`Yi Q a TdZj\ScˀUeXhR<b P`VYiQa˺TdTZ2Tj\<l ScWUeXh˰RPb`V<f YiQa11TdZ jScUeXh P ` RbYiQaT dZjSc\ Ue"Xh$P`(R<b,YiV Qa"Td˺ZjZ$S2Zc(\<l,UeW Xhh"P`˰R$Ybi(V<f,Qa Td11ScZ jUeXhP` R b YiQaTdS cZjUe\ Xh"P`$Rb(Y<i,QaV Td"Sc˺ZjZ$U2Ze(\<l,XhW P`"Rb˰Y$Qia(V<f,Td Sc11UeZ jXhP`Rb Q a YiTdScU eZjXh\ P`"Rb$Qa(Y<i,TdV Sc"Ue˺ZjZ$X2Zh(\<l,P`W Rb"Qa˰Y$Tid(V<f,Sc Ue1\XhZjP`R<bQaVTdYi˺ScSU2Se\<lXhWZjP`˰RQbaV<fTdYid\SYS$PROCESS_SCANPPlhLIB$STOP GETJPI_BASIC GETJPI_EXTENDPSP**^ OSHS SYS$ASCTOID SYS$CRELNMSYS$EXIT SYS$GETJPIW SYS$GETSYIW SYS$IDTOASCSYS$PROCESS_SCAN CLI$_ABSENT CLI$_PRESENT CLI$_NEGATED CLI$_COMMASHS_VERB CLI$GET_VALUE CLI$PRESENT LIB$GET_LUNLIB$STOP OTS$CVT_TO_L STR$UPCASEINIT_CLI LIB$INDEXFOR$OPEN FOR$ERRSNS SHS_FIND_HELP GETJPI_BASIC GETJPI_EXTEND8$CODEU$PDATA $LOCAL$BLANK NODE_INFO SORT_ORDERSORT_KEY PAGE_INFO FOR$IO_END FOR$IO_T_DS FOR$WRITE_SF FOR$WRITE_SLSPP P1PPPPP P0PPPPP !P0/P4P=PCPgP/P|PP6PPPC4PGPRP=`P/mPuP~P PPqP*PP PW1PNP }PP PPAP=P0PPP PP)P*bP }P~PyPPPP}PP`PnPPPPPPPzPPgPaPPM3PCPxOPlPPPPP P-!P -P 5PTP}PP?P-PP P PPPP8P AP\P ePuP PQP P-P P PP  P  P  P4 P @ PE PM PS Pp P | P P P~ P P P P P$ P3 P5 P= Pv P P P P P P P P P P P" P ' P}7 P> PX PY P< P P P Pzy P P P P0 Pv P5L P>R P1 P  P  P P P. PtP5@P>FP1uP P PPP.PtP54P>:P1iP tP }PPP.PtP5(P>.P1]P hP qPP0PvP5P>P1-P 8P! APcP0PvP5P>P1P PQP3P0`PvfP5P>P1P PPPPP/=PuBP5tP>zP1P PPPP/1Pu6P5hP>nP1P PPPP/%Pu*P5\P>bP1P PPPP/PuP5PP>VP1P PPP/%Pu*P5\P>bP1P PPP/1Pu6P5hP>nP1P PPP/=PuBP5tP>zP1P PP-PsP5P>"P1QP mPP P PPPPP$ P0P8PFP[PzPPP+P0XPv^P5P>P1P P PP!P.NPtRP5P>P1P P PPP.BPtFP5xP>~P1P P PP P.6Pt:P5lP>rP1P P PP0 Pv P5< P>B P1q P | P!  P P0 Pv P5 !P>!P1A!P L!PQU!Pw!P0!Pv!P5!P>!P1"P "P%"P,"P3"PT"P/"Pu"P5"P>"P1"P "P#P#PH#P/u#Puz#P5#P>#P1#P T#P#P#P<$P/i$Pun$P5$P>$P1$P $P$P$P0%P/]%Pub%P5%P>%P1%P %P%P<&P/i&Pun&P5&P>&P1&P &P&PH'P/u'Puz'P5'P>'P1'P 'P'PT(P/(Pu(P5(P>(P1(P (P(P-+)Ps.)P5`)P>f)P1)P )P)P )P )P)P1*PA*P N*P*P*P*P+P00+Pv6+P5h+P>n+P1+P +P +P+P+P.&,Pt*,P5\,P>b,P1,P ,P ,P,P,P.-Pt-P5P-P>V-P1-P -P -P-P-P..Pt.P5D.P>J.P1y.P .P .P.P0.Pv.P5/P>/P1I/P T/P! ]/P/P0/Pv/P5/P>/P10P $0PQ-0PO0P0|0Pv0P50P>0P10P 0P0P1P 1P,1P/Y1Pu^1P51P>1P11P 1P1P1P 2P/M2PuR2P52P>2P12P 2P2P2P3P/A3PuF3P5x3P>~3P13P 3P3P3P4P/54Pu:4P5l4P>r4P14P 4P4P5P/A5PuF5P5x5P>~5P15P 5P5P 6P/M6PuR6P56P>6P16P 6P6P,7P/Y7Pu^7P57P>7P17P 7P7P-8Ps8P588P>>8P1m8P 8P8P 8P e *[SHEN.SHS011.KIT]SHS.OBJ_ALPHA;1+,l.K/@ 4KIp-]0123KPWOL56pɄ7ZÇ/89G@HJ<<SHS 16-OCT-1995 15:28DEC Fortran V6.2-508h h0$DATA$$BSS$P$IODATA$i?$CODE$($LINK$$BLANK NODE_INFO SORT_ORDERSORT_KEY PAGE_INFO(JSHSINIT_CLISHS_VERBSYS$EXIT CLI$PRESENT CLI$_ABSENT CLI$_NEGATED CLI$_PRESENTLIB$STOP CLI$GET_VALUE STR$UPCASE SYS$ASCTOID OTS$CVT_TO_L SYS$IDTOASC SYS$GETJPIW SYS$CRELNM LIB$GET_LUN DFOR$OPEN DFOR$HANDLER DFOR$ERRSNS SHS_FIND_HELP SYS$GETSYIW CLI$_COMMA SYS$PROCESS_SCAN GETJPI_BASIC GETJPI_EXTEND DFOR$WRITE_SEQ_FMT @ $SHS011.Al] [SHEN.SHS011.KIT]SHS.OBJ_ALPHA;1K5S"DFOR$WRITE_SEQ_LIS OTS$INDEXOTS$STRCMP_LSSSOTS$STRCMP_LEQSOTS$STRCMP_EQLP OTS$MOVEMOTS$MOVEOTS$FILLP P=80p p=XP6@G@#%SYSTEM-F-NOSUCHNODE, remote node /H / is unknown7 =#TG~^^~޴>^~޵cGG$`Bc  8}<8="hb@Zk4GB?&0b@"@ZkPB?$ ! 8= <Xb8"4G@ZkX"GD 0h"D 0 àBD@0_!\G@BGHb4G@ZkPB$Xb 8p <8"4G@ZkD "0Gh"D 0 àBD@0!|G@BGHb4G@ZkPB?$Xb! 8= <8"4G@ZkD "0Gh"D 0 àBD@0!G@BGHb4G@ZkPB 8}Xb8"<4G@ZkG"tGGD00B&B""8}A"<=!@8"b@="DR"@ZkG08E %B_%0J!b8"TG2&J@="FJ3v`I lB8=<@=D@ZkG@BHb4G@ZkB4G4GGHB"@Zk0@0"B8"8=G<1"btG@ZkG@BHb4G@Zk!$GB4G4GGB"@Zk0@0"0"B #b8")1"GtG)5 A)&I&I)5 A)v I ,E8=<@ZkG@BHb4G@Zk!$GB4G4GGB"@Zk0@]@ TG 5@D.-#4G-4G(B"IEEBA@ZkAB4G8B"@Zk8DGFGB4G4GGB"@Zk 0 A0@ A0@ C9#D&TG4Gܡ.)Q A0 CB)v Ib 0A- 8=<=$"8"G@Zk G B0" @=G8=_&b"?"R"hb"8"G@ZkG@B4GHb@ZkRH H? @)$""#GB4G4GGB"@Zk 1@0"CB vHb$@)!8!<ݱ8"GGtG@ZkG@BHb4G@Zk)!")v I *E B4Gb@ZkB4GGGB"@ZkP@A%!-I X%E/ 85`A @ <9C!G7 61@".J FF@BA4G(B"@ZkAB4G8B"@Zk8DG <E <G 0@ @0B <9C"!G?.J FB$""b4G@Zk?!(< G ܡCB15`A4GB"@Zk0@0"$@B$1@bC$vH$)!@8A<8"GTG4GG@ZkGB0 @G_&8b"?"R"hb"8"G@Zk@BGHb4G@Zk$""4G$vHDBb@Zk0.vHRIjSI!E$kG(gB4G4GB"@Zk0@+`A0B+5`AB+v`IbJ! lEA8}<8"GGtG@Zk@BHbG4G@Zk0"GGBG)G/vHbGR IG-"IEC @Zk@BHbG4G@Zk!$/ E$0b%0#0"k!@s"B s)!GGbG GGG@Zk G@) @BHbG4G@Zk!$ G DG@BHb4G@ZkPB$Xb 8b!<}8"4G@Zk GHE FEr8"50"0B?$B! 8@)!<}@="@=R"btGD=@Zk0D^8D\8BTGGB",IGI@ZkR0$%" !?'8b!4<} 9##@=G 8="D@]"b"1h"G LE6@0%B?%b !?&8ݱ)!%b!<}! 1"@=8="DG @]"b"G@ZkG@BHb4G@Zk%8ݱ !<}"!@GD=8="@]"b"GBbG@ZkG@BHb4G@Zk` B4G(bG@ZkG@BHb4G@Zk!Pݵ TGH} TGX=4G`B"B4Gh4Gx]_&p"ݶR"=hb",H"bG@ZkDG0"G0BGBGb1"R"@Zk0BTG@BHb *@ZkPB%Xbk!8}!<ݱ8"4G@Zk D 0_!MGh¥@@D0"@BGHb4G@ZkPB"!8}Xb8"<=4G@ZkD4G@B?$  8}<! !@=D8"Hb@="TG@ZkB4Gb4G@Zk0_%0BBJ!$8]Pb <} @!Db8"@="R"tG@Zk0DE``"--!0H0@-711FI4GB&JGB<CGG<CGGGGGGG@ZkB"BG@ZkG BGG@Zk B8"B"4G@ZkGBGG@ZkBGGG33B8]"@ZkG B@ZkG@BG =Hb4G@ZkPBG8("!<=Xb8"4G@ZkhGh@Ge@1D GdGfDZ@0&0B(b"B"8p!<}8"@ݲ@="DR"btG@ZkG@BHb4G@Zkp G0"GBG"!!&H&HG@Zk0@8D G8GBTGG"G@Zk0@8D tG,GBtGG@"G@Zk0@8D TG GB4GGx"G@Zk0@8D GGBGG"G@Zk0@8DGD G@BGHb4G@Zkp,p"PB$ 8b <}Xb8"14G@Zk Dbñ D "G@BGHb4G@ZkPBP!8<8"Xb4G@Zk@@iD` D? <@BGHb4G@ZkPB"!8<=8"Xb4G@Zk@@eD`+D)0b?%0#0)!Xs"B, 3 3GGbG GGG@ZkG`GGG@BHbG4G@Zk 0E,CPB"!8}Xb8"<=4G@ZkG D<0& "0B B!8}@="<=R"@8"btGD@ZkG8D0,` D! 0b0b?$B#@s"b ! 3"c G GGGGG@Zk G GG cGG `GG DG@BHb4G@ZkPB`b 8}<}8"Xb4G@Zk GEG E 0"AGAD"GB`b 8}I"<}8"@@="D=tGb@ZkG D@@eDá@5@G0D} )0b&0&&J0bXs"1v JB"7F8=<=#"Ӳ_"\c bG G8]"GG@ZkG t/ G `"JB@=_&0J81"bR"hb"8"G@Zk@@eDQGAcG0fH`J;0T@A0"#v`H |?$01"I1a@0 &_"tFܢA 1tGQ _'F5 '1 ' ѱTG<$Q0(ѱ,ѱ0q4q8 P"@%D2v@JHOB<G?'(0<1DHK@0b$\{@$<qD@qHG<0 ?$1tG _& ѱ$Q(ѱ, 0'7"489v K<8C0'(\@0b0q8c<bH4q&$0"08!41<G0vF0B0` _&QtGz &TG ѱZ#$;v`K(1,$4QcC8<0qy0(?$01J8<4m$| `0B%08R4Q<bG0_F1 &TG\ '0b1 ѱ$(ѱ, @{{#4q&8#v`H<u@0qFG0(< &0qJ8<49$ 0B&0Ѳ8R4Q<.G0+0tG0Bz) &Z#;v`K1 &(QuC,0$(| `0"&$q,!0"H(1 $ 0&$Ѳ,(0G$0 &'\*@<TG 0X#(,:v@K0[C$Q( 0b&$q,c0bH(q0$< &$Ѳ,(0G$0 _&+Qѱ 0'7"(,9v K08C$G0B(|Z`&$BK,0(Q$| `0b?$$1,c(q0G$ܢGG\FGE<* & 0&x#(,;v`K0uC$}(\ @0b?$$1,s0bJ(qq0$|`&$,(0fG$c0 ?'10B 'TG ѱ$(q, :Z#4Q&8!v H<3@01K&(|`008<J4?0"$9'0841<4G01F/` & _'|& ѱ$Q(ѱ, `0"a! 418#v`H<t@0q( 0'08<I4 0b$<{ &084q<G0PF1@ &q ?$|tG ѱ$1(, `0%"488vK<C0G'(< 00q8<J4$\ @0b?$018s4q< =G050" & $ & ѱTGy$q9#(ѱ,ѱ0;v`K48Yf$SHS011.Al] [SHEN.SHS011.KIT]SHS.OBJ_ALPHA;1KɊ"&@1uCDH<(\ @0"&<qD!H"H@10$ܢ$<qD@HG<5@ & ' ѱ %|tG$(ѱ,ѱ0418 `0&U"@D:v@KHSC<qy(< 0¦$<qD֢HJ@Ѳm$ 0B&<DR@QHbG<_7 ' % ѱtG\ '$TG(1,ѱ0q48 @0b$3s"@qD!v HH#@<1BG0(ܢ&<JDH@50$\@'<D@H*G<'0"y9#;v`K1& $uC(\ @0b$q s$bJq $< 0¦& ֢Ѳ$G`pBTGxb"@Zk4G@BHbG@ZkG Bb@Zk@@eDtGBGb@Zk@@eDjGG@BHb4G@Zk@@eD_@BGHb4G@Zk$c d0G0"X Ge Ű)! "#BGGb1"GGGG@ZkG !G@B4GHb@Zk!G4G@B0IHbJ@ZkG0T@A0"'vHd!<%01"fH0bѰ@ %0 qo@0D|TG SFq5 &tGѲ ѱ &\ '$(ѱ,ѱ0418 @{#@q$Dq,vIHA<G( 0$<qDqHH@$ 0&<ѲDq@HG<0@ &tG0b\ ?' ѱ$1(ѱ, @{#4q$8q,vI<A0( 0b$08qc<bH4q$ 0¦&08q֢4Ѳ<G03D1 _&QtG\ '0bTG ѱ$(1, @{#4q$8q,vI<A0y( 0$0q8q<H4m$ 0&0Ѳ8q4<bG0_pF0"0 ?$1TGY &Q9# ѱ'$:v@K(ѱ,[C418q<0QFG( 0%08q<H49$| `0&08q4<.G0+0ܢ, &tGq 0"&A! (1,q2v@J0WB$Q'0"(9$q"K,q0(1 $\ @0%$,q(0G$0, $qTG 0¦&"(Ѳ,q5vJ0B$q( 0"&$,q!0"H(1'$\@0$q,q(0G$0 _'<+ Qѱ 0$줐!(,q'vH0@$qG( 0&$Ѳ,q0H(&$0b$,qs(q0G$ ?'G<G|FG[F\)1 @0$!(,q,vI0A$}(| `0&$Ѳ,q0J(q&$0$,q(0fG$c0@ &q '\TG ѱ$(1, @0$!48q,vI<A0K(| `0¦&08q֢<J4Ѳ?0$&08q4<4G01F/@ &q '<0B ѱ$(ѱ, Z#4Q%8q/vI< A0( 0b&08qc<bH4q $ܢ 0&08q4<G0aG1 _&Q &<tG0B ѱ$q(, Z#4Q%8q/vI< A0G( 0$0q8q<J4$ܢ 0$08q4<G05 & _& ѱ &<TG$Q0B(ѱ,ѱ0q48 Z#@Q%Dq/vIH A<( 0b&<DqcHbH@q$ܢ 0&<Dq@HG<5`0" & & _& ѱtGY$9#(ѱ,ѱ0Q:v@K4q8%@1OCDqH<y( 0&<DqHH@m$| `0¦&<Dq֢@ѲHbG<_7 $ ' /= ѱtG| &$qTG(_',ѱ04Q8 `08#@Dq9v KH:C<1BG( 0&<DqHI@5$ 0b&<Dqc@qH*G<''ܢ 0"! 1 q vH$@0(_&QJ q$ _'$|`0Q q$G`"pBxb"TG@Zk4G@BHbG@ZkG Bb@ZkBGb@Zk$0b 0bGGXs"bk!vB#Gsc GGbGs@ZkGGkG0fI`J@BHb4G@Zk00" T@A*v@Iܠ01"$ 0DA D,E9 $ qtG %ѱ $TGqѱ ѱ$(1, 0B"&rR"4Q83v`J<uB0qG?#(ܢ 0'081<J4G0b$\{@%0_!8Q4q<04 $ tG| $ѱѱ `0 ?$o!(,+v`I0aA$1G( 0B&$",R0BJ(QG?#$|`0¦'$,1֢(Ѳ0$D5 & tG| %Q TGѱQ `0" $)!(1,%vH0@$G(| `0$$!,q0I(G0$< &$",(0$E3 _& QTG< 'q_'ѱѱ 0¦"֤"(Ѳ,&vH0@$Ѱm'( 0B?!$q,1J0BI(Q`G$ 0$$ ,q(0S$Q0"/ %<tG q 0%" 5vJ$ B:G( 0B&q# R$BJQ,G_#$< 0¦& Q֢Ѳ$0TGܠ/ %< q 0B $J!Q $vH$@qG( 0%q! $HG&$< 0" $0?#- %| ѱ `0&X# 12v@J$WBQ$(\ @0¦!Ѱ ֢$JѲG$| `0"_%Q )1$0G|G|D GD.< $  ""% 5vJ$ BG?#( 0b' 1s$bJqG_' $0BQ ѰRQ$}{4 %  &\TGѱѲq @0!$% (,)v I0 A$bG0(< &$",J0(TG?#$0'$,1(0G$ED3` & _'ܠѱQѱ 0B!&R"(Q,'vH0@$,G(| `0B$$!,J0BI(QG$< 0?$$1",(0$cE3 &  %<tG_'ѱ 0"h!(,3v`J0zB$q(ܠ 0B%$",ѲR0BJ(QG0b${$$!,(q0$9 _% Q ?%ѱ ?$TG1ѱ ѱ$1(, 0!'"480vJ<B0G_#(< 0&08Q<I4G0¤$|Ơ`%0"8Ѳ4Ѱ<09` _& Q $ѱ $|tGѱ ѱ$(, `0?!?$D 481*v@I<AA01G( 0&0!8<H4tG?'0$01"84<g0e9` _' Q %ѱtGܠ %TGq ѱ$(Ѳ, 0b $Kk!4q82v@J<EB0G0b({ $0?!81bK<4q:G$\ @0"&0"8!41<-0+?# 0& 18vKC G_'( 0b! QcbHqG$| `0¥% "ѲΡѱ `¤pBTGxb"@Zk4G@BHbG@ZkG |`Bb@ZkGBGb@Zk =\TGc]4G]}ݤ=]}ݥ#k4/`GINIT_CLI40|b#INIT_CLI4/@INIT_CLI4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT40GDLIB$STOP48b#Lt弜$SHS011.Al] [SHEN.SHS011.KIT]SHS.OBJ_ALPHA;1KT"%IB$STOP4@@DLIB$STOP4DGl CLI$PRESENT4 Lb# CLI$PRESENT4h@l CLI$PRESENT4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT4`GtLIB$STOP4hb#LIB$STOP4p@tLIB$STOP4tG CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT4G CLI$GET_VALUE4b# CLI$GET_VALUE4@ CLI$GET_VALUE4 GD STR$UPCASE4 b# STR$UPCASE4 @@D STR$UPCASE4LG\LIB$STOP4Pb#LIB$STOP4X@\LIB$STOP4\Gt OTS$INDEX4p@t OTS$INDEX4G SYS$ASCTOID4b# SYS$ASCTOID4@ SYS$ASCTOID4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G OTS$INDEX4@ OTS$INDEX4G< SYS$ASCTOID4b# SYS$ASCTOID48@< SYS$ASCTOID4DGTLIB$STOP4Hb#LIB$STOP4P@TLIB$STOP4hG OTS$INDEX4|@ OTS$INDEX4 GOTS$STRCMP_LSSS4 @OTS$STRCMP_LSSS4 GOTS$STRCMP_LEQS4 @OTS$STRCMP_LEQS4G0 OTS$INDEX4,@0 OTS$INDEX4+|G OTS$CVT_TO_L4,b# OTS$CVT_TO_L4+@ OTS$CVT_TO_L<)GDFOR$WRITE_SEQ_LIS<*b#DFOR$WRITE_SEQ_LIS<)@DFOR$WRITE_SEQ_LIS4GLIB$STOP4b#LIB$STOP4@LIB$STOP4(G@ OTS$INDEX4<@@ OTS$INDEX4LG SYS$ASCTOID4Tb# SYS$ASCTOID4@ SYS$ASCTOID4GLIB$STOP4b#LIB$STOP 4@LIB$STOP4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G OTS$INDEX4@ OTS$INDEX4 0GDOTS$STRCMP_LSSS4 @@DOTS$STRCMP_LSSS4 LG\OTS$STRCMP_LEQS4 X@\OTS$STRCMP_LEQS4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G OTS$INDEX4 @ OTS$INDEX4+G` OTS$CVT_TO_L4,$b# OTS$CVT_TO_L4+\@` OTS$CVT_TO_L<)hGDFOR$WRITE_SEQ_LIS<*b#DFOR$WRITE_SEQ_LIS<)@DFOR$WRITE_SEQ_LIS4GLIB$STOP4b#LIB$STOP4@LIB$STOP4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4 G, OTS$INDEX4( @, OTS$INDEX4< Gp SYS$ASCTOID4D b# SYS$ASCTOID4l @p SYS$ASCTOID4t G LIB$STOP4x b#LIB$STOP4 @ LIB$STOP45 G SYS$IDTOASC46 b# SYS$IDTOASC45 @ SYS$IDTOASC4 G LIB$STOP4 b#LIB$STOP4 @ LIB$STOP4- G\ SYS$GETJPIW4.@ b# SYS$GETJPIW4-X @\ SYS$GETJPIW4l G LIB$STOP4p b#LIB$STOP4| @ LIB$STOP4 G LIB$STOP4 b#LIB$STOP4 @ LIB$STOP4 G CLI$PRESENT4  b# CLI$PRESENT4 @ CLI$PRESENT4 G0 CLI$GET_VALUE4 b# CLI$GET_VALUE4, @0 CLI$GET_VALUE4D Gh OTS$STRCMP_EQLP4d @h OTS$STRCMP_EQLP4# GD SYS$CRELNM4$ b# SYS$CRELNM4#@ @D SYS$CRELNM4L G\ LIB$STOP4P b#LIB$STOP4X @\ LIB$STOP4# G SYS$CRELNM4$ b# SYS$CRELNM4# @ SYS$CRELNM4 G LIB$STOP4 b#LIB$STOP4 @ LIB$STOP4 G LIB$GET_LUN4 b# LIB$GET_LUN4 @ LIB$GET_LUN4 G LIB$STOP4 b#LIB$STOP4 @ LIB$STOP43 GL DFOR$OPEN44@ b# DFOR$OPEN 43H @L DFOR$OPEN41h G DFOR$ERRSNS42p b# DFOR$ERRSNS41| @ DFOR$ERRSNS4 G LIB$STOP4 b#LIB$STOP4 @ LIB$STOP4 G CLI$PRESENT4  b# CLI$PRESENT4 @ CLI$PRESENT4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G4 CLI$PRESENT4  b# CLI$PRESENT40@4 CLI$PRESENT4@Gx SHS_FIND_HELP4hb# SHS_FIND_HELP4t@x SHS_FIND_HELP4xGSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G CLI$GET_VALUE<7$SHS011.Al] [SHEN.SHS011.KIT]SHS.OBJ_ALPHA;1K"64b# CLI$GET_VALUE4@ CLI$GET_VALUE4GT OTS$MOVEM4P@T OTS$MOVEM4XGd OTS$MOVEM4`@d OTS$MOVEM4hGxOTS$MOVE4t@xOTS$MOVE4xGOTS$MOVE4@OTS$MOVE4G OTS$MOVEM4@ OTS$MOVEM4G OTS$MOVEM4@ OTS$MOVEM47GOTS$FILL47@OTS$FILL4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT4HG| CLI$GET_VALUE4pb# CLI$GET_VALUE4x@| CLI$GET_VALUE4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G OTS$INDEX4@ OTS$INDEX4G OTS$INDEX4@ OTS$INDEX4G( OTS$INDEX4$@( OTS$INDEX4@GX OTS$INDEX4T@X OTS$INDEX4pG OTS$INDEX4@ OTS$INDEX4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT4G,LIB$STOP4 b#LIB$STOP4(@,LIB$STOP4,GL CLI$PRESENT4 @b# CLI$PRESENT4H@L CLI$PRESENT4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G CLI$PRESENT4 b# CLI$PRESENT 4@ CLI$PRESENT4!G4 SYS$GETSYIW4"b# SYS$GETSYIW4!0@4 SYS$GETSYIW4TGhLIB$STOP4Xb#LIB$STOP4d@hLIB$STOP4|G CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT4G CLI$GET_VALUE4b# CLI$GET_VALUE4@ CLI$GET_VALUE4-Gd SYS$GETJPIW4.$b# SYS$GETJPIW4-`@d SYS$GETJPIW4GLIB$STOP4b#LIB$STOP4@LIB$STOP4G CLI$PRESENT4 b# CLI$PRESENT4@ CLI$PRESENT4GH CLI$GET_VALUE4@b# CLI$GET_VALUE4D@H CLI$GET_VALUE4!G SYS$GETSYIW4"b# SYS$GETSYIW4!@ SYS$GETSYIW<$G\DFOR$WRITE_SEQ_FMT<@b#DFOR$WRITE_SEQ_FMT<X@\DFOR$WRITE_SEQ_FMT<"G#SYS$PROCESS_SCAN<"b#SYS$PROCESS_SCAN<#@#SYS$PROCESS_SCAN4 #G#LIB$STOP4#b#LIB$STOP4#@#LIB$STOP4%,#G8# GETJPI_BASIC4&0#b# GETJPI_BASIC4%4#@8# GETJPI_BASIC4'P#G`# GETJPI_EXTEND4(X#b# GETJPI_EXTEND4'\#@`# GETJPI_EXTEND4|#G#LIB$STOP4#b#LIB$STOP4#@#LIB$STOP4#G#LIB$STOP4#b#LIB$STOP4#@#LIB$STOP4!$G,$ SYS$GETSYIW4"$b# SYS$GETSYIW4!($@,$ SYS$GETSYIW4@$GP$LIB$STOP4H$b#LIB$STOP4L$@P$LIB$STOP4p$G$LIB$STOP4x$b#LIB$STOP4$@$LIB$STOP<0G1SYS$PROCESS_SCAN<0b#SYS$PROCESS_SCAN<1@1SYS$PROCESS_SCAN4 1G1LIB$STOP41b#LIB$STOP41@1LIB$STOP4%,1G81 GETJPI_BASIC4&01b# GETJPI_BASIC4%41@81 GETJPI_BASIC4'@1GP1 GETJPI_EXTEND4(H1b# GETJPI_EXTEND4'L1@P1 GETJPI_EXTEND4!1G1 SYS$GETSYIW4"1b# SYS$GETSYIW4!1@1 SYS$GETSYIW41G1LIB$STOP41b#LIB$STOP41@1LIB$STOP<?G?SYS$PROCESS_SCANP P<?b#SYS$PROCESS_SCAN<?@?SYS$PROCESS_SCAN4?G,?LIB$STOP4 ?b#LIB$STOP4(?@,?LIB$STOP4% SET ENVIRONMENT/CLUSTER" SYSMAN> SET PROFILE/PRIV=CMKRNL2 SYSMAN> DO INSTALL REPLACE SYS$COMMON:[SYSLIB]- _SYSMAN>DCLTABLES.EXE SYSMAN> EXIT6 Check the SYSMAN message, make sure the command has 4 been successfully excuted on every system in your cluster.  - NOTE -6 You still need to invoke the SHS$STARTUP.COM : individually on each of the systems you wish to install " SHS as a known privileged image. 4. Bug fix and Bug report : Fixed from Version 1.0: SHS will crash when it tries to ( handle a suspended outswapped process.H SHS Release Notes page 2#  SHS Release Notes 8 Fixed from Version 1.0: SHS will exit prematurally if 9 the total process number on the system is greater than  512.8 Enhancement: 1) Added the /UIC qualifier, /[NO]BATCH, : /[NO]INTERACTIVE, and /[NO]NETWORK qualifiers to handle 5 different request options. 2) Actually SHS may be 7 implemented as a foreign command (via DCL symbols or 7 DCL$PATCH). It is not available from this VMSINSTAL : kit, however the module is still built with image, with 9 attached source code and some common system management : knowledge. It should not be a big task to figure it out.9 Bug report to: James Shen . Any bug , report and comments are extremely welcome." Author's mailing address:  James Shen (jshen1@ford.com) Powertrain Operation Ford Motor Company 1981 Front Wheel Drive, Batavia, OH 45103  A SHS Release Notes page 3*[SHEN.SHS011.KIT]SHSDEF.OBJ;1+,n. /@ 4 -]0123KPWO 56/}b7c䊗/89G@HJ0SHSDEF016-OCT-1995 15:14 VAX MACRO V5.4-3$MACRO/OBJECT=SHSDEF.OBJ SHSDEF.MAR  SHSDEF ELBR$C_MAXRECSIZELBR$C_TYP_DECMX LBR$C_ADDMOD LBR$C_CREATE,LBR$C_DEFENTALL LBR$C_DELMOD2 LBR$C_DEXTQLBR$C_FLSHBFSIZLBR$C_FLUSHALLLBR$C_FLUSHDATALBR$C_HASHSIZE LBR$C_MAXCTL LBR$C_MAXFUNCLBR$C_MAXHDRSIZLBR$C_MAXIDXRDLBR$C_MAXKEYLENLBR$C_MAXLUHRECd LBR$C_MAXREADLBR$C_MAXRECSIZ2 LBR$C_MEMXTRA LBR$C_MINREADLBR$C_PAGESIZELBR$C_PUTBUFSIZ LBR$C_READ LBR$C_REPMODxLBR$C_RETRYOPENLBR$C_RETRYWAITLBR$C_TEXTPAGELBR$C_TYP_DECMXLBR$C_TYP_EOBJLBR$C_TYP_ESHSTB LBR$C_TYP_HLP LBR$C_TYP_MLB LBR$C_TYP_NCS LBR$C_TYP_OBJLBR$C_TYP_RDECLBR$C_TYP_SHSTB LBR$C_TYP_TXT LBR$C_TYP_UNKLBR$C_TYP_USRHILBR$C_TYP_USRLW LBR$C_UPDATELBR$L_AU_CTLTBLLBR$L_AU_FLAGS LBR$L_AU_KEYNAMLBR$L_CL_CTLTBLLBR$L_DD_CTLTBLLBR$L_DD_TXTRFALBR$L_DK_CTLTBLLBR$L_DK_KEYNAMLBR$L_GH_CTLTBLLBR$L_GH_RETARYLBR$L_GI_CTLTBLLBR$L_GI_IDXNUM LBR$L_GI_USRTNLBR$L_GR_BUFDES LBR$L_GR_BUFLENLBR$L_GR_CTLTBLLBR$L_GU_CTLTBLLBR$L_GU_KEYADRLBR$L_GU_TXTRFALBR$L_GU_USRTNLBR$L_IC_CTLTBL LBR$L_IC_FUNC LBR$L_IC_TYPELBR$L_IK_CTLTBLLBR$L_IK_KEYNAM LBR$L_IK_TXTRFALBR$L_LK_CTLTBLLBR$L_LK_KEYNAM LBR$L_LK_TXTRFA LBR$L_OP_CREOPTLBR$L_OP_CTLTBL LBR$L_OP_DNS LBR$L_OP_FNSLBR$L_OP_RLFNA LBR$L_OP_RNSLBR$L_OP_RNSLENLBR$L_PO\$SHS011.An][SHEN.SHS011.KIT]SHSDEF.OBJ;1 CE_CTLTBLLBR$L_PR_BUFDESLBR$L_PR_CTLTBL LBR$L_PR_TXTRFALBR$L_RK_CTLTBLLBR$L_RK_KEYNAMLBR$L_RK_NEWRFA LBR$L_RK_OLDRFALBR$L_SI_CTLTBLLBR$L_SI_IDXNUMLBR$L_SR_CTLTBLLBR$L_SR_IDXNUM LBR$L_SR_RFALBR$L_SR_USRTNLBR$L_SU_KEYDESLBR$L_SU_TXTRFALBR$L_UU_UPDESC LBR$S_LBRDEF LBR$S_LBRDEF1LBR$S_LBRDEF10LBR$S_LBRDEF11LBR$S_LBRDEF12LBR$S_LBRDEF13 LBR$S_LBRDEF14LBR$S_LBRDEF15 LBR$S_LBRDEF16LBR$S_LBRDEF17 LBR$S_LBRDEF18LBR$S_LBRDEF19 LBR$S_LBRDEF2 LBR$S_LBRDEF3 LBR$S_LBRDEF4 LBR$S_LBRDEF5 LBR$S_LBRDEF6 LBR$S_LBRDEF7 LBR$S_LBRDEF8 LBR$S_LBRDEF9 SCH$C_CEF SCH$C_COLPG SCH$C_COM SCH$C_COMO SCH$C_CUR SCH$C_FPG SCH$C_HIB SCH$C_HIBO SCH$C_LEF SCH$C_LEFO SCH$C_MWAIT SCH$C_PFW SCH$C_SUSP SCH$C_SUSPO . ABS .P$ABS$ PP#*[SHEN.SHS011.KIT]SHSDEF.OBJ_ALPHA;1+,o./@ 4 -]0123KPWO56X?qɄ7DԌ/89G@HJ@@SHSDEFV116-OCT-1995 15:28AMAC V2.1-17  $ABS$ . BLANK . . ABS .0 SCH$C_COLPG0 SCH$C_MWAIT0 SCH$C_CEF0 SCH$C_PFW0 SCH$C_LEF0 SCH$C_LEFO0 SCH$C_HIB0 SCH$C_HIBO0  SCH$C_SUSP0  SCH$C_SUSPO0  SCH$C_FPG0  SCH$C_COM0  SCH$C_COMO0 SCH$C_CUR0 LBR$C_TYP_UNK0 LBR$C_TYP_OBJ0 LBR$C_TYP_MLB0 LBR$C_TYP_HLP0 LBR$C_TYP_TXT0LBR$C_TYP_SHSTB0 LBR$C_TYP_NCS0LBR$C_TYP_DECMX0LBR$C_TYP_EOBJ8LBR$C_TYP_ESHSTB8ELBR$C_TYP_DECMX0LBR$C_TYP_RDEC0LBR$C_TYP_USRLW0LBR$C_TYP_USRHI0LBR$C_FLUSHDATA0LBR$C_FLUSHALL0LBR$C_MAXRECSIZ0LBR$C_PAGESIZE0LBR$C_HASHSIZE0LBR$C_TEXTPAGE02 LBR$C_DEXTQ0 LBR$C_MAXCTL0LBR$C_MAXHDRSIZ0,LBR$C_DEFENTALL0xLBR$C_RETRYOPEN0LBR$C_RETRYWAIT0 LBR$C_MINREAD0d LBR$C_MAXREAD02 LBR$C_MEMXTRA0LBR$C_PUTBUFSIZ0LBR$C_FLSHBFSIZ0LBR$C_MAXIDXRD0LBR$C_MAXKEYLEN0LBR$C_MAXLUHREC8 ELBR$C_MAXRECSIZ0 LBR$C_CREATE0 LBR$C_READ0 LBR$C_UPDATE0 LBR$C_MAXFUNC0 LBR$S_LBRDEF0LBR$L_IC_CTLTBL0 LBR$L_IC_FUNC0  LBR$L_IC_TYPE0  LBR$S_LBRDEF10LBR$L_OP_CTLTBL0 LBR$L_OP_FNS0 LBR$L_OP_CREOPT0 LBR$L_OP_DNS0LBR$L_OP_RLFNA0 LBR$L_OP_RNS0LBR$L_OP_RNSLEN0 LBR$S_LBRDEF20LBR$L_CL_CTLTBL0  LBR$S_LBRDEF30LBR$L_GH_CTLTBL0LBR$L_GH_RETARY0  LBR$S_LBRDEF40LBR$L_SI_CTLTBL0LBR$L_SI_IDXNUM0 LBR$S_LBRDEF50LBR$L_LK_CTLTBL0LBR$L_LK_KEYNAM0 LBR$L_LK_TXTRFA0 LBR$S_LBRDEF60LBR$L_IK_CTLTBL0LBR$L_IK_KEYNAM0 LBR$L_IK_TXTRFA0 LBR$S_LBRDEF70LBR$L_RK_CTLTBL 0LBR$L_RK_KEYNAM0 LBR$L_RK_OLDRFA0LBR$L_RK_NEWRFA0  LBR$S_LBRDEF80LBR$L_DK_CTLTBL0LBR$L_DK_KEYNAM0  LBR$S_LBRDEF90LBR$L_DD_CTLTBL0LBR$L_DD_TXTRFA0LBR$S_LBRDEF100LBR$L_GR_CTLTBL0LBR$L_GR_BUFDES0 LBR$L_GR_BUFLEN0LBR$S_LBRDEF110LBR$L_PR_CTLTBL0LBR$L_PR_BUFDES0 LBR$L_PR_TXTRFA0LBR$S_LBRDEF120LBR$L_PE_CTLTBL0LBR$S_LBRDEF130LBR$L_SR_CTLTBL0LBR$L_SR_IDXNUM0  LBR$L_SR_RFA0LBR$L_SR_USRTN0 LBR$S_LBRDEF140LBR$L_SU_KEYDES0LBR$L_SU_TXTRFA0LBR$S_LBRDEF150LBR$L_GI_CTLTBL0LBR$L_GI_IDXNUM0 LBR$L_GI_USRTN0 LBR$S_LBRDEF160LBR$L_GU_KEYADR0LBR$L_GU_TXTRFA0 LBR$C_ADDMOD0 LBR$C_DELMOD0 LBR$C_REPMOD0LBR$S_LBRDEF170LBR$L_AU_CTLTBL0LBR$L_AU_FLAGS0 LBR$L_AU_KEYNAM0 LBR$S_LBRDEF180LBR$L_GU_CTLTBL0LBR$L_GU_USRTN0LBR$S_LBRDEF190LBR$L_UU_UPDESC *[SHEN.SHS011.KIT]SHS_CLI.OBJ;1+,p./@ 4,-]0123KPWO56]{b7/89G@HJ:$SHS011.Ap][SHEN.SHS011.KIT]SHS_CLI.OBJ;1h (SHS_VERBV1.0-00216-OCT-1995 15:13-VAX/VMS Command Definition Utility (V4-001) SHS_VERB CLI$TABLESP  SHS ,(T SHS0!!P1INPUT_PRC_NAME( ASCENDING$BATCH$BRIEF(CLUSTER,H DESCENDING(pEXTEND, INTERACTIVE$HELP( NETWORK$a  NODE4@ %OUTPUT SYS$OUTPUT$d PAGE( SORT_BY$UIC$USER  SORT_KEYWORD$CPU(@CURPRIO$dIO( PAGEFAULT, PHYSICAL_PAGE, PROCESS_NAME8 T$tP4\0<H   dp       @    H  H4@ P\ d h d         ,8 p D pdp|        H   ( dDP @  lx  $*[SHEN.SHS011.KIT]SHS_CLI.OBJ_ALPHA;1+,q./@ 4-]0123KPWO56X?qɄ7A/89G@HJ 77 SHS_VERBV1.0-00216-OCT-1995 15:28++VMS Command Definition Utility A05-128 8mman0i SHS_VERB:8 mman CLI$TABLES  =  SHS ,(T SHS0!!P1INPUT_PRC_=NAME( ASCENDING$BATCH$BRIEF(=CLUSTER,H DESCENDING(pEXTEND,= INTERACTIVE$HELP( NETWORK$a  =NODE4@ %OUTPUT SYS$OUTPUT$d PAGE( =SORT_BY$UIC$USER  SORT_KEYWORD$=CPU(@CURPRIO$dIO(= PAGEFAULT, PHYSICAL_PAGE, PROCESS_NAME8 T$t=P4\0<H   dp =      @   = H  H4@ P\ d h d=        = ,8 p D pdp|   =     H=   ( dDP @  lx  =  $*[SHEN.SHS011.KIT]SHS_FIND_HELP.OBJ;1+,r./@ 4$-]0123KPWO56{xb7S /89G@HJ8 SHS_FIND_HELP0116-Oct-1995 15:13DEC Fortran V6.3-141PSYS$HELP:HELPLIB.HLBPLIB$PUT_OUTPUT LIB$GET_INPUTLIB$PUT_OUTPUT` LBR$OUTPUT_HELP@ LIB$GET_INPUTQpPH[}PQ P}PQP LIB$FIND_FILEPRRk<LBR$OUTPUT_HELPPP\X LIB$SIGNALRkhLBR$OUTPUT_HELPPPˈ˄ LIB$SIGNALRːˌ LIB$SIGNAL H SHS_FIND_HELPLIB$PUT_OUTPUT LIB$GET_INPUT LIB$FIND_FILELBR$OUTPUT_HELP LIB$SIGNAL$CODE$PDATA$LOCAL+4PBP PP9\PjPzP**[SHEN.SHS011.KIT]SHS_FIND_HELP.OBJ_ALPHA;1+,s./@ 4-]0123KPWO56qɄ7ꮓ/89G@HJFF SHS_FIND_HELP 16-OCT-1995 15:28DEC Fortran V6.2-508( ($DATA$$BSS$$IODATA$i$CODE$$LINK$0J SHS_FIND_HELP LIB$FIND_FILELBR$OUTPUT_HELPLIB$PUT_OUTPUT LIB$GET_INPUT LIB$SIGNAL$ $=  =#~ ^(^0~8@H޴PX`>hGp,GpHiq.qJl $C BfFX$PBgB$ "b="GGGG@Zk?$ G! !E C@BC0fDHb4Gg@}G]"}"8"G@Zk&G G%!(EC@BC0fDHbGg@}?&1"=`"8G]"}""G@ZkGG B(b4G@ZkG ](]0}8@HݤPX`=hp#k0,q.A 0HqJ#D?.T JF4dG LIB$FIND_FILE4b# LIB$FIND_FILE4@ LIB$FIND_FILE4GLBR$OUTPUT_HELP4b#LBR$OUTPUT_HELP4@LBR$OUTPUT_HELP4<GLBR$OUTPUT_HELP4Lb#LBR$OUTPUT_HELP4@LBR$OUTPUT_HELP4G LIB$SIGNAL4G $SHS011.As]*[SHEN.SHS011.KIT]SHS_FIND_HELP.OBJ_ALPHA;1b# LIB$SIGNAL4@ LIB$SIGNAL0 0=0 ;=p  LIB$SIGNAL7 LIB$GET_INPUT7LIB$PUT_OUTPUT LBR$OUTPUT_HELP;;= SYS$HELP:HELPLIB.HLB LIB$FIND_FILE (*[SHEN.SHS011.KIT]SHS_INITIATE_SORT.OBJ;1+,t./@ 4-]0123KPWO561wb7x/89G@HJ<SHS_INITIATE_SORT0116-Oct-1995 15:13DEC Fortran V6.3-141PP<PH[0H[0޼RXb\bdTQSORT_BASIC_PROCNAME1lbpbxhQSORT_BASIC_CPU1ˀb˄bˌ|QSORT_BASIC_IO˔b˘bˠːQSORT_BASIC_CURPRIO˨bˬb˴ˤQSORT_BASIC_PAGEFAULT˼bb˸QSORT_BASIC_PAGEЫPH[0޼RbbQSORT_EXTEND_PROCNAME1bbQSORT_EXTEND_CPU1bbQSORT_EXTEND_IO bbQSORT_EXTEND_CURPRIO b$b,QSORT_EXTEND_PAGEFAULT4b8b@0QSORT_EXTEND_PAGEЫPм(Ьޫ PFOR$INI_DES1_R2мPЬ8ޫ4PFOR$INI_DES1_R2ЫDk HSHS_INITIATE_SORT HSHS_PROC_SORTBY_KEY_BASIC HSHS_PROC_SORTBY_KEY_EXTENDQSORT_BASIC_PROCNAMEQSORT_BASIC_CPUQSORT_BASIC_IOQSORT_BASIC_CURPRIOQSORT_BASIC_PAGEFAULTQSORT_BASIC_PAGEQSORT_EXTEND_PROCNAMEQSORT_EXTEND_CPUQSORT_EXTEND_IOQSORT_EXTEND_CURPRIOQSORT_EXTEND_PAGEFAULTQSORT_EXTEND_PAGE$CODE$PDATAH$LOCALSORT_KEYFOR$INI_DES1_R2FOR$INIT_VECALIGN P P P&P=PHP_PlPPkPPFPP"PPP.P8PSP`P{PjPPFPP"P.*[SHEN.SHS011.KIT]SHS_INITIATE_SORT.OBJ_ALPHA;1+,u. /@ 4H -]0123KPWO 56qɄ7=/89G@HJJJSHS_INITIATE_SORT 16-OCT-1995 15:28DEC Fortran V6.2-508 $DATA$$BSS$$IODATA$i$CODE$0$LINK$SORT_KEY8JhSHS_INITIATE_SORT@J0SHS_PROC_SORTBY_KEY_BASIC QSORT_BASIC_PROCNAMEQSORT_BASIC_CPUQSORT_BASIC_IO QSORT_BASIC_CURPRIO QSORT_BASIC_PAGEFAULT QSORT_BASIC_PAGE@JSHS_PROC_SORTBY_KEY_EXTEND QSORT_EXTEND_PROCNAME QSORT_EXTEND_CPUQSORT_EXTEND_IO QSORT_EXTEND_CURPRIO QSORT_EXTEND_PAGEFAULT QSORT_EXTEND_PAGEH H =#~^^~ (0GG G#~^^~ (0G[ GG`B"GGG8D BGb@ZkGXD BGbG`B"GG@ZkGxD xBGbG`B"GG@ZkyGD hBGpbG`B"GG@ZkmGD BGbG`B"GG@ZkaGؠD^BGbG`B"GG@ZkUG#G~^^~ (0G[ GGGG`B"G8D Bb@Zk;GXD BGbG`B"GG@Zk/GxD BGbG`B"GG@Zk#GD BGbG`B"GG@ZkGD BGbG`B"GG@Zk G؀DBGbG`B"GG@ZkG]]4G} (0@#k< GQSORT_BASIC_PROCNAME< b#hQSORT_BASIC_PROCNAME< @QSORT_BASIC_PROCNAME4GQSORT_BASIC_CPU4b#hQSORT_BASIC_CPU4@QSORT_BASIC_CPU4GQSORT_BASIC_IO4b#hQSORT_BASIC_IO4@QSORT_BASIC_IO< G QSORT_BASIC_CURPRIO<b#hQSORT_BASIC_CURPRIO< @ QSORT_BASIC_CURPRIO< 0GPQSORT_BASIC_PAGEFAULT< 8b#hQSORT_BASIC_PAGEFAULT< L@PQSORT_BASIC_PAGEFAULT<`GQSORT_BASIC_PAGE<hb#hQSORT_BASIC_PAGE<|@QSORT_BASIC_PAGE<GQSORT_EXTEND_PROCNAME<b#hQSORT_EXTEND_PROCNAME<@QSORT_EXTEND_PROCNAME<GQSORT_EXTEND_CPU<b#hQSORT_EXTEND_CPU<@QSORT_EXTEND_CPU4(GHQSORT_EXTEND_IO40b#hQSORT_EXTEND_IO4D@HQSORT_EXTEND_IO<XGxQSORT_EXTEND_CURPRIO<`b#hQSORT_EXTEND_CURPRIO<t@xQSORT_EXTEND_CURPRIO<GQSORT_EXTEND_PAGEFAULT<b#hQSORT_EXTEND_PAGEFAULT<@QSORT_EXTEND_PAGEFAULT<GQSORT_EXTEND_PAGE<b#hQSORT_EXTEND_PAGE<@QSORT_EXTEND_PAGE` ` QSORT_EXTEND_CPU QSORT_BASIC_PAGE QSORT_EXTEND_PAGE QSORT_EXTEND_CURPRIO QSORT_BASIC_PROCNAME QSORT_BASIC_PAGEFAULT;=0;=@< =00;=@< =0;= @<  QSORT_BASIC_CURPRIOQSORT_BASIC_IO QSORT_BASIC_CPU QSORT_EXTEND_PAGEFAULT QSORT_EXTEND_IO QSORT_EXTEND_PROCNAME  *[SHEN.SHS011.KIT]SHS_QSORT.OBJ;1+,v./@ 4>-]0123KPWO56^tb7嘗/89G@HJ0QSORT0116-Oct-1995 15:13DEC Fortran V6.3-141P<j$SHS011.Av] [SHEN.SHS011.KIT]SHS_QSORT.OBJ;1"PO[X^(0kͨ0O[X^(0kͨ0V޼W޼ XV1hgPP1hVgZ hQPPPZ@P#jP#PP#PXzPPPnPRP?PCPhP#P#P PPhP:P\LPXPPPPZ$P#NP#vP~PPWP:PtLPXP2PPPh8P#bP#PPPg@ Pf P0x P6 P> P P P\p P# P# P PN PY P P Pf PR Pi Pm Pj P# P#: PB P Pe;P^P8 pP|PPP̟$SHS011.Av] [SHEN.SHS011.KIT]SHS_QSORT.OBJ;1ePZHP#rP#PPPW:P^PP pP|P2PPPh\P#P#PPPgdPP PPPPPZtP#P#PPPWfPP$PP2P PPhP#P#PP,PgPPP6P>PMPQP\P#P#PPPYPP,Pf8PRjPPPj8P#bP#PP&PeP&*[SHEN.SHS011.KIT]SHS_QSORT.OBJ_ALPHA;1+,w.*/@ 4*)R-]0123KPWO+56prɄ7/89G@HJ>>QSORT 16-OCT-1995 15:28DEC Fortran V6.2-508` `$DATA$$BSS$$IODATA$i$$CODE$$LINK$(J8QSORT8JX@QSORT_BASIC_PROCNAME8Jx QSORT_EXTEND_PROCNAME0JQSORT_BASIC_CPU8JQSORT_EXTEND_CPU0J( QSORT_BASIC_IO0J QSORT_EXTEND_IO8JxQSORT_BASIC_CURPRIO8J8QSORT_EXTEND_CURPRIO8JXQSORT_BASIC_PAGEFAULT8JxQSORT_EXTEND_PAGEFAULT8JQSORT_BASIC_PAGE8J0QSORT_EXTEND_PAGEOTS$MOVEOTS$STRCMP_LEQP =p#~0^8^@~HPX޴`hp>x^GGp#~0^8^@~HPX޴`hp>x^G[ GG%GG2 AR"m@G9`B gB 2`JBSB2SBr@ GG(E"@"G@Zk@@G_G9 B 'B@3 JQ?B1qBq@BGBGG" R"GG@Zk!9 @"G9 B 'B@ 8@AG3 J9BQ?B B1qBq@6׀J"BTB4Bt@X"G@ZkB"@"G@Zk"B]"G@ZkAE89@A C =@AHGbGGH}"G_8@AGG @@ <@AH]bH]"GG{_8à (A9 A5 'A 1 I9AI?A A~}@3I))BHA i@(hBh@BGuBGwBGG"R"G@Zk"BI"G@Zk "BH"G@ZkB"]"G@Zkp#~0^8^@~HPX޴`hp>x^GGGGĠ[ G! @! q G9B BEDTBB6JTB4B4A GGDP"$U"G@ZkD d=!@6GG9@ @76Q@ HQ1B @ A8YABG0BGG("TR"GG@Zk79B%GG9 B %B#"@ 8@AGS?B9BSsB1!J B13B1AVB4J$"BVB4B4A$Y"G@ZkB$"$@"G@Zk$"BP]"G@ZkWE99@A 'C =@AHGbGGH}"G_8@AGG @ <@AH]bH]"GGw_|à @9@y @ Q@9@Q1B'H @@S@'@&HSsB'A&@8&A8BGBGBGG("(R"G@ZkP"WB$G"G@Zk$"B$F"G@ZkB$"P]"G@ZkHp#~0^8^@~HPX޴`hp>x^GGG#G[ G! A! _ G9B B4JBVB4B@ GG(E"U"G@Zk3 0=G9@ @1H@@  B@@ AB@79B"G9`B eB 8@AG5`J9@CSB EC`9@KZ_C9:CB3B@@"@"G@ZkB"Y"G@Zk"B]"G@ZkWE 9@A @ 9=@AH=GbGGH}"G_8@AGG @ <@AH]bH]"GG_à (A9 A %AVU 1 I9AI?A ASR@3IHA))B(hB @@"I"G BB@Zk "BH"G@ZkB"]"G@Zkp#~0^8^@~HPX޴`hp>x^GGGGĠ[ GG9 @9#9@c @ T@B HTB @ A GGDP"$@"G@Zkx=7GG9 @ %@  Q?@!!HQ1B!1@!ALA YB@69B%GG9`B eB 8@AGUB9@CUB3aJ EC`X_C:AKXC8XCB3uB3A8A$"$A"G@ZkB$"$X"G@Zk$"BP]"G@ZkVE!9@A '@ 8=@AHGbGGH}"G_8@AGG @4 <@AH]bH]"GG_,à @9@) @ Q@9@Q1B'H @@S@&HSsB'@&@'A&ALP"L$G"G BB@Zk$"B$F"G@ZkB$"P]"G@Zkp#~0^8^@~HPX޴`hp>x^GGGG#`[ GG9 A9#9@a @ 4HB@@ B@ GG(E"@"G@Zk7(=,=!CG9@ @xw 2H@@ @B@`tB aB`69B"G9B Bkj@ 8@AG;נJ9CUB Cfe 1KBXC5uC18B@@"@"G@ZkB"Y"G@Zk"B]"G@ZkVE 9@A @ 9=@AH=GbGGH}"G_8@AGG @ <@AH]bH]"GG_ӈà (A9 A %A21 1 I9AI?A A/.@3IHA))B(hB @@"I"GȢBB BkB@Zk "BH"G@ZkB"]"G@Zk^p#~0^8^@~HPX޴`hp>x^GGGGĠ@[ G! @! i G9B BTBB7JTB4B4A GGDP"$U"G@Zk<pݢt=6@_G9B B RB7JRRB2B2ADH`tB aB`89C%GG9B B@ 8@AG[B9B[{C5J B WBB6J5BWB5A6B6A$"$@"G@ZkB$"$V"G@Zk$"BP]"G@ZkXE 9@A @ 6=@AHݶGbGGH}"G_8@AGG @ <@AH]bH]"GG_à @9@ @ = Q@9@Q1B'H @@S@&HSsB'@&@'A&ADP"H$G"DGHƢBB BB@Zk$"B$F"G@ZkB$"P]"G@Zkp#~0^8^@~HPX޴`hp>x^GGG#G [ G! A! _ G9B BZY4JBWB4B@ GG(E"U"G@Zk3$=G9B BJI1JVB16B@@ AB@89C"G9`B eB?> 8@AG5`J9@CSB EC:9`7@KZ_C7BB3B@@"@"G@ZkB"W"G@Zk"B]"G@ZkXE 9@A @ 7=@AHGbGGH}"G_8@AGG @@ <@AH]bH]"GG_8à (A9 A5 %A 1 I9AI?A A@3IHA))B(hB @@"I"G BB@Zk "BH"G@ZkB"]"G@Zkp#~0^8^@~HPX޴`hp>x^GGGGĠ[ GG9 @9#9@c @ T@B HTB @ A GGDP"$@"G@Zkl=7GG9 @ %@Q?@!!HQ1B!1@!A@A YB@69B%GG9`B eB 8@AGUB9@CUB3aJ EC`X_C:AKXC8XCB3uB3A8A$"$A"G@ZkB$"$X"G@Zk$"BP]"G@ZkVE!9@A '@ 8=@AHGbGGH}"G_8@AGG @ <@AH]bH]"GG_Ӕà @9@ @ts Q@9@Q1B'H @po@S@&HSsB'@&@'A&A@P"@$G"G ByB@Zk$"B$F"G@ZkB$"P]"G@Zklp#~0^8^@~HPX޴`hp>x^GGGG#[ GG9 A9#9@] @:9 4HB@@ B@ GG(E"@"G@Zk4=2G9 @ %@*)1 HA?@!!B@A YB@69B"G9`B eB 8@AG5`J9@CSB EC`8@KZ_C8CB3B@@"A"G@ZkB"X"G@Zk"B]"G@ZkVE!9@A )@ 8=@AHGbGGH}"G_8@AGG @ <@AH]bH]"GG_à (A9 A %A 1 I9AI?A A@3IHA))B(hB @@"I"G BB@Zk "BH"G@ZkB"]"G@Zk0Xz$SHS011.Aw]&[SHEN.SHS011.KIT]SHS_QSORT.OBJ_ALPHA;1*"p#~0^8^@~HPX޴`hp>x^GGGGĠ[ GG9 @9#9@c @ T@B HTB @ A GGDP"$@"G@Zk|=7GG9 @ %@Q?@!!HQ1B!1@!APA YB@69B%GG9`B eB 8@AGUB9@CUB3aJ EC`X_C:AKXC8XCB3uB3A8A$"$A"G@ZkB$"$X"G@Zk$"BP]"G@ZkVE!9@A '@ 8=@AHGbGGH}"G_8@AGG @X <@AH]bH]"GG_Pà @9@M @TS Q@9@Q1B'H @PO@S@&HSsB'@&@'A&APP"P$G"G B5B@Zk$"B$F"G@ZkB$"P]"G@Zk(p#~0^8^@~HPX޴`hp>x^GGGG#[ GG9 A9#9@a @ 4HB@@ B@ GG(E"@"G@Zk78=<=!CG9@ @ 2H@@ @B@`tB aB`69B"G9B B@ 8@AG;נJ9CUB C 1KBXC5uC18B@@"@"G@ZkB"Y"G@Zk"B]"G@ZkVE 9@A @ 9=@AH=GbGGH}"G_8@AGG @ <@AH]bH]"GG_Ӭà (A9 A %A 1 I9AI?A A@3IHA))B(hB @@"I"ȢGBB BB@Zk "BH"G@ZkB"]"G@Zkp#~0^8^@~HPX޴`hp>x^GGGGĠ[ G! @! y G9B BTBB7JTB4B4A GGDP"$U"G@Zk<=ݢ6@_G9B Brq RB7JRRB2B2AT`XtB aB`89C%GG9B Bcb@ 8@AG[B9B[{C5J B]\ WBB6J5BWB5A6B6A$"$@"G@ZkB$"$V"G@Zk$"BP]"G@ZkXE 9@A @ 6=@AݶGbGG}"G_8@AGG @ <@A]b]"GGG~_G0]_!8]@}HPXݤ`hp=x]#kG @9@ @ Q@9@Q1B'H @@S@ =\T&HSsB'@&@'A&ATP"X$G"TƢGXBB BB@Zk$"B$F"G@ZkB$"P]"G@Zk"!"."2"7"D"I"}""BG"""G9@ @"""""""BG$"!"T"d"o"t""""""":">"t""""""""+"1"f"j"""""""0"B"O"U"""""""""P"b"o"u"""""""<"?"x"""""4GOTS$MOVE4@OTS$MOVE44GTOTS$STRCMP_LEQP4P@TOTS$STRCMP_LEQP4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$STRCMP_LEQP4@OTS$STRCMP_LEQP4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4G8OTS$STRCMP_LEQP44@8OTS$STRCMP_LEQP4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$STRCMP_LEQP4@OTS$STRCMP_LEQP4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4@G`OTS$MOVE4\@`OTS$MOVE4`GtOTS$MOVE4p@tOTS$MOVE4xGOTS$MOVE4@OTS$MOVE4\GdOTS$MOVE4`@dOTS$MOVE4hGxOTS$MOVE4t@xOTS$MOVE4xGOTS$MOVE4@OTS$MOVE4 G< OTS$MOVE48 @< OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE 4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G$ OTS$MOVE4 @$ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4X G OTS$MOVE4| @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4 G OTS$MOVE4 @ OTS$MOVE4<GlOTS$MOVE4h@lOTS$MOVE4G0OTS$MOVE4,@0OTS$MOVE40GDOTS$MOVE4@@DOTS$MOVE4HGXOTS$MOVE4T@XOTS$MOVE4DGLOTS$MOVE4H@LOTS$MOVE4PG`OTS$MOVE4\@`OTS$MOVE4`GtOTS$MOVE4p@tOTS$MOVE4G OTS$MOVE4@ OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4lGOTS$MOVE4N2$SHS011.A( 0~C*Ix0B^RV;FaHA;1R@ A1BW)-6q=\U;ɲD_1o3v4B QCiw_Ubʔ&T[e9QNQj_v3ɂlkq2n\ VߧVE7~yFyҥwA>$Byg2>O);J%k WRG4+ZJmYo6?"78s>a5(Rl~\jI;50tq{{/ވ 5 sf21U'WxIua_7b$2xiFw m׏F'c!{=嫾 oi2!n0V?uA+Lkݡ\C ƇORW&ԥ1# bQ&tyO6{wE/>몄c/*dܴ Wp f&8`$i=v &9 " ' 8Aǟ'JOgXi57]t&ZˬrFMC_ ;=~.? 7 x,+ .!jf_ܕ9fhov>WxsMb*=#B7~d.ӎX-I8 FTS/"qL 8 t~IkʊF JKm`sgAD'R7[! pͽXo\ٳ _lb||=r3bkts[2ӻ[֎~pGzUsZ:~KץJzҗ U`+jg UR12 3.ـKǔ!d(*pBr{RM8PIWjQzǷvc4E ;ktվ2cu;V! m r9D6y&'(}ùB$8GOVڲpz(Ԏz2+>0j5z 9JΓH?s9t#`z(gw)?|kJVKIoBºϊanR4%UksNzލ@ ;B6Co/M E48NJGi;|uG|}z_оBZrYRU~]NBެMhU4xg2EyUvp:WkiS΍"nJ?tpcOH2m;j66$᭱ά[7ZҼ3K>]]cf+;Yv"ɄbR~-)nH*geX2Iw60DFөCTC\>+,fv/tS6py<@i}Z/2&S@ B4bEߟ<ڈf$őr]!gZp=9ͷpEZ;>[^V{/  M=)kIӛٳ1b3}a7"zg$c2<\5dw3rשKq +:ؚPI{⪉uBe'7K l4ˑ9^y+وc_b78s#qp3H(VeRf-oL!аP`tGo. aH[Bdlv}&^Va.3G @SMEZa1(pH>:Ƽ|%9%=T#Fz|dQDbYaݢ:S>PϖpLJaei63ܰ'dxcft5Ow!Ѳ@"I*v^,,}~SezcV~|7> Hl(FR#HAꮜ0/EO_zH0*{aE$ɗt懼;leʗ.Y{/(VS6oiиp)RF)O`/wob0VV*TZ%7;%qY-/8rW&%W bzEoj'FDE^w rsi' %Ìe@e%n/RvyJ(MŒ~{ 7"R )"Xn$H~!W9/Ie{z R65T1f_aB.10כi7hs'RKEbXo^_47{8ʆq\fX>4"ǨHlmUwtX7Z6hq>N @X:km o=ؒD`Q/_aI͛7Yce ų2|-ZmHeKӣF,,G5ַǼ?<bwO "?wwq1Y,ȩfCVIKM^gvc9^XXY+.LpWX _>PWvw" ֐[0ZŦ*DUo@>`J|=>FJW?rdn'MJvO,W{?P,D6N D^{EV>q's/M'HȐ9$Cid>l.befCn"k$ٔ{)86@ך%F yԺ:xj0" ;M{m!9wtex\TKj0ܹ{YOٶa)d ǽ|C+Sňs9Rӏ+zPfRKk^%ee#U//WQWe`K8_K˭uA;e8 PGb1紡VA1B[Ѿ<_w}蒅?H#Xmqv?0@jT.P~Q-s%C)ǑĻ_j_؛@6ffgV|B|[EՃS܇6ی :j>_]^!-n*JP}VY}1!$ Xܛt4p eXgөשz"QkE%+3N_PY XZi1*"lr&tn!wU׬# RhkNz?`ai^ˊ4>Ҹ|ZLw0Cy|=a00H>Y`z:ʼ+W#* E.#&vs6!*7Z}zJ]7S]0YgIER[:mx"rp.IdNvr\]ꖟ&J`4ÉPv#C 5^5f+_Dk]nkΪ0yh|oV[, ='i}<4LđkV]颰2[*);@UaAABe~c\Q0Kj9JzWBm98aUBZy(]R 7n@um &S{2r5jԭmRv!lW45O;!mCM<wHssiv+5M",dѾ[.߂1[/鬜m 4"L@`5C_3&7z劬L('=&X7rTvڻI9ue(n9}4k";8p<p.\BQ(tK{XyM/xQi߁܍K3Qj(SZ'Ī=Dw&|Eݤ GUFtv/%Kb/R0%)|-Af+&  w8~Jo<0ȧݬKYi"rPɞ`4=L''f,зӿMe`];1CF1î6a%_5߁9o5Jyb]K ]`$jWǖ*V(a1)y~|UQb^t[a3 |h*o;Ϯ.,+TD4=*{pD183rgS*:Χ(_ a[@46ͨCp;0OxDle NSCu(bª}wj&7Sfڂ/x# $@2G\j.7fi/bO~PvOeMUzt&QU a<%ʏ2i4YTIunc&UU(Goq ?*`fSX*+#gJT0^4C=\+fi8tTN'C 07>J0vU)- < JDx| +_6 _JyE_,Ec3nC ! 5ٙr|w+- Bb;G:uѩv=(hZoXWs΂\Yn2O|gv߬Z|WrĈn<0C +c_U%O<}sTa#CBuG絿o(Uw]’o, 7I? .qj?2/4fGT| GCyG}OPE?.y2=SLE|Ziǎ_D33RxQn9=RT7ܦWŭJ_m *A@%Ц!ߢy{ml`I U@).~xypQP[d+.+ \sI"ť6@I ]kbr0Esra;lj*Y|;rb,po j\5ğCD 1޻Xbr!q_s mq,R"fVU,1:Tct~$pnWP3RÎP;Bىl0h_VYw=+BFvy&ZD5vxtsWxnP#ɾt^6qUNiR,_x[0BKuD1JwHMnkG{| 97u|>CBI։Q3!-4רb_;;9˻;w¢5jUD: .rgF:wt(/փSw,z̏8٥48=qop{7b0Vc tZ }' QeT3S3E3?́itcn30Q2)/йz꿖hoBbbM,]ܡHI@^ӏlmjBQ=4}}A-6@pIe2>z? xF\} Z0AjÍq6DH/3úXNypř8D({4ZiBQE;` AU&ߔ7b&%0YZEc2$LOaȂKP# ԄaJ(] ,H X|^`D淵JԞrvtfdv/g%1=!Z^%-@:rӉN}Z9w_~et_c;ųG@x5|<@O_+gax&UҡjPKBJ;=ڟ!<}; [i@Ռ K &Dl( b4߾{SnGL6D-S[=C\Q2,;I3y.nlWK