BFLIST2.2-124-MAR-1994 10:15DEC C V1.3-000A  $READONLY$ $BSS$$DATA$X$LINK$ $LITERAL$i$CODE$ $ABS$DECC$GA_RMS_NAMDECC$GA_RMS_FABDECC$GA_RMS_RAB DECC$GA_RMS_XABALL DECC$GA_RMS_XABDAT DECC$GA_RMS_XABFHC DECC$GA_RMS_XABKEY DECC$GA_RMS_XABPRO DECC$GA_RMS_XABRDT DECC$GA_RMS_XABSUM DECC$GA_RMS_XABTRMDECC$GA_STDERR DECC$GA_STDINDECC$GA_STDOUT DECC$GPRINTF DECC$STRNCPY DECC$STRNCMP DECC$STRLEN TPU$CLEANUP TPU$CONTROL TPU$EXECUTE_INIFILE TPU$FILEIO TPU$HANDLERTPU$INITIALIZE TPU$_FILEIO TPU$_CALLUSER TPU$_OPTIONS TPU$_SECTIONFILE TPU$_FILENAME TPU$M_DELETE_CONTEXT TPU$M_DISPLAY TPU$M_SECTION FOR_BUFF0FOR_BUFF8JXINITIALIZE_GLOBALS8JINITIALIZE_CALLBACK0J`hFLIST_CALLUSER0J0  DELETE_FILE0J  RENAME_FILE0JPP  COPY_FILE0J0 PARSE_FILE8JSEARCH_FOR_FILES8J` DEFINE_JOB_LOGICAL8J0DELETE_JOB_LOGICAL8JpTRANSLATE_LOGICAL_NAME0J CHECK_FOR_DIR8J@FORMAT_RETURN_MSG(JMAINLIB$GET_FOREIGN DECC$$SHELL_HANDLER DECC$MALLOCSYS$EXITDECC$ABSLIB$DELETE_FILESYS$FAOLIB$RENAME_FILESYS$OPEN SYS$CONNECT SYS$CREATESYS$READ SYS$WRITE SYS$CLOSE SYS$PARSE SYS$SEARCH SYS$DASSGN SYS$ASSIGNSYS$QIOWSYS$FAOLLIB$SET_LOGICAL LIB$DELETE_LOGICAL SYS$TRNLNM SYS$GETMSG STR$COPY_DX(J`__MAIN DECC$MAIN DECC$EXITOTS$MOVE =4=4=(LNM$JOBMemory exhausted 0= FLIST_TPU_SECTIONH= !AS deletedX= !AS renamed to !ASp= !AD copied to !AD=H<!39AD !7UL/!7 !%DLNM$DCL_LOGICAL 4==H 4=  4= 4= h 4=4666=4=8,X4= H4=666=666=666666666666666   =" DECC$MALLOC DECC$GPRINTF=;7DECC$GA_RMS_NAM=8OTS$MOVE=0;=P ;7FOR_BUFF=7DECC$GA_RMS_RAB=7DECC$GA_RMS_FABSYS$EXIT==00;=P 7DECC$$SHELL_HANDLER=7 TPU$HANDLER;7 TPU$M_DELETE_CONTEXT LIB$GET_FOREIGN TPU$CONTROL TPU$CLEANUPTPU$INITIALIZE TPU$EXECUTE_INIFILE=0;=0  DECC$EXIT DECC$MAIN=0@;=0  STR$COPY_DX SYS$GETMSG=0;=0(p;=( @  SYS$TRNLNM=0;=0 LIB$DELETE_LOGICAL=0 ;=0 LIB$SET_LOGICAL=0;=@ ! DECC$STRNCPY# DECC$STRNCMP% SYS$SEARCH' SYS$PARSE)SYS$QIOW+SYS$FAOL- SYS$DASSGN/ SYS$ASSIGN=0;=0 =0P ;=P| 1SYS$READ3 SYS$CLOSE5 SYS$CONNECT=7SYS$OPEN=!9SYS$FAO; SYS$WRITE= SYS$CREATE=0 ;=0 ?LIB$RENAME_FILE=0 ;=0 ALIB$DELETE_FILE=00h;=p ;0;H;;`;;;(;X;;CDECC$ABS=0;=0 7TPU$_SECTIONFILE7 TPU$_FILENAME7 TPU$_OPTIONS7 TPU$_FILEIO7 TPU$_CALLUSER7 TPU$M_SECTIONE DECC$STRLEN7 TPU$M_DISPLAY7 TPU$FILEIO`; =#4G~^ ^(GG#0B  = > 8b@Zkhb# @ B4G(bG@ZkG] ](0#kG#4G~0^8^@~HcGG$@"b#C =5@GtGHBPbGG@Zk0TGca3 H=16?J!F=xB("8"4Gb(=,@ZkGBb@Zk4G XB`b$"@Zk4GG`hB "pb@ZkGcG0]8]@}HP#kG#G~^^~ (0޴8@HGGH bBGG@Zk?$#"#Pc"B"ĢP",#G(cG@Zk\X#"GBFX"T#GPFP@ZkG¤B"#"&G@ZkG #`"hGB8VKC@ZkG8`"p#"'B!'H7@pG@Zk<ò#0B!7H# #@&b9?K"(C #4G@Zk$ Bb"4G@ZkG4GXB`b@Zk砰 BH"GG@ZkGð `#"B!7H`#h$7JGBhp@Zk("㰐äq Dp DyKWJF貹WC !.G"rHQ0JTG2F0>."ztJa#UJDF>p`GôG]]} (0ݤ8@HP#k0KFFq`Gp`GhKGHBD KH IEGG#X!~^@1"G^8G GGC rzSK@9vJG$:G0@C0AG9v`JbSKC"G"vJ 2sS@K !8vJSDT(AC`S KhA"C"vJsS@KG$6SD0[p"U]#G H`CCFݲQ"PA@Zk$xHAGQ#4J.b.F$,Jb/S bJ0B uF(QH[ bK:JtJ`G4TG0YG]]G 0#kG#4G~0^8^@~HPX޴`hGG(]GpB8B$xb1?J1"$@Zk!5@7!@\"@ kGBGbG4G@ZkGG|pBxb8"GGG@ZkGsGb#@GnGGb#@GhGG%"B.G%, btGJA 1HG0D,Ge.0eJ5Jv`JF0Ƕ@Zk4G$pHHǰH@@0?HqHF$BGG0b#@G<GGb#@G6GBGb$"TG@Zk%HG)ð"d" ="B" =GGD$} ]GbG@ZkG d4G4G#.DDQ#Jr#H2F#>d3J4`BdG( ĦGpBGxbG6JG"ĶGG@Zk`BGhbGTG@Zk4GG0]8]@}HPXݤ`hp#k#4G~^^ ~(GG BC(b@ZkG"G}`B8! b!"A"G@ZkGG]G] }(0#kG#G~G^G^G~ (G#0,,"G0H@ H8b BDCA"(b!.c 0J! R2J GJq@J2@F2"#.#R"QJ!?H'JGq J1D##" CG (@ZkGG B"b#"C""G@ZkGG]G]} (0#k#tG~^^ ~(08޴@GG#bP(pc `B }0.0,"hb0JA 0H1D%CQ",` 0=H DHGHG`HF0G,Ű@ZkGGy@BHb"tG@ZkGrBP"G@Zk`%0E"pb!/H`%aHP@$#7vJP嶀|t`%17J3B`exEGE;[KBaGeŰ/ bYK0H'Kq KF%|P"GtG@ZktGG%@B"HbGG@ZkG B"(bGGtG@ZktGG%BGRHb0v>HqSHF%"G@ZkG$z D4D0BG8b4G@Zk4G0BP"8b@ZkG00B#"ĐH4%pH,bDD>C""@ZkGGG]] }(08ݤ@P#k#0"~tG^^~ G0,G,Hb1H@ HBbc D,#,0#H!=JrJG2D0CGG@Zkcp`H`H0ð`H@#@2?Js`H4GSFpG]]} 0#kG#tG~^^ ~(08GGGb#/,,0/H@ HАJDGGCD ./ /.G0BJQ !J8b0F,#C@Zk0#qH BG(btG0=HF0#/..!,/JT JFC@ZkGGPB =GXbtG@Zk@BGHbGGtG@Zk$ʂ "GE4G0JGGGt.t"#,c##v"JA;Hv.pJx#/0 JO.0D;<?F#.J sJQ J#K3F >!.OJz#KGWJGF>@0BG/tG8b@ZkqH BG(btG0JF#@Zk4GBb@ZkB/"bGGGGG@Zk\// `B">8c"GTGG GhbG(@ZkI9,: `# @H!"HAa.aJG .JJ . "xvJ{JWJpJF>]/JаJ@Z]K@[G]?e#CH@DCd.XJK@" 1@|C/|c# . ~#,~#"[KxbTJpDK1HpBF>].v=H#@"R]J@/"VF]>@O"P@c"GL@ZkG]] }(08@#kA..R AJJSF?.T JF#tG~^^~ G0,G,"b0H@ H Bc D(bCA"!.0J! R2JGJq@J2@F2"#.#R"QJ!?H'JGq J1D##" CXC"@ZkP#!?HP#G]]} 0#k#TG~^^~ GGb B(bc G@Zk#!?H#G]]} 0#k# (;G~G(^G0G0[" GH=8{  ` $ == ="@ZkG(]0@#k ? X0Dq.4G)DtHSqJ4GtFq>5J4BkG#G~^^ ~(GG=b 0BG8bG#G1?J1"#G@Zk BGTG(b@ZkG]] }(0#k4$GH DECC$MAIN4<b#` DECC$MAIN4D@H DECC$MAIN4PGd DECC$EXIT4Xb#` DECC$EXIT4`@d DECC$EXIT4 GLIB$GET_FOREIGN4 b#LIB$GET_FOREIGN4 @LIB$GET_FOREIGN4G(TPU$INITIALIZE4b#TPU$INITIALIZE4$@(TPU$INITIALIZE<0G<TPU$EXECUTE_INIFILE<4b#TPU$EXECUTE_INIFILE<8@<TPU$EXECUTE_INIFILE4 DGT TPU$CONTROL4 Hb# TPU$CONTROL4 P@T TPU$CONTROL4 `Gp TPU$CLEANUP4hb# TPU$CLEANUP4 l@p TPU$CLEANUP4GOTS$MOVE4@OTS$MOVE4G$OTS$MOVE4 @$OTS$MOVE48G`OTS$MOVE4\@`OTS$MOVE4hGOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4GOTS$MOVE4@OTS$MOVE4G, DECC$MALLOC4 b#X DECC$MALLOC4(@, DECC$MALLOC44GH DECC$GPRINTF48b#X DECC$GPRINTF4D@H DECC$GPRINTF4PG\SYS$EXIT4Tb#XSYS$EXIT4X@\SYS$EXIT4dGxOTS$MOVE4t@xOTS$MOVE4GOTS$MOVE4@OTS$MOVE4EG DECC$STRLEN4E@ DECC$STRLEN 4CGDECC$ABS4Db#`DECC$ABS4C@DECC$ABS4AGLIB$DELETE_FILE4Bb#`LIB$DELETE_FILE4A@LIB$DELETE_FILE,9 G(SYS$FAO,:b#`SYS$FAO,9$@(SYS$FAO4'lG SYS$PARSE4(b#` SYS$PARSE4'@ SYS$PARSE<(G@LIB$DELETE_LOGICAL<0b#`LIB$DELETE_LOGICAL<<@@LIB$DELETE_LOGICAL4hG SYS$TRNLNM4b#` SYS$TRNLNM4@ SYS$TRNLNM4 G8 SYS$GETMSG4 b#` SYS$GETMSG44 @8 SYS$GETMSG48 GP STR$COPY_DX4@ b#` STR$COPY_DX4L @P STR$COPY_DX4A G LIB$DELETE_FILE4B b#0LIB$DELETE_FILE4A @ LIB$DELETE_FILE,9 G SYS$FAO,: b#0SYS$FAO,9 @ SYS$FAO4?` G LIB$RENAME_FILE4@t b#LIB$RENAME_FILE4? @ LIB$RENAME_FILE,9 G( SYS$FAO,: b#SYS$FAO,9$ @( SYS$FAO47 G SYS$OPEN48 b#PSYS$OPEN47 @ SYS$OPEN45 G SYS$CONNECT46 b#P SYS$CONNECT45 @ SYS$CONNECT4( G8 OTS$MOVE44 @8 OTS$MOVE4= G SYS$CREATE4> b#P SYS$CREATE4= @ SYS$CREATE45 G SYS$CONNECT46 b#P SYS$CONNECT45 @ SYS$CONNECT41 G$ SYS$READ42 b#PSYS$READ41 @$ SYS$READ4;8 Gd SYS$WRITE4<D b#P SYS$WRITE4;` @d SYS$WRITE43| G SYS$CLOSE44 b#P SYS$CLOSE43 @ SYS$CLOSE43 G SYS$CLOSE44 b#P SYS$CLOSE43 @ SYS$CLOSE,9 G SYS$FAO,: b#PSYS$FAO,9 @ SYS$FAO4'TG SYS$PARSE4(Xb#0 SYS$PARSE4'@ SYS$PARSE4#`G DECC$STRNCMP4$lb# DECC$STRNCMP4#|@ DECC$STRNCMP4!G DECC$STRNCPY4"b# DECC$STRNCPY4!@ DECC$STRNCPY4'G SYS$PARSE4(b# SYS$PARSE4'@ SYS$PARSE4%G SYS$SEARCH4&b# SYS$SEARCH 4%@ SYS$SEARCH4#G DECC$STRNCMP4$b# DECC$STRNCMP4#@ DECC$STRNCMP4!G$ DECC$STRNCPY4"b# DECC$STRNCPY4! @$ DECC$STRNCPY4-0G< SYS$DASSGN4.4b# SYS$DASSGN4-8@< SYS$DASSGN4/<G` SYS$ASSIGN40Db# SYS$ASSIGN4/\@` SYS$ASSIGN4)lGSYS$QIOW4*b#SYS$QIOW4)@SYS$QIOW4,|b#SYS$FAOL4+GSYS$FAOL4+@SYS$FAOL4\GLIB$SET_LOGICAL4 lb#`LIB$SET_LOGICAL4@LIB$SET_LOGICAL<0GDLIB$DELETE_LOGICAL<4b#0LIB$DELETE_LOGICAL<@@DLIB$DELETE_LOGICAL4G SYS$TRNLNM4{# SYS$TRNLNM4@ SYS$TRNLNM4pG SYS$GETMSG4xb# SYS$GETMSG4@ SYS$GETMSG4G STR$COPY_DX4b# STR$COPY_DX4@ STR$COPY_DX <=,$#FLISTDEC C V1.3-000A ?= 4=TRANSFER$BREAK$GO = 44= main4=nfe         ( $= 4 =  = 4X4= initialize_globals4=~                           y  ! ! # " " & * + ' '0 )< $= 4 = ( =  44=!initialize_callback4=0( 0! 0! 0! 0# R R R R U R R 0" S S U T U V U X Y  [ _ G G c e e e d e e $= 04 =  = h4`4=flist_calluserh4=ZR m m m  O M            ! > ! ! ! ! !  !I e b { ;" ;" 0 $= 4 .=  g4=  =  .=  g4=  =  .=  g4=  =  .=  g4=  =  .=  g4=  =  .=  g4=  =  =  =  404= delete_file 4=2*)    $ $=  4 =  #=  44= rename_file 4= 2 2 2 2 % %            1        $ $= D 4 = @ = P 4P4= copy_fileP 4=VN % + %  ?  ?   L  L  M  M  N  O  R   U  g  c   d   d  e  m   m  p  p  w     B      , $=  4 .=  O 4=  =  =  = 404= parse_file4=e]\           $= <4 =  .= 44=search_for_files4= > = 8 ! ! ! ! ! ! #! "! "! "! "! #! #! $! $! $! $! .! 1! B! B! \! \! H! I! H! H! K! H! b!  b!  b! c!  c!2 g! d!$ \! \! \! $= 4 .=  4=  =  = 8 =  4`4= define_job_logical 4= s!0 s!# s!# !  ! !  ! ! ! ! ! ! ! ! ! $= @4 =  = 404= delete_job_logical4=+#" ! ! ! $= ,4 = h = #p44=$translate_logical_namep4=med ! !% !% !% ! ! ! ! ! !  $= 4 =  = 44= check_for_dir4=! " " = P = @44=format_return_msg@4=;32 " " :" ;" ;" $= h4 =  H= 4`4=__main =  =  #`