MSCAN_FILE_LOCKSX2-001 3-MAY-1999 10:13AMAC V3.0-23 ( . ABS . . BLANK . $ABS$ r _UTIL_DATA_RW + _UTIL_DATA_RO _UTIL_CODE _LIB$KEY0$` _LIB$STATE$& _LIB$KEY1$$LINKAGELIB$PUT_OUTPUT SYS$ASSIGNLIB$GET_FOREIGNSYS$EXITSYS$QIOW STR_UPPERCASE LIB$TPARSELIB$FID_TO_NAMELIB$STOP SYS$PARSE SYS$SEARCHSTR_LEN SYS$GETDVIWSYS$FAO SYS$CMKRNL SYS$GETJPIW LIB$TRIM_FILESPEC LIB_OUTPUT_SEG_ZB SYS$GETLKIW0 INPUT_STATE_TBL8 INPUT_KEYWORD_TBL LIB_OUTPUT_SEG_T LIB$SIGNAL LIB_OUTPUT_SEG_TZBOTS$MOVE OTS$MOVEMOTS$FILLAMAC$EMUL_CMPC30J UTIL_START0Jp UTIL_EXIT8J@ UTIL_SET_CTRLCAST8J VALIDATE_FILESPEC0J0 PROCESS_FILE_ID8J0 PROCESS_FILESPEC8J CREATE_RESOURCE_NAME0J  UTIL_SCAN_LOCKS8J8  UTIL_SCAN_SUBLOCKS0Jp@ GET_LKI_STUFF0J SETUP_STATES 4 = = $=$4=$43 =44=44=[ 4=  =@c 4=@c 4 = 4= 4 =  4=  4: =\ 4= X =P\ =h =  4=  = =` = = = = 4=RMS$6= 6 6= " 4 4=> =? 4=? 4=0$ 4= 4=(  4 = = ~ 4=  4= 4= 4= 4= 4= 4= 4 4= 4= 4= 4=  4= x4w=4=4=4= &42=x4p4=4=@-44=@,44= &4= 8=4=(Scan_File_Locks X2-001/Fast+4=TT54= _File: D4= 3M4=@7!/Looking for locks on !AS!/!21* !AS(!UW,!UW,!UW)!/4= FILE.DATB4=PFResource name is [!AF]!/ File ID is [!XB !XB !XB !XB !XB !XB]X4=h\!78*-!/LockID !XL, state !AC/!AC/!AC, Granted !UL, Wait !UL, Cvt !UL, Sublocks !UL (!UL)B4=(!8* PID !XL !AS !AS !ASCd4=PG!8* Ver !UB, MBC !UB, LRL !UW, FFB !UW, Hi block !UL, EOF block !ULY4=h] !74*-!/ SubLockID !XL, state !AC/!AC/!AC, Granted !UL, Wait !UL, Cvt !UL, Sublocks !UL4=(!10* PID !XL !AS !AS !AS24= !78*--?4=@1!6* Bucket at VBN !UL (valblk sequence !UL)(t4=8,!6* !40 !AC/!AC/!AC4=(!6* Lock on record !UL,!UL-4=@1!6* !40 !AC/!AC/!AC4=80!7* !XL (!-!UL.)--COGRWANLCRCWPRPWEX =>C~^ GG@M0 4GHm@Zk0MG(mGGtDCPMC ;"Xm@ZkGA7@(m0 tG`Mhm3 S"C; "@Zk (G3 #|r`KAM@Gm#@GA@GCk>C~^ GGM4GmC@Zk M(mC4G@ZkGCk>C~^ GG->C0MtG8C 9#~GG^G9#_" MG<G8ޢr J(m ޶(@ZkCGCkG>C~^ GGP8M4G@m3 "@ZkPm M(-3 s#43#[GPmr@KSHM 3tG@Zk PͦGAJ "TKCC @Gm#@GCkGAb@G>C~^^ ~(08 G@HGͦH 6 c "R KXRKwS KG  #L 6R KWJFP 6 #>CGR KzS KWRJF@ 6  MT KXtKCwu KG F #@  ~^RHF 6/I -H8KW I7GC2B@Zk0M^G~ v" V" C8m 6" "G@Zk@MCHm4G@ZkG^ ~(08@HCkGG>C~^^ ~(08 G@HGM-r QX "y1`KZ0@K4q#YG Q4G0M 0 Ѣ pJGG q " 8mXPK'  Ѳ@ZkMCm4G@Zkm M4GX "(m@ZkMmC4G@Zk O " /c "p@KYT KxU@K8G / O ϢZR@KySJYG O O#ע ":BRJY K6G: Ϣ O#_G:JxSJYR K8G:>C M DH~^2B@ZkPMG^ /"~ "TG CXm@Zk TG@- #tJC7CzK`/[`KzG`? 0t KYt K0CwuK7G 0G^ ~(08@HCkG>C~^^~ (0 G8GH >CG x 8# XG/ x"R`KZ@K X"[G X آGG {SJ@MG\RKG G آHmRJVJF ز>Cޢ޶@ZkH GC 8#PM~G^ X"y "R`J4qBF qBAB@ZkD MG@Zk "^,X".$8"7/~JZ 7K 0GFPMC޶ آHCM޶ mmTJC@ZkH-C`Mhm$"4G@ZkHm>C`TG # [#,["$;"4JC  ۢ޶ " / /KY K #GC . [/J\ VKpMFC ;/ .8KW JP 7GC> tGxmC@ZkH`MChm4G$"@ZkG^~ (08Ck>C~^^ ~(08 G@HGXm<5CyUKj {#[ZT@KYG[@MG TGHm@Zk"Xm`mtG0M,S"*"8m$3"@ZkXM4Gxm$"pM@ZkG^ ~(08@HCkX- 9#TKC0UC>CX MG ~ / (m o ^@Zk^C~GA C@X>C |#,\"$<"4JC(~ " . X GTKCV .Y |/P |J` V wKTJmT`JFCCCTC@ZkXpMCxm4G$"@ZkX . W/ #J[ \KFCCz>CMmG>C2w" G 7"GG@ZkXCh`-Mm> t" Y"F 4"p"G@ZkXMmC4G@Zk>C`ͦ O#`m,O"޶$/" o.:" /PzJXY KMyFCG@ZkXmCpM4G$"xm@ZkXMA Z#:/.:KX J8GCC2G@/GGG>C~^ G޵ (Gh ^ p#^ P/a /TKZ[KCyKX KYG KGa ?^ P? P#F` ЦTJC|UJVTJf "F` ж p/ /GFf .zKY Ki P/yGC|wKVJZ WKF wK95C\Gi P?wU Kf >GFh XTKGh GMGx TGm@Zk-" ^ p/a /^ P#h zKY KWTJyGCvU`KFh Gޥ (CkG` qG T`KTKCC0CA@ͥ OT@KC0@C*X />CV #XM`m,O"T K$/"C>V .l"Y .GP oJW JTJT`JFCCC@Zk-MCm$"4G@Zk / " /KV KGCC.Ø o,O"$/"T`KC0aCuX O>CV #T@K #C^V //"Y .8KW J7GC> .G O/P oJ[ \K8MTJT`JF@mCCC@ZkͦCM4Gm$" =@ZkÖ / o# //f "f /KZ ;Ki o/KGV wKCGC0Cf>ChMpmG>C2o" ޢG /"G޶G@ZkCTMGPm> t"F 4" Z"HMp"@Zk8M@mC4G@Zk>C o#ͦ,O"$/" o." //{JZ ;K`mGzFXMC@ZkCM4Gm$"@Zk((MN O"0m /"n "tG@ZkrGG>C~^ GG>C M(mG>CG ޢ W"j 7"G޶G@ZkCGCkGG>C;[~^GP Q #yUKZT@KYGP Q 0JB 0K05CEP 1R#xU@KYT K8GP 1V / "V "Y 1/zJ\KY 6KG J:GY 1?V ? PJ; PK05CDV /R#Y .V 1#wYKXKV JG YKFY >V ?GX Q #yUKZT@KYGX Q pJ05B> pKFX 1R#xU@KYT K8GX 1GCkP Ѧ"|UJVTJFP Ѷ 10 K0U CtP #vUKWTJFP V 1/#V Q#Y .xKY:KW J8G KFY >V 1? PK0UC'V /R#Y .V 1#wYKXKV JG YKFY >V ?X Q#yUKZT@KYGX QGCk pJ0BX Q#yUKZT@KYGX QGCk ""PJ0uB V Q/V #Y /yJZ\KX KYG JGY ?V Q?G Ѣ%#PJ0B V 1/V Q#Y .xKY:KW J8G KFY >V 1?{G (R#V 1#wYKPK0CsV /Y .XKV JG YKFY >V ?i Q0@K0u@CP "2#wU KXTKGP > 0K0CP 1%R#xU@KYT K8GP 13G Ѣ(#yUK0J0B,P QZT@KYGP Q'4G0LIB$PUT_OUTPUT4(m# LIB$PUT_OUTPUT4,@0LIB$PUT_OUTPUT4HGX SYS$ASSIGN4Pm# SYS$ASSIGN4T@X SYS$ASSIGN4pGLIB$GET_FOREIGN4tm# LIB$GET_FOREIGN4@LIB$GET_FOREIGN4GLIB$PUT_OUTPUT4m# pLIB$PUT_OUTPUT4@LIB$PUT_OUTPUT4G(SYS$EXIT4m# pSYS$EXIT4$@(SYS$EXIT4 GSYS$QIOW4 m# SYS$QIOW4 @SYS$QIOW4 G STR_UPPERCASE4 m# STR_UPPERCASE4 @ STR_UPPERCASE40m# LIB$TPARSE4 <GL LIB$TPARSE4 H@L LIB$TPARSE4PGOTS$MOVE4@OTS$MOVE4GLIB$FID_TO_NAME4m# 0LIB$FID_TO_NAME4@LIB$FID_TO_NAME4GLIB$STOP4m# 0LIB$STOP4@LIB$STOP4G SYS$PARSE4m#  SYS$PARSE4@ SYS$PARSE4GLIB$STOP4m# LIB$STOP4@LIB$STOP4G SYS$SEARCH4m#  SYS$SEARCH4@ SYS$SEARCH4 G LIB$STOP4m# LIB$STOP4@ LIB$STOP4GOTS$MOVE4@OTS$MOVE,GSTR_LEN,m# STR_LEN,@STR_LEN4GD SYS$GETDVIW 4m#  SYS$GETDVIW4@@D SYS$GETDVIW4\G OTS$MOVEM4@ OTS$MOVEM4GOTS$FILL4@OTS$FILL,#GSYS$FAO,$m# SYS$FAO,# @SYS$FAO4G,LIB$PUT_OUTPUT4m# LIB$PUT_OUTPUT4(@,LIB$PUT_OUTPUT,!GSYS$FAO,"m# SYS$FAO,!@SYS$FAO4GLIB$PUT_OUTPUT4m# LIB$PUT_OUTPUT4@LIB$PUT_OUTPUT41p G SYS$CMKRNL42 m#  SYS$CMKRNL41 @ SYS$CMKRNL,/ G SYS$FAO,0 m# SYS$FAO,/ @ SYS$FAO4 m# LIB$PUT_OUTPUT4 G LIB$PUT_OUTPUT4 @ LIB$PUT_OUTPUT4- GH AMAC$EMUL_CMPC34.8 m# AMAC$EMUL_CMPC34-D @H AMAC$EMUL_CMPC3,+ GD SYS$FAO,,$ m# SYS$FAO,+@ @D SYS$FAO4H G` LIB$PUT_OUTPUT4P m# LIB$PUT_OUTPUT4\ @` LIB$PUT_OUTPUT4) G SYS$GETJPIW4* m#  SYS$GETJPIW4) @ SYS$GETJPIW<% G LIB$TRIM_FILESPEC<& m# LIB$TRIM_FILESPEC<% @ LIB$TRIM_FILESPEC4 G LIB$STOP4 m# LIB$STOP4 @ LIB$STOP,( m# SYS$FAO,'L G` SYS$FAO,'\ @` SYS$FAO4h G| LIB$PUT_OUTPUT4t m# LIB$PUT_OUTPUT4x @| LIB$PUT_OUTPUT41 G SYS$CMKRNL42 m# 8 SYS$CMKRNL41 @ SYS$CMKRNL,'GSYS$FAO,(m# 8SYS$FAO,'@SYS$FAO4GLIB$PUT_OUTPUT4m# 8LIB$PUT_OUTPUT4@LIB$PUT_OUTPUT,#GSYS$FAO,$m# 8SYS$FAO,#@SYS$FAO4GLIB$PUT_OUTPUT4m# 8LIB$PUT_OUTPUT4@LIB$PUT_OUTPUT4)$G\ SYS$GETJPIW4*(m# 8 SYS$GETJPIW4)X@\ SYS$GETJPIW<&pm# 8LIB$TRIM_FILESPEC<%GLIB$TRIM_FILESPEC<%@LIB$TRIM_FILESPEC4GLIB$STOP4m# 8LIB$STOP4@LIB$STOP,(m# 8SYS$FAO,'GSYS$FAO,'@SYS$FAO4GLIB$PUT_OUTPUT4m# 8LIB$PUT_OUTPUT4@LIB$PUT_OUTPUT T<3G4LIB_OUTPUT_SEG_ZB<4 m# 8LIB_OUTPUT_SEG_ZB<30@4LIB_OUTPUT_SEG_ZB45dG SYS$GETLKIW46hm# p SYS$GETLKIW45@ SYS$GETLKIW f3f3 f3f3!f3 = UB f4=UB "f4=UB .f4= UJ Ff4=UN Rf4=UR ^f4=  F=.&DEVICEDISKFILEIDENTIFICATIONFID  =0 ;= =;; @ LIB$PUT_OUTPUT"  SYS$ASSIGN"" LIB$GET_FOREIGN""=0;= SYS$EXIT"=0@;= SYS$QIOW"""  p;=0H;= ;;  STR_UPPERCASE" LIB$TPARSE""=0;=P< OTS$MOVE LIB$FID_TO_NAME"" LIB$STOP"=00;=P<  SYS$SEARCH"  SYS$PARSE"c ; STR_LEN"=0@;=@< OTS$FILL ;   SYS$GETDVIW"""  OTS$MOVEM ; P!SYS$FAO"""  ; p#SYS$FAO""" (%LIB$TRIM_FILESPEC""'SYS$FAO""" ) SYS$GETJPIW""" p; +SYS$FAO""" =0P ;=P< -AMAC$EMUL_CMPC3/SYS$FAO"" 1 SYS$CMKRNL";w;> ;=0 ;=0  `(3LIB_OUTPUT_SEG_ZB""=0@;= 5 SYS$GETLKIW"""=0;=