@SCANUAF 21-JAN-1994 10:45DEC Fortran V6.1-386 ` *SCANUAF_COMMON&$LINK$il$CODE$0$IODATA${$BSS$h$DATA$(JSCANUAF0J8 h AST_ENABLE DFOR$OPEN DFOR$HANDLER STR$UPCASE DFOR$CLOSE(SMG$CREATE_VIRTUAL_KEYBOARD0J @/ GET_PARAMS STR$POSITIONSTR$TRIM0J0]COMPARE_INTEGER0J cCOMPARE_STRING0J` COMPARE_DATE0JPpf PRIV_CHECK0J8o FLAG_CHECK0J0hw HOUR_CHECK0J8 DAY_CHECK0JX LOGICAL_PARSE0J0 ISTRING_LAST DFOR$WRITE_SEQ_LIS DFOR$WRITE_SEQ_LIS_XMIT DFOR$WRITE_SEQ_FMT DFOR$WRITE_SEQ_FMT_XMIT DFOR$READ_INT_FMT DFOR$WRITE_INT_FMT DFOR$READ_SEQ DFOR$READ_SEQ_FMT DFOR$READ_SEQ_FMT_XMIT SMG$READ_COMPOSED_LINE0J ERROR_MESSAGE0J 6VALIDATE_INPUT(J(ADO_NODE0J D DO_REPORT0J@G DO_OUTPUT(J JDO_HELP(J KDO_SHOW0JO DO_AUTHORIZELBR$OUTPUT_HELPLIB$PUT_OUTPUT LIB$GET_INPUT SYS$TRNLNMLIB$SET_LOGICAL LIB$SPAWN LIB$DELETE_LOGICAL SYS$BINTIM SYS$ASCTIM SYS$ASSIGNSYS$QIOW0J AST_HANDLER SYS$PUTMSGOTS$STRCMP_EQLP OTS$MOVEMOTS$FILLOTS$MOVEOTS$STRCMP_LEQPOTS$STRCMP_LSSPOTS$STRCMP_EQLS0 BLOCK_DATA `=RTYPE VERSION USRDATOFF USERNAME MEMBER GROUP SUBID PARENTID ACCOUNT OWNER DEVICE DIRECTORY LGICMD CLI CLITABLES PASSWORD PASSWORD2 LOGFAILS SALT ENCRYPT ENCRYPT2 PWDMINIMUM EXPIRATION PWDLIFETIME PWDDATE PWDDATE2 LOGINT LOGNONINT PRIVILEGE DEFPRIVILEGEMINCLASS MAXCLASS FLAGS NETWORKPRIMENETWORKSEC BATCHPRIME BATCHSEC LOCALPRIME LOCALSEC DIALUPPRIME DIALUPSEC REMOTEPRIME REMOTESEC PRIMEDAYS PRIORITY QUEPRI MAXJOBS MAXACCTJOBS MAXDETACH PRCLM BIOLM DIOLM TQELM ASTLM ENQLM FILLM SHRFILLM WSQUOTA WSDEFAULT WSEXTENT PGFLQUOTA CPUTIME BYTLM PBYTLM JTQUOTA PROXYLIM PROXYUSE SUBACCLIM SUBACCUSE  =\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\ =\ =\<>=\<>=\ =\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\ =\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>=\<>IIICIIICCCCCCCCCCIIIIICCCCCCCCCCCCCCCCCCCCCCIIIIIIIIIIIIIIIIIIIIIIIII= ALL FULL r*=H@SYS$OUTPUT  =00;=0 8OTS$STRCMP_EQLP= 0=|8=8@=0"Error - unrecognized character (h=0pn*;=88 OTS$MOVEM=0HX;= 7 DFOR$HANDLER=8OTS$FILL; DFOR$WRITE_SEQ_LIS=1( DFOR$WRITE_SEQ_LIS_XMIT=)=(Error - unmatched parentheses(=&0=0P];=< 7 DFOR$HANDLER=8OTS$MOVE=: p=FULL DFOR$WRITE_INT_FMT;=8 =08;=0 7 DFOR$HANDLER=;=X=,=NO=(Invalid day specification - =:= (None)(=BRIEF=0hw;=p 7 DFOR$HANDLER= DFOR$READ_INT_FMT=-x=() STR$POSITION= (No access)=(Full access)=(Invalid hour specification - =08o;= 7 DFOR$HANDLER=0&Invalid flag specification -  =0c;=0 8OTS$STRCMP_LSSP8OTS$STRCMP_LEQP=0pf;=` 7 DFOR$HANDLER=8+Invalid privilege specification - =0;=   SYS$PUTMSG=0`;= ` (None) SYS$BINTIM=???0 SYS$ASCTIM=0xG;= 7 DFOR$HANDLER= SYS$OUTPUT=(8      DFOR$OPEN DFOR$CLOSE=!STR$TRIM=(Output will be written to = = Open error =  =0HD;=< 7 DFOR$HANDLER=BRIEFX=0$Illegal SET REPORT specification - = No action performed=0H(A;=< 7 DFOR$HANDLER= ALL=DECNET=8*CLUSTERIllegal SET NODE specification - =0" of the remote node.0=XK node, use caution in modifying the rightlist file and/or the=XN authorization file, but it will use the local node's rightslist #LIB$DELETE_LOGICAL= LIB$SET_LOGICAL status:% LIB$SPAWN=(For which node? 0=xpAUTHORIZE will be run for node *** Warning: In running the AUTHORIZE utility from within SCANUAF for a remote =8.Unable to determine SYSUAF filename for node =SYSUAF=0HO;= 7 DFOR$HANDLER=8OTS$STRCMP_EQLS= Action cancelled0) SYS$TRNLNM=SYSUAF file = P+ LIB$GET_INPUT- STR$UPCASE= LNM$SYSTEM=(RUN SYS$SYSTEM:AUTHORIZE=(LIB$DELETE_LOGICAL status:= LIB$SPAWN status:=PE DECnet proxy file. SCANUAF will use the remote node's  /LIB$SET_LOGICAL=XM file and DECnet proxy file, which may not be the same as those =0HK;= 7 DFOR$HANDLER=   =  =  =  =  =  =  =H;Current settings for special input command parameters are:@ =@7The list of nodes that can be processed is as follows:x = CLUSTER =0" DECNET Node(s) Access =:: =0J;= 7LIB$PUT_OUTPUT=SCANUAF  1LBR$OUTPUT_HELP7 LIB$GET_INPUT=\ => =(Illegal value specification - 8 =XLIllegal comparison character - Illegal specification - too many parameters =8-Illegal special command; no action performed =REPORT = AUTHORIZE =HELP =0P6;= 7 DFOR$HANDLER= SHOW =EXIT =SET =NODE( =OUTPUT0 ="8 =0#Illegal parameter specification - ` = Illegal entry - x =< == =0`@/;= 7 DFOR$HANDLER= (3DFOR$WRITE_SEQ_FMT_XMIT 5SMG$READ_COMPOSED_LINE= SCANUAF>  =Z  7DFOR$WRITE_SEQ_FMT=0(Illegal specification - unclosed quotes=0Ph;=< 7 DFOR$HANDLER=  - ^C Disabledx =  = SYS$ASSIGN error  = SYS$INPUT 9 SYS$ASSIGN= SYS$QIO IOSB error  = =SYS$QIO error   ;;SYS$QIOW(=SMG$CREATE_VIRTUAL_KEYBOARD? DFOR$READ_SEQ= Read error @ ADFOR$READ_SEQ_FMT_XMIT=(SYS$SYSTEM:SCANUAF.NODESp=(SCANUAF will rename node =Search aborted=8=0;= 7 DFOR$HANDLER= =0$8       =(Illegal node specification - (=#0  CDFOR$READ_SEQ_FMT=H=(Open error on SCANUAF.NODES - h=@4SCANUAF.NODES contains no data - program terminated= Processing node =0;=f^` Enter 0 to continue, 1 to abort this node, 2 to abort the entire search [2]: =p#~^^ ~(08޴@HP>X^`~hpx޵cGGb##@Ө BGb4G=TG4G"G_"}8b"}"G@ZkH= 4GH.'. PJQ 'J'>>F!%G! !B GX"bGP}_"b"P"GG@ZkGtG G! IP?AB00@b@ "X"P=""P]"@Zk G!! IB&b!)@@"P7! T=XP"\=X="TG@Zk?$<! - IB@?AP=-Ab @ !TP"X=X="\TG@ZkGGGxBG(B"@ZkGtGxBG B"G@ZkGGxBG0B"G@Zk:(B`!X G0b"P?"_"b"P"G@ZktGHB"X""PbP]"P}@Zk4GBP"B"@ZkGBG@ZkGBGP]"@Zk?"_"(B!X 4G0b"Pb"P"G@ZktGHB"X""PbP]"P}@Zk,pD-! 0 AHM IE0@  A^B"bG_"b"GG@ZkG-"-IM IEC (BB!X] tG0b?"P]_"b"P"@Zk 4GhBpb"@ZktG_"B"bb"GG@Zk"b#""1" @Ӭ 8ED G! G!p@E  4G"&*.26:g/G/>gKBZ GK[GCL}PL] @GxB B"tG 4"G@ZkG0P`B4"7I7B@7W"@Zk?&1"%8נIBYAb9C?$@<! 9#X=\="`=`="dX"TG@ZkGGG xB4"0B"G@Zk t xB4"G(B"GG@Zkl B"btG_"b"GG@ZkG4GTGPH"B4GbtG נIAA!@ BX="8b"X]"GR"]_"ݵ}}@ZkG!I&(B!-@0b"F0"!B`=s"`]h"h}p="tGR"l]p}t]BR"@ZkG"(@P.C0."Dp" SJXBQ 3J`b @2FCP!&JpGhݴ"_"b"h"@ZktG""`h]"B "p b"!!Hh=@ZktGB"p"" bh]"hݴ@ZkG_""b"h"@,GC,!D/ HF HDCXD(Bp"h=?"0b@Zk GtG`ݤ"HB""Pb`]" hݴ`}@Zk򂤄! w _xB"htGb_"`b"`"G@Zk E BD"BGJ!G@Zk"bݠ`zc 0@ݰ"#TݲG`G9#7C8CG9#8C¦4G6,,""0H@ HDCG.!_¦B"B4G/"C"@Zk?"GB@Zk#pG8 E_ 8$G_'1'JB'J4GZ#R"h]l]G"h]"`}"b#@ӴGX Eb$BGs"!&HpB&'H2"s"hl}G"h]"`}"b#@ӛbx E$BGs"pB&"H2"hs"l}G"h]"`}"b#@ӄG E A@_&dA?@" R"h]&G$"l=B@"?'pݲ! t=B9#"x=|h"p="x]"d}"`"xb#@bG E0GB$$ bL"!phݴ"x=?"B"h}"G@Zk?"GpX"hݴ"¤B"Bh}"b xݴ@Zk$ ¤ GGhh]" @!l"`}"b#z@0Gb E/BGbk!p}&!hݴxd""?"B"h}"G@Zk?"Gp}p"hݴ"¤B"Bh}"b xݴ@Zk$ GGhݰh]"! A!l"`}"b#H@G E`G?$! h=@ Glݰ("h]"`}"b#5@b !E 8!E`F@&dF@s" "h&G4$ l=fB@"&p tݰ`B"s"x|}h"p="x]"d}"`"xb#|@Gb X!E`F@&!F@ds" "&hGT$ fBl=@"p& `Btݰ"xs"|}h"p="x]"d}"`"xb#Y@ӥb x!E`F@&!F@ds" "&hGt$ fBl=@"p& `Btݰ"xs"|}h"p="x]"d}"`"xb#7@Ӄb !E`F@&!F@ds"@"Gh$ l=fBp& `Btݰ"xݲs"|}h"p="x]"d}"`"xb#@cb !E`F@&!F@ds"@"Gh$ l=fBp& `Btݰ"xݲs"|}h"p="x]"d}"`"xb#@Cb !E`F@&!F@ds" "&h =G$ fBl=@"p& `Btݰ"xs"|}h"p="x]"d}"`"xb#@!b !E`F@&!F@ds" "&hG4$ fBl=@"p& `Btݰ"xs"|}h"p="x]"d}"`"xb#@ "E 8"E`X"EdBG& HR"HABs"R"h}l]G"h]"`}"b#-@ x"E`d&""GIh! &@ lݰG"h]"`}"b#@G "E`h&""G-IGIh! &@ lݰh]""`}"b#@ӳ "E`h&""G-IGIh! &@ lݰh]""`}"b#@ӛ "E`h&""G-IGIh! &@ lݰh]""`}"b#@Ӄ "E`"M@MAh?&! G -@@1"p=&ޭ!&@t"x |ݰl"p="x]"h}"`"8b#=@g" #E`F@F@1"_&!Gh&B@R"&p] tݰ B"1"x|=t"p="x]"h}"`"8b# @JG 8#E`"M@MAh?&! G -@@1"p=&ޭ!&@t"x |ݰ|"p="x]"h}"`"8b#@- X#E`"M@MAh?&! G -@@1"p=&ޭ!&@t"x |ݰ"p="x]"h}"`"8b#@ x#E`"M@MAh?&! G -@@1"p=&ޭ!&@t"x |ݰ"p="x]"h}"`"8b#@ #E`"M@MAh?&! G -@@1"p=&ޭ!&@t"x |ݰ"p="x]"h}"`"8b#@ #E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#/@ӿ #E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#@ӥB #E`M@?$dMAR"! h=&G l MB@s"&p}ޭ!tFB"R"xݲ|]h"p="x]"d}"`"xb#8@ӄGB $E`M@?$dMAR"! h=&G l MB@s"&p}ޭ!tFB"R"xݲ|]h"p="x]"d}"`"xb#@bG 8$E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"(b#@G X$E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#@- x$E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#@ $E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#@ $E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#@ $E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#s@ $E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#Y@ӫ %E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#?@ӑ 8%E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#%@w X%E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b# @] x%E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b#@C %E`"M@MA?&! G -@@1"&h=ޭ!l&@" p"tݰh="p]"`}"b# @) %E`&""G-IGIh! &@ lݰh]""`}"b#[@ %E`&""G-IGIh! &@ lݰh]""`}"b#C@ %E`&""GIh! &@ lݰG"h]"`}"b#,@G &E`&""G-IGIh! &@ lݰh]""`}"b#@ 8&E`&""GIh! &@ lݰG"h]"`}"b#@ӲG X&E` &""G-IGIh! &@ lݰh]""`}"b#@ә x&E` &""GIh! &@ lݰG"h]"`}"b#@ӂG &E`&""G-IGIh! &@ lݰh]""`}"b#@i &E`&""GIh! &@ lݰG"h]"`}"b#@RG &E`&""G-IGIh! &@ = lݰh]""`}"b#@9 &E`&""GIh! &@ lݰG"h]"`}"b#l@"G 'E`&""G-IGIh! &@ lݰh]""`}"b#S@  8'E`&""GIh! &@ lݰG"h]"`}"b#<@G X'E` G?$! h=  @!Gl"h]"`}"b#)@ x'E`G?$! h=@ Glݰ "h]"`}"b#@ 'E` G?$! h=  @!Gl$"h]"`}"b#@ӻ 'E`G?$! h=@ Glݰ("h]"`}"b#@ө 'E` G?$! h=  @!Gl,"h]"`}"b#@ӗ 'E`G?$! h=@ Glݰ0"h]"`}"b#@Ӆ (E` G?$! h=  @!Gl4"h]"`}"b#@s 8(E`G?$! h=@ Glݰ8"h]"`}"b#@a< X(E`"&-I"IhG! &@ Glݰ"h]"`}"b#@I x(E<`"&I"hG! &@ lݰG"h]"`}"b#|@2G@ (E`"&-I"IhG! &@ Glݰ"h]"`}"b#c@ (E@`"&I"hG! &@ lݰG"h]"`}"b#L@G`bG/"8B"-k! I` G.J/,JA 1H0DC51B6B "GBGG/G/#J. "B"KW JFC&1C8CGBGB4G@ZkGB@Zk?"I#ACK" @B@@!7H`@! @B4GɲH"@Zk@WBB97HwB97CBH"B"4G@Zk?"GB@Zk0@ @!bGBk!v GK"@Zk?%-vI`" A`T="db# @k ,C "GTHB"uGxBG@Zk_"D+.D!G, GXB"/Jh]G H`b`="DCb"`"G@ZkC,"G,_"b"HEH`"DHDD+.G-D+!XB G)Jh]O I`b`"ECG@ZkxBC "GB"GG@ZkP, k, 4GHC fHeDCG! GxBG?"B"4GG@Zk_"G6D+.D+ G-"XB"!J`bM Ib"ECG@Zk$ )A`C@&7!Icc@&@Ap dݰ`"Xb#@4GG` 4GBG!!Hhݴ b"`=""`]"tG@Zk0@ @ ?B" b0""GtG@Zk 0 A %AJ! 0@ "&*.26:>B"?"_")(B#htG`=0bb"`"G@ZktGX}"HB""Pb`]"c h}`ݵ@Zk TGtGHBp"!h="Pb""`]`]"@ZktGHB Pb"`X""`]"@Zkbkk!`bGxBB"G@,C,k!D+!HE HC "DCG@Zk_"GXB`b8""G0b"G@ZkXB!`bD"`"G_"b"`"G@ZktGB b`"X""`]"@Zk"?"_"B(B`"!h= tG0b`}b"`"G@ZktGX"HB""PbX]" `Xݵ@ZktGHBp `ݴTGPbXݴ"""X]"@ZktGHB Pb"XX""X]"@ZkGB"_"0b"@,GCj-J!DJ!HK jIgECXDXB`b"GG@Zk8`Dm`Pݡ0APݱLݠ AST(B!XG0b"P?"_"b"P"G@Zk4G?"_"(BB!X]"0bb"PP"G@Zk"@,Cg, D HC gHdDCXD@|"G6G(B XG0b"P?"_"b"P"G@Zk 4G?"_"(BB!X]"0bb"PP"G@Zkb"@,C,c Dc HG HDCXD|"G G񢤤""@%.C- D %JH IECXB_"`b0b"GG@ZkB"btG_"b"GG@Zk"b#B"1"v@ӬJ 8@E_B"btG_"b"GG@ZkTG_"GB"bb"G@ZkH}"?"_"`(B!XG0bPb"P"G@ZktGHBH Pb"PX""P]"@ZkB"bG_"b"GG@ZkGc]4G] }(08ݤ@HP=X]`}hpxݥ#kqDpDrtHSuJBtFr HT JF-q@Ep@E pIA1H B0D IP JF`qGpGu0I@HBD 0IU JFG #~`^h^p~x޴>^~޵ /=cGG$88B%GX J!@]4G !_BGB"4G@ZkGG0B@Zk?%)!G8H]"H=P}"HBG@}PbL}PT@ZkD İ+8"HBGPbG81"GѰGG@Zk8"@BH"H=P="L}TGP=bT}@Zk4GBB"! "@ZkGG0B@Zk GG4G"GH 4G /G.X KWJ?>GB GKA4GGGB"G@Zk.@nBKA4GGGB"G@Zk4GG"BKAGGB"@Zk4GGBKAGGB"@Zk4GGBKAGGB"@Zk4GGBKAGGxB"@ZkA,71A8wA8vK?'CWAP=TP"H="GPb#@,"hB"8D.4G .,JBP J0 @51 @,F75@ "GCBG@ZkG0B@Zk #XB8, "BG G0 C 1 C,GB9 CGGTBG@ZkG0B@ZkÍE0`A"0A8E'HB" 4GX=Pb"P}?"_"b"P"G@Zk G?"_"HBb X}"Pbb"P=P"G@Zk?"_"HB!X"Pbb"P}P"G@ZkLH="?"_" 8 E$HB! 4GXPbb"PP"G@Zk G?"HBb X}"Pb_"Pb"P"G@Zk?"_"GHB"Xb"PbP"P@Zk#G X E %!@!PTݱP"b#*@G x E %!b PT}P"b#@ G E % !!HLH"b#@d"_" Gb"8"@-C/-"GII /I -E CXE%`xB@]Gb8@ZktG8BO!@ݵ"@b""88]"@ZktG8B @"@b""88]"@ZktG8BJ!@] TG@b"8]""8]"@ZkGc`]h]p}xݤ=]}ݥ#kGP#~P^X^`~hpx޴>^~cG,GGGH?&Р0vHXD  @B8=G<=8"b#@u2vHxD& SB8}G<=8"Hb#{@hG2vHD& SB8}G<=8"hb#@ZG8DBHBCGGGHB"G@ZkTGHBGGGB"G@ZktG#HBGGGPB"G@ZkG#TGP"4G8 D2 B@"b?"8_"b"8"G@ZkG?"B @"b_"8=b"8"G@ZkP @8 ØtGG@B"',, 'H@ HDC GG HB CGG@Zk4GTGHBGGGB"G@ZkGGG B?$! 8="#<= b8]"(G@ZkHBGGG0B"G@Zkb#z@GHB4GGGB"G@Zkb#@GHBGGG8B"G@Zk4G$G)! BP#4G@b"8}?"_"b"8"G@Zk tG?"_"B"!@="bb"8]8"G@ZkP"!@=8}C G-@4GG4GHBG@4GGGGB"G@Zk4GHB@GG8B"G@Zk4GHB @GGB"G@Zk4G HB@GG0B"G@Zk0`@ j@0C? A=A8F0G) BP""@=4Gb8}"?"_"b"8"G@Zk?"_"B"!@= Gb"8=`b"8"G@ZktGB G)AI@ݴ b"8=""8]"@ZkP"!@=8}:ÿg 4G)1A")"G 0A G W?@0BrB@GwR"@Zkc v@0 @?# AB&b@"4v`H8"<&GB@BD} G8"@="TG@Zk 4G?"_"'BP" @=b"8}b"8"G@ZkG?"_"B` @"b`b"8=8"G@ZktGBG@ݴ H b8"""8]"@ZkP @8}GbGBGTBk!GG4G@ZkGB@Zk4G"0ABPB"P! G@ZkGGB@ZkGGG C 9! HB#1C)C@4GGGXB"G@Zk0 CBG51 CGB65CGGGTBG@ZkGB@Zk0C CS @Gv,"G"vHGxFB@ZkGB@Zk"9!K@=8=""?"B"B8}"9#H=b"G@Zk4G.PB"B"@ZkGGB@Zkg,G'-BgHBI 'IkR"#E0`@V@VB@"@ZkTG@ 9,W@i`I@A H@)D <pDVt`g[GPB#@]B 4Gb"8=?"_"b"8"G@Zk?" `?=_"GB@b!@} Gb"8}`b"8"@ZktGBG@ݴ'H b8"""8]"@ZkPb!@}8='GBPb! 4G@}b"8]?"_"b"8"G@Zk?"_"GB` @TGb"8`b"8"@ZktGB%H@ݴ b"8""8]"@Zk@}8]B"b?"_"b"8"G@Zk¤ GcP]X]`}hpxݤ=]}#k,@ HDcqDpDQstHRTJBSFqQ tHS tJTGrFqÀ#~H^P^X~`hpcG0,G0HpCBGGG8B"G@ZkGBGG@B"G@Zk4GBGGB"G@ZktGBGG0B"G@Zk"4G!..! !JP JF!#FCG%qB BC.-GBGGGGG@Zk2B9#0CGGGGG@Zk(B9#0CGGGGG@ZkB9#0CGGGGG@Zk0C C9#? C@BGGGGG@Zk0C C9#GB4"GG@ZkZ8B"4G@ݶ@b"8?"_"b"8"G@Zk4G?"_"8BH @"@bb"8=8"G@ZktGXB H@}`b"8""8]"@ZktG?"8B @"@b_"8=b"8"G@Zk?"_"G8B @"@bb"88"@ZkGBGG0 G@ZkG B@ZkG4GGBGB"@ZktGBG0B"@ZkGG B@ZkGcH]P]X}`hp#k,@ HD%À#~H^P^X~`hpcG0,G0HpCBGGG0B"G@Zk4GNBGGB"G@ZkGFBGGPB"G@Zk4G?"_"<B" @=b"8Xb"8"G@ZktG?"_"B8 @"bb"8=8"G@ZktGB H@}b"8X""8]"@ZktG?"B` @"b_"8=Xb"8"G@Zk?"_"GB @"bXb"88"@ZkGPG`BGG? G@ZkGB@ZkG4GGBGB"@ZkG@BGPB"@Zk4GGB@ZkGcH]P]X}`hp#k,@ HD}@#~x^^~޴cGp,GpHpBTG"xb_"b"GG@ZkTG0 BC0B"@ "@ZkTGGxB@Zk4GGpDBGGB"G@ZkZBTGGG0B"G@Zk4GTGP&aHHTG@ݴ_"`B@b"P@"XG`hp"hb@ZkGGG,B" H=tG@b"?"_"b"@"G@ZktGBH"b""@ݴ@]"@ZktGB HݴTGb"@ݴ""@]"@ZktGB @ݴb"""@]"@Zk @B"GGG@ZkGxB@ZkTGpDHŰB?'B<9##@=D@"H=H="bHR"LtG@ZkTG?"_"B Hݴ"bb"@@"G@ZktGbB b"Hc8""H@]"#aH@}@ZkcGx]]}ݤ#k,@ HDKqDpDxHWJ CF HX KGXqDpD vHA7HB6D HV JF# ?$H~! ^( 8[GG@{]"=G GG@ZkG] #kGP#?"_"~GH^P^X~`hp޴x>^~cGG @PB4GXb"8}b"8"@ZkTG?"PB @"Xb_"8=b"8"G@Zk?"_"GPB @"Xbb"8}8"@ZktG?"_"PBh @"Xbb"88"G@ZkGtG¤"pB""xb8]"0 @ݴ8@Zk?"_"PB8 @"Xbb"88"G@ZkGtGpB @"xb""8=8]"@Zk?"_"GPBP @"Xbb"88"@ZktGpB @Gxb"8""8]"@Zk?"_"PB @"Xbb"8}8"G@ZkG?"PB @"Xb_"8=b"8"G@Zk?"_"GPB"@b"Xb8"8}@Zk4G?"PB @"Xb_"8=b"8"G@Zk4G &, " ,0H@ HDCGT%%!@0"! tGk!<!_BG88"<]@="@}TGbD=@Zk?"_"GPB0" @=Xb"8]b"8"@ZktGpB@"xb""88]"@ZkG @GPB0 @"Xb?"8]_"b"8"G@ZktGpB@"xb""88]"@ZkG @pB"xb""8=8]"tG@Zk0@ @ 8O=!@?PB"@"Xb?"8}_"b"8"G@ZkcGH]P]X}`hpݤx=]}#k`#G~H^P^X~`hp޴x>cGGbB0 c GG@Zk4G $. D" .4G2JP JFCG7 8q @ 8@"('G0BGGGG@ZkGN0B0BGGW"@ZkGF0B0BGGW"@ZkG>0B0BGG-W"@Zk70B B<"? B @G0BGGGG@Zk)0B B"$xB 8&bG<"@@b"D}8"@="TG@ZkG4G G HBGPB"G@ZkTGB88"<@="@bD@Zk'HF@B'@!@GG"G@ZkGGGHBGB"@Zk_& R"-"¤&<"X! XBp `bP &"" "8]"<=G@ݲ8="D@]"8b"GG@ZkG8D ⤨BGGQ,R DHHG@ZkGB@ZkHBGGB"GG@Zk?"_"GB" @=Gb8"`b"8"@ZkGtGB@}" b""88]"@ZkGBP 4G@ݴb"8?"_"b"8"G@Zk?"_"GBX @Gb"8`b"8"@ZkGtGB"@}"" b8]"8@ZkG?"Bhb @}"b_"8`b"8"G@ZkGtGB@" b""8}8]"@Zk?"_"GB"@ݴb"b8"8@ZkG?"Bxb @}"b_"8b"8"G@ZkTG?"_"BXb @}"bb"88"G@ZkG?"Bb @}"b_"8b"8"G@ZkG?"_"Bb @}"bb"88"G@ZkG?"BXb @}"b_"8b"8"G@Zk4G?"_"B0b @}"bb"88"G@Zk?"_"B"@ݴb"b8"8G@Zk$c ?$HB 8}<! <8"@=@="PbGDGGG@ZkGGGB" @=8"b?"_"b"8"@ZkGGGBGb8 G@Zk@(B&"8" 0b<=8"4G@Zk4G?"GB" @=_"8"bb"8"G@ZkGGGGBb8 G@Zk@B"@ݴ?"b_"8b"8"G@ZkGTGB8}8"b<@ZkTG?"_"G:Bb @}"bb"88"G@ZkGGGBGb8 G@Zk@!bGBGbG8c GG#@Zk8!@@G8G8 @ݴ G8=B"b?"_"b"8"G@ZkGcH]P]X}`hpݤx=#kGP#G~H^P^X~`hp޴x>^~cGP.GPJ'"ppD&CG_GGG4G! G 4G_B Gk@4GGGB"G@ZkG ØB4Gk@GxB"G@Zk8D GE C CF 0A A 0`A_ C C?#tF0CG8 0@,1@ lAǦ kAFFǶ`@(1`A 0@B G4Gj@GXB"G@Zk FF AAF"F:Gj@GB4GGB"G@Zk !FF_FF!(!&GBj@4GGGB"G@Zk4GGBj@GB"@Zk4GGBj@GB"@Zke BGGGTBG4G@ZkG0B@ZkBGG 0`ABGB"4G@ZkG0B@Zk lA0@A 1@s B%@GG&@BGB"4G@ZkG0B@Zk4GBGGBGB"@ZkG0B@Zk4GKBGGBGXB"@ZkG0B@Zk@HB!@ 4GPb"8}?"_"b"8"G@ZkG?"_"HB @"Pbb"88"G@Zkd--K dId=HI=,GHB @4GPb"8?"_"b"8"G@ZkG?"_"HB @ݴ"Pbb"88"G@ZktGhB j@@])!Ipb8="""8]"@Zk,-F HLI<=GcH]P]X}`hpݤx=]}#k,@ HDqDpD`pJStJBpF` JP JFÀ#G~P^X^`~hpxcGRG.JKFB45BGF @45B GF@ @0CA1QB2CS@bGB@B"G?c GG@ZkJ#..0B#JP JFCQ?Bq1Bq@"KU"G@ZkTG0B8B"@Zk?"GB@ZkG _=?""PBhB"Xb8}" @8ݶG`H=@Zk4G4GG4GtG_BG4G@GB"G@Zk0@"0BGPBG51 @G!AB65BGG"GTBG@ZkGB@ZkGcP]X]`}hpx#kG#~^^ ~(08޴@HPGGG1¤GBG.. f0BH"%`0B&8bPA@s""} ="GTG@Zk4GGG"BGbG8! G@Zk""@F.&.R PJP>Q0J0>GGGG_JFFBJ0BVBv@8CB ^(~08@޵HPcGGG ¤pBG22  f0BHBR @` 2"(B4GGG8" C91C 0@ G_B G4G@GB"G@ZkB4G@GB"G@ZkB4G@GB"G@ZkB4G@GB"G@Zk0A"0C G-"2A+ 91A 0@BB@G4G GGB"G@Zk B @4GGGB"G@ZkB @4GGGB"G@ZkB @4GGGB"G@Zk0 C! 0A 0@A0XA 0B+" 4G 21CB3C@0`BGTGB"G@ZkPC G+Q`AL`"!11CN2QA9# pA G@ GBGBGGR"@Zk8DG 8ETG_OA8E/C21C1 qA( 1RAB@GBSAGSBR"G@ZkClIEFAJ0BPB0A@2DB4G4J8ECCF0@PTGP0An#0@A ?EiC`BB"@]4G8]"b?"_"(b"8"G@Zk TG?"_"B0b!@}"bb"88"G@Zk GG G 4G(! _BG4G@GB"G@Zk+1 @"/1A GB-I@"bG88]"tG@Zk-f!-O ILI==Gp ! G #H#DF0@J0BPB0A1 @2DB@^H~PX`޵hpcGGG¤BG66  f0BHBR" @B`4GGGx"0C`91C 0B G_PB G@G4GG0B"G@ZkPB4G@GB"G@ZkPB4G@GXB"G@ZkPB4G@GB"G@Zk0A"0CG G-"2A+ 91A 0@BPB@G4G GG0B"G@Zk PB @4GGGB"G@ZkPB @4GGGXB"G@ZkPB @4GGGB"G@Zk0 C! 0A 0@A0XA 0B+" 4G 21CPB3C@0`BGTGB"G@ZkPC G+Q`A@`"!11C@2QA9# pA G@ GPBGBGG8R"@Zk8DG 8ETG_OA8E/C21C1 qA 1RAPB@GBSAGSB$R"G@Zk4G)8EC0JCC0F)@F0A"0@AW#I_iC`BX @4Gb"8?"_"b"8"G@Zk G?"_"B0b!@}"bhb"88"G@Zk GG G 4G! _PBG4G@GXB"G@Zk+1 @"/1A G B-I@"(bG88]"tG@Zk-f!-O ILI==G) !P G_ 0^8~@HP޵X`cGGH@P}Ҡ:: Xݴ0BeGBB``2"`"B 'B B 4GGGHB"TGG@Zk?&1"X.JG GG)[G&s"iVG"S6B81B0BG_ G@GB4GGB"G@ZkB4G@G0B"G@ZkB4G@GB"G@ZkB4G@GB"G@Zk0A"0B'G GG8"2C- 71C0@B_@BG4GGB"G@Zk$B@4GGG0B"G@ZkB@4GGGB"G@ZkB@4GGGB"G@Zk 0B7#0C?0A0 A 0B-" ¥M"-@!PBn"p}4Gh`@"x"Xb?"@hB"h}" "G@ZkGG" 1A@0B Ap= HhQ"x]ݵ"?"8bhB"h}""@Zk¥..lG.1APB0AXb0vJ?&Bh=&@l"@"pth"p="TG@ZkGG A=A8F0Db4G`<}"PB'1Ac Xb#"p=hݴ!x}"<?"hB"h}"G@Zk?"GAp.@0B.1A8b.Ihݵ¥GhB"h}""x}""@ZkGuPB-A<# p=hݴ<="x= "Xb"?"hB"h}"@Zk?"G A,1A0B@8b!p"hB"-A-Ihxݵh}"}"@ZkO@ A 8E DG AEȡ A:`'qA A A) (4G2(J0AC33JCPACF66JFCCpACFC77JFCCCFCFCCCAFF A_ A`G4Gɠ H0ACCD Eɰ A 0@+ ?)F B"p4Gh]"b?"_"Hb"h"G@Zk?"_"GB pGb"hb"h"@Zk GGG4GH! B G @4GGGB"G@Zk#1@A#!/1A?G GB-Ip"bGh ~=h]"tG@Zk@l-L-:! KeIJ EIE=e==GHGHݤGH/-,! h,O/IXFHPݥI!,HHhHED/II&HCHECCCAEA4`=C!G^~޵ (cGGG¤ BG>>  f0BHB R" @B`4GGGx"0C`91C 0B G_B G@G4GG`B"G@ZkB4G@GB"G@ZkB4G@GB"G@ZkB4G@G@B"G@Zk0A"0CG G-"2A+ 91A 0@BB@G4G GG`B"G@Zk B @4GGGB"G@ZkB @4GGGB"G@ZkB @4GGG@B"G@Zk0 C! 0A 0@A0XA 0B+" 4G 21CB3C@0`BGTGHB"G@ZkPC G+Q`A>`0"!11C>2QA G pA@ GG0BBGG@R"@Zk8DG 8ETGOA8E/C21C1 qA 1RAB@G0BSAGSB7R"G@Zk04G)8EC0JCC0F)@F0A"0@AW#K_iC`0B @4G8b"8?"_"b"8"G@Zk G?"_"0BPb!@}"8bb"88"G@Zk GG G 4G! _BG4G@GB"G@Zk+1 @"/1A GPB-I@"XbG88]"tG@Zk-f!-O ILI==G,c 0¥EH ! H!G_ b#SMG$CREATE_VIRTUAL_KEYBOARDD=@SMG$CREATE_VIRTUAL_KEYBOARD4 G< DFOR$CLOSE4 (b# DFOR$CLOSE48@< DFOR$CLOSE4GOTS$STRCMP_EQLP4@OTS$STRCMP_EQLP4'G$OTS$STRCMP_EQLS4' @$OTS$STRCMP_EQLS44Gx STR$POSITION4<b# STR$POSITION4t@x STR$POSITION4GOTS$STRCMP_EQLP 4@OTS$STRCMP_EQLP4GOTS$STRCMP_EQLP4@OTS$STRCMP_EQLP4G DFOR$CLOSE4 b# DFOR$CLOSE4@ DFOR$CLOSE4Gh DFOR$OPEN4b# DFOR$OPEN4d@h DFOR$OPEN4!GSTR$TRIM4"b#STR$TRIM4!@STR$TRIM<7GDDFOR$WRITE_SEQ_FMT<8 b#DFOR$WRITE_SEQ_FMT<7@@DDFOR$WRITE_SEQ_FMT<3XG|DFOR$WRITE_SEQ_FMT_XMIT<4hb#DFOR$WRITE_SEQ_FMT_XMIT<3x@|DFOR$WRITE_SEQ_FMT_XMIT<3GDFOR$WRITE_SEQ_FMT_XMIT<4b#DFOR$WRITE_SEQ_FMT_XMIT<3@DFOR$WRITE_SEQ_FMT_XMIT<GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS< G0DFOR$WRITE_SEQ_LIS_XMIT< b#DFOR$WRITE_SEQ_LIS_XMIT< ,@0DFOR$WRITE_SEQ_LIS_XMIT4?HGt DFOR$READ_SEQ4@Xb# DFOR$READ_SEQ4?p@t DFOR$READ_SEQ4 GOTS$MOVE4 @OTS$MOVE4 P Gh OTS$MOVE4 d @h OTS$MOVE4p Gx OTS$FILL4t @x OTS$FILL< @ Gx DFOR$WRITE_INT_FMT<H b#DFOR$WRITE_INT_FMT< t @x DFOR$WRITE_INT_FMT< G DFOR$READ_INT_FMT< b#DFOR$READ_INT_FMT< @ DFOR$READ_INT_FMT<  G@ DFOR$WRITE_INT_FMT< b#DFOR$WRITE_INT_FMT< < @@ DFOR$WRITE_INT_FMT<` Gx DFOR$READ_INT_FMT<h b#DFOR$READ_INT_FMT<t @x DFOR$READ_INT_FMT4H%GT% OTS$MOVEM4P%@T% OTS$MOVEM4X%G`%OTS$FILL4\%@`%OTS$FILL4 |%G%OTS$MOVE4 %@%OTS$MOVE4 %G%OTS$MOVE4 %@%OTS$MOVE4%G%OTS$FILL4%@%OTS$FILL4 &G &OTS$MOVE4 &@ &OTS$MOVE4l&Gx&OTS$STRCMP_EQLP4t&@x&OTS$STRCMP_EQLP<7&G&DFOR$WRITE_SEQ_FMT<8&b#DFOR$WRITE_SEQ_FMT<7&@&DFOR$WRITE_SEQ_FMT<7'G8'DFOR$WRITE_SEQ_FMT<8'b#DFOR$WRITE_SEQ_FMT<74'@8'DFOR$WRITE_SEQ_FMT48'GT'OTS$STRCMP_EQLP4P'@T'OTS$STRCMP_EQLP4'G'OTS$STRCMP_EQLP4'@'OTS$STRCMP_EQLP<7'G'DFOR$WRITE_SEQ_FMT <8'b#DFOR$WRITE_SEQ_FMT<7'@'DFOR$WRITE_SEQ_FMT<30(G\(DFOR$WRITE_SEQ_FMT_XMIT<4@(b#DFOR$WRITE_SEQ_FMT_XMIT<3X(@\(DFOR$WRITE_SEQ_FMT_XMIT<3l(G(DFOR$WRITE_SEQ_FMT_XMIT<4t(b#DFOR$WRITE_SEQ_FMT_XMIT<3(@(DFOR$WRITE_SEQ_FMT_XMIT<(G)DFOR$WRITE_SEQ_LIS<(b#DFOR$WRITE_SEQ_LIS<)@)DFOR$WRITE_SEQ_LIS< )G4)DFOR$WRITE_SEQ_LIS_XMIT< )b#DFOR$WRITE_SEQ_LIS_XMIT< 0)@4)DFOR$WRITE_SEQ_LIS_XMIT< <)G`)DFOR$WRITE_SEQ_LIS_XMIT< L)b#DFOR$WRITE_SEQ_LIS_XMIT< \)@`)DFOR$WRITE_SEQ_LIS_XMIT< d)G)DFOR$WRITE_SEQ_LIS_XMIT< l)b#DFOR$WRITE_SEQ_LIS_XMIT< )@)DFOR$WRITE_SEQ_LIS_XMIT4)G)OTS$STRCMP_EQLP4)@)OTS$STRCMP_EQLP<7)G*DFOR$WRITE_SEQ_FMT<8)b#DFOR$WRITE_SEQ_FMT<7*@*DFOR$WRITE_SEQ_FMT<7*G4*DFOR$WRITE_SEQ_FMT<8 *b#DFOR$WRITE_SEQ_FMT<70*@4*DFOR$WRITE_SEQ_FMT<38*GX*DFOR$WRITE_SEQ_FMT_XMIT<4@*b#DFOR$WRITE_SEQ_FMT_XMIT<3T*@X*DFOR$WRITE_SEQ_FMT_XMIT<l*G*DFOR$WRITE_SEQ_LIS<|*b#DFOR$WRITE_SEQ_LIS<*@*DFOR$WRITE_SEQ_LIS< *G*DFOR$WRITE_SEQ_LIS_XMIT< *b#DFOR$WRITE_SEQ_LIS_XMIT< *@*DFOR$WRITE_SEQ_LIS_XMIT< *G*DFOR$WRITE_SEQ_LIS_XMIT< *b#DFOR$WRITE_SEQ_LIS_XMIT< *@*DFOR$WRITE_SEQ_LIS_XMIT< *G+DFOR$WRITE_SEQ_LIS_XMIT< *b#DFOR$WRITE_SEQ_LIS_XMIT<  +@+DFOR$WRITE_SEQ_LIS_XMIT<7T+Gl+DFOR$WRITE_SEQ_FMT<8X+b#DFOR$WRITE_SEQ_FMT<7h+@l+DFOR$WRITE_SEQ_FMT<+G+DFOR$WRITE_SEQ_LIS<+b#DFOR$WRITE_SEQ_LIS<+@+DFOR$WRITE_SEQ_LIS<+G+DFOR$WRITE_SEQ_LIS<+b#DFOR$WRITE_SEQ_LIS<+@+DFOR$WRITE_SEQ_LIS<8,Gl,DFOR$WRITE_SEQ_LIS<H,b#DFOR$WRITE_SEQ_LIS<h,@l,DFOR$WRITE_SEQ_LIS<x,G,DFOR$WRITE_SEQ_LIS<,b#DFOR$WRITE_SEQ_LIS<,@,DFOR$WRITE_SEQ_LIS<7 -G(-DFOR$WRITE_SEQ_FMT<8-b#DFOR$WRITE_SEQ_FMT<7$-@(-DFOR$WRITE_SEQ_FMT4(-GL- DFOR$CLOSE4 0-b# DFOR$CLOSE4H-@L- DFOR$CLOSE4t-G- DFOR$CLOSE4 |-b# DFOR$CLOSE4-@- DFOR$CLOSE4-G- DFOR$CLOSE4 -b# DFOR$CLOSE 4-@- DFOR$CLOSE<-G-DFOR$WRITE_SEQ_LIS<-b#DFOR$WRITE_SEQ_LIS<-@-DFOR$WRITE_SEQ_LIS< -G.DFOR$WRITE_SEQ_LIS_XMIT< .b#DFOR$WRITE_SEQ_LIS_XMIT< .@.DFOR$WRITE_SEQ_LIS_XMIT4.G@. DFOR$CLOSE4 $.b# DFOR$CLOSE4<.@@. DFOR$CLOSE4 /G/OTS$MOVE4 /@/OTS$MOVE4/G/OTS$FILL4/@/OTS$FILL<50G(0SMG$READ_COMPOSED_LINE<60b# SMG$READ_COMPOSED_LINE<5$0@(0SMG$READ_COMPOSED_LINE4@0Gl0 SYS$PUTMSG4H0b# SYS$PUTMSG4h0@l0 SYS$PUTMSG4-x0G0 STR$UPCASE4.0b# STR$UPCASE4-0@0 STR$UPCASE4 0G0OTS$MOVE4 0@0OTS$MOVE40G0OTS$FILL40@0OTS$FILL41G41OTS$STRCMP_EQLP401@41OTS$STRCMP_EQLP4@1G`1OTS$STRCMP_EQLP4\1@`1OTS$STRCMP_EQLP4l1G1OTS$STRCMP_EQLP41@1OTS$STRCMP_EQLP41G1OTS$STRCMP_EQLP41@1OTS$STRCMP_EQLP41G1OTS$STRCMP_EQLP41@1OTS$STRCMP_EQLP41G1OTS$STRCMP_EQLP41@1OTS$STRCMP_EQLP4X2G2 OTS$MOVEM42@2 OTS$MOVEM42G2OTS$FILL42@2OTS$FILL42G2 OTS$MOVEM42@2 OTS$MOVEM42G2OTS$FILL42@2OTS$FILL<3GH3DFOR$WRITE_SEQ_LIS<$3b# DFOR$WRITE_SEQ_LIS<D3@H3DFOR$WRITE_SEQ_LIS<T3G|3DFOR$WRITE_SEQ_LIS<d3b# DFOR$WRITE_SEQ_LIS<x3@|3DFOR$WRITE_SEQ_LIS<3G3DFOR$WRITE_SEQ_LIS<3b# DFOR$WRITE_SEQ_LIS<3@3DFOR$WRITE_SEQ_LIS<3G3DFOR$WRITE_SEQ_LIS<3b# DFOR$WRITE_SEQ_LIS<3@3DFOR$WRITE_SEQ_LIS<3G$4DFOR$WRITE_SEQ_LIS<4b# DFOR$WRITE_SEQ_LIS< 4@$4DFOR$WRITE_SEQ_LIS<04GP4DFOR$WRITE_SEQ_LIS<@4b# DFOR$WRITE_SEQ_LIS<L4@P4DFOR$WRITE_SEQ_LIS<705GH5DFOR$WRITE_SEQ_FMT<8<5b# DFOR$WRITE_SEQ_FMT<7D5@H5DFOR$WRITE_SEQ_FMT<3L5Gp5DFOR$WRITE_SEQ_FMT_XMIT<4\5b# DFOR$WRITE_SEQ_FMT_XMIT<3l5@p5DFOR$WRITE_SEQ_FMT_XMIT<3t5G5DFOR$WRITE_SEQ_FMT_XMIT<45b# DFOR$WRITE_SEQ_FMT_XMIT <35@5DFOR$WRITE_SEQ_FMT_XMIT<35G5DFOR$WRITE_SEQ_FMT_XMIT<45b# DFOR$WRITE_SEQ_FMT_XMIT<35@5DFOR$WRITE_SEQ_FMT_XMIT407GP7OTS$STRCMP_EQLP4L7@P7OTS$STRCMP_EQLP4\7Gx7OTS$STRCMP_EQLP4t7@x7OTS$STRCMP_EQLP47G7OTS$STRCMP_EQLP47@7OTS$STRCMP_EQLP<7G7DFOR$WRITE_SEQ_LIS<7b# DFOR$WRITE_SEQ_LIS<7@7DFOR$WRITE_SEQ_LIS<7G(8DFOR$WRITE_SEQ_LIS< 8b# DFOR$WRITE_SEQ_LIS<$8@(8DFOR$WRITE_SEQ_LIS4l8G8OTS$STRCMP_EQLP4|8@8OTS$STRCMP_EQLP48G8OTS$STRCMP_EQLP48@8OTS$STRCMP_EQLP418G8LBR$OUTPUT_HELP428b# LBR$OUTPUT_HELP418@8LBR$OUTPUT_HELP48G9OTS$STRCMP_EQLP49@9OTS$STRCMP_EQLP4(9GD9OTS$STRCMP_EQLP4@9@D9OTS$STRCMP_EQLP4X9Gt9OTS$STRCMP_EQLP4p9@t9OTS$STRCMP_EQLP<9G9DFOR$WRITE_SEQ_LIS<9b# DFOR$WRITE_SEQ_LIS<9@9DFOR$WRITE_SEQ_LIS<9G9DFOR$WRITE_SEQ_LIS<9b# DFOR$WRITE_SEQ_LIS<9@9DFOR$WRITE_SEQ_LIS4 :GH:OTS$STRCMP_EQLP4D:@H:OTS$STRCMP_EQLP4P:Gl:OTS$STRCMP_EQLP4h:@l:OTS$STRCMP_EQLP4t:G:OTS$STRCMP_EQLP4:@:OTS$STRCMP_EQLP4:G:OTS$STRCMP_EQLP4:@:OTS$STRCMP_EQLP<:G;DFOR$WRITE_SEQ_LIS<:b# DFOR$WRITE_SEQ_LIS< ;@;DFOR$WRITE_SEQ_LIS<;GD;DFOR$WRITE_SEQ_LIS<(;b# DFOR$WRITE_SEQ_LIS<@;@D;DFOR$WRITE_SEQ_LIS< H;Gp;DFOR$WRITE_SEQ_LIS_XMIT< X;b# DFOR$WRITE_SEQ_LIS_XMIT< l;@p;DFOR$WRITE_SEQ_LIS_XMIT4';G;OTS$STRCMP_EQLS4';@;OTS$STRCMP_EQLS4;G4< STR$POSITION4;b# STR$POSITION40<@4< STR$POSITION<D<Gl<DFOR$WRITE_SEQ_LIS<P<b# DFOR$WRITE_SEQ_LIS<h<@l<DFOR$WRITE_SEQ_LIS<x<G<DFOR$WRITE_SEQ_LIS<<b# DFOR$WRITE_SEQ_LIS<<@<DFOR$WRITE_SEQ_LIS< <G<DFOR$WRITE_SEQ_LIS_XMIT< <b# DFOR$WRITE_SEQ_LIS_XMIT< <@<DFOR$WRITE_SEQ_LIS_XMIT4<G= OTS$MOVEM4=@= OTS$MOVEM4 =G=OTS$FILL4=@=OTS$FILL4  =G4=OTS$MOVE4 0=@4=OTS$MOVE4<=GD=OTS$FILL 4@=@D=OTS$FILL4`=G=OTS$STRCMP_EQLP4=@=OTS$STRCMP_EQLP4=G= OTS$MOVEM4=@= OTS$MOVEM4=G=OTS$FILL4=@=OTS$FILL4>G> OTS$MOVEM4 >@> OTS$MOVEM4>G>OTS$FILL4>@>OTS$FILL<H>Gh>DFOR$READ_INT_FMT<X>b# DFOR$READ_INT_FMT<d>@h>DFOR$READ_INT_FMT4 x>G>OTS$MOVE4 >@>OTS$MOVE4>G>OTS$FILL4>@>OTS$FILL4 >G>OTS$MOVE4 >@>OTS$MOVE<0?G\?DFOR$WRITE_SEQ_LIS<8?b# DFOR$WRITE_SEQ_LIS<X?@\?DFOR$WRITE_SEQ_LIS<h?G?DFOR$WRITE_SEQ_LIS<x?b# DFOR$WRITE_SEQ_LIS<?@?DFOR$WRITE_SEQ_LIS< ?G?DFOR$WRITE_SEQ_LIS_XMIT< ?b# DFOR$WRITE_SEQ_LIS_XMIT< ?@?DFOR$WRITE_SEQ_LIS_XMIT<?G@DFOR$WRITE_SEQ_LIS<?b# DFOR$WRITE_SEQ_LIS<@@@DFOR$WRITE_SEQ_LIS<@G8@DFOR$WRITE_SEQ_LIS< @b# DFOR$WRITE_SEQ_LIS<4@@8@DFOR$WRITE_SEQ_LIS< <@G`@DFOR$WRITE_SEQ_LIS_XMIT< H@b# DFOR$WRITE_SEQ_LIS_XMIT< \@@`@DFOR$WRITE_SEQ_LIS_XMIT<h@G@DFOR$WRITE_SEQ_LIS<p@b# DFOR$WRITE_SEQ_LIS<@@@DFOR$WRITE_SEQ_LIS4lAGAOTS$STRCMP_EQLP4A@AOTS$STRCMP_EQLP4AGAOTS$STRCMP_EQLP4A@AOTS$STRCMP_EQLP4AGAOTS$STRCMP_EQLP4A@AOTS$STRCMP_EQLP4AGAOTS$STRCMP_EQLP4A@AOTS$STRCMP_EQLP40BGLBOTS$STRCMP_EQLP4HB@LBOTS$STRCMP_EQLP4PBGtBOTS$STRCMP_EQLP4pB@tBOTS$STRCMP_EQLP4xBGBOTS$STRCMP_EQLP4B@BOTS$STRCMP_EQLP4BGBOTS$STRCMP_EQLP4B@BOTS$STRCMP_EQLP4BGBOTS$STRCMP_EQLP4B@BOTS$STRCMP_EQLP4 CG,COTS$MOVE4 (C@,COTS$MOVE<0CGdCDFOR$WRITE_SEQ_LIS<@Cb#DFOR$WRITE_SEQ_LIS<`C@dCDFOR$WRITE_SEQ_LIS<pCGCDFOR$WRITE_SEQ_LIS<Cb#DFOR$WRITE_SEQ_LIS<C@CDFOR$WRITE_SEQ_LIS< CGCDFOR$WRITE_SEQ_LIS_XMIT< Cb#DFOR$WRITE_SEQ_LIS_XMIT< C@CDFOR$WRITE_SEQ_LIS_XMIT<CGCDFOR$WRITE_SEQ_LIS<Cb#DFOR$WRITE_SEQ_LIS<C@CDFOR$WRITE_SEQ_LIS <DG$DDFOR$WRITE_SEQ_LIS<Db#DFOR$WRITE_SEQ_LIS< D@$DDFOR$WRITE_SEQ_LIS40DGHD OTS$MOVEM4DD@HD OTS$MOVEM4LDGTDOTS$FILL4PD@TDOTS$FILL4`DGpDOTS$STRCMP_EQLP4lD@pDOTS$STRCMP_EQLP4 xDGDOTS$MOVE4 D@DOTS$MOVE4DGDOTS$FILL4D@DOTS$FILL4EG0EOTS$STRCMP_EQLP4,E@0EOTS$STRCMP_EQLP48EGPEOTS$STRCMP_EQLP4LE@PEOTS$STRCMP_EQLP4XEGpEOTS$STRCMP_EQLP4lE@pEOTS$STRCMP_EQLP<EGEDFOR$WRITE_SEQ_LIS<Eb# DFOR$WRITE_SEQ_LIS<E@EDFOR$WRITE_SEQ_LIS<EGEDFOR$WRITE_SEQ_LIS<Eb# DFOR$WRITE_SEQ_LIS<E@EDFOR$WRITE_SEQ_LIS< EGFDFOR$WRITE_SEQ_LIS_XMIT< Eb# DFOR$WRITE_SEQ_LIS_XMIT< F@FDFOR$WRITE_SEQ_LIS_XMIT< FG8FDFOR$WRITE_SEQ_LIS<Fb# DFOR$WRITE_SEQ_LIS<4F@8FDFOR$WRITE_SEQ_LIS<DFGhFDFOR$WRITE_SEQ_LIS<TFb# DFOR$WRITE_SEQ_LIS<dF@hFDFOR$WRITE_SEQ_LIS4xFGF OTS$MOVEM4F@F OTS$MOVEM4FGFOTS$FILL4F@FOTS$FILL4FGFOTS$STRCMP_EQLP4F@FOTS$STRCMP_EQLP4 FGFOTS$MOVE4 F@FOTS$MOVE4FGFOTS$FILL4F@FOTS$FILL4\GGG DFOR$CLOSE4 lGb#@ DFOR$CLOSE4G@G DFOR$CLOSE4 GGGOTS$MOVE4 G@GOTS$MOVE4GGGOTS$FILL4G@GOTS$FILL4GGGOTS$STRCMP_EQLP4G@GOTS$STRCMP_EQLP4GGHOTS$STRCMP_EQLP4G@HOTS$STRCMP_EQLP4 HGPH DFOR$OPEN4HHb#@ DFOR$OPEN4LH@PH DFOR$OPEN<hHGHDFOR$WRITE_SEQ_LIS<|Hb#@DFOR$WRITE_SEQ_LIS<H@HDFOR$WRITE_SEQ_LIS< HGHDFOR$WRITE_SEQ_LIS_XMIT< Hb#@DFOR$WRITE_SEQ_LIS_XMIT< H@HDFOR$WRITE_SEQ_LIS_XMIT< HGHDFOR$WRITE_SEQ_LIS_XMIT< Hb#@DFOR$WRITE_SEQ_LIS_XMIT< H@HDFOR$WRITE_SEQ_LIS_XMIT< HGIDFOR$WRITE_SEQ_LIS_XMIT< Hb#@DFOR$WRITE_SEQ_LIS_XMIT< I@IDFOR$WRITE_SEQ_LIS_XMIT4IG0I OTS$MOVEM4,I@0I OTS$MOVEM44IG = = 9  E H H H G G C  O R R R Q Q M  Y \ \ \ [ [ W  c f f f e e a  n n m n m k u u t u t r  y } { } } ~ } } y                                                                                                                             " " $ $ $  + + - - - ) 4 4 6 6 6 2 = = ? ? ? ; F F H H H D O O Q Q Q M( X X V V=RJ( _ _ ]( f f d( m m k( t t r( { { y(   (                                      @ ct          Ф   D            %   (   %H 4   %T P< $= X4 = @/ ^= @/4 4= GET_PARAMS@/4= -  - -  2 ; 9 2L, ?M, 4 4 4 E I I G I K M W W V V T T T ` ] ` _ ` _ _ ` ` d d, S O! yk              T $= /4 .=  ?/4=  =  =  = 64 4=VALIDATE_INPUT64=)!   g  n  n  u  u   4          ̠           ؠ $ <                          ̠  ̤;@ f  $= t64 .=  64=  =  =  = (A44= DO_NODE(A4={z        $     ̤ (   $= hA4 =  = D4 4= DO_REPORTD4=LDC     ؤ (  $= E4 = H = G4@4= DO_OUTPUTG4=}|   Z  [  Z  Z  ^  a  a  i $ l 0 8 $= \G4 =  = J4 4= DO_HELPJ4=1)( x  x  x  x  $= J4 = h = K4 4= DO_SHOWK4=aYX ,  ,  ,  , М    D $= `K4 =  -= O44= DO_AUTHORIZEO4=   $ $ $ $ $ $ $ $  $ !$Ԁ 0$ 2$ 2$ 3$ 2$ 3$ 4$ 6$ <$̤ T$3 4 4 \$ \$+ 4 4 a$ e$" 4 4 4: 4 4 4 $o $J< $= O4 .=  O4=  =  .=  O4=  =  .=  O4=  =  .=  O4=  =  =  L= X44= LOGICAL_PARSEX4= r$ r$ *% .% 1% 0% 9% @% E% E% D% K% M%V N% F% F% W% X% X%4 :%̠ D r$8 $= X4 = @ = ]404=COMPARE_INTEGER]4=WON c% #& '& +&ب ;&$ ;&, $= ^4 = 0 = `44= COMPARE_DATE`4=& I& I& I& ' 's  'u  4 's  ' %' &' (' (' (' (' .' #'  =' =' C' C' K' Y' Z' [' ['4 $= H`4 .=  `4=  =  = x = c4 4=COMPARE_STRINGc4= g' g' ,( -( -( -( -( 7( 7( 7(, ;(( ?( K( g' $= c4 =  = pf4P4= PRIV_CHECKpf4=} S(Z S(Z ) ) ) ) ) )$ ) ) )  ) ) )$ )$ ) ) * * * * * * * * * * * * * *8  **= $ h4 ** ** ** /* 1* 2* 4* 5* 5* 5* 5* 5* 9* 9* 9* 9* 9* 0* @* @* @*p @* C* D* 0 h4 G* B* L* L* L* L* L*( L*\ $= f4 .=  of4=  =  .=  of4=  =  =  = 8o44= FLAG_CHECK8o4=:2 S*T S*T + + + + + + +( + + +  , , ,$ ,$ , , , , , , , , , !, !, #, &, , ) 9,.$ h4 9, 9, 9, >, ?, ?,  L, L, L, L, M, h4( h4 R, N, W, W, W, W, W,$ W, W, W,( W,X $= o4 .=  7o4=  =  .=  7o4=  =  = 0 = hw404= HOUR_CHECKhw4= ^, ^,Ȩ ^, ^, '- )- ,- ,- +- /- 8-( ;- 9- 8- C- D- G-$ E-$ C- O- T- T- Y- [- ]- ^- g- g- g- g- g- g- f- g- f- f- f- g- f- f- u-( h4 u- u- u-  - ~- - ~-  - z-  ~-  - z- - ~- - - - - - - - - - - - -  - - - - - - - - - - - - - -  - - - - -$ - - -( h4 -P -P $= w4 .=  gw4=  =  .=  gw4=  =  =  = 844= DAY_CHECK84=<4 -U -U [/ Y/ ^/ [/ ]/ e/ e/( h/ f/ e/  p/ q/ t/$ r/$ p/ |/ / / / / / / / / / / /  /$ h4 / / / / / / / / /  / / / /4 h4 / / / / / / /$ / / /( /\ $= 4 .=  74=  =  .=  74=  =  = 0 = h48 4= AST_ENABLEh4= / / / / X3 X3 Y3 Z3 g3 e3 e3 e3 e3.  e3  v3 v3 v3( $= 4 =  = 44= AST_HANDLER4=med 3 <4 >4= 4 4 4 =4 <4 >4 $=  4 .=  4=  =  = @ = 044= ISTRING_LAST04=H@? P4 P4 c4 g4, h4 h4$ P4 $= `4 =  = 44= ERROR_MESSAGE4=7/. t4 t4 4 4 $= $4 = t =  "