BSECHANV1.0 4-NOV-2021 11:20 VSI C V7.4-002  $READONLY$  COPYRIGHTINFO `PACKAGESECURITY H FILESECURITY ACCESSMODE OSSRELCTX SYSPRVMASKUTILITY  CLASSNAMEDSCi[$CODE$ $LITERAL$ $LINK$ $BSS$T$DATA$0  COPYRIGHTINFO0 PACKAGESECURITY0  FILESECURITY  CLIALLFILES0 CLIALLFILES CLICHECK0CLICHECK  CLIDELETE0 CLIDELETE  CLIEXCEPTIONALFILES8CLIEXCEPTIONALFILES  CLIGETUAI0 CLIGETUAI  CLIIDENTIFIERS0CLIIDENTIFIERS CLILOG(CLILOG  CLINONEACE0 CLINONEACE  CLINOPERMIT0 CLINOPERMIT  CLINOSCRIPT0 CLINOSCRIPT  CLIPACKAGE0 CLIPACKAGE  CLIPROGRESS0 CLIPROGRESS  CLIPERMITCONTROL8CLIPERMITCONTROL   CLISETIGNORE0 CLISETIGNORE  CLISETNOIGNORE0CLISETNOIGNORE   CLISETNOBODY0 CLISETNOBODY   CLIPERMITREAD0 CLIPERMITREAD   CLISETSERVER0 CLISETSERVER  CLIPERMITWRITE0 CLIPERMITWRITE  CLIWORLDACCESS0!CLIWORLDACCESS  CLINOWORLDACCESS8"CLINOWORLDACCESS DEBUG(#DEBUG  ODSEXTENDED0$ ODSEXTENDED   WHOLEPACKAGE0% WHOLEPACKAGE   PROGRESSCOUNT0& PROGRESSCOUNT0  ACCESSMODE0  OSSRELCTX0  SYSPRVMASK   HTTPSERVERID0' HTTPSERVERID   HTTPNOBODYID0( HTTPNOBODYID IGNOREID0)IGNOREID OWNERUIC0*OWNERUIC PERMITID0+PERMITID  CLIACLPTR0, CLIACLPTR  CLIASIFPTR0- CLIASIFPTR  CLIFINDPTR0. CLIFINDPTR  CLIOWNERPTR0/ CLIOWNERPTR   CLIPARAM1PTR00 CLIPARAM1PTR   CLIPERMITPTR01 CLIPERMITPTR  CONTROLTFILENAMEPTR82CONTROLTFILENAMEPTR( UTILITY0  CLASSNAMEDSC0J@ CONTROLT8J@W DELETEGLOBALSYMBOL0J SETNOPERMIT0J@0 GETIDENT0J`B GETPARAMETERS0JY GETVMSVERSION(J03 GETUAI0JpQ HTROOTDIR0JX SETGLOBALSYMBOL0J@ FINDFILES 0Jx`+ SETCHECKIGNORE0Jx SETSECURITY0J SETPACKAGE(JPZ STRSAME(J MAIN(J __MAIN 6= =000000 = AXP-BINAXP-BINAXP8= CGI-BINCGI-BINDOCP= EXAMPLEIA64`= INSTALLJAVAp=LOCALx=LOG= RUNTIMESCRATCHSCRIPT=SRC=(STARTUPVAX-BINVAX-BINVAX=WASDOC=X86_64=LOCAL=DOC=0%STARTUPSTARTUPSTARTUPSTARTUPFILE=== =(=0=8=@=H=P=X=H<((IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE))=@2((IDENT=SYSTEM,ACCESS=R+E),(IDENT=*,ACCESS=NONE))= (IDENT=*,ACCESS=NONE)=H<((IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE))(=@2((IDENT=SYSTEM,ACCESS=R+E),(IDENT=*,ACCESS=NONE))`=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)= EXERCISE=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)= HTTP$NOBODY=XL((IDENT=WASD_HTTP_NOBODY,ACCESS=R+W+E+D),(IDENT=*,ACCESS=NONE))HTTP$SERVER`=XI((IDENT=WASD_HTTP_SERVER,ACCESS=R+W+E+D),(IDENT=*,ACCESS=NONE))IA64-BIN=H<((IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE))= IA64-BIN=@2((IDENT=SYSTEM,ACCESS=R+E),(IDENT=*,ACCESS=NONE))8= (IDENT=*,ACCESS=NONE)P=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)= (IDENT=*,ACCESS=NONE)= (IDENT=*,ACCESS=NONE)= (IDENT=*,ACCESS=NONE)= LOG_SERVER=xm((IDENT=WASD_HTTP_SERVER,ACCESS=R+W+E+D),(IDENT=*,ACCESS=NONE))(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)H=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)x= (IDENT=*,ACCESS=NONE)= SCRIPT_LOCAL= (IDENT=*,ACCESS=NONE)=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)=H<((IDENT=WASD_HTTP_SERVER,ACCESS=R+E),(IDENT=*,ACCESS=NONE))(=H<((IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE))h=@2((IDENT=SYSTEM,ACCESS=R+E),(IDENT=*,ACCESS=NONE))= (IDENT=*,ACCESS=NONE)=8-(DEFAULT_PROTECTION,S:RWED,O:RWED,G:RE,W:RE)= X86_64-BIN=H<((IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE))8= X86_64-BINH=@2((IDENT=SYSTEM,ACCESS=R+E),(IDENT=*,ACCESS=NONE))= (IDENT=*,ACCESS=NONE)= SERVER-LOGIN.COM=H<((IDENT=WASD_HTTP_SERVER,ACCESS=R+E),(IDENT=*,ACCESS=NONE))= NOBODY-LOGIN.COM=H<((IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE))H="WASD_ROOT:[000000]*.COM;* h=0&WASD_ROOT:[000000]WASD_FILE_DEV.COM;*=0#WASD_ROOT:[HTTP$SERVER]LOGIN.COM;*= SERVER-LOGIN.COM=0#WASD_ROOT:[HTTP$NOBODY]LOGIN.COM;*= NOBODY-LOGIN.COM =(WASD_ROOT:[AXP]HTTPD.EXE;*0 =(WASD_ROOT:[AXP]HTTPD_SSL.EXE;*P =(WASD_ROOT:[VAX]HTTPD.EXE;*p =(WASD_ROOT:[VAX]HTTPD_SSL.EXE;* = SYS$OUTPUT = WASD_ROOT = LNM$FILE_DEV =((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W)) =((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=SYSTEM,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))x =pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W)) =((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W)) =((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=SYSTEM,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W)) =((IDENT=WASD_HTTP_NOBODY,ACCESS=R+W+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+W+E+D),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))`=((IDENT=WASD_HTTP_SERVER,ACCESS=R+W+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_SERVER,OPTIONS=DEFAULT,ACCESS=R+W+E+D),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))(=((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=SYSTEM,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))H=pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=((IDENT=WASD_HTTP_SERVER,ACCESS=R+W+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_SERVER,OPTIONS=DEFAULT,ACCESS=R+W+E+D),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))H=(((IDENT=WASD_HTTP_SERVER,ACCESS=R+E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+W+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_SERVER,OPTIONS=DEFAULT,ACCESS=R),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+W+E+D),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))h=pb((IDENT=WASD_HTTP_SERVER,ACCESS=R),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+W+E+D),(IDENT=*,ACCESS=NONE)) =pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))8=pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=((IDENT=WASD_HTTP_SERVER,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_SERVER,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))`=((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))@=((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=SYSTEM,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=pe((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))=((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=WASD_HTTP_NOBODY,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))`=((IDENT=WASD_HTTP_SERVER,ACCESS=E),(IDENT=WASD_HTTP_NOBODY,ACCESS=R+E),(IDENT=*,ACCESS=NONE),(IDENT=SYSTEM,OPTIONS=DEFAULT,ACCESS=R+E),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W))8=me((IDENT=*,ACCESS=NONE),(IDENT=*,OPTIONS=DEFAULT,ACCESS=NONE),(DEFAULT_PROTECTION,S:RWED,O:RWED,G,W)) =Copyright (C) 2002-2021 Mark G.Daniel This program, comes with ABSOLUTELY NO WARRANTY. This is free software, and you are welcome to redistribute it under the conditions of the GNU GENERAL PUBLIC LICENSE, version 2. E 464=  6 4 4X4= 6(4 44= 604x 44=684 44= 6@4 4(4= 6H4`4= 6P44= 644= 64 44=6P4`4`4=64(44= 6444= 6X4484=6`4P4= 6h4H44=6p444=6x444=6444=644H4= 64H4h4=644x4=64844=644= 6444=64`4(4= 64@4h4= 6444=644= 6444= 684`4H4= 64844=6464=6464=6  iH44h444444 440 44P 44p 446  $=  $=  9=6  '=SECHAN <=4  =#G8^~ _#0"@^4GHcGG#]("8[@b "G@Zk(=0xb#@ӸBG4Gb@ZkcG8]@]HP#k///#4G@" ^~@[(^0~8@GGHb@ZkX4G00B4GGGG8bP"@Zk// b#////G@P"0b#G""/+/// @P"4G0b#G D"(" @P"4GG D0b#B"" @4G DB4G=/ G ](]0}8@P#k///PB"0b#"4G @P("4G0b#" @P"4G0b#" @Ӹ4G0b#0.0J" / @Ӱ=TG`pBxb0X"/ @Zk/x"4Gb0B!C DF/ 2Pbs"c"ղ"G0b#P/PK//g @cp"4Gx!D0C]@Gb#<@pb#f@Zp0b`" `b#c`D bc $m@Gb#V@#/ ///b#c GJ@#/?P""b#C@@bh""tG`"BbcDCLB`D//@Zk,//@BG4GHb@Zk@B("4GHb@Zk" b# @@BG4GHb@Zk@B4G4GHb/@Zk@BG4GHb@Zk@B&4GHbH"/@Zk@BG4GHb@Zk@B4G4GHb@Zk/#;G^~tG^~޴[>^~޵ (G$GGb !"@Zk0(b#/@Ӏ" @]"G8D!//3aB! R"/"B#"G<=9?K7G<=8]'///1""/?<]GxBa1 H"G#4Gb_F<]4JFݲFFݲ04$}@Zk= ?" }"\=`=l}p=+xBG4Gb4}b@Zk<cDX}"GFFX <0â/4Bc Ӳs"â/_'&="Ӳ`=:G`=X=0DX=\== d=hB0GG"tGpb@ZkeT="P `0@A.RAJA>T}P3uBtB//ݢ 0JB6/Y6K6?}]0`K @C@dBB`h2"GGb}"@ZkbxB "GGbtG¥@ZkG//b}!]!¤0TG"PG""pb#eB`.WJ>TP=8CLCT@4G-/D=L=1D/' //= ""pb#0 HBA.RAJA>}0J%eB@G6@//4G /==1D/ GG""Gpb#%@TD$B"BGGb H2"G/@Zk⤨"""TGBb!?@0@ @3C D2DD/! tN$H6CDVBVB6@@ZkÁ$HBGx""0CtGbDPBPBPB @@ZkBTG""b@Zk⤰"Gb#/////@"GGBtGb(!"/@ZkBP""]"btG,HC5@D//`@Zk/B`P""]"tGb/@Zk//("G"p4GGGGb#)DD/////@ӰPb"G8S4GHPbStGG"/hbSGG"b#@8`D"GGGGb#"///@ /u"t"F . J3F ///""FG@B8`D3]xBH"#bGD4G GG@ZkXB`AGGGtG`b@ZkBBGG4G R"@ZkxBGb@ZkXBG@GGtG`b!/@ZkBBGGR"@Zk,@ H<'/.." H!GxB4G DJVJbF8JGG!HG=/@ZkXB @AGGGtG`b !@ZkBB"GG@Zk ,GH <G"GG"b#G@ H⤸b&s"S"3D/q . JF//¦""F G@"H#8`DxB1=4GbGEGG@ZkXB `AGGGtG`b@ZkBBGG4G!xR"@ZkxBGb@ZkXBG AGGtG`b! /@ZkBBG4GPR"@Zk! ,@H! <'/..  =" H"GxB4GEJVJbF8JGG!HG=/@ZkXB @AGGGtG`b@ZkBBGG8R"@Zk,GH<G"GG"b#G @X⤸ 8`D"GGGG" ///Gp""GGGb#@"Gb# E@=øG"b#/@B G('"GbtG@Zk/(G"G b#/_@//`G"Gg/%!G ///&"GG"lEb#@xBG"GtGb/@ZkGBGtGb(" @Zk$ʂ eD4DGG]]}ݤ=]}ݥ (0#/k///BtGb B G@ZkB&4Gb"@Zk/#;GG^~G^ ~(08޴@[HP>X^`~hpxGGGG@:"#GGGG[b@ZkpBG4Gxb@ZkGB$vH"b*J!1?J$Fh *j0BGG">G4G"G8b@Zk'B GtGBb 2"G@Zk0B "gG>GG"GG8b@Zk'B GGBb p2"GF@ZkOG$RHBbD?DRB0JG8"@GG@Zk E E B>8"GGGG"G(b/@Zk" GGBtGb!"/@Zk B//7GP">GG"GG(b@Zk" GGBtGb!"@Zk/È0BGG>GG"8bGe/@ZkG]G] }(08ݤ@HP=X]`}hpx#k/GGBbB!G@ZkBG4Gb@ZkBGGbB G@ZkBG4Gb@Zk//#x;G^~G^ ~(0"8޴@[HP>X^`~hpxG>GG:"G[b@Zkx"x¤"!1!'H'H&@FF G G/G&_"Pb#@)!0@xBq@bBH(BG""Gbh@Zk, GHH$///XD E/ .)! JCUBPF/i.)!iJCUgBF/ `.)!JCUBG/)/)!)K - I/ GB GtGbX""Ƥ DG !@Zkx"DG A!D%///.xB4G"bJTJCB BSFPFJ//@Zk*,xB "G4GbA0H'H@ZkD/*,J!)!*H?*.*JƤ@I.IJ&H+A %EH3CD&EG///G ""¦Bw@GbGWBw@Zk BG(bʠ*!A// + GC5@U@F DD1&.&J% ///.xB4G #bJWJCeBkBJFF`//@Zk&,xB" G4GbA0H'H@ZkE/&, !&H?&.&JL.LJՅAA lFɠ0@)!x¦B!w@WBGw""Gb@Zk,Gx"HHi!6W)!DD @iA/QFu H, . TJk!iAF>.J CBBhJGzGG,FHD<-k!iAI C%@+@u+HFDF/.TJFk!>.JK/ZKKK?g@G@XD&GG"=lp"D// 8D Gj!("!/H///+,(""B4G C5 @U @QF!FTG2DBXR"0 F/@ZkXB GG`b@Zk8BAGGGtG@b@Zk.-"% ,4JGPb#JtJPJI>@He.E."EuFTFHJvJwFVFe>E>_"@/ˠ 0 Ak!i)AI*A"a"b#GG(b!!? 4vH@ɠ]!!bXB4G`bC)(I[%+FT:!}!GG@Zk8BAGGGtG@b &!@ZkBB"GGTG/@Zk f-HB"GPbKiI f=@ZkHB"GTGPb/@ZkBhBG4Gpb@Zk G5@*v@IǠ =ǠG=GGGGb#7@G]]4G }(08ݤ@HP=X]`}hpx#k/"GBbBf) "G@ZkB&4Gb"@Zk,G HE%///BGb/@ZkB4Gb@Zk//p#;G ^~x[#(^0~8@H޴PX`>h^p~xGGG#FGGGGGGG8B]B~@b2"G@ZkBG4Gb/@ZkG """$vHb"8BDGG)!G@b1?J$F)i 8"G@Zk4G///"G""8B@btG//@Zk "GGXB("Gx"H`b@Zk(BGtG8B@b 2"G@Zk "XBHG"GG`"`b/@ZkȠBGtG"8B@b2"G@Zk///ݠ ""XBHGG`bGH"@ZkȠBGtG"8B@b2"G@ZkXBO,G"GG`bH ¤FHG"G/@Zk(B GtG8B@b 2"G@Zk///}@bk!,H/DD/$'. 'JC%BqF/ . JCBF/. JCB7G/ G/ GKCEC:D/ G- GIg.gJ/YG1"/< ///. J/SGDה"/. JN"/(', 'HK! // G- GIGG /'. 'JC1"// / K?Gה"/g/ gK;G"/$G/GK, ///8%DD/$ , HC5@F/'. 'JC5%BG/ . JC5BtG/ . JC5BPG/G- GI?g.$ gJC8K@ @ vHG '/'K8%G/* ///. DJ8F . J 8EE/@', 'H8%D . J8eF`'. 'J8%F/ / K8G'/ 'K8FH @8BC"" C$G@b@ZkB "(&"]"GGGb@ZkH" GG8B tG@b@!"@@ZkK0)0"XBGGGG"`bG*GI!?HGI*v@I*D0)@Zk" GG8B tG@b!"@Zk_/hBGGGG"pbGe/@ZkG/¤hBGGGG"pbGf/@ZkGG ](]0}8@HݤPX`=h]p}x#k/"GG8B@bPB!"@ZkBG4Gb@Zk¤GG8B@bPB "@ZkBG4Gb@Zk¤GG8B@bPBƠ "G@ZkBG4Gb@Zk"GG8B@bPB`!"/@ZkBG4Gb@Zk'.Q 'JqF//.T JFg/[ gKF.P J0DG.R GJRE.U J5F.T JG.W JwG G8B$@b4vJPBG !G@ZkBG4Gb@Zk8BGG @bPBG@ZkBG4Gb/@Zk///p#;GG^~ ^(~08@޴H[PX>`^h~px޵GGGG:"#G8[@b/@ZkB//G4Gb@ZkG "(¤"$vHB(bL!!HGX)!02_JDF0DLlChBGG"~GG"Gpb@Zk%BGtG8B @b 2"G@ZkhBH"LG~GG"GGpb@Zk%BGG8B @b p2"GF@Zk4eG8B RJ0J@bDFGQ?@1Aѡ`G>8"޵@ZkE&XB ~G`"GGG"G`b@Zk%BGtG8B @b 2"G@Zk4G ¤GhBGG"GpbGf@E/~//@ZkG[/ "4G@ Bb(vI"' $ !@Zk B vHGGG]"GbG$HD @ZkG8BG @btG¥@!G@Zk)V(Ǡ)'I&H'I)v ID(ǰXB~G( !GGG"GG`b/@ZkG8BG @btG G@Zk///E¥hB  /=G~GG"GpbGn@ZkGG] ](}08@ݤHPX=`]h}pxݥ#/k/// BGG8B@bPBJ!G@ZkBG4Gb@Zk GB8B$@b4vJPBGG J!G@ZkBG4Gb@Zk"8BGG @bPBG@ZkBG4Gb/@Zk///(#0;tG^~ [^ ~(08GG:"GG^Gp[xb@ZkXBG4Gb`/@ZkXB0B vHtG8b2"1?J F2GG@Zk(" BGG0pBxb!h2"G d/@ZkX"GG B(bG@"GD///@Zk("0"GtG BpBxb!H2"G @Zk "0GpBxbGB!"@ZkG]G] }(08@#/k/// "0GGpBxbB!"@ZkBG4Gb@Zk/#?&_&{"^~?$R" ^(~tG! 08GG@[G# }#=8"]G}b"B1= }}b h""@ZkG"b#@H"b#@8"b#@ "b#@"b#@"b#@`,H////.B4G$"bPJJ/@Zk.qHPJ F>D.DJ_$@h⦐B5J$vHF}7"G w"]"GGGb@Zk8//"8= 8"0@x  "G0=C$HHCF+/R/v.$1@C$1@RKSvJR"uVK"BFuFC$1@v>/6.KR"sKQ6J"BFC3F6> .6.JQ6JR"sJ"BG3F6> .B! #GUJ> 7JJCF;`//V/F71BC71BKZVK9#`VJ"B3F@GV?) y/V.C71ByKRVJ9#uK"BTGUFC71BV>y.,yJ9#r6J@H"BFDC< Y/,YK@H9#qJ"B[FD<_B8=9,""@BA9Hb9<V.9HtGsJRVJSFV>8]"/@Zk88}= G8]"xFFC/.eBR"BJR" /BKBR"R/CRKB8x88""F" /UB5@yJXF@,t."@HtJ! 5@UgBCDwaJG<F/ !.T."Q!JTJ! 7FG!>_4/4K5@Cq!KF,@HD<! "t.5@tJC`AJwG.VJF! ">G/G01B. T/TKT`//eB5@FxaJFK. D"VJ! 5@F>4/4K%CCx!KWFrG/9@.VJF"! 5@>T/TK@CxH[FF/)@.VJF>4/"! 4K%C5@CWFv!KrG/@a."SaJ! 5@vFa>/KCCvK[FF/ @a.SaJvFa>4/"! 4Kt/5@x!JtKCB@.VJ! F>4/4K4K//+GF/_5@/z!K D"XK! G?t.tJkF_5@}/yaJXKG"! ?T/TKs_KGq5@o_a.vAKSaJ"! vFa>/Ke Gc5@a,sK@HD"! <.JWFU?5@S,rJ@H"! D<t.tJ?HXB/5@X"BKC@F:/.qAKF" DPJ! 5@F>v.vJ"CqaJD&.PJF>/K! 5@"CpK;G/ ,@HD! 5@<6.6J"C`!JF !/Y!K G!?.JC! 5@G.J/4/// @5@FpH1G"/( / DXK! 5@G?t.tJ"kBCpaJ;GF,@HD<T.TJ! 5@"KBC`AJzGF.WJF>.J! b.bJ5@"C[G/<@///!/qaJF" DY!K! 5@1G!?,H"CqHxG&A.RAJQFA>v.vJ! 5@"CxaJ0G/a/[aKxG! 5@a?,H"CpHZF @!/Y!K0G!?v.vJC! 5@G5@8"@BR.0btGBbPJ>1]"/ 3"@ZkBG`c"]"Gb@Zk0=@b Pb#GC@@GHb Pb#G=@8=">8b Pb#G7@? ="Pb#G1@ ="=b Pb#G+@=0b Pb#Gc G#@  t?=;G] ](}04G8@#k/ B$4G(bD@Zk B"4G(b@Zk B"4G(b/@Zk BG4G(b@Zk BG4G(b@Zk BG4G(b/@Zk BG4G(b@Zk BG4G(b@Zk BG4G(b/@Zk BG4G(b@Zk//;#[tG^~^ ~1[(GG# ]8;"b@Zk"G"BBba R0"":`/@Zk7//b BGGGGG(bc c"G@Zk"1pB "GGxbG1"xD@Zk*`"(c PBG#_"G~tGGGGXb>~ (1vH/@Zk///G]] }(0#/k///BG4Gb@ZkBG4Gb@ZkBG4Gb@Zk/`#h;?&TG^~1" ^(~08! @޴HPX>`^h~px޵G{G{B> > "b@ZkxB4G"b@ZkbBG"]"GGbPs"@Zkbh$vHB  ,A H <$.D"Q2J'JGb¥ 4G".JVJeF`>""//yHXKGbGtG?C /@B//@Zk,H/(///'"/ $,A0H'HA1@!!D/ //D.B4Gd"bRSJGJ/@Zk///,EH <$,$H/?$.$J%BG@d.dJN`///"/ .VJJVB֢F/> //$/bD#Y:KB'K4G/@Zk1,H%DX$D,/  %/D.$"QJ/@///XDF"@.JXF1".$/J1"zJY$K :G$?q/qK/_.PJ>1,1HC!B.Jd/dK"WvKJ[dKd?B ""GtGb/@Zk,H/OG""@b#G@9.GJJ/,///F D/$a.! aJCgBF/`.! JCBG/!/! !KC'CyG/ ,! HC@D/!.! !J.bJC4@3 GGh""@b#@///HGG""@b#@6.GJJ*/F D/$a.! aJCgBF/`.! JCBG/!/! !KC'CyG/ ,! HC@D/!.! !J.bJC4@3G_"@""@b#s@///XHGGH""@b#g@N쳮//G_"""@b#[@CGGX""@b#S@///@HGG""@b#G@KH//GGx""@b#;@6.GJJ*/F D/$a.! aJCgBF/`.! JCBG/!/! !KC'CyG/ ,! HC@D/!.! !J.bJC4@3PGG""@b#@///0HDG""@b#G@//G9/G_"(""@b#@///(H,GG0""@b#@G!/GG""@b#@G/GG""@b#@G /(G0""@b#G@//G/GG ""@b#@///HGG""@b#@6.GJJ*/F D/$a.! aJCgBF/`.! JCBG/!/! !KC'CyG/ ,! HC@D/!.! !J.8bJC4@3GG""@b#c@KGG""@b#[@6.GJJ*/F D/$a.! aJCgBF/`.! JCBG/!/! !KC'CyG/ ,! HC@D/!.! !J.JC4@/q/GG`""@b#@:.GJJ*/F D/$a.! aJCgBF/`.! JCBG/!/! !KC'CyG/ ,! HC@D/!.! !J.bSJC4@/3///GG""@b#@///xH$GG""@b#@M//GG""@b#@G  LO= | /GGp""@b#@L//GG""@b#@"0@""GG@b#@G/GGH""@b#@///H(,0H%D= //L а/B(!B! GbBx4!t"XG@ZkGGb#@ /G] ](}08@ݤHPX=`]h}pxݥ#k/xBG4Gb@ZkxBG4Gb@ZkxB4G4Gb@Zk "G BGbBH)!G@ZkxB&4Gb"/@ZkBGG bB G@ZkxB&4Gb"@Zk///#0;"^~TG^ GG@[Hb@Zk( BGG(bG "@""@Zk""tGB@B!2"CHb /@Zk//G-/¦tG@BHbx6x6"V"!v H!BH""a.SaJa>//@ZkTG4Gx!vH @ a. "!""xJrTK!# @SpJ a>.a"WJGF#>.PJF>.w9JVJFGzJ "@>.TJF>!B0`F%/. DJF'A.! AJKF"@.! JF/a/! aKF.! JF! 1@ @/ ///a.aJKF/@!  @/_ @//a/aK!#FF @".JFF@"@ @ABU`TG/C///a/ DaKuBBsJ5GF.WJFG! #>A/AKuBՅBsJ9F/6 .PJF>.! #JuBBpJ[G)@8.Q8J0F! #8>a.aJukBeBpxJFX/ZXKPG! #2@X?? @///!/!KuBՅBzJFx.SxJzF! # @x>.J@"x+FUJ .!Ks!KPJFF>>B//%FG#vAKC A.RAJ! VFA>.J0///.yJG# DWJ! F>8.8J# a/s!J[aK! sGa?.J#.yJWJ! F>X.XJ @a.zAJSaJ#! zFa>x/xK/.WJ>G]] 0#k//B"4Gb@Zk///;#[tG~^[1^~ GGG Gb "@ZkpBG4Gxb`/@ZkB vH TG(b2"0JFG]]} "0#k/[#;G~^G0[R^~ (0GGGG!"@G8b@ZkBG4Gbe/@Zk%B vHGb4G!?H D%/@Zk vH %"(btGE"0JFG]]}" (0@#k///#;TG^~[h!"^ GG#b/@Zkb0BGGGGG8bGs"@Zkp"%"GBbh1 J0JHJ@@@B@"]pFp ""}hA"/@ZkG]] 0#/k///BG4Gb@Zk///P{#H;G~^GX^~ (0޴8@GGGGG`GG@!"b@ZkC//G///#,(B4G"0b#Hc /# $.$J  c.StJgJ@Zk$,(BG4G0bA$H'H@ZkD//%1@C4G /G //G//.J@G]]} (0ݤ8@P#k4? HG d DECC$MAIN4@ Lb# DECC$MAIN4? `@ d DECC$MAIN4 tG DECC$EXIT4 b# DECC$EXIT4 @ DECC$EXIT49 G DECC$GETENV4: b#  DECC$GETENV49 @ DECC$GETENV4; G  SYS$SETPRV4< b#  SYS$SETPRV4; @  SYS$SETPRV4= G  DECC$FPUTS4> b#  DECC$FPUTS4= @  DECC$FPUTS4 HG tDECC$GXFPRINTF 4 Lb#  DECC$GXFPRINTF4 p@ tDECC$GXFPRINTF4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G ( DECC$EXIT4 b#  DECC$EXIT4 $@ ( DECC$EXIT4 (G < DECC$EXIT4 4b#  DECC$EXIT4 8@ < DECC$EXIT4 tG DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 |G  DECC$STRLEN4 b#  DECC$STRLEN4 @  DECC$STRLEN4 G  DECC$STRLEN4 b#  DECC$STRLEN4 @  DECC$STRLEN4 G  SYS$PARSE4 b#  SYS$PARSE4 @  SYS$PARSE4 @G dDECC$GXFPRINTF4 Xb# DECC$GXFPRINTF4 `@ dDECC$GXFPRINTF4 hG  SYS$SEARCH4 |b#  SYS$SEARCH4 @  SYS$SEARCH4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4  G l DECC$GXFPRINTF4  b# DECC$GXFPRINTF4 h @ l DECC$GXFPRINTF4 t G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4  G $ DECC$GXFPRINTF4  b# DECC$GXFPRINTF4 @ $ DECC$GXFPRINTF4 ( G h DECC$GXFPRINTF4 8 b# DECC$GXFPRINTF4 d @ h DECC$GXFPRINTF4 p G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4  G < DECC$STRLEN4 b#  DECC$STRLEN4 8 @ < DECC$STRLEN4 < G \ DECC$MEMCPY4 T b#  DECC$MEMCPY4 X @ \ DECC$MEMCPY4 ` G | OTS$MOVE4 x @ | OTS$MOVE4 | G DECC$STRLEN4 b#  DECC$STRLEN4 @ DECC$STRLEN4 G DECC$MEMCPY4 b#  DECC$MEMCPY 4 @ DECC$MEMCPY4 G OTS$MOVE4 @ OTS$MOVE4 G 4 DECC$STRLEN4 b#  DECC$STRLEN4 0@ 4 DECC$STRLEN4 4G X DECC$MEMCPY4 Lb#  DECC$MEMCPY4 T@ X DECC$MEMCPY4 XG lOTS$MOVE4 h@ lOTS$MOVE4 G , DECC$STRLEN4 b#  DECC$STRLEN4 (@ , DECC$STRLEN4 ,G L DECC$MEMCPY4 Db#  DECC$MEMCPY4 H@ L DECC$MEMCPY4 PG lOTS$MOVE4 h@ lOTS$MOVE4 lG | DECC$STRLEN4 tb#  DECC$STRLEN4 x@ | DECC$STRLEN4 |G  DECC$MEMCPY4 b#  DECC$MEMCPY4 @  DECC$MEMCPY4 G OTS$MOVE4 @ OTS$MOVE4 G $ DECC$STRLEN4 b#  DECC$STRLEN4 @ $ DECC$STRLEN4 $G D DECC$MEMCPY4 <b#  DECC$MEMCPY4 @@ D DECC$MEMCPY4 HG \OTS$MOVE4 X@ \OTS$MOVE4 8G \DECC$GXFPRINTF4 Lb# DECC$GXFPRINTF4 X@ \DECC$GXFPRINTF4 G $ SYS$SEARCH4 b#  SYS$SEARCH4 @ $ SYS$SEARCH4 8G XDECC$GXFPRINTF4 Db# DECC$GXFPRINTF4 T@ XDECC$GXFPRINTF4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G  DECC$STRLEN4 b#  DECC$STRLEN4 @  DECC$STRLEN< G ,SYS$GET_SECURITY< $b# SYS$GET_SECURITY< (@ ,SYS$GET_SECURITY4 <G XDECC$GXFPRINTF4 Db# DECC$GXFPRINTF4 T@ XDECC$GXFPRINTF< XG SYS$GET_SECURITY< b# SYS$GET_SECURITY< @ SYS$GET_SECURITY4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G $DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ $DECC$GXFPRINTF< 4G dSYS$SET_SECURITY< Xb# SYS$SET_SECURITY< `@ dSYS$SET_SECURITY4 tG DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF < G SYS$SET_SECURITY< b# SYS$SET_SECURITY< @ SYS$SET_SECURITY4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF< G 4SYS$GET_SECURITY< b# SYS$GET_SECURITY< 0@ 4SYS$GET_SECURITY4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G  DECC$EXIT4 b#  DECC$EXIT4 @  DECC$EXIT4 xG DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 G DDECC$GXFPRINTF4 4b# DECC$GXFPRINTF4 @@ DDECC$GXFPRINTF4 G 4 DECC$MEMCMP4 b#  DECC$MEMCMP4 0@ 4 DECC$MEMCMP4 dG  DECC$TOUPPER4 pb#  DECC$TOUPPER4 @  DECC$TOUPPER4 G  DECC$TOUPPER4 b#  DECC$TOUPPER4 @  DECC$TOUPPER4 DG lDECC$GXFPRINTF4 Pb# DECC$GXFPRINTF4 h@ lDECC$GXFPRINTF4 G  DECC$TOUPPER4 b#  DECC$TOUPPER4 @  DECC$TOUPPER4 G 8 DECC$TOUPPER4 (b#  DECC$TOUPPER4 4@ 8 DECC$TOUPPER4 G DECC$GXFPRINTF4 b# DECC$GXFPRINTF4 @ DECC$GXFPRINTF4 `G OTS$MOVE4 @ OTS$MOVE4 G  DECC$STRLEN4 b#  DECC$STRLEN4 @  DECC$STRLEN4 G  DECC$MEMCPY4 b#  DECC$MEMCPY4 @  DECC$MEMCPY4 G  DECC$STRLEN4 b#  DECC$STRLEN4 @  DECC$STRLEN4 G  DECC$MEMCPY4 b#  DECC$MEMCPY4 @  DECC$MEMCPY4 G 4OTS$MOVE4 0@ 4OTS$MOVE4 8G T DECC$FOPEN4 Db#  DECC$FOPEN4 P@ T DECC$FOPEN4 TG t DECC$FOPEN4 hb#  DECC$FOPEN4 p@ t DECC$FOPEN4 xG  DECC$FCLOSE4 b#  DECC$FCLOSE4 @  DECC$FCLOSE4 , G L DECC$GXFPRINTF4 0 b# DECC$GXFPRINTF4 H @ L DECC$GXFPRINTF4 L G d DECC$EXIT 4 X b#  DECC$EXIT4 ` @ d DECC$EXITD G CMA$TIS_VMSERRNO_GET_ADDRD b# CMA$TIS_VMSERRNO_GET_ADDRD @ CMA$TIS_VMSERRNO_GET_ADDR4 G DECC$EXIT4 b#  DECC$EXIT4 @ DECC$EXIT4 8!G h!DECC$GXFPRINTF4 X!b# xDECC$GXFPRINTF4 d!@ h!DECC$GXFPRINTF4 h!G ! DECC$STRLEN4 x!b# x DECC$STRLEN4 !@ ! DECC$STRLEN4 !G !DECC$GXFPRINTF4 !b# xDECC$GXFPRINTF4 !@ !DECC$GXFPRINTF4 "G 4"DECC$GXFPRINTF4 "b# xDECC$GXFPRINTF4 0"@ 4"DECC$GXFPRINTF< D"G t"SYS$SET_SECURITY< l"b# xSYS$SET_SECURITY< p"@ t"SYS$SET_SECURITY4 "G "DECC$GXFPRINTF4 "b# xDECC$GXFPRINTF4 "@ "DECC$GXFPRINTF< "G "SYS$SET_SECURITY< "b# xSYS$SET_SECURITY< "@ "SYS$SET_SECURITY4 "G #DECC$GXFPRINTF4 "b# xDECC$GXFPRINTF4 #@ #DECC$GXFPRINTF< 0#G X#SYS$SET_SECURITY< @#b# xSYS$SET_SECURITY< T#@ X#SYS$SET_SECURITY4 l#G #DECC$GXFPRINTF4 p#b# xDECC$GXFPRINTF4 #@ #DECC$GXFPRINTF< #G #SYS$SET_SECURITY< #b# xSYS$SET_SECURITY< #@ #SYS$SET_SECURITY4 #G $DECC$GXFPRINTF4 #b# xDECC$GXFPRINTF4 $@ $DECC$GXFPRINTF4 'G 'DECC$GXFPRINTF4 'b# xDECC$GXFPRINTF4 '@ 'DECC$GXFPRINTF4 'G ' SYS$PARSE_ACL4 'b# x SYS$PARSE_ACL4 '@ ' SYS$PARSE_ACL4 'G (DECC$GXFPRINTF4 'b# xDECC$GXFPRINTF4 (@ (DECC$GXFPRINTF< (G X(SYS$SET_SECURITY< 0(b# xSYS$SET_SECURITY< T(@ X(SYS$SET_SECURITY4 h(G (DECC$GXFPRINTF4 t(b# xDECC$GXFPRINTF4 (@ (DECC$GXFPRINTF< (G (SYS$GET_SECURITY< (b# xSYS$GET_SECURITY< (@ (SYS$GET_SECURITY< (G )SYS$GET_SECURITY< (b# xSYS$GET_SECURITY< )@ )SYS$GET_SECURITY4 `)G x)DECC$GXFPRINTF4 d)b# xDECC$GXFPRINTF4 t)@ x)DECC$GXFPRINTF4 x)G ) DECC$EXIT4 )b# x DECC$EXIT4 )@ ) DECC$EXIT4 )G )DECC$GXFPRINTF4 )b# xDECC$GXFPRINTF4 )@ )DECC$GXFPRINTF 4 )G ) DECC$EXIT4 )b# x DECC$EXIT4 )@ ) DECC$EXIT4 )G )DECC$GXFPRINTF4 )b# xDECC$GXFPRINTF4 )@ )DECC$GXFPRINTF4 )G * DECC$EXIT4 *b# x DECC$EXIT4 *@ * DECC$EXIT4 *G 4*DECC$GXFPRINTF4 *b# xDECC$GXFPRINTF4 0*@ 4*DECC$GXFPRINTF4 4*G H* DECC$EXIT4 @*b# x DECC$EXIT4 D*@ H* DECC$EXIT4 *G +DECC$GXFPRINTF4 *b# xDECC$GXFPRINTF4 +@ +DECC$GXFPRINTF4 +G + DECC$EXIT4 +b# x DECC$EXIT4 +@ + DECC$EXIT4 +G <+DECC$GXFPRINTF4 ,+b# xDECC$GXFPRINTF4 8+@ <+DECC$GXFPRINTF4 <+G T+ DECC$EXIT4 H+b# x DECC$EXIT4 P+@ T+ DECC$EXIT4 +G +DECC$GXFPRINTF4 +b# xDECC$GXFPRINTF4 +@ +DECC$GXFPRINTF4 +G , DECC$STRLEN4 ,b# x DECC$STRLEN4 ,@ , DECC$STRLEN< p,G ,SYS$GET_SECURITY< ,b# xSYS$GET_SECURITY< ,@ ,SYS$GET_SECURITY4 ,G ,DECC$GXFPRINTF4 ,b# xDECC$GXFPRINTF4 ,@ ,DECC$GXFPRINTF< ,G ,SYS$GET_SECURITY< ,b# xSYS$GET_SECURITY< ,@ ,SYS$GET_SECURITY4 -G ,-DECC$GXFPRINTF4 -b# xDECC$GXFPRINTF4 (-@ ,-DECC$GXFPRINTF4 D-G -DECC$GXFPRINTF4 T-b# xDECC$GXFPRINTF4 -@ -DECC$GXFPRINTF< -G -SYS$SET_SECURITY< -b# xSYS$SET_SECURITY< -@ -SYS$SET_SECURITY4 -G -DECC$GXFPRINTF4 -b# xDECC$GXFPRINTF4 -@ -DECC$GXFPRINTF< .G T.SYS$GET_SECURITY< $.b# xSYS$GET_SECURITY< P.@ T.SYS$GET_SECURITY4 p.G . DECC$STRLEN4 t.b# x DECC$STRLEN4 .@ . DECC$STRLEN4 .G . SYS$PARSE_ACL4 .b# x SYS$PARSE_ACL4 .@ . SYS$PARSE_ACL4 .G .DECC$GXFPRINTF4 .b# xDECC$GXFPRINTF4 .@ .DECC$GXFPRINTF< /G T/SYS$SET_SECURITY< H/b# xSYS$SET_SECURITY< P/@ T/SYS$SET_SECURITY4 \/G /DECC$GXFPRINTF4 h/b# xDECC$GXFPRINTF4 /@ /DECC$GXFPRINTF< /G /SYS$GET_SECURITY< /b# xSYS$GET_SECURITY< /@ /SYS$GET_SECURITY 4 00G H0DECC$GXFPRINTF4 40b# xDECC$GXFPRINTF4 D0@ H0DECC$GXFPRINTF4 H0G \0 DECC$EXIT4 T0b# x DECC$EXIT4 X0@ \0 DECC$EXIT4 l0G 0DECC$GXFPRINTF4 t0b# xDECC$GXFPRINTF4 0@ 0DECC$GXFPRINTF4 0G 0 DECC$EXIT4 0b# x DECC$EXIT4 0@ 0 DECC$EXIT4 0G 0DECC$GXFPRINTF4 0b# xDECC$GXFPRINTF4 0@ 0DECC$GXFPRINTF4 0G 0 DECC$EXIT4 0b# x DECC$EXIT4 0@ 0 DECC$EXIT4 D1G T1DECC$GXFPRINTF4 L1b# @DECC$GXFPRINTF4 P1@ T1DECC$GXFPRINTF4 X1G t1 DECC$STRLEN4 d1b# @ DECC$STRLEN4 p1@ t1 DECC$STRLEN4+ x1G 1 SYS$ASCTOID4, 1b# @ SYS$ASCTOID4+ 1@ 1 SYS$ASCTOID4 1G 1DECC$GXFPRINTF4 1b# @DECC$GXFPRINTF4 1@ 1DECC$GXFPRINTF4) 1G $2 SYS$ADD_IDENT4* 1b# @ SYS$ADD_IDENT4) 2@ $2 SYS$ADD_IDENT4 82G X2DECC$GXFPRINTF4 <2b# @DECC$GXFPRINTF4 T2@ X2DECC$GXFPRINTF4 h2G 2DECC$GXFPRINTF4 l2b# @DECC$GXFPRINTF4 2@ 2DECC$GXFPRINTF4 2G 2DECC$GXFPRINTF4 2b# @DECC$GXFPRINTF4 2@ 2DECC$GXFPRINTF4 2G 2 DECC$EXIT4 2b# @ DECC$EXIT4 2@ 2 DECC$EXIT4 p3G 3DECC$GXFPRINTF4 3b# 0DECC$GXFPRINTF4 3@ 3DECC$GXFPRINTF4 4G $4 DECC$TOUPPER4 4b# 0 DECC$TOUPPER4 4@ $4 DECC$TOUPPER43 T4G 4 SYS$GETUAI44 4b# 0 SYS$GETUAI43 4@ 4 SYS$GETUAI4 6G 7DECC$GXFPRINTF4 6b# 0DECC$GXFPRINTF4 7@ 7DECC$GXFPRINTF4 >G >DECC$GXFPRINTF4 >b# 0DECC$GXFPRINTF4 >@ >DECC$GXFPRINTF,1 >G >SYS$FAO,2 >b# 0SYS$FAO,1 >@ >SYS$FAO4 ?G ? DECC$EXIT4 ?b# 0 DECC$EXIT4 ?@ ? DECC$EXIT4 ?G ? DECC$EXIT4 ?b# 0 DECC$EXIT4 ?@ ? DECC$EXIT4 ?G ? DECC$EXIT4 ?b# 0 DECC$EXIT4 ?@ ? DECC$EXIT4 ?G ? DECC$EXIT4 ?b# 0 DECC$EXIT4 ?@ ? DECC$EXIT4 ?G @ DECC$EXIT4 @b# 0 DECC$EXIT4 @@ @ DECC$EXIT4 @G $@ DECC$EXIT 4 @b# 0 DECC$EXIT4 @@ $@ DECC$EXIT4 $@G 8@ DECC$EXIT4 0@b# 0 DECC$EXIT4 4@@ 8@ DECC$EXIT4 8@G L@ DECC$EXIT4 D@b# 0 DECC$EXIT4 H@@ L@ DECC$EXIT4 L@G d@ DECC$EXIT4 X@b# 0 DECC$EXIT4 `@@ d@ DECC$EXIT4 d@G x@ DECC$EXIT4 p@b# 0 DECC$EXIT4 t@@ x@ DECC$EXIT4 @G @DECC$GXFPRINTF4 @b# DECC$GXFPRINTF4 @@ @DECC$GXFPRINTF4 @G ADECC$GXFPRINTF4 @b# DECC$GXFPRINTF4 A@ ADECC$GXFPRINTF4# $AG TA SYS$GETJPIW4$ @Ab#  SYS$GETJPIW4# PA@ TA SYS$GETJPIW4' \AG A SYS$ASSIGN4( lAb#  SYS$ASSIGN4' A@ A SYS$ASSIGN4% AG ASYS$QIOW4& Ab# SYS$QIOW4% A@ ASYS$QIOW4 BG 4B DECC$EXIT4 ,Bb#  DECC$EXIT4 0B@ 4B DECC$EXIT4 4BG HB DECC$EXIT4 @Bb#  DECC$EXIT4 DB@ HB DECC$EXIT4 HBG \B DECC$EXIT4 TBb#  DECC$EXIT4 XB@ \B DECC$EXIT4 BG BDECC$GXFPRINTF4 Bb# DECC$GXFPRINTF4 B@ BDECC$GXFPRINTF49 BG C DECC$GETENV4: Cb#  DECC$GETENV49 C@ C DECC$GETENV45 CG 4CLIB$GET_FOREIGN46 (Cb# LIB$GET_FOREIGN45 0C@ 4CLIB$GET_FOREIGN4 Cb# DECC$GXFPRINTF4 CG CDECC$GXFPRINTF4 C@ CDECC$GXFPRINTF47 TDG tD DECC$ISSPACE48 `Db#  DECC$ISSPACE47 pD@ tD DECC$ISSPACE48 Eb#  DECC$ISSPACE47 EG 4E DECC$ISSPACE47 0E@ 4E DECC$ISSPACE4 FG DFDECC$GXFPRINTF4 8Fb# DECC$GXFPRINTF4 @F@ DFDECC$GXFPRINTF4 $PG TPDECC$GXFPRINTF4 8Pb# DECC$GXFPRINTF4 PP@ TPDECC$GXFPRINTF4 PG P DECC$EXIT4 Pb#  DECC$EXIT4 P@ P DECC$EXIT4 PG P DECC$EXIT4 Pb#  DECC$EXIT4 P@ P DECC$EXIT4 PG P DECC$EXIT4 Pb#  DECC$EXIT4 P@ P DECC$EXIT4 QG (QDECC$GXFPRINTF4 Qb# DECC$GXFPRINTF4 $Q@ (QDECC$GXFPRINTF4 (QG DQ DECC$EXIT4 4Qb#  DECC$EXIT4 @Q@ DQ DECC$EXIT4 HQG lQDECC$GXFPRINTF 4 XQb# DECC$GXFPRINTF4 hQ@ lQDECC$GXFPRINTF4 lQG Q DECC$EXIT4 xQb#  DECC$EXIT4 Q@ Q DECC$EXIT4 QG QDECC$GXFPRINTF4 Qb# pDECC$GXFPRINTF4 Q@ QDECC$GXFPRINTF4! QG Q SYS$TRNLNM4" Qb# p SYS$TRNLNM4! Q@ Q SYS$TRNLNM4 RG 4RDECC$GXFPRINTF4 $Rb# pDECC$GXFPRINTF4 0R@ 4RDECC$GXFPRINTF4 `RG RDECC$GXFPRINTF4 dRb# pDECC$GXFPRINTF4 R@ RDECC$GXFPRINTF4 WG 4W DECC$EXIT4 ,Wb# p DECC$EXIT4 0W@ 4W DECC$EXIT4 \WG WDECC$GXFPRINTF4 Wb# DECC$GXFPRINTF4 W@ WDECC$GXFPRINTF4 WG W DECC$STRLEN4 Wb#  DECC$STRLEN4 W@ W DECC$STRLEN</ WG WLIB$DELETE_SYMBOL<0 Wb# LIB$DELETE_SYMBOL</ W WLIB$DELETE_SYMBOL4 XG dXDECC$GXFPRINTF4 \Xb# DECC$GXFPRINTF4 `X@ dXDECC$GXFPRINTF4 hXG X DECC$STRLEN4 tXb#  DECC$STRLEN4 X@ X DECC$STRLEN4 XG X DECC$STRLEN4 Xb#  DECC$STRLEN4 X@ X DECC$STRLEN4- XG YLIB$SET_SYMBOL4. Xb# LIB$SET_SYMBOL4- Y YLIB$SET_SYMBOL4 ,YG dYDECC$GXFPRINTF4 XYb# DECC$GXFPRINTF4 `Y@ dYDECC$GXFPRINTF4 hYG Y SYS$GETSYIW4 Yb#  SYS$GETSYIW4 Y@ Y SYS$GETSYIW4 YG ZDECC$GXFPRINTF4 Yb# DECC$GXFPRINTF4 Z@ ZDECC$GXFPRINTF4 0ZG DZ DECC$EXIT4 ף7CONTROLTFILENAMEPTR7 CLIPERMITREAD7 CLIPACKAGE7 CLIFINDPTR7 CLISETNOBODY7 PROGRESSCOUNT=0" @;=0` 7 CLIPERMITPTR7 CLIACLPTR7 ODSEXTENDED7CLIPERMITCONTROL=((IDENT=7CLIPERMITWRITE7PERMITID7 CLINONEACE7CLIWORLDACCESS7 HTTPSERVERID7 CLIDELETE SYS$SEARCH=.WWW_ 8=*.*;0 @=,ACCESS=R+E) P7DECC$GA_RMS_NAM=PROGRESS: 100 h=. p=0" Q;=0( ! SYS$TRNLNM=HtRootDir()  =[000000]|%s|  =0  @;=00 # SYS$GETJPIW= %d %s ControlT() %d  %SYS$QIOW ; 0' SYS$ASSIGN=0" 0;=@8< ) SYS$ADD_IDENT+ SYS$ASCTOID=0" X;=@@< -LIB$SET_SYMBOL=0" @W;=04 /LIB$DELETE_SYMBOL= UserHome |%s| !%U =.DIR =(SECHAN_VERSIONSECHAN_DEFDEV = SECHAN_UIC 0=0" 3;=0!@< SECHAN_HOME_DIR h= SECHAN_HOME x=SECHAN_DEFDIR = 000000] =GetUai() |%s|  1SYS$FAO3 SYS$GETUAI= /NOBODY = /PACKAGE =/IDENTIFIERS =/LOG = /IGNORE  = /WORLD/NOWORLD 0;= /NOPERMIT= H=(/WRITE/FIND=aptr |%s|  h=SECHAN$PARAM  5LIB$GET_FOREIGN=/EXCEPTIONAL =/DBUG =/ASIF=7 DECC$ISSPACE7CLIIDENTIFIERS7 CLISETSERVER7DECC$$GL___CTYPEA=0" `B;=` 7DECC$$GA___CTYPET7 CLIPARAM1PTR7 CLIGETUAI7 CLIOWNERPTR= /CHECK/CONTROL 0= /DELETE @=/ALL P9 DECC$GETENV=/ACL= h= clptr |%s|  x= /SERVER =/READ = /PROGRESS =1.2.4 = /VERSION = /PERMIT= = /NOIGNORE = /GETUAI = /OWNER= = /NOSCRIPT  =/NONE  =0 " ;=P, ;7 HTTPNOBODYID; SYS$SETPRV= SECHAN$DBUG ` ;=  p =DOC x = (%d) = DECC$FPUTS=SYSTEM=08" ;=P0 7DECC$$SHELL_HANDLER= ? DECC$MAIN  =4=6= 4= 4= 46=6= 46= 46=04=6=(4= `46= `4= `4 `4 6=6=4=6= p4 h4 6=6=6= p4=4= p46=  4=  4= 4 4 6= =" 46=  4= 84=H4=P4= =@4=  4=  4=@ 46=  <=,$#SECHANVSI C V7.4-002 ?=   4=TRANSFER$BREAK$GO =  4  4= main 4=ia V  V  V  V V V V V V V V V V9, V V V V V V V V V V^ V V V V V V V =  =  @4 4= FindFiles @4= V V V V V V V W  W W W W W W W W W W W W W W W W W W W W #W $W )W 'W *W 0W 1W 1W 4W 8W W 8W~ W ?W X =X >X @X LX CX  EX IX CX DXS JX VX YX _X lX@ [X =  =  4 4= SetPackage 4= ~X ~X ~X ~X ~X ~X ~X X X X X X X X X  X X X X X X< X X X X X X X X X$ X X X X X X X X0 X X X$ X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X X  X X X Y Yp Y Y Y Y Y Y Y Y Y Y< X[0 =  l=  4 x4= SetSecurity 4= Y; Y> Y: Y> Y> Y; [Y Y; [Y cY gY gY cY cY bY' uY oY uY uY  Y Y Y Y Y Y Y Y Y Y Y Y  Y Y Y Y Ys Y Y Y Y Y5H zY   Y Y$ =  s=  `+4 x4=SetCheckIgnore `+4=  Y7 Y7 Y6 Y7 Y7 Z Y6 Z6 %Z Z Z Z Z Z Z $Z $Z 'Z (Z +Z *Z +Z -Z  0Z  :Z 2Z 1Z 6Z 0Z  7Z :Z EZ KZ $ `Z `Z nZ kZ kZz nZ nZ nZ pZ rZ |Z |ZX PZ# tZ tZ tZ $ =  2=  04 @4=GetIdent 04= Z Z Z Z Z Z Z Z Z Z Z Z Z Z ZA Z Z Z  Z, Z Z Z =  =  34 04= GetUai 34=$ Z Z Z Z! Z Z! Z Z Z Z Z Z  Z Z Z Z Z Z Z Z Z Z Z [ [ [ [ [ [ [ [ [ [ [ [ [ [ [ [ [\ [ [H [ [ [ [ #[ ([ ,[ ZC Z =  =  @4 4=ControlT @4= V[ :[ :[ :[ X[ Z[ X[ Z[ `[ a[ a[ f[, `[ =  =  `B4 4= GetParameters `B4= q[  q[  q[  q[ q[ |[ [ [ -\ X\ [ [ [ [ [ [ [ [ [ [ [ [ [ [ [ [ [ [ \ \ \ \ &\ ;\܁ Q\  g\  r\ r\ [ `\ `\P [ t\$ = 0 =  Q4 p4= HtRootDir Q4=IA \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \= \ \ \ \ \ \ =  =  @W4 4= DeleteGlobalSymbol @W4=\TS \ \  \  \  \ \ \ \ \ =  =  X4 4=SetGlobalSymbol X4=g_^ \ \ \ \ \ \ \ \ \ \ =  =  Y4 4= GetVmsVersion Y4=ZRQ ] ] ] ] "] %] %]$ $]( #] = @ =  PZ4 4= strsame PZ4=h`_ ?] 4]  4]  4]  A] A] A] A] C] G], = x s=  4 4= __main 4= V =  =   DECC$ISSPACE DECC$TOUPPER DECC$$GA___CTYPET DECC$$GL___CTYPEA(CMA$TIS_VMSERRNO_GET_ADDRDECC$GA_STDOUT DECC$FCLOSEDECC$GXFPRINTF DECC$FPUTS DECC$FOPEN DECC$EXIT DECC$GETENV DECC$MEMCPY DECC$MEMCMP DECC$STRLENDECC$GA_RMS_NAMDECC$GA_RMS_FABLIB$GET_FOREIGN LIB$DELETE_SYMBOLLIB$SET_SYMBOL SYS$ADD_IDENT SYS$ASCTOID SYS$ASSIGNSYS$FAO SYS$GETJPIW SYS$GETSYIW SYS$GET_SECURITY SYS$GETUAI SYS$PARSE SYS$PARSE_ACL SYS$SETPRV SYS$TRNLNMSYS$QIOW SYS$SET_SECURITY SYS$SEARCH DECC$MAIN DECC$$SHELL_HANDLEROTS$MOVE  C$IS