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