$ od -c -N 50000 [eris]<Lisp>Harmony>Library>DATABASEFNS.DCOM!2
0000000 ( F I L E C R E A T E D " 2 6
0000020 - O c t - 8 4 1 5 : 1 5 : 0 1
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P > H A
0000100 R M O N Y > L I B R A R Y > D A
0000120 T A B A S E F N S . ; 2 ) \r "
0000140 2 4 - O c t - 8 4 1 7 : 4 9 :
0000160 5 6 " b c o m p l ' d i n
0000200 " I N T E R L I S P - D 2 4 -
0000220 O c t - 8 4 . . . " d a t e
0000240 d " 2 4 - O c t - 8 4 1 8 :
0000260 2 2 : 1 9 " ) \r ( F I L E C R E
0000300 A T E D " 4 - M a y - 8 4
0000320 1 0 : 1 1 : 4 2 " { P H Y L U
0000340 M } < L I S P C O R E > L I B R
0000360 A R Y > D A T A B A S E F N S .
0000400 ; 3 1 2 8 9 0 c h a n g e s
0000420 t o : ( F N S \r L O A D D
0000440 B ) p r e v i o u s d a t e
0000460 : " 1 5 - M a r - 8 4 1 1 :
0000500 2 3 : 5 4 " { P H Y L U M } <
0000520 L I S P C O R E > L I B R A R Y
0000540 > D A T A B A S E F N S . ; 2 )
0000560 \r ( V I R G I N F N ( Q U O T
0000600 E L O A D ) T ) \r ( M O V D
0000620 ? ( Q U O T E L O A D ) (
0000640 Q U O T E O L D L O A D ) ) \r
0000660 ( V I R G I N F N ( Q U O T E
0000700 L O A D F R O M ) T ) \r ( M
0000720 O V D ? ( Q U O T E L O A D
0000740 F R O M ) ( Q U O T E O L D
0000760 L O A D F R O M ) ) \r ( V I R G
0001000 I N F N ( Q U O T E M A K E
0001020 F I L E ) T ) \r ( M O V D ?
0001040 ( Q U O T E M A K E F I L E )
0001060 ( Q U O T E O L D M A K E F
0001100 I L E ) ) \r L O A D D B A 0 0 0
0001120 1 D 1 \r ( N A M E E R R O R
0001140 S E T L ( 0 N I L ) F
0001160 7 A S K F L A G F 1 0 Q
0001200 F I L E F 1 1 Q R E S E T
0001220 V A R S L S T F 1 2 Q R E
0001240 S E T Y ) 001 320 \a 004 002 \0 W 020 \t \0
0001260 \0 W 020 W 016 \n \0 \0 021 R 006 I 265 036 W 016
0001300 263 026 o \0 \0 \0 i \n \0 \0 277 H i \n \0 \0
0001320 277 i \t \0 \0 277 h 261 001 237 002 274 I 001 271 W
0001340 016 262 N H d g \0 \0 033 I 360 262 # 277 o \0
0001360 \0 \0 i \n \0 \0 277 I i \n \0 \0 277 o \0 \0
0001400 \0 i \n \0 \0 277 i \t \0 \0 277 h 260 - g \0
0001420 \0 033 d g \0 \0 360 223 277 i 260 037 g \0 \0 360
0001440 222 h 260 027 ` \0 \0 d g \0 \0 360 262 e 277 H
0001460 g \0 \0 g \0 \0 \v \0 \0 264 003 202 261 001 : I
0001500 i \n \0 \0 277 g \0 \0 I \t \0 \0 h 032 032 h
0001520 032 W 022 032 c 022 277 h ` \0 \0 \n \0 \0 Z d
0001540 g \0 \0 360 242 261 \0 227 277 h ` \0 \0 \n \0 \0
0001560 273 h ` \0 \0 \n \0 \0 Z d g \0 \0 360 262 ~
0001600 277 ` \0 \0 264 h h ` \0 \0 \n \0 \0 265 N 260
0001620 e g \0 \0 360 235 H g \0 \0 g \0 \0 \v \0 \0
0001640 277 h 260 227 ` \0 \0 232 H ` \0 \0 002 001 \n \0
0001660 \0 263 216 ` \0 \0 g \0 \0 o \0 \0 \0 H h 032
0001700 032 \v \0 \0 g \0 \0 360 222 261 377 f H g \0 \0
0001720 g \0 \0 \v \0 \0 277 h 261 377 a ` \0 \0 h `
0001740 \0 \0 \n \0 \0 \v \0 \0 277 260 235 h ` \0 \0 \n
0001760 \0 \0 263 371 h ` \0 \0 \n \0 \0 Z 003 001 g \0
0002000 \0 360 246 J g \0 \0 360 262 I J g \0 \0 360 243
0002020 \b \0 \0 277 ` \0 \0 225 H K \n \0 \0 277 ` \0
0002040 \0 230 H ` \0 \0 L \v \0 \0 277 \b \0 \0 277 H
0002060 g \0 \0 033 002 ] 003 265 004 260 3 001 ^ d \t \0
0002100 \0 247 277 N d g \0 \0 033 222 \t \0 \0 277 M 260
0002120 345 i \t \0 \0 277 I i \n \0 \0 277 o \0 \0 \0
0002140 i \n \0 \0 277 i \t \0 \0 277 h 271 H g \0 \0
0002160 I \v \0 \0 277 I 022 c 024 i 020 \0 ( 7 0 7
0002200 Q / P U T 6 7 4 Q T E R P
0002220 R I 6 6 7 Q P R I N 1 6 5
0002240 6 Q P R I N 1 6 5 0 Q T E
0002260 R P R I 6 4 0 Q M S M A R K
0002300 C H A N G E D 6 2 4 Q E X P
0002320 R P 6 0 1 Q U P D A T E F I
0002340 L E S 5 7 5 Q S T O R E T A
0002360 B L E 5 6 0 Q U P D A T E C
0002400 O N T A I N S 5 4 6 Q R E A
0002420 D A T A B A S E 5 1 6 Q R E
0002440 A D 5 0 5 Q R E A D 4 7 3
0002460 Q S T O R E T A B L E 4 7 0
0002500 Q R E A D 4 5 1 Q / P U T
0002520 4 2 7 Q A S K U S E R 4 0
0002540 4 Q T E S T T A B L E 3 6 3
0002560 Q / P U T 3 4 0 Q R E A D
0002600 3 1 3 Q R E A D 3 0 3 Q
0002620 R E A D 2 6 1 Q R E A D 2
0002640 3 7 Q I N P U T 2 2 7 Q L
0002660 I S P X P R I N T 2 1 4 Q /
0002700 P U T 1 3 5 Q T E R P R I
0002720 1 3 0 Q P R I N 1 1 1 7 Q
0002740 P R I N 1 1 1 1 Q P R I N 1
0002760 5 0 Q T E R P R I 4 3 Q
0003000 P R I N 1 3 5 Q P R I N 1
0003020 1 3 Q \ L O A D D B / D B F I
0003040 L E 4 N A M E F I E L D ) \r
0003060 ( 7 0 3 Q D A T A B A S E F I
0003100 L E N A M E 6 3 3 Q E X P R
0003120 6 0 6 Q F I L E 5 7 1 Q
0003140 M S F I L E T A B L E 5 6 4 Q
0003160 M S F I L E T A B L E 5 5 2
0003200 Q M S H A S H F I L E N A M E
0003220 5 4 1 Q S T O P 5 3 2 Q
0003240 S T O P 5 2 4 Q R E A D A T
0003260 A B A S E 5 1 3 Q F I L E R
0003300 D T B L 5 0 2 Q F I L E R D
0003320 T B L 4 6 5 Q F I L E R D T
0003340 B L 4 6 1 Q M S A R G T A B
0003360 L E 4 4 6 Q N O 4 4 3 Q
0003400 D A T A B A S E 4 3 2 Q Y
0003420 4 1 4 Q Y 4 1 1 Q D W I M
0003440 W A I T 3 7 7 Q M S F I L E
0003460 T A B L E 3 7 2 Q M S F I L
0003500 E T A B L E 3 6 0 Q N O N E
0003520 3 5 5 Q D A T A B A S E 3
0003540 4 7 Q N O 3 3 5 Q F I L E
0003560 R D T B L 3 2 7 Q M S H A S
0003600 H F I L E N A M E 3 2 0 Q A
0003620 R G S 3 1 0 Q F I L E R D T
0003640 B L 3 0 0 Q F I L E R D T B
0003660 L 2 6 6 Q F N S 2 5 6 Q
0003700 F I L E R D T B L 2 3 3 Q I
0003720 N P U T 2 1 1 Q Y E S 2 0
0003740 6 Q D A T A B A S E 1 7 6 Q
0003760 Y E S 1 7 2 Q L O A D D B
0004000 F L G 1 6 2 Q N O 1 5 1 Q
0004020 Y E S 1 4 4 Q D A T A B A
0004040 S E 7 3 Q D A T A B A S E F
0004060 I L E N A M E ) \r ( 6 6 3 Q
0004100 " i s n o t a d a t a b
0004120 a s e f i l e ! " 4 2 0 Q
0004140 " l o a d d a t a b a s e f
0004160 o r " 1 2 4 Q " a l r e a
0004200 d y l o a d e d . " 1 0 5 Q
0004220 " D a t a b a s e " 3 1 Q
0004240 " n o d a t a b a s e f i
0004260 l e f o u n d f o r " ) \r
0004300 L O A D D B D 1 \r ( P 1 R
0004320 E S E T Y P 0 L I S P X H
0004340 I S T I 1 A S K F L A G
0004360 I 0 F I L E F 3 L I S
0004400 P X H I S T F 4 R E S E T
0004420 V A R S L S T ) \0 " 003 002 \0 002 S
0004440 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221 h
0004460 202 g \0 \0 Z \n \0 \0 J 223 \b \0 \0 020 I 020
0004500 \0 ( 3 5 Q E R R O R ! 3 0 Q
0004520 R E S E T R E S T O R E 1 6
0004540 Q L O A D D B A 0 0 0 1 ) \r (
0004560 2 4 Q E R R O R 1 3 Q I N
0004600 T E R N A L ) \r ( 1 0 Q ( L
0004620 O A D D B A 0 0 0 1 ) ) \r \ L O
0004640 A D D B / D B F I L E D 1 \r (
0004660 L ( 1 A S K F L A G 0 F
0004700 I L E ) ) \0 ] 001 \0 \0 002 @ 265 \t \b
0004720 \0 \0 b \0 260 " g \0 \0 \n \0 \0 ` \0 \0 360
0004740 262 025 g \0 \0 h g \0 \0 h g \0 \0 @ \r 006
0004760 \0 \0 b \0 200 @ g \0 \0 \n \0 \0 252 @ \t \0
0005000 \0 g \0 \0 033 001 265 026 A 224 @ \t \0 \0 203 @
0005020 \t \0 \0 b \0 d 224 \t \0 \0 @ 032 021 001 \0 H
0005040 264 \a @ H \n \0 \0 020 \0 ( 1 3 2 Q \
0005060 L O A D D B / D B F I L E 1 1
0005100 1 5 Q F I L E D A T E 1 0 6
0005120 Q F I N D F I L E 1 0 1 Q
0005140 I N F I L E P 6 4 Q N A M E
0005160 F I E L D 5 7 Q F I L E N A
0005200 M E F I E L D 4 5 Q P A C K
0005220 F I L E N A M E 1 7 Q F I L
0005240 E N A M E F I E L D 5 I N P
0005260 U T ) \r ( 6 7 Q F I L E D A T
0005300 E S 5 4 Q V E R S I O N 4
0005320 0 Q B O D Y 3 4 Q V E R S
0005340 I O N 3 0 Q E X T E N S I O
0005360 N 2 2 Q C O M P I L E . E X
0005400 T 1 4 Q E X T E N S I O N )
0005420 \r ( ) \r \ L O A D D B / D B F I
0005440 L E 1 D 1 \r ( L ( 1 F I L
0005460 E D A T E S 0 F ) ) \0 U 002
0005500 \0 \0 002 g \0 \0 g \0 \0 g \0 \0 h g \0 \0
0005520 @ \r 006 \0 \0 \t \0 \0 021 021 001 H d 262 , d
0005540 A \n \0 \0 224 277 H A 032 020 g \0 \0 g \0 \0
0005560 g \0 \0 g \0 \0 g \0 \0 @ \r 006 \0 \0 \t \0
0005600 \0 \n \0 \0 Y 003 265 004 h 020 001 d A \n \0 \0
0005620 263 327 277 I 002 260 357 \0 ( 1 1 4 Q \ L
0005640 O A D D B / D B F I L E 2 1 0
0005660 0 Q R E M O V E 7 5 Q F I
0005700 L D I R 7 2 Q P A C K F I L
0005720 E N A M E 4 0 Q \ L O A D D
0005740 B / D B F I L E 2 2 4 Q I N
0005760 F I L E P 2 1 Q P A C K F I
0006000 L E N A M E ) \r ( 6 5 Q B O D
0006020 Y 6 2 Q * 5 7 Q V E R S
0006040 I O N 5 4 Q D A T A B A S E
0006060 5 1 Q E X T E N S I O N 1
0006100 4 Q B O D Y 1 0 Q V E R S
0006120 I O N 5 D A T A B A S E 2
0006140 E X T E N S I O N ) \r ( ) \r \
0006160 L O A D D B / D B F I L E 2 D
0006200 1 \r ( L ( 1 F I L E D A T E
0006220 S 0 D B F ) F 0 R E S
0006240 E T V A R S L S T ) \0 . \0 001 \0
0006260 002 o \0 \0 \0 @ g \0 \0 \n \0 \0 b \0 h 032
0006300 032 P 032 c \0 @ \t \0 \0 A 001 @ ` \0 \0 \n
0006320 \0 \0 001 \n \0 \0 265 \a @ \t \0 \0 h 020 \0 (
0006340 5 2 Q C L O S E F 4 4 Q S
0006360 T R E Q U A L 4 0 Q R E A D
0006400 2 7 Q S K R E A D 1 2 Q
0006420 O P E N F I L E ) \r ( 3 5 Q F
0006440 I L E R D T B L 7 I N P U T
0006460 ) \r ( 3 ( P R O G N ( C L
0006500 O S E F ? O L D V A L U E ) )
0006520 ) \r L O A D D 1 \r ( L ( 2
0006540 P R I N T F L G 1 L D F L G
0006560 0 F I L E ) ) \0 026 \0 \0 \0 003
0006600 @ A B \v \0 \0 b \0 A g \0 \0 360 244 d i
0006620 \n \0 \0 @ 020 \0 ( 2 2 Q L O A D D
0006640 B 5 O L D L O A D ) \r ( 1 3
0006660 Q S Y S L O A D ) \r ( ) \r L O
0006700 A D F R O M D 1 \r ( L ( 2
0006720 L D F L G 1 F N S 0 F I
0006740 L E ) ) \0 020 \0 \0 \0 003 @ A B \v \0
0006760 \0 b \0 d i \n \0 \0 @ 020 \0 ( 1 4 Q
0007000 L O A D D B 5 O L D L O A D
0007020 F R O M ) \r N I L \r ( ) \r M A K
0007040 E F I L E D 1 \r ( L ( 3 S
0007060 O U R C E F I L E 2 R E P R
0007100 I N T F N S 1 O P T I O N S
0007120 0 F I L E ) ) \0 021 \0 \0 \0 004
0007140 @ A B C \f \0 \0 b \0 d i \n \0 \0 @ 020
0007160 \0 ( 1 5 Q D U M P D B 6 O
0007200 L D M A K E F I L E ) \r N I L \r
0007220 ( ) \r D U M P D B A 0 0 0 1 D
0007240 1 \r ( N A M E E R R O R S E T
0007260 F 0 R E S E T V A R S L S
0007300 T F 1 F L F 2 D B F
0007320 I L E F 3 F F N S F 4
0007340 F I L E F 5 R E S E T Y
0007360 F 6 F N S ) \0 216 \0 \a 002 \0
0007400 o \0 \0 \0 g \0 \0 g \0 \0 g \0 \0 h g \0
0007420 \0 T \r 006 \0 \0 g \0 \0 g \0 \0 \v \0 \0 c
0007440 004 h 032 032 P 032 c \0 277 g \0 \0 R \t \0 \0
0007460 h 032 032 h 032 P 032 c \0 277 o \0 \0 \0 \t \0
0007500 \0 277 ` \0 \0 262 023 Q ` \0 \0 Q g \0 \0 033
0007520 001 \t \0 \0 \v \0 \0 277 ` \0 \0 226 Q S i \v
0007540 \0 \0 277 o \0 \0 \0 \t \0 \0 277 S \t \0 \0 277
0007560 h \t \0 \0 277 V 265 022 o \0 \0 \0 \t \0 \0 277
0007600 h \t \0 \0 c \n i 020 \t \0 \0 260 371 \0 ( 2
0007620 1 2 Q D U M P D A T A B A S E
0007640 2 0 3 Q T E R P R I 1 7 6
0007660 Q P R I N 1 1 6 3 Q T E R
0007700 P R I 1 5 6 Q P R I N 2 1
0007720 5 1 Q P R I N 1 1 4 1 Q U
0007740 P D A T E C O N T A I N S 1 2
0007760 6 Q S T O R E T A B L E 1 2
0010000 3 Q P R I N T 1 0 0 Q P R
0010020 I N 1 5 7 Q O U T P U T 3
0010040 6 Q O P E N F I L E 2 5 Q
0010060 P A C K F I L E N A M E ) \r ( 1
0010100 3 2 Q M S H A S H F I L E N A
0010120 M E 1 1 6 Q F I L E D A T E
0010140 S 1 1 2 Q M S F I L E T A B
0010160 L E 1 0 4 Q M S F I L E T A
0010200 B L E 5 3 Q O U T P U T 3
0010220 3 Q N E W 3 0 Q O U T P U
0010240 T 2 0 Q B O D Y 1 4 Q V
0010260 E R S I O N 1 1 Q D A T A B
0010300 A S E 6 E X T E N S I O N )
0010320 \r ( 1 7 3 Q " S T O P " 1
0010340 4 6 Q " F N S " 7 5 Q "
0010360 ( P R O G N ( P R I N 1 % "
0010400 U s e L O A D D B t o l o
0010420 a d d a t a b a s e f i l e
0010440 s ! \r % " T ) ( E R R O R !
0010460 ) ) \r " 3 ( P R O G N ( C
0010500 L O S E F ? O L D V A L U E )
0010520 ( A N D R E S E T S T A T E
0010540 ( D E L F I L E O L D V A L
0010560 U E ) ) ) ) \r D U M P D B D 1
0010600 \r ( L ( 1 P R O P F L G )
0010620 P 1 2 Q R E S E T Y P 1
0010640 1 Q L I S P X H I S T P 3
0010660 F N S P 2 D B F I L E
0010700 P 1 F F N S P 0 F L
0010720 I 0 F I L E F 1 4 Q L
0010740 I S P X H I S T F 1 5 Q R
0010760 E S E T V A R S L S T ) 001 003 \f
0011000 002 \0 002 @ d 242 261 \0 376 004 l 004 360 264 003 202
0011020 261 \0 364 @ \t \0 \0 @ \t \0 \0 021 " 003 I 265
0011040 027 ` \0 \0 262 g H ` \0 \0 002 001 \n \0 \0 262
0011060 \ h b 002 277 I [ A 262 . H g \0 \0 033 g
0011100 \0 \0 360 263 # ` \0 \0 g \0 \0 360 263 032 ` \0
0011120 \0 264 003 202 261 \0 260 H ` \0 \0 002 001 \n \0 \0
0011140 264 003 202 261 \0 241 ` \0 \0 232 K 021 A \b L 003
0011160 265 @ M 022 273 W 030 021 ! \v W 032 o \0 \0 \0
0011200 g \0 \0 \n \0 \0 262 P h 260 P A 230 H g \0
0011220 \0 \n \0 \0 260 032 i \t \0 \0 277 @ i \n \0 \0
0011240 277 o \0 \0 \0 i \n \0 \0 277 i \t \0 \0 h 020
0011260 001 _ 020 \t \0 \0 277 O 020 d \t \0 \0 233 _ 016
0011300 277 N 265 016 O 016 h 032 ^ ] 277 L 002 \ 260 241
0011320 O 016 & ^ 260 366 g \0 \0 _ 026 \n \0 \0 277 O
0011340 026 223 \b \0 \0 277 023 A 226 J i \n \0 \0 260 025
0011360 H g \0 \0 J \v \0 \0 277 H g \0 \0 g \0 \0
0011400 \v \0 \0 J 020 \0 ( 3 7 7 Q / P U T
0011420 3 6 4 Q / P U T 3 5 2 Q
0011440 P R I N T 3 4 1 Q E R R O R
0011460 ! 3 3 2 Q R E S E T R E S T
0011500 O R E 2 7 1 Q L O C A L F N
0011520 P 2 6 2 Q U P D A T E F N
0011540 2 5 2 Q T E R P R I 2 4 5 Q
0011560 P R I N 1 2 3 4 Q P R I N
0011600 1 2 2 6 Q T E R P R I 2 2
0011620 0 Q / R E M P R O P 2 0 2 Q
0011640 D U M P D B A 0 0 0 1 1 3 4
0011660 Q T E S T T A B L E 5 3 Q
0011700 T E S T T A B L E 2 7 Q F I
0011720 L E F N S L S T 2 3 Q N A M
0011740 E F I E L D ) \r ( 3 7 4 Q Y E
0011760 S 3 7 1 Q D A T A B A S E
0012000 3 6 0 Q D A T A B A S E F I L
0012020 E N A M E 3 2 5 Q E R R O R
0012040 2 1 5 Q D A T A B A S E 1
0012060 7 7 Q I N T E R N A L 1 4 5
0012100 Q M S H A S H F I L E N A M E
0012120 1 2 7 Q M S F I L E T A B L
0012140 E 1 1 5 Q M S F I L E T A B
0012160 L E 1 0 7 Q Y E S 1 0 4 Q
0012200 S A V E D B F L G 7 6 Q Y
0012220 E S 7 2 Q D A T A B A S E
0012240 4 6 Q M S F I L E T A B L E
0012260 4 0 Q M S F I L E T A B L E )
0012300 \r ( 2 4 1 Q " h a s n o
0012320 f u n c t i o n s . " 1 7 4
0012340 Q ( D U M P D B A 0 0 0 1 ) )
0012360 \r M A K E D B D 1 \r ( L ( 0
0012400 F ) ) \0 Z \0 \0 \0 001 @ \t \0 \0 b
0012420 \0 i g \0 \0 @ \t \0 \0 \v \0 \0 264 G @ g
0012440 \0 \0 033 o \0 \0 \0 034 265 ; ` \0 \0 o \0 \0
0012460 \0 034 265 1 ` \0 \0 232 @ ` \0 \0 002 001 \n \0
0012500 \0 265 " @ g \0 \0 ` \0 \0 g \0 \0 o \0 \0
0012520 \0 \v \0 \0 g \0 \0 360 223 g \0 \0 202 g \0 \0
0012540 \v \0 \0 020 \0 ( 1 2 7 Q / P U T
0012560 1 1 0 Q A S K U S E R 6 5 Q
0012600 T E S T T A B L E 2 0 Q I
0012620 N F I L E C O M S ? 1 5 Q F
0012640 I L E C O M S 3 N A M E F I
0012660 E L D ) \r ( 1 2 4 Q N O 1 2
0012700 0 Q Y E S 1 1 3 Q Y 1 0
0012720 1 Q N 7 6 Q D W I M W A I
0012740 T 7 3 Q D A T A B A S E 6
0012760 0 Q M S F I L E T A B L E 5
0013000 3 Q M S F I L E T A B L E 4
0013020 1 Q S A V E D B F L G 2 6 Q
0013040 D A T A B A S E 1 1 Q F N
0013060 S ) \r ( 1 0 5 Q " D o y o
0013100 u w a n t a M a s t e r s
0013120 c o p e D a t a b a s e f o
0013140 r t h i s f i l e ? " 4
0013160 5 Q ( Y E S N O ) 3 3 Q
0013200 ( Y E S N O ) ) \r ( P R E T T
0013220 Y C O M P R I N T D A T A B A
0013240 S E F N S C O M S ) \r ( R P A Q
0013260 Q D A T A B A S E F N S C O M
0013300 S ( ( * D o e s a u t o m
0013320 a t i c M a s t e r s c o p e
0013340 d a t a b a s e m a i n t e
0013360 n a n c e ) ( D E C L A R E :
0013400 F I R S T ( P ( \r V I R G
0013420 I N F N ( Q U O T E L O A D
0013440 ) T ) ( M O V D ? ( Q U O
0013460 T E L O A D ) ( Q U O T E
0013500 O L D L O A D ) ) ( V I R G I
0013520 N F N ( Q U O T E L O A D F
0013540 R O M ) T ) ( M O V D ? (
0013560 \r Q U O T E L O A D F R O M )
0013600 ( Q U O T E O L D L O A D F
0013620 R O M ) ) ( V I R G I N F N
0013640 ( Q U O T E M A K E F I L E )
0013660 T ) ( M O V D ? ( Q U O T
0013700 E M A K E F I L E ) ( Q U O
0013720 T E \r O L D M A K E F I L E )
0013740 ) ) ) ( F N S D B F I L E
0013760 D B F I L E 1 D B F I L E 2
0014000 L O A D L O A D F R O M M A
0014020 K E F I L E ) ( A D D V A R S
0014040 ( L I N K E D F N S O L D L
0014060 O A D ) ) ( P ( \r R E L I N
0014100 K ( Q U O T E M A K E F I L
0014120 E S ) ) ) ( F N S D U M P D
0014140 B L O A D D B M A K E D B )
0014160 ( P R O P P R O P T Y P E
0014200 D A T A B A S E ) ( I N I T V
0014220 A R S ( L O A D D B F L G (
0014240 \r Q U O T E A S K ) ) ( S A
0014260 V E D B F L G ( Q U O T E A
0014300 S K ) ) ) ( A D D V A R S (
0014320 M A K E F I L E F O R M S ( M
0014340 A K E D B F I L E ) ) ) ( *
0014360 T o p e r m i t M S H A S
0014400 H \r i n t e r f a c e ) ( I
0014420 N I T V A R S ( M S H A S H F
0014440 I L E N A M E ) ( M S F I L E
0014460 T A B L E ) ) ( L O C A L V A
0014500 R S . T ) ( B L O C K S
0014520 ( L O A D D B L O A D D B D
0014540 B F I L E \r D B F I L E 1 D
0014560 B F I L E 2 ( N O L I N K F N
0014600 S . T ) ) ) ( D E C L A R
0014620 E : E V A L @ C O M P I L E
0014640 D O N T C O P Y ( P ( R E S
0014660 E T S A V E D W I M I F Y C O
0014700 M P F L G T ) ) ) ) ) \r ( A D
0014720 D T O V A R L I N K E D F N S
0014740 O L D L O A D ) \r ( R E L I N
0014760 K ( Q U O T E M A K E F I L
0015000 E S ) ) \r ( P U T P R O P S D
0015020 A T A B A S E P R O P T Y P E
0015040 I G N O R E ) \r ( R P A Q ?
0015060 L O A D D B F L G ( Q U O T E
0015100 A S K ) ) \r ( R P A Q ? S A
0015120 V E D B F L G ( Q U O T E A
0015140 S K ) ) \r ( A D D T O V A R M
0015160 A K E F I L E F O R M S ( M A
0015200 K E D B F I L E ) ) \r ( R P A
0015220 Q ? M S H A S H F I L E N A M
0015240 E ) \r ( R P A Q ? M S F I L E
0015260 T A B L E ) \r N I L \r
0015273