$ od -c -N 50000 [qv]<notecards>1.3m>NCDECLS.LCOM!1 0000000 ( D E F I N E - F I L E - I N F 0000020 O 036 P A C K A G E " I L " 0000040 036 R E A D T A B L E " I N T E 0000060 R L I S P " 036 B A S E 1 0 ) 0000100 \r ( F I L E C R E A T E D " 1 0000120 0 - O c t - 8 8 1 6 : 5 5 : 0 0000140 4 " ( " c o m p i l e d o n 0000160 " { Q V } < N O T E C A R D 0000200 S > 1 . 3 M N E X T > N C D E C 0000220 L S . ; 2 ) \r " 1 9 - S e p - 0000240 8 8 1 7 : 3 1 : 5 5 " r e c 0000260 o m p i l e d A L L i n " 0000300 M e d l e y 1 9 - S e p - 8 8 0000320 . . . " d a t e d " 1 9 - 0000340 S e p - 8 8 1 8 : 0 7 : 5 8 " 0000360 ) \r ( F I L E C R E A T E D " 0000400 1 0 - O c t - 8 8 1 6 : 5 2 : 0000420 4 5 " { Q V } < N O T E C A R 0000440 D S > 1 . 3 M N E X T > N C D E 0000460 C L S . ; 2 8 6 3 5 1 c h a 0000500 n g e s t o % : ( V A R S 0000520 \r N C D E C L S C O M S ) p r 0000540 e v i o u s d a t e % : " 0000560 2 - F e b - 8 8 1 9 : 0 9 : 0 0000600 8 " { Q V } < N O T E C A R D 0000620 S > 1 . 3 L N E X T > N C D E C 0000640 L S . ; 1 4 ) \r L O A D I N I T 0000660 P R O P S : D 5 \r ( P 4 v 0000700 a r P 3 p r o p - v a l 0000720 P 2 v a l P 1 p r o p 0000740 P 0 s p e c I 0 s p 0000760 e c - l i s t ) \0 1 005 \0 003 001 @ 0001000 260 * d 001 021 A 004 H 001 274 H 260 030 d 001 [ 0001020 001 K 002 001 272 271 L I \n \0 \0 246 L I J \v 0001040 \0 \0 277 002 003 265 350 h 023 002 003 265 327 h 020 \0 0001060 ( 3 4 P U T P R O P 2 7 G 0001100 E T P R O P ) \r N I L \r ( ) \r L 0001120 O A D I N I T A D V I S E : D 0001140 5 \r ( P 3 s p e c P 2 0001160 a d v i c e P 1 f n P 0001200 0 i d I 0 s p e c - l i 0001220 s t ) \0 6 004 \0 003 001 @ 001 021 1 003 @ 0001240 260 ) d 001 [ 001 K 002 001 272 Y H \n \0 \0 263 0001260 032 I g \0 \0 J \v \0 \0 277 I k g \0 \0 017 0001300 016 277 I H i \v \0 \0 277 002 003 265 327 h 020 \0 0001320 ( 4 5 P U T P R O P 3 0 P 0001340 U T P R O P 2 0 G E T P R O 0001360 P ) \r ( 3 6 R E A D V I S E 0001400 2 6 R E A D V I C E ) \r ( ) \r 0001420 N A M E D - R E S E T U N W I N 0001440 D : D 5 \r ( P 1 R E S E T 0001460 Z P 0 O L D V A L U E I 0001500 1 N O R M A L P I 0 H 0001520 A N D L E ) \0 2 002 \0 \0 002 021 001 0001540 @ 003 265 004 h 020 001 @ 002 b \0 277 Y d 001 003 0001560 262 025 d 002 240 001 002 001 270 I 001 001 I 001 002 \n 0001600 \0 \0 277 260 335 001 I 002 \n \0 \0 277 260 324 \0 ( 0001620 4 5 S E T T O P V A L 3 6 0001640 A P P L Y ) \r N I L \r ( ) \r ( P 0001660 R E T T Y C O M P R I N T N C 0001700 D E C L S C O M S ) \r ( R P A Q 0001720 Q N C D E C L S C O M S ( ( 0001740 * ; ; ; " L O A D T H I S 0001760 F I L E B E F O R E T R Y 0002000 I N G T O C O M P I L E A 0002020 N Y N O T E C A R D S F I L 0002040 E S ! ! " ) ( * ; ; \r " S 0002060 o m e d e f i n e r s f o r 0002100 N o t e c a r d s " ) ( * 0002120 ; ; \r " W A R N I N G : I N 0002140 I T A D V I S E d o e s n o 0002160 t w o r k f o r ( A D V I 0002200 S E ( M U M B L E I N M U 0002220 M B L E ) ) , w h i c h i s 0002240 a w h o l e d i f f e r e 0002260 n t a n i m a l . " \r ) ( F 0002300 I L E P K G C O M S I N I T P 0002320 R O P S I N I T A D V I S E ) 0002340 ( F N S L O A D I N I T P R 0002360 O P S L O A D I N I T A D V I 0002400 S E ) ( * ; ; " u s e d 0002420 i n N C C O N F I G " ) ( \r 0002440 F U N C T I O N S N C . A u t 0002460 o l o a d A p p l y N C . A u 0002500 t o l o a d A p p l y * N A M 0002520 E D - R E S E T L S T . N A M 0002540 E D - R E S E T L S T . N A M 0002560 E D - R E S E T S A V E \r N A 0002600 M E D - R E S E T U N S A V E ) 0002620 ( M A C R O S N A M E D - R 0002640 E S E T L S T . N A M E D - R 0002660 E S E T L S T . ) ( F N S N 0002700 A M E D - R E S E T U N W I N D 0002720 ) ( * ; ; \r " u s e d i 0002740 n N C U T I L I T I E S " ) 0002760 ( F U N C T I O N S N C . W 0003000 i t h T o p W i n d o w s U n a 0003020 t t a c h e d A B O R T . P R 0003040 O T E C T ) ( F U N C T I O N 0003060 S \r N C . A c t i v a t e C a 0003100 r d A n d D o ) ( * ; ; " 0003120 u s e d i n N C P A R A M E 0003140 T E R S " ) ( R E C O R D S 0003160 G L O B A L P A R A M E T E R ) 0003200 ( * ; ; \r " u s e d i n 0003220 N C D A T A B A S E " ) ( R 0003240 E C O R D S N o t e F i l e D 0003260 e v i c e N o t e F i l e C r 0003300 i t i c a l U I D s N o t e F 0003320 i l e N o t e F i l e V e r s 0003340 i o n I n d e x L o c s \r C 0003360 a r d P a r t R e c o r d T R 0003400 A V E R S A L S P E C S U I D 0003420 M O N I T O R L O C K W O R 0003440 D ) ( F U N C T I O N S N C 0003460 . P r o t e c t e d C a r d O p 0003500 e r a t i o n \r N C . P r o t 0003520 e c t e d N o t e F i l e O p e 0003540 r a t i o n N C . P r o t e c 0003560 t e d S e s s i o n O p e r a t 0003600 i o n N C . I f A l l C a r d 0003620 s F r e e ) ( F U N C T I O N 0003640 S \r N C . D o C a r d P a r t 0003660 F n ) ( F U N C T I O N S N 0003700 C . R e a d P t r N C . W r i 0003720 t e P t r N C . R e a d S t a 0003740 t u s ) ( * ; \r " T h e 0003760 f o l l o w i n g a r e n ' t 0004000 c a l l e d a n y m o r e , 0004020 b u t a r e s a v e d f 0004040 o r r e f e r e n c e p u r 0004060 p o s e s . " ) ( M A C R O S 0004100 N C . G e t P t r \r N C . P 0004120 u t P t r N C . G e t S t a t 0004140 u s N C . P u t S t a t u s ) 0004160 ( * ; ; " u s e d i n 0004200 N C C O M P A C T " ) ( R E C 0004220 O R D S S o r t i n g R e c o 0004240 r d ) ( * ; ; \r " u s e d 0004260 i n N C R E P A I R " ) ( 0004300 R E C O R D S S c a v e n g e 0004320 r I n f o L I N K S D A T A 0004340 T I T L E D A T A P R O P L I 0004360 S T D A T A ) ( * ; ; " u 0004400 s e d i n N C C A R D S " ) 0004420 \r ( R E C O R D S C a r d O 0004440 b j e c t C a r d C a c h e 0004460 C a r d L i n k s C a c h e ) 0004500 ( F U N C T I O N S N C . W 0004520 i t h W r i t e P e r m i s s i 0004540 o n N C . I f C a r d P a r t 0004560 N o t B u s y \r N C . I f M u 0004600 l t i p l e C a r d P a r t s N 0004620 o t B u s y ) ( * ; " H a 0004640 s h A r r a y H a n d l e r 0004660 " ) ( F U N C T I O N S N C 0004700 . M a p C a r d s ) ( R E C O 0004720 R D S \r P r o p L i s t I t e 0004740 m ) ( * ; ; " u s e d i 0004760 n N C L I N K S " ) ( R E C 0005000 O R D S L i n k L I N K D I 0005020 S P L A Y M O D E ) ( R E C O 0005040 R D S N C P o i n t e r ) ( 0005060 * ; ; \r " u s e d i n N 0005100 C T Y P E S M E C H " ) ( R E 0005120 C O R D S N o t e C a r d T y 0005140 p e ) ( M A C R O S N C . A 0005160 p p l y F n N C . A p p l y S 0005200 u p e r s F n ) ( F U N C T I 0005220 O N S \r N C . G e t C a r d T 0005240 y p e F i e l d ) ( * ; ; 0005260 " u s e d i n N C P R O G I 0005300 N T " ) ( F U N C T I O N S 0005320 N C P . A p p l y C a r d T y p 0005340 e F n N C P . A p p l y S u p 0005360 e r T y p e F n ) ( \r F U N C 0005400 T I O N S N C P . M a p C a r 0005420 d s N C P . M a p C a r d s O 0005440 f T y p e ) ( F U N C T I O N 0005460 S N C P . W i t h L o c k e d 0005500 C a r d s ) ( R E C O R D S 0005520 N O T E C A R D D A T E S ) ( 0005540 \r F U N C T I O N S N C P . M 0005560 a p L i n k s N C P . M a p L 0005600 i n k s O f T y p e ) ( * ; 0005620 ; " u s e d i n N C C R O 0005640 S S F I L E L I N K S " ) ( R 0005660 E C O R D S \r C r o s s F i l 0005700 e L i n k S u b s t a n c e ) 0005720 ( * ; ; " u s e d i n N 0005740 C B R O W S E R C A R D " ) ( 0005760 R E C O R D S S P E C I A L B 0006000 R O W S E R S P E C S ) ( * 0006020 ; ; \r " u s e d i n N C C 0006040 O N V E R T V E R S I O N 2 T O 0006060 3 " ) ( R E C O R D S P O I 0006100 N T E R L I S T N O T E C A R 0006120 D L I N K ) ( P R O P ( F I 0006140 L E T Y P E \r M A K E F I L E 0006160 - E N V I R O N M E N T ) N C 0006200 D E C L S ) ( D E C L A R E % 0006220 : D O N T E V A L @ L O A D 0006240 D O E V A L @ C O M P I L E D 0006260 O N T C O P Y C O M P I L E R 0006300 V A R S ( A D D V A R S \r ( 0006320 N L A M A L O A D I N I T A D 0006340 V I S E L O A D I N I T P R O 0006360 P S ) ( N L A M L ) ( L A M 0006400 A ) ) ) ) ) \r ( P U T D E F ( 0006420 Q U O T E I N I T P R O P S ) 0006440 ( Q U O T E F I L E P K G C 0006460 O M S ) ( Q U O T E ( ( C O 0006500 M M A C R O ( X ( P ( L 0006520 O A D I N I T P R O P S . X 0006540 ) ) ) ) ) ) ) \r ( P U T D E F 0006560 ( Q U O T E I N I T A D V I S 0006600 E ) ( Q U O T E F I L E P K 0006620 G C O M S ) ( Q U O T E ( ( 0006640 C O M M A C R O ( X ( P 0006660 * ( L I S T ( A P P E N D 0006700 ( L I S T ( Q U O T E \r L O 0006720 A D I N I T A D V I S E ) ( G 0006740 E N S Y M ( Q U O T E N C - 0006760 A D V I C E ) ) ) ( Q U O T E 0007000 X ) ) ) ) ) ) ) ) ) \r ( D E F 0007020 M A C R O N C . A u t o l o a 0007040 d A p p l y ( F n A r g s ) 0007060 ( * ; ; ; \r " L i k e N 0007100 C . A u t o l o a d A p p l y * 0007120 e x c e p t t a k e s s i 0007140 n g l e A r g s a r g u m e 0007160 n t r a t h e r t h a n s 0007200 p r e a d . " ) ( B Q U O T E 0007220 ( i f ( G E T D ( \ , \r 0007240 F n ) ) t h e n ( A P P L Y 0007260 ( \ , F n ) ( \ , A r g 0007300 s ) ) e l s e ( L E T ( ( 0007320 F i l e N a m e ( N C . L o o 0007340 k u p A u t o l o a d F n F i l 0007360 e ( \ , F n ) ) ) ) ( i f 0007400 \r F i l e N a m e t h e n 0007420 ( N C . L o a d F i l e F r o m 0007440 D i r e c t o r i e s F i l e 0007460 N a m e ) ( i f ( G E T D 0007500 ( \ , F n ) ) t h e n ( A 0007520 P P L Y ( \ , F n ) ( \ , 0007540 A r g s ) ) \r e l s e ( N 0007560 C . R e p o r t E r r o r " N 0007600 C . A u t o l o a d A p p l y " 0007620 ( C O N C A T " L o a d e d 0007640 f i l e " F i l e N a m e 0007660 \r " , b u t s t i l l n 0007700 o d e f i n i t i o n o f 0007720 " ( \ , F n ) ) ) ) e l s 0007740 e ( N C . R e p o r t E r r o 0007760 r " N C . A u t o l o a d A p 0010000 p l y " ( C O N C A T \r " N 0010020 o d e f i n i t i o n o f 0010040 " ( \ , F n ) " i n t 0010060 a b l e o f a u t o l o a d 0010100 a b l e f u n c t i o n s . " 0010120 ) ) ) ) ) ) ) \r ( D E F M A C R 0010140 O N C . A u t o l o a d A p p 0010160 l y * ( F n & R E S T a r 0010200 g s ) ( * ; ; ; \r " F i r 0010220 s t a r g i s n a m e o 0010240 f f u n c t i o n t o a p 0010260 p l y . R e s t a r e a r 0010300 g s . T h e f n n a m e 0010320 s h o u l d b e i n t h e 0010340 g l o b a l t a b l e w i 0010360 t h a n a c c o m p a n y i 0010400 n g f i l e t o a u t o l 0010420 o a d f r o m . " \r ) ( B Q 0010440 U O T E ( i f ( G E T D ( 0010460 \ , F n ) ) t h e n ( A P 0010500 P L Y * ( \ , F n ) ( \ , 0010520 @ a r g s ) ) e l s e ( L 0010540 E T ( ( F i l e N a m e ( \r 0010560 N C . L o o k u p A u t o l o a 0010600 d F n F i l e ( \ , F n ) ) 0010620 ) ) ( i f F i l e N a m e 0010640 t h e n ( N C . L o a d F i l 0010660 e F r o m D i r e c t o r i e s 0010700 F i l e N a m e ) ( i f ( 0010720 G E T D ( \r \ , F n ) ) t 0010740 h e n ( A P P L Y * ( \ , 0010760 F n ) ( \ , @ a r g s ) ) 0011000 e l s e ( N C . R e p o r t E 0011020 r r o r " N C . A u t o l o a 0011040 d A p p l y * " ( C O N C A T 0011060 \r " L o a d e d f i l e " 0011100 F i l e N a m e " , b u t 0011120 s t i l l n o d e f i n i 0011140 t i o n o f " ( \ , F n 0011160 ) ) ) ) e l s e ( N C . R e 0011200 p o r t E r r o r \r " N C . A 0011220 u t o l o a d A p p l y * " ( 0011240 C O N C A T " N o d e f i n 0011260 i t i o n o f " ( \ , F 0011300 n ) " i n t a b l e o f 0011320 a u t o l o a d a b l e f u 0011340 n c t i o n s . " ) ) ) ) ) ) ) 0011360 \r ( D E F M A C R O N A M E D 0011400 - R E S E T L S T ( H A N D L 0011420 E F O R M ) ( B Q U O T E 0011440 ( L E T ( ( ( \ , H A N D L 0011460 E ) N I L ) ( ( L I S P X H 0011500 I S T L I S P X H I S T ) ) ) 0011520 ( \r D E C L A R E ( S P E C 0011540 V A R S ( \ , H A N D L E ) 0011560 L I S P X H I S T ) ) ( C L 0011600 : U N W I N D - P R O T E C T 0011620 ( \ , F O R M ) ( N A M E D 0011640 - R E S E T U N W I N D ( \ , 0011660 H A N D L E ) ) \r ) ) ) ) \r ( 0011700 D E F M A C R O . N A M E D - 0011720 R E S E T L S T . ( H A N D L 0011740 E F O R M & O P T I O N A L 0011760 I N I T O T H E R B I N D I 0012000 N G S ) ( B Q U O T E ( L E 0012020 T ( ( ( \ , H A N D L E ) 0012040 ( \ , \r I N I T ) ) ( \ , @ 0012060 O T H E R B I N D I N G S ) ) 0012100 ( D E C L A R E ( S P E C V 0012120 A R S ( \ , H A N D L E ) 0012140 ( \ , @ ( M A P C A R O T H 0012160 E R B I N D I N G S ( Q U O T 0012200 E C A R ) ) ) ) ) \r ( C L : 0012220 U N W I N D - P R O T E C T ( 0012240 \ , F O R M ) ( N A M E D - 0012260 R E S E T U N W I N D ( \ , 0012300 H A N D L E ) ) ) ) ) ) \r ( D E 0012320 F M A C R O N A M E D - R E S 0012340 E T S A V E ( R E S E T H A N 0012360 D L E & R E S T F O R M S ) 0012400 ( B Q U O T E ( L E T ( R 0012420 E S E T I T E M ) ( S E T Q 0012440 ( \ , R E S E T H A N D L E ) 0012460 ( \r C O N S ( S E T Q R E 0012500 S E T I T E M ( \ , ( C O N 0012520 D ( ( A N D ( A T O M ( C 0012540 A R F O R M S ) ) ( C A R 0012560 F O R M S ) ) ( S U B P A I R 0012600 ( Q U O T E ( V A R V A L 0012620 ) ) ( C D R X \r ) ( Q U O 0012640 T E ( P R O G 1 ( C O N S 0012660 ( Q U O T E V A R ) ( G E T 0012700 T O P V A L ( Q U O T E V A 0012720 R ) ) ) ( S E T T O P V A L 0012740 ( Q U O T E V A R ) V A L ) 0012760 ) ) ) ) ( ( C D R F O R M S 0013000 \r ) ( B Q U O T E ( L I S T 0013020 ( \ , ( C A D R F O R M S 0013040 ) ) ( \ , ( C A R F O R M 0013060 S ) ) ) ) ) ( T ( B Q U O T 0013100 E ( L I S T ( L I S T ( Q 0013120 U O T E ( \ , ( C O N D ( 0013140 ( E Q ( \r C A A R F O R M S 0013160 ) ( Q U O T E S E T Q ) ) 0013200 ( C A R ( C A D D A R F O R 0013220 M S ) ) ) ( T ( C A A R F 0013240 O R M S ) ) ) ) ) ( \ , ( C 0013260 A R F O R M S ) ) ) ) ) ) ) ) 0013300 ) ( \ , \r R E S E T H A N D 0013320 L E ) ) ) R E S E T I T E M ) 0013340 ) ) \r ( D E F M A C R O N A M 0013360 E D - R E S E T U N S A V E ( 0013400 R E S E T H A N D L E I T E M 0013420 F O R M ) ( B Q U O T E ( L 0013440 E T ( ( I T E M L I S T ( \ 0013460 , I T E M F O R M ) ) ) ( f 0013500 o r I T E M \r i n I T E M 0013520 L I S T d o ( S E T R E S 0013540 E T H A N D L E ( D R E M O V 0013560 E I T E M ( \ , R E S E T 0013600 H A N D L E ) ) ) ( C O N D 0013620 ( ( L I S T P ( C A R I T E 0013640 M ) ) ( S E T Q \r O L D V A 0013660 L U E ( C O N D ( ( C D R 0013700 I T E M ) ( C A D R I T E M 0013720 ) ) ( T ( C A D A R I T E 0013740 M ) ) ) ) ( A P P L Y ( C A 0013760 A R I T E M ) ( C D A R I 0014000 T E M ) ) ) ( T ( \r S E T T 0014020 O P V A L ( C A R I T E M ) 0014040 ( C D R I T E M ) ) ) ) ) ) 0014060 ) ) \r ( P R O G N ( D E F M A 0014100 C R O N A M E D - R E S E T L 0014120 S T ( H A N D L E F O R M ) 0014140 ( B Q U O T E ( L E T ( ( 0014160 ( \ , H A N D L E ) N I L ) 0014200 ( ( L I S P X H I S T L I S 0014220 P X H I S T ) ) ) \r ( D E C L 0014240 A R E ( S P E C V A R S ( \ 0014260 , H A N D L E ) L I S P X H 0014300 I S T ) ) ( C L : U N W I N D 0014320 - P R O T E C T ( \ , F O R 0014340 M ) ( N A M E D - R E S E T U 0014360 N W I N D ( \ , H A N D L E 0014400 \r ) ) ) ) ) ) ( P U T P R O P 0014420 S N A M E D - R E S E T L S T 0014440 M A C R O ( ( H X . Y 0014460 ) ( . N A M E D - R E S E T L 0014500 S T . H ( P R O G N X . 0014520 Y ) N I L ( ( L I S P X H 0014540 I S T \r L I S P X H I S T ) ) 0014560 ) ) ) ) \r ( P R O G N ( D E F 0014600 M A C R O . N A M E D - R E S 0014620 E T L S T . ( H A N D L E F 0014640 O R M & O P T I O N A L I N 0014660 I T O T H E R B I N D I N G S 0014700 ) ( B Q U O T E ( L E T ( 0014720 ( ( \ , H A N D L E \r ) ( \ 0014740 , I N I T ) ) ( \ , @ O T 0014760 H E R B I N D I N G S ) ) ( D 0015000 E C L A R E ( S P E C V A R S 0015020 ( \ , H A N D L E ) ( \ , 0015040 @ ( M A P C A R O T H E R B 0015060 I N D I N G S ( Q U O T E C 0015100 A R \r ) ) ) ) ) ( C L : U N W 0015120 I N D - P R O T E C T ( \ , 0015140 F O R M ) ( N A M E D - R E S 0015160 E T U N W I N D ( \ , H A N 0015200 D L E ) ) ) ) ) ) ( P U T P R 0015220 O P S . N A M E D - R E S E T 0015240 L S T . \r D M A C R O ( D E 0015260 F M A C R O ( H A N D L E F 0015300 O R M & O P T I O N A L I N 0015320 I T O T H E R B I N D I N G S 0015340 ) ( B Q U O T E ( L E T ( 0015360 ( ( \ , H A N D L E ) ( \ , 0015400 I N I T ) ) ( \ , @ \r O T 0015420 H E R B I N D I N G S ) ) ( D 0015440 E C L A R E ( S P E C V A R S 0015460 ( \ , H A N D L E ) ( \ , 0015500 @ ( M A P C A R O T H E R B 0015520 I N D I N G S ( Q U O T E C 0015540 A R ) ) ) ) ) ( \r C L : U N W 0015560 I N D - P R O T E C T ( \ , 0015600 F O R M ) ( N A M E D - R E S 0015620 E T U N W I N D ( \ , H A N 0015640 D L E ) ) ) ) ) ) ) ) \r ( D E F 0015660 M A C R O N C . W i t h T o p 0015700 W i n d o w s U n a t t a c h e 0015720 d ( M a i n W i n d o w & B 0015740 O D Y F o r m s ) ( * ; ; 0015760 \r " R u n F o r m s a f t 0016000 e r t e m p o r a r i l y d 0016020 e t a c h i n g w i n d o w s 0016040 a t t a c h e d t o t o p 0016060 o f M a i n W i n d o w . 0016100 T h i s c o d e w a s o r 0016120 i g i n a l l y i n F r a n 0016140 k ' s N C . A t t a c h N o t 0016160 e F i l e N a m e f u n c t i 0016200 o n , b u t f o u n d t o 0016220 b e m o r e g e n e r a l 0016240 l y u s e f u l . " \r ) ( B 0016260 Q U O T E ( R E S E T L S T 0016300 ( R E S E T S A V E N I L ( 0016320 B Q U O T E ( ( \ , ( F U N 0016340 C T I O N ( L A M B D A ( D 0016360 e s c r i p t i o n L i s t ) 0016400 ( * ; \r " R e a t t a c h 0016420 w i n d o w s a c c o r d i n 0016440 g t o i n f o r m a t i o n 0016460 i n a d e s c r i p t i o 0016500 n l i s t . " ) ( f o r w 0016520 i n d o w D e s c r i p t i o n 0016540 i n \r D e s c r i p t i o n 0016560 L i s t d o ( A T T A C H W 0016600 I N D O W ( C A R w i n d o 0016620 w D e s c r i p t i o n ) ( \ 0016640 , M a i n W i n d o w ) ( C 0016660 A A D R w i n d o w D e s c r 0016700 i p t i o n ) ( \r C D A D R 0016720 w i n d o w D e s c r i p t i o 0016740 n ) ) ( W I N D O W P R O P 0016760 ( C A R w i n d o w D e s c r 0017000 i p t i o n ) ( Q U O T E P 0017020 A S S T O M A I N C O M S ) ( 0017040 C A D D R \r w i n d o w D e s 0017060 c r i p t i o n ) ) ) ) ) ) ( 0017100 \ , ( b i n d W A f o r 0017120 w i n d o w i n ( A T T A C 0017140 H E D W I N D O W S ( \ , M 0017160 a i n W i n d o w ) ) w h e n 0017200 ( E Q ( Q U O T E \r T O P 0017220 ) ( C A R ( S E T Q W A 0017240 ( W I N D O W P R O P w i n d 0017260 o w ( Q U O T E W H E R E A 0017300 T T A C H E D ) ) ) ) ) c o l 0017320 l e c t ( * ; ; \r " D e t 0017340 a c h a t t a c h e d w i n 0017360 d o w s a t t h e t o p 0017400 o f t h e m a i n w i n d 0017420 o w a n d r e t u i r n a 0017440 l i s t d e s c r i b i n g 0017460 t h e i r a t t a c h m e n 0017500 t . " \r ) ( P R O G 1 ( L I 0017520 S T w i n d o w W A ( W I 0017540 N D O W P R O P w i n d o w 0017560 ( Q U O T E P A S S T O M A I 0017600 N C O M S ) ) ) ( D E T A C H 0017620 W I N D O W w i n d o w ) ) ) 0017640 ) ) ) ) ( \ , @ \r F o r m s 0017660 ) ) ) ) \r ( D E F M A C R O A 0017700 B O R T . P R O T E C T ( M A 0017720 I N - F O R M C L E A N U P - 0017740 F O R M ) ( B Q U O T E ( R 0017760 E S E T L S T ( R E S E T S A 0020000 V E N I L ( Q U O T E ( A 0020020 N D \r R E S E T S T A T E ( 0020040 \ , C L E A N U P - F O R M ) 0020060 ) ) ) ( \ , M A I N - F O R 0020100 M ) ) ) ) \r ( D E F M A C R O 0020120 N C . A c t i v a t e C a r d A 0020140 n d D o ( C a r d & R E S T 0020160 F o r m s ) ( * ; ; ; \r 0020200 " r h t 1 0 / 1 5 / 8 6 : T 0020220 h i s w r i t t e n b y M 0020240 a r k M . I c h a n g e d 0020260 s l i g h t l y s o a s t 0020300 o a c c e p t a l i s t 0020320 o f F o r m s r a t h e r 0020340 t h a n a s i n g l e t o n 0020360 . " \r ) ( * ; ; ; " r h t 0020400 & p m i 1 1 / 2 4 : C h a n 0020420 g e d n a m e o f l o c a 0020440 l v a r . " ) ( B Q U O T E 0020460 ( L E T ( ( $ $ A c t i v e F 0020500 l g $ $ ( N C . A c t i v e C 0020520 a r d P ( \ , \r C a r d ) ) 0020540 ) ) ( O R $ $ A c t i v e F 0020560 l g $ $ ( N C . G e t N o t e 0020600 C a r d ( \ , C a r d ) ) ) 0020620 ( P R O G 1 ( P R O G N ( 0020640 \ , @ F o r m s ) ) ( O R 0020660 $ $ A c t i v e F l g $ $ ( \r 0020700 N C . D e a c t i v a t e C a r 0020720 d ( \ , C a r d ) ) ) ) ) ) 0020740 ) \r ( R E C O R D G L O B A L 0020760 P A R A M E T E R ( P A R A M 0021000 G L O B A L V A R P A R A M F 0021020 E T C H F N P A R A M S E L E 0021040 C T I O N F N P A R A M C H E 0021060 C K F N P A R A M A F T E R C 0021100 H A N G E F N ) \r ) \r ( D A T A 0021120 T Y P E N o t e F i l e D e v 0021140 i c e ( L i s t N o t e F i l 0021160 e s F n C r e a t e N o t e F 0021200 i l e F n D e l e t e N o t e 0021220 F i l e F n O p e n N o t e F 0021240 i l e F n \r B u i l d H a s h 0021260 A r r a y F n C l o s e N o t 0021300 e F i l e F n N o t e F i l e 0021320 O p e n P F n C h e c k p o i 0021340 n t N o t e F i l e F n N e w 0021360 C a r d U I D F n M a r k C a 0021400 r d D e l e t e d F n \r G e t 0021420 C a r d I n f o F n P u t C a 0021440 r d P a r t F n G e t C a r d 0021460 P a r t F n O b t a i n W r i 0021500 t e P e r m i s s i o n F n R 0021520 e l e a s e W r i t e P e r m i 0021540 s s i o n F n \r C a n c e l C 0021560 a c h e S u b s c r i p t i o n 0021600 F n R e p a i r N o t e F i l 0021620 e F n C o m p a c t N o t e F 0021640 i l e F n T r u n c a t e N o 0021660 t e F i l e F n \r C o n v e r 0021700 t N o t e F i l e F o r m a t F 0021720 n ) ) \r ( R E C O R D N o t e 0021740 F i l e C r i t i c a l U I D s 0021760 ( N o t e F i l e T a b l e 0022000 O f C o n t e n t s O r p h a 0022020 n s T o B e F i l e d L i n 0022040 k L a b e l s R e g i s t r y 0022060 ) ) \r ( D A T A T Y P E N o t 0022100 e F i l e ( U I D S t r e a 0022120 m F u l l F i l e N a m e H 0022140 a s h A r r a y ( H a s h A r 0022160 r a y S i z e F I X P ) ( N 0022200 e x t I n d e x N u m F I X P 0022220 ) ( \r V e r s i o n B Y T E 0022240 ) ( N e x t L i n k N u m F 0022260 I X P ) ( C h e c k p t P t r 0022300 F I X P ) L i n k L a b e l 0022320 s C a r d T a b l e O f C o n 0022340 t e n t s C a r d T o B e F i 0022360 l e d C a r d \r O r p h a n s 0022400 C a r d R e g i s t r y C a r 0022420 d R e s e r v e d C a r d s 0022440 M e n u M o n i t o r L o c k 0022460 E x c l u s i v e A c c e s s 0022500 M o n i t o r C a c h i n g P 0022520 r o c e s s \r I n d e x N u m 0022540 s F r e e L i s t U s e r P r 0022560 o p s R e a d O n l y F l g 0022600 N o t e F i l e D e v i c e ) 0022620 ( D A T A T Y P E N o t e F i 0022640 l e D e v i c e ( L i s t N o 0022660 t e F i l e s F n \r C r e a t 0022700 e N o t e F i l e F n D e l e 0022720 t e N o t e F i l e F n O p e 0022740 n N o t e F i l e F n B u i l 0022760 d H a s h A r r a y F n C l o 0023000 s e N o t e F i l e F n N o t 0023020 e F i l e O p e n P F n \r C h 0023040 e c k p o i n t N o t e F i l e 0023060 F n N e w C a r d U I D F n 0023100 M a r k C a r d D e l e t e d F 0023120 n G e t C a r d I n f o F n 0023140 P u t C a r d P a r t F n G e 0023160 t C a r d P a r t F n \r O b t 0023200 a i n W r i t e P e r m i s s i 0023220 o n F n R e l e a s e W r i t 0023240 e P e r m i s s i o n F n C a 0023260 n c e l C a c h e S u b s c r i 0023300 p t i o n F n R e p a i r N o 0023320 t e F i l e F n \r C o m p a c 0023340 t N o t e F i l e F n T r u n 0023360 c a t e N o t e F i l e F n C 0023400 o n v e r t N o t e F i l e F o 0023420 r m a t F n ) ) ( S Y N O N Y 0023440 M N o t e F i l e D e v i c e 0023460 ( D e v i c e ) ) ) \r ( T Y P 0023500 E R E C O R D N o t e F i l e 0023520 V e r s i o n ( V e r s i o n 0023540 N u m b e r O f R e s e r v e 0023560 d C a r d s N o t e F i l e I 0023600 n d e x W i d t h N o t e F i 0023620 l e H e a d e r S i z e ) ) \r ( 0023640 D A T A T Y P E I n d e x L o 0023660 c s ( M a i n C a r d D a t a 0023700 L o c L i n k s L o c T i t 0023720 l e L o c P r o p L i s t L o 0023740 c ) ) \r ( R E C O R D C a r d 0023760 P a r t R e c o r d ( F i l e 0024000 L o c U I D C a r d P a r t 0024020 T y p e N u m C a r d P a r t 0024040 L e n g t h ) ) \r ( R E C O R D 0024060 T R A V E R S A L S P E C S 0024100 ( L i n k T y p e s D e p t h 0024120 ) ) \r ( D A T A T Y P E U I D 0024140 ( ( U I D 0 W O R D ) ( U 0024160 I D 1 W O R D ) ( U I D 2 0024200 W O R D ) ( U I D 3 W O R D 0024220 ) ( U I D 4 W O R D ) ( U 0024240 I D 5 W O R D ) ( U I D 6 0024260 W O R D ) ( \r U s e r D a t a 0024300 P O I N T E R ) ) ) \r ( D A T 0024320 A T Y P E M O N I T O R L O C 0024340 K ( ( N I L F L A G ) ( M 0024360 L O C K P E R P R O C E S S F 0024400 L A G ) ( N I L B I T S 6 0024420 ) ( M L O C K Q U E U E T A I 0024440 L P O I N T E R ) ( \r M L O 0024460 C K O W N E R P O I N T E R ) 0024500 ( M L O C K N A M E P O I N 0024520 T E R ) ( M L O C K L I N K 0024540 P O I N T E R ) ) ) \r ( A C C E 0024560 S S F N S W O R D ( ( H I B 0024600 Y T E ( L R S H D A T U M 0024620 8 ) ) ( L O B Y T E ( L O G 0024640 A N D D A T U M 2 5 5 ) ) ) 0024660 ( C R E A T E ( I P L U S 0024700 ( L L S H H I B Y T E 8 ) 0024720 \r L O B Y T E ) ) ) \r ( / D E C 0024740 L A R E D A T A T Y P E ( Q U 0024760 O T E N o t e F i l e D e v i 0025000 c e ) ( Q U O T E ( P O I N 0025020 T E R P O I N T E R P O I N * 0025060 T E R P O I N T E R \r P O I 0025100 N T E R P O I N T E R P O I * 0025220 N T E R P O I N T E R \r P O 0025240 I N T E R P O I N T E R ) ) 0025260 ( Q U O T E ( ( N o t e F i l 0025300 e D e v i c e 0 P O I N T E 0025320 R ) ( N o t e F i l e D e v i 0025340 c e 2 P O I N T E R ) ( N 0025360 o t e F i l e D e v i c e 4 0025400 \r P O I N T E R ) ( N o t e F 0025420 i l e D e v i c e 6 P O I N 0025440 T E R ) ( N o t e F i l e D e 0025460 v i c e 8 P O I N T E R ) 0025500 ( N o t e F i l e D e v i c e 0025520 1 0 P O I N T E R ) ( \r N o 0025540 t e F i l e D e v i c e 1 2 0025560 P O I N T E R ) ( N o t e F i 0025600 l e D e v i c e 1 4 P O I N 0025620 T E R ) ( N o t e F i l e D e 0025640 v i c e 1 6 P O I N T E R ) 0025660 ( N o t e F i l e D e v i c e 0025700 1 8 \r P O I N T E R ) ( N 0025720 o t e F i l e D e v i c e 2 0 0025740 P O I N T E R ) ( N o t e F 0025760 i l e D e v i c e 2 2 P O I 0026000 N T E R ) ( N o t e F i l e D 0026020 e v i c e 2 4 P O I N T E R 0026040 ) ( \r N o t e F i l e D e v i 0026060 c e 2 6 P O I N T E R ) ( 0026100 N o t e F i l e D e v i c e 2 0026120 8 P O I N T E R ) ( N o t e 0026140 F i l e D e v i c e 3 0 P O 0026160 I N T E R ) ( N o t e F i l e 0026200 D e v i c e 3 2 \r P O I N T 0026220 E R ) ( N o t e F i l e D e v 0026240 i c e 3 4 P O I N T E R ) 0026260 ( N o t e F i l e D e v i c e 0026300 3 6 P O I N T E R ) ( N o t 0026320 e F i l e D e v i c e 3 8 P 0026340 O I N T E R ) ) ) ( Q U O T E 0026360 \r 4 0 ) ) \r ( / D E C L A R E 0026400 D A T A T Y P E ( Q U O T E 0026420 N o t e F i l e D e v i c e ) 0026440 ( Q U O T E ( P O I N T E R 0026460 P O I N T E R P O I N T E R * 0026520 P O I N T E R \r P O I N T E R 0026540 P O I N T E R P O I N T E R * 0026660 P O I N T E R \r P O I N T E 0026700 R P O I N T E R ) ) ( Q U O 0026720 T E ( ( N o t e F i l e D e v 0026740 i c e 0 P O I N T E R ) ( 0026760 N o t e F i l e D e v i c e 2 0027000 P O I N T E R ) ( N o t e F 0027020 i l e D e v i c e 4 \r P O I 0027040 N T E R ) ( N o t e F i l e D 0027060 e v i c e 6 P O I N T E R ) 0027100 ( N o t e F i l e D e v i c e 0027120 8 P O I N T E R ) ( N o t 0027140 e F i l e D e v i c e 1 0 P 0027160 O I N T E R ) ( \r N o t e F i 0027200 l e D e v i c e 1 2 P O I N 0027220 T E R ) ( N o t e F i l e D e 0027240 v i c e 1 4 P O I N T E R ) 0027260 ( N o t e F i l e D e v i c e 0027300 1 6 P O I N T E R ) ( N o 0027320 t e F i l e D e v i c e 1 8 0027340 \r P O I N T E R ) ( N o t e F 0027360 i l e D e v i c e 2 0 P O I 0027400 N T E R ) ( N o t e F i l e D 0027420 e v i c e 2 2 P O I N T E R 0027440 ) ( N o t e F i l e D e v i c 0027460 e 2 4 P O I N T E R ) ( \r 0027500 N o t e F i l e D e v i c e 2 0027520 6 P O I N T E R ) ( N o t e 0027540 F i l e D e v i c e 2 8 P O 0027560 I N T E R ) ( N o t e F i l e 0027600 D e v i c e 3 0 P O I N T E 0027620 R ) ( N o t e F i l e D e v i 0027640 c e 3 2 \r P O I N T E R ) 0027660 ( N o t e F i l e D e v i c e 0027700 3 4 P O I N T E R ) ( N o t 0027720 e F i l e D e v i c e 3 6 P 0027740 O I N T E R ) ( N o t e F i l 0027760 e D e v i c e 3 8 P O I N T 0030000 E R ) ) ) ( Q U O T E \r 4 0 0030020 ) ) \r ( / D E C L A R E D A T A 0030040 T Y P E ( Q U O T E N o t e 0030060 F i l e ) ( Q U O T E ( P O 0030100 I N T E R P O I N T E R P O 0030120 I N T E R P O I N T E R F I 0030140 X P F I X P B Y T E F I X 0030160 P F I X P \r P O I N T E R 0030200 P O I N T E R P O I N T E R * 0030320 P O I N T E R \r P O I N T E R 0030340 P O I N T E R ) ) ( Q U O T 0030360 E ( ( N o t e F i l e 0 P 0030400 O I N T E R ) ( N o t e F i l 0030420 e 2 P O I N T E R ) ( N o 0030440 t e F i l e 4 P O I N T E R 0030460 ) ( N o t e F i l e 6 \r P 0030500 O I N T E R ) ( N o t e F i l 0030520 e 8 F I X P ) ( N o t e F 0030540 i l e 1 0 F I X P ) ( N o 0030560 t e F i l e 6 ( B I T S . 0030600 7 ) ) ( N o t e F i l e 1 0030620 2 F I X P ) ( N o t e F i l 0030640 e 1 4 \r F I X P ) ( N o t 0030660 e F i l e 1 6 P O I N T E R 0030700 ) ( N o t e F i l e 1 8 P 0030720 O I N T E R ) ( N o t e F i l 0030740 e 2 0 P O I N T E R ) ( N 0030760 o t e F i l e 2 2 P O I N T 0031000 E R ) ( \r N o t e F i l e 2 0031020 4 P O I N T E R ) ( N o t e 0031040 F i l e 2 6 P O I N T E R ) 0031060 ( N o t e F i l e 2 8 P O 0031100 I N T E R ) ( N o t e F i l e 0031120 3 0 P O I N T E R ) ( N o 0031140 t e F i l e 3 2 \r P O I N T 0031160 E R ) ( N o t e F i l e 3 4 0031200 P O I N T E R ) ( N o t e F 0031220 i l e 3 6 P O I N T E R ) 0031240 ( N o t e F i l e 3 8 P O I 0031260 N T E R ) ( N o t e F i l e 0031300 4 0 P O I N T E R ) ( \r N o 0031320 t e F i l e 4 2 P O I N T E 0031340 R ) ) ) ( Q U O T E 4 4 ) ) 0031360 \r ( / D E C L A R E D A T A T Y 0031400 P E ( Q U O T E I n d e x L 0031420 o c s ) ( Q U O T E ( P O I 0031440 N T E R P O I N T E R P O I 0031460 N T E R P O I N T E R ) ) ( 0031500 Q U O T E ( ( I n d e x L o c 0031520 s 0 \r P O I N T E R ) ( I 0031540 n d e x L o c s 2 P O I N T 0031560 E R ) ( I n d e x L o c s 4 0031600 P O I N T E R ) ( I n d e x 0031620 L o c s 6 P O I N T E R ) ) 0031640 ) ( Q U O T E 8 ) ) \r ( / D 0031660 E C L A R E D A T A T Y P E ( 0031700 Q U O T E U I D ) ( Q U O T 0031720 E ( W O R D W O R D W O R 0031740 D W O R D W O R D W O R D 0031760 W O R D P O I N T E R ) ) 0032000 ( Q U O T E ( ( U I D 0 ( 0032020 \r B I T S . 1 5 ) ) ( U I 0032040 D 1 ( B I T S . 1 5 ) ) 0032060 ( U I D 2 ( B I T S . 0032100 1 5 ) ) ( U I D 3 ( B I T 0032120 S . 1 5 ) ) ( U I D 4 0032140 ( B I T S . 1 5 ) ) ( U I 0032160 D 5 ( \r B I T S . 1 5 ) 0032200 ) ( U I D 6 ( B I T S . 0032220 1 5 ) ) ( U I D 8 P O I 0032240 N T E R ) ) ) ( Q U O T E 1 0032260 0 ) ) \r ( / D E C L A R E D A T 0032300 A T Y P E ( Q U O T E M O N 0032320 I T O R L O C K ) ( Q U O T E 0032340 ( F L A G F L A G ( B I T 0032360 S 6 ) P O I N T E R P O I 0032400 N T E R P O I N T E R P O I 0032420 N T E R ) ) ( \r Q U O T E ( 0032440 ( M O N I T O R L O C K 0 ( 0032460 F L A G B I T S . 0 ) ) ( 0032500 M O N I T O R L O C K 0 ( F 0032520 L A G B I T S . 1 6 ) ) ( 0032540 M O N I T O R L O C K 0 ( B 0032560 I T S . 3 7 ) ) ( \r M O N 0032600 I T O R L O C K 0 P O I N T 0032620 E R ) ( M O N I T O R L O C K 0032640 2 P O I N T E R ) ( M O N 0032660 I T O R L O C K 4 P O I N T 0032700 E R ) ( M O N I T O R L O C K 0032720 6 P O I N T E R ) ) ) ( \r 0032740 Q U O T E 8 ) ) \r ( D E F M A 0032760 C R O N C . P r o t e c t e d 0033000 C a r d O p e r a t i o n ( C 0033020 a r d O p e r a t i o n I n 0033040 t e r e s t e d W i n d o w & 0033060 B O D Y B o d y ) ( B Q U O 0033100 T E ( R E S E T L S T ( \r O 0033120 B T A I N . M O N I T O R L O C 0033140 K N C . L o c k L o c k ) ( 0033160 L E T ( ( O p I n P r o g r e 0033200 s s ( N C . C a r d C h e c k 0033220 O p I n P r o g r e s s ( \ , 0033240 C a r d ) ) ) ) ( i f ( N 0033260 U L L \r O p I n P r o g r e s 0033300 s ) t h e n ( R E S E T S A 0033320 V E ( N C . S e t U s e r D a 0033340 t a P r o p ( \ , C a r d ) 0033360 ( Q U O T E P r o c e s s I 0033400 n P r o g r e s s ) ( T H I S 0033420 . P R O C E S S ) ) \r ( B Q U 0033440 O T E ( N C . S e t U s e r D 0033460 a t a P r o p ( \ , ( \ , 0033500 C a r d ) ) P r o c e s s I n 0033520 P r o g r e s s ( \ , ( N C 0033540 . F e t c h U s e r D a t a P r 0033560 o p ( \ , C a r d ) ( \r Q 0033600 U O T E P r o c e s s I n P r 0033620 o g r e s s ) ) ) ) ) ) ( R E 0033640 S E T S A V E ( N C . S e t U 0033660 s e r D a t a P r o p ( \ , 0033700 C a r d ) ( Q U O T E O p e 0033720 r a t i o n I n P r o g r e s s 0033740 ) ( \r Q U O T E ( \ , O p 0033760 e r a t i o n ) ) ) ( B Q U O 0034000 T E ( N C . S e t U s e r D a 0034020 t a P r o p ( \ , ( \ , C 0034040 a r d ) ) O p e r a t i o n I 0034060 n P r o g r e s s ( \ , ( \r 0034100 N C . F e t c h U s e r D a t a 0034120 P r o p ( \ , C a r d ) ( 0034140 Q U O T E O p e r a t i o n I 0034160 n P r o g r e s s ) ) ) ) ) ) 0034200 ( R E S E T S A V E ( N C . N 0034220 o t e F i l e P r o p ( f e t 0034240 c h ( \r C a r d N o t e F i 0034260 l e ) o f ( \ , C a r d ) 0034300 ) ( Q U O T E C a r d P r o 0034320 c e s s I n P r o g r e s s L i 0034340 s t ) ( C O N S ( T H I S . 0034360 P R O C E S S ) ( N C . N o t 0034400 e F i l e P r o p ( \r f e t c 0034420 h ( C a r d N o t e F i l e 0034440 ) o f ( \ , C a r d ) ) 0034460 ( Q U O T E C a r d P r o c e 0034500 s s I n P r o g r e s s L i s t 0034520 ) ) ) ) ( B Q U O T E ( \r N 0034540 C . R e s e t C a r d P r o c e 0034560 s s I n P r o g r e s s ( \ , 0034600 ( f e t c h ( C a r d N o 0034620 t e F i l e ) o f ( \ , C 0034640 a r d ) ) ) ) ) ) ( R E S E T 0034660 S A V E ( S E T Q \r N C . C 0034700 a r d B u s y L i s t ( C O N 0034720 S ( T H I S . P R O C E S S ) 0034740 N C . C a r d B u s y L i s t 0034760 ) ) ( Q U O T E ( S E T Q 0035000 N C . C a r d B u s y L i s t 0035020 ( D R E M O V E ( \r T H I S . 0035040 P R O C E S S ) N C . C a r d 0035060 B u s y L i s t ) ) ) ) ) ( R 0035100 E L E A S E . M O N I T O R L O 0035120 C K N C . L o c k L o c k ) 0035140 ( i f ( O R ( N U L L O p 0035160 I n P r o g r e s s ) ( E Q 0035200 \r O p I n P r o g r e s s ( Q 0035220 U O T E U S ) ) ) t h e n 0035240 ( \ , @ B o d y ) e l s e 0035260 ( N C . P r i n t O p e r a t i 0035300 o n I n P r o g r e s s M s g 0035320 ( O R ( \ , \r I n t e r e s 0035340 t e d W i n d o w ) ( N C . C 0035360 o e r c e T o I n t e r e s t e 0035400 d W i n d o w ( \ , C a r d 0035420 ) ) ) ( \ , O p e r a t i o 0035440 n ) O p I n P r o g r e s s ) 0035460 ( Q U O T E D O N ' T ) ) \r 0035500 ) ) ) ) \r ( D E F M A C R O N 0035520 C . P r o t e c t e d N o t e F 0035540 i l e O p e r a t i o n ( N o 0035560 t e F i l e O p e r a t i o n 0035600 I n t e r e s t e d W i n d o 0035620 w & R E S T B o d y ) ( B 0035640 Q U O T E ( \r R E S E T L S T 0035660 ( O B T A I N . M O N I T O R 0035700 L O C K N C . L o c k L o c k 0035720 ) ( L E T ( ( O p I n P r o 0035740 g r e s s ( N C . N o t e F i 0035760 l e C h e c k O p I n P r o g r 0036000 e s s ( \ , \r N o t e F i l 0036020 e ) ) ) ) ( i f ( N U L L 0036040 O p I n P r o g r e s s ) t h 0036060 e n ( R E S E T S A V E ( N 0036100 C . N o t e F i l e P r o p ( 0036120 \ , N o t e F i l e ) ( Q U 0036140 O T E \r O p e r a t i o n I n 0036160 P r o g r e s s ) ( Q U O T E 0036200 ( \ , O p e r a t i o n ) ) 0036220 ) ( B Q U O T E ( N C . N o 0036240 t e F i l e P r o p ( \ , ( 0036260 \ , N o t e F i l e ) ) \r O 0036300 p e r a t i o n I n P r o g r e 0036320 s s ( \ , ( N C . N o t e F 0036340 i l e P r o p ( \ , N o t e 0036360 F i l e ) ( Q U O T E O p e 0036400 r a t i o n I n P r o g r e s s 0036420 ) ) ) ) ) ) ( R E S E T S A V 0036440 E ( \r N C . N o t e F i l e P 0036460 r o p ( \ , N o t e F i l e 0036500 ) ( Q U O T E P r o c e s s 0036520 I n P r o g r e s s ) ( T H I 0036540 S . P R O C E S S ) ) ( B Q U 0036560 O T E ( N C . N o t e F i l e 0036600 P r o p ( \ , ( \r \ , N o 0036620 t e F i l e ) ) P r o c e s s 0036640 I n P r o g r e s s ( \ , ( 0036660 N C . N o t e F i l e P r o p 0036700 ( \ , N o t e F i l e ) ( Q 0036720 U O T E P r o c e s s I n P r 0036740 o g r e s s ) ) ) ) ) ) ( \r R 0036760 E S E T S A V E ( S E T Q N 0037000 C . N o t e F i l e B u s y L i 0037020 s t ( C O N S ( T H I S . P 0037040 R O C E S S ) N C . N o t e F 0037060 i l e B u s y L i s t ) ) ( Q 0037100 U O T E ( S E T Q \r N C . N 0037120 o t e F i l e B u s y L i s t 0037140 ( D R E M O V E ( T H I S . P 0037160 R O C E S S ) N C . N o t e F 0037200 i l e B u s y L i s t ) ) ) ) ) 0037220 ( R E L E A S E . M O N I T O 0037240 R L O C K N C . L o c k L o c 0037260 k ) \r ( i f ( O R ( N U L 0037300 L O p I n P r o g r e s s ) 0037320 ( E Q O p I n P r o g r e s s 0037340 ( Q U O T E U S ) ) ) t h 0037360 e n ( \ , @ B o d y ) e l 0037400 s e ( \r N C . P r i n t O p e 0037420 r a t i o n I n P r o g r e s s 0037440 M s g ( O R ( O P E N W P 0037460 ( \ , I n t e r e s t e d W i 0037500 n d o w ) ) ( N C . C o e r c 0037520 e T o I n t e r e s t e d W i n 0037540 d o w ( \ , \r N o t e F i l 0037560 e ) ) ) ( \ , O p e r a t i 0037600 o n ) O p I n P r o g r e s s 0037620 ) ( Q U O T E D O N ' T ) ) 0037640 ) ) ) ) \r ( D E F M A C R O N 0037660 C . P r o t e c t e d S e s s i 0037700 o n O p e r a t i o n ( O p e 0037720 r a t i o n I n t e r e s t e 0037740 d W i n d o w & R E S T B o 0037760 d y ) ( B Q U O T E ( R E S 0040000 E T L S T ( \r O B T A I N . M 0040020 O N I T O R L O C K N C . L o 0040040 c k L o c k ) ( L E T ( ( O 0040060 p I n P r o g r e s s ( N C . 0040100 S e s s i o n C h e c k O p I n 0040120 P r o g r e s s ) ) ) ( i f 0040140 ( N U L L \r O p I n P r o g r 0040160 e s s ) t h e n ( R E S E T 0040200 S A V E N C . S e s s i o n P 0040220 r o c e s s I n P r o g r e s s 0040240 ( T H I S . P R O C E S S ) ) 0040260 ( R E S E T S A V E \r N C . 0040300 S e s s i o n O p e r a t i o n 0040320 I n P r o g r e s s ( \ , O 0040340 p e r a t i o n ) ) ) ( R E L 0040360 E A S E . M O N I T O R L O C K 0040400 N C . L o c k L o c k ) ( i 0040420 f ( O R ( N U L L \r O p I 0040440 n P r o g r e s s ) ( E Q O 0040460 p I n P r o g r e s s ( Q U O 0040500 T E U S ) ) ) t h e n ( \ 0040520 , @ B o d y ) e l s e ( N 0040540 C . P r i n t O p e r a t i o n 0040560 I n P r o g r e s s M s g ( \ 0040600 , \r I n t e r e s t e d W i n 0040620 d o w ) ( \ , O p e r a t i 0040640 o n ) O p I n P r o g r e s s 0040660 ) ( Q U O T E D O N ' T ) ) 0040700 ) ) ) ) \r ( D E F M A C R O N 0040720 C . I f A l l C a r d s F r e e 0040740 ( L o c k F o r m & B O D Y 0040760 B o d y ) ( L E T ( ( L o 0041000 c k S t a t u s ( G E N S Y M 0041020 ) ) ) ( B Q U O T E ( L E T 0041040 ( ( ( \ , \r L o c k S t a t 0041060 u s ) ( \ , L o c k F o r m 0041100 ) ) ) ( i f ( f o r S t a 0041120 t u s i n ( \ , L o c k S 0041140 t a t u s ) n e v e r ( A N 0041160 D S t a t u s ( N E Q S t 0041200 a t u s ( Q U O T E U S \r ) 0041220 ) ) ) t h e n ( \ , @ B o 0041240 d y ) e l s e ( \ , L o c 0041260 k S t a t u s ) ) ) ) ) ) \r ( D 0041300 E F M A C R O N C . D o C a r 0041320 d P a r t F n ( G e t O r P u 0041340 t C a r d F o r m C a r d P 0041360 a r t F o r m & R E S T B o 0041400 d y ) ( * ; ; ; \r " C a l 0041420 l G e t o r P u t c a r 0041440 d p a r t f n b o t h b 0041460 e f o r e a n d a f t e r 0041500 B o d y . " ) ( * ; ; ; " 0041520 f g h 8 / 3 1 / 8 6 F i r s 0041540 t c r e a t e d . " ) ( L E 0041560 T \r ( ( * R E A D T A B L E * 0041600 ( F I N D - R E A D T A B L E 0041620 " O L D - I N T E R L I S P - 0041640 T " ) ) ( * P A C K A G E * 0041660 * I N T E R L I S P - P A C K A 0041700 G E * ) ) ( B Q U O T E ( R 0041720 E S E T L S T ( \r R E S E T S 0041740 A V E ( N C . A p p l y F n 0041760 ( \ , ( P A C K * G e t O r 0042000 P u t ( Q U O T E C a r d P 0042020 a r t F n ) ) ) ( \ , C a r 0042040 d F o r m ) ( \ , C a r d P 0042060 a r t F o r m ) ( Q U O T E 0042100 \r B E F O R E ) ) ( B Q U O T 0042120 E ( A P P L Y * ( \ , ( f 0042140 e t c h ( C a r d ( \ , ( 0042160 P A C K * G e t O r P u t ( 0042200 Q U O T E C a r d P a r t F n 0042220 ) ) ) ) o f ( \ , C a r d 0042240 F o r m ) ) ) \r ( \ , ( \ , 0042260 C a r d F o r m ) ) ( \ , 0042300 ( \ , C a r d P a r t F o r m 0042320 ) ) A F T E R ) ) ) ( \ , @ 0042340 B o d y ) ) ) ) ) \r ( D E F M 0042360 A C R O N C . R e a d P t r 0042400 ( S t r e a m N u m B y t e s 0042420 ) ( * ; ; ; " T h i s r 0042440 e a d s N u m B y t e s w o 0042460 r t h o f b y t e s f r o 0042500 m S t r e a m . " ) ( C O N 0042520 D \r ( ( G E Q N u m B y t e 0042540 s 2 ) ( B Q U O T E ( P L 0042560 U S ( \ , @ ( f o r i f 0042600 r o m ( S U B 1 N u m B y t 0042620 e s ) t o 1 b y - 1 c 0042640 o l l e c t ( B Q U O T E ( 0042660 L S H ( B I N \r ( \ , S t 0042700 r e a m ) ) ( \ , ( T I M E 0042720 S i 8 ) ) ) ) ) ) ( B I N 0042740 ( \ , S t r e a m ) ) ) ) ) 0042760 ( ( E Q N u m B y t e s 1 0043000 ) ( B Q U O T E ( B I N ( 0043020 \ , S t r e a m ) ) ) ) ) ) \r 0043040 ( D E F M A C R O N C . W r i 0043060 t e P t r ( S t r e a m P t 0043100 r N u m B y t e s ) ( * ; 0043120 ; ; \r " W r i t e d o w n 0043140 t o t h e s t r e a m t h 0043160 e b o t t o m N u m B y t e 0043200 s w o r t h o f P t r . " 0043220 ) ( P R O G N ( O R N u m 0043240 B y t e s ( S E T Q N u m B 0043260 y t e s 3 ) ) ( \r C O N D 0043300 ( ( G E Q N u m B y t e s 2 0043320 ) ( B Q U O T E ( P R O G N 0043340 ( \ , @ ( f o r i f r o 0043360 m ( S U B 1 N u m B y t e s 0043400 ) t o 1 b y - 1 c o l 0043420 l e c t ( B Q U O T E ( \r B 0043440 O U T ( \ , S t r e a m ) 0043460 ( L O G A N D 2 5 5 ( R S H 0043500 ( \ , P t r ) ( \ , ( T 0043520 I M E S i 8 ) ) ) ) ) ) ) ) 0043540 ( B O U T ( \ , S t r e a 0043560 m ) ( L O G A N D 2 5 5 ( 0043600 \ , \r P t r ) ) ) ) ) ) ( ( 0043620 E Q N u m B y t e s 1 ) ( 0043640 B Q U O T E ( B O U T ( \ , 0043660 S t r e a m ) ( L O G A N D 0043700 2 5 5 ( \ , P t r ) ) ) ) 0043720 ) ) ) ) \r ( D E F M A C R O N 0043740 C . R e a d S t a t u s ( S t 0043760 r e a m ) ( * ; ; ; \r " R 0044000 e a d 1 b y t e f r o m 0044020 S t r e a m a n d r e t u r 0044040 n t h e c o r r e s p o n d 0044060 i n g s t a t u s a t o m . 0044100 " ) ( B Q U O T E ( S E L C 0044120 H A R Q ( B I N ( \ , S t 0044140 r e a m \r ) ) ( A ( Q U O T 0044160 E A C T I V E ) ) ( F ( Q 0044200 U O T E F R E E ) ) ( D ( 0044220 Q U O T E D E L E T E D ) ) 0044240 ( S ( Q U O T E S P E C I A 0044260 L ) ) N I L ) ) ) \r ( P U T P 0044300 R O P S N C . G e t P t r M 0044320 A C R O ( X ( C O N S ( Q 0044340 U O T E I P L U S ) ( f o r 0044360 I f r o m ( C O N D ( ( 0044400 C A D R X ) ( S U B 1 ( C 0044420 A D R X ) ) ) ( T 2 ) ) 0044440 \r t o 0 b y - 1 c o l l 0044460 e c t ( C O N D ( ( Z E R O 0044500 P I ) ( L I S T ( Q U O T 0044520 E B I N ) ( C A R X ) ) ) 0044540 ( T ( L I S T ( Q U O T E 0044560 L L S H ) ( L I S T ( Q U 0044600 O T E B I N \r ) ( C A R X 0044620 ) ) ( I T I M E S 8 I ) ) 0044640 ) ) ) ) ) ) \r ( P U T P R O P S 0044660 N C . P u t P t r M A C R O 0044700 ( X ( C O N S ( Q U O T E 0044720 P R O G N ) ( f o r I f 0044740 r o m ( C O N D ( ( C A D D 0044760 R X ) ( S U B 1 ( C A D D 0045000 R X ) ) ) ( T 2 ) ) \r t 0045020 o 0 b y - 1 c o l l e c 0045040 t ( L I S T ( Q U O T E B 0045060 O U T ) ( C A R X ) ( L I 0045100 S T ( Q U O T E L O G A N D 0045120 ) 2 5 5 ( C O N D ( ( Z E 0045140 R O P I ) ( C A D R X ) ) 0045160 ( T \r ( L I S T ( Q U O T 0045200 E R S H ) ( C A D R X ) 0045220 ( I T I M E S 8 I ) ) ) ) ) 0045240 ) ) ) ) ) \r ( P U T P R O P S 0045260 N C . G e t S t a t u s M A C 0045300 R O ( X ( L I S T ( Q U O 0045320 T E S E L C H A R Q ) ( L I 0045340 S T ( Q U O T E B I N ) ( 0045360 C A R X ) ) ( Q U O T E ( 0045400 A ( Q U O T E \r A C T I V E 0045420 ) ) ) ( Q U O T E ( F ( Q 0045440 U O T E F R E E ) ) ) ( Q U 0045460 O T E ( D ( Q U O T E D E 0045500 L E T E D ) ) ) ( Q U O T E 0045520 ( S ( Q U O T E S P E C I A 0045540 L ) ) ) ( Q U O T E N I L ) 0045560 \r ) ) ) \r ( P U T P R O P S N 0045600 C . P u t S t a t u s M A C R 0045620 O ( X ( L I S T ( Q U O T 0045640 E B O U T ) ( C A R X ) 0045660 ( S E L E C T Q ( C A D R X 0045700 ) ( ( A A C T I V E ) ( C 0045720 O N S T A N T ( \r C H A R C O 0045740 D E A ) ) ) ( ( D D E L E 0045760 T E D ) ( C O N S T A N T ( 0046000 C H A R C O D E D ) ) ) ( ( 0046020 F F R E E ) ( C O N S T A N 0046040 T ( C H A R C O D E F ) ) ) 0046060 ( ( S S P E C I A L ) ( \r 0046100 C O N S T A N T ( C H A R C O 0046120 D E S ) ) ) ( N I L L ) ) ) 0046140 ) ) \r ( R E C O R D S o r t i 0046160 n g R e c o r d ( F i l e L o 0046200 c C a r d C a r d P a r t T 0046220 y p e N u m ) ) \r ( D A T A T Y 0046240 P E S c a v e n g e r I n f o 0046260 ( M a i n D a t a I n f o T 0046300 i t l e I n f o L i n k s I n 0046320 f o P r o p L i s t I n f o ) 0046340 ) \r ( R E C O R D L I N K S D 0046360 A T A ( C A R D V E R S I O 0046400 N D A T E T O L I N K S F R 0046420 O M L I N K S G L O B A L L I 0046440 N K S ) ) \r ( R E C O R D T I 0046460 T L E D A T A ( C A R D V E 0046500 R S I O N D A T E T I T L E ) 0046520 ) \r ( R E C O R D P R O P L I 0046540 S T D A T A ( C A R D V E R 0046560 S I O N D A T E P R O P L I S 0046600 T ) ) \r ( / D E C L A R E D A T 0046620 A T Y P E ( Q U O T E S c a 0046640 v e n g e r I n f o ) ( Q U O 0046660 T E ( P O I N T E R P O I N 0046700 T E R P O I N T E R P O I N 0046720 T E R ) ) ( Q U O T E ( ( \r 0046740 S c a v e n g e r I n f o 0 0046760 P O I N T E R ) ( S c a v e n 0047000 g e r I n f o 2 P O I N T E 0047020 R ) ( S c a v e n g e r I n f 0047040 o 4 P O I N T E R ) ( S c 0047060 a v e n g e r I n f o 6 P O 0047100 I N T E R ) \r ) ) ( Q U O T E 0047120 8 ) ) \r ( D A T A T Y P E C 0047140 a r d O b j e c t ( U I D N 0047160 o t e F i l e M o n i t o r 0047200 S t a t u s ( I n d e x D i r 0047220 t y F l g F L A G ) ( I n d 0047240 e x L o c I N T E G E R ) ( 0047260 M a i n L o c \r I N T E G E R 0047300 ) ( L i n k s L o c I N T E 0047320 G E R ) ( P r o p L i s t L o 0047340 c I N T E G E R ) ( T i t l 0047360 e L o c I N T E G E R ) T i 0047400 t l e ( T i t l e D i r t y F 0047420 l g F L A G ) T y p e ( \r 0047440 A c t i v e F l g F L A G ) 0047460 C a r d C a c h e U s e r D a 0047500 t a ) ) \r ( D A T A T Y P E C 0047520 a r d C a c h e ( S u b s t a 0047540 n c e L i n k s P r o p L i 0047560 s t R e g i o n S a v e d R 0047600 e g i o n ( I t e m D a t e 0047620 F I X P ) ( L i n k s D a t e 0047640 F I X P ) ( \r T i t l e D a 0047660 t e F I X P ) ( P r o p L i 0047700 s t D a t e F I X P ) ( A c 0047720 t i v e C a r d F l g F L A G 0047740 ) ( L i n k s D i r t y F l g 0047760 F L A G ) ( P r o p L i s t 0050000 D i r t y F l g F L A G ) \r 0050020 ( S u b s t a n c e D i r t y F 0050040 l g F L A G ) ( N e w C a r 0050060 d F l g F L A G ) ( B e i n 0050100 g D e l e t e d F l g F L A G 0050120 ) ) ) \r ( A C C E S S F N S C 0050140 a r d ( ( * * I n s t a n 0050160 c e v a r i a b l e s o f 0050200 t h e c a r d o b j e c t ) 0050220 ( U I D ( f e t c h ( C a 0050240 r d O b j e c t U I D ) o f 0050260 D A T U M ) ( \r r e p l a c 0050300 e ( C a r d O b j e c t U I 0050320 D ) o f D A T U M w i t h 0050340 N E W V A L U E ) ) ( N o t 0050360 e F i l e ( L E T ( ( \ N F 0050400 ( f e t c h ( C a r d O b j 0050420 e c t N o t e F i l e ) o f 0050440 \r D A T U M ) ) ) ( C O N D 0050460 ( ( t y p e ? N o t e F i l 0050500 e \ N F ) \ N F ) ( \ N F 0050520 ( r e p l a c e ( C a r d O 0050540 b j e c t N o t e F i l e ) 0050560 o f D A T U M w i t h ( \r 0050600 N C . N o t e F i l e F r o m N 0050620 o t e F i l e U I D \ N F ) ) 0050640 ) ) ) ( r e p l a c e ( C a 0050660 r d O b j e c t N o t e F i l 0050700 e ) o f D A T U M w i t h 0050720 N E W V A L U E ) ) ( M o n 0050740 i t o r ( \r f e t c h ( C a 0050760 r d O b j e c t M o n i t o r 0051000 ) o f D A T U M ) ( r e p 0051020 l a c e ( C a r d O b j e c t 0051040 M o n i t o r ) o f D A T 0051060 U M w i t h N E W V A L U E 0051100 ) ) ( S t a t u s ( \r f e t 0051120 c h ( C a r d O b j e c t S 0051140 t a t u s ) o f D A T U M ) 0051160 ( r e p l a c e ( C a r d O 0051200 b j e c t S t a t u s ) o f 0051220 D A T U M w i t h N E W V 0051240 A L U E ) ) ( \r I n d e x D i 0051260 r t y F l g ( f e t c h ( C 0051300 a r d O b j e c t I n d e x D 0051320 i r t y F l g ) o f D A T U 0051340 M ) ( r e p l a c e ( C a r 0051360 d O b j e c t I n d e x D i r 0051400 t y F l g ) o f D A T U M \r 0051420 w i t h N E W V A L U E ) ) 0051440 ( I n d e x L o c ( f e t c 0051460 h ( C a r d O b j e c t I n 0051500 d e x L o c ) o f D A T U M 0051520 ) ( r e p l a c e ( C a r d 0051540 O b j e c t I n d e x L o c ) 0051560 o f \r D A T U M w i t h 0051600 N E W V A L U E ) ) ( M a i n 0051620 L o c ( f e t c h ( C a r d 0051640 O b j e c t M a i n L o c ) 0051660 o f D A T U M ) ( r e p l a 0051700 c e ( C a r d O b j e c t M 0051720 a i n L o c ) o f \r D A T U 0051740 M w i t h N E W V A L U E ) 0051760 ) ( L i n k s L o c ( f e t 0052000 c h ( C a r d O b j e c t L 0052020 i n k s L o c ) o f D A T U 0052040 M ) ( r e p l a c e ( C a r 0052060 d O b j e c t L i n k s L o c 0052100 ) \r o f D A T U M w i t h 0052120 N E W V A L U E ) ) ( P r o 0052140 p L i s t L o c ( f e t c h 0052160 ( C a r d O b j e c t P r o p 0052200 L i s t L o c ) o f D A T U 0052220 M ) ( r e p l a c e ( C a r 0052240 d O b j e c t \r P r o p L i s 0052260 t L o c ) o f D A T U M w 0052300 i t h N E W V A L U E ) ) ( 0052320 T i t l e L o c ( f e t c h 0052340 ( C a r d O b j e c t T i t l 0052360 e L o c ) o f D A T U M ) 0052400 ( r e p l a c e ( \r C a r d O 0052420 b j e c t T i t l e L o c ) 0052440 o f D A T U M w i t h N E 0052460 W V A L U E ) ) ( T i t l e 0052500 ( f e t c h ( C a r d O b j e 0052520 c t T i t l e ) o f D A T 0052540 U M ) ( r e p l a c e ( \r C 0052560 a r d O b j e c t T i t l e ) 0052600 o f D A T U M w i t h N 0052620 E W V A L U E ) ) ( T i t l e 0052640 D i r t y F l g ( f e t c h 0052660 ( C a r d O b j e c t T i t l 0052700 e D i r t y F l g ) o f D A 0052720 T U M ) \r ( r e p l a c e ( 0052740 C a r d O b j e c t T i t l e 0052760 D i r t y F l g ) o f D A T 0053000 U M w i t h N E W V A L U E 0053020 ) ) ( * N o t e t h e u 0053040 s e o f N C . G e t T y p e 0053060 i f C a r d T y p e \r i s 0053100 N I L . T h i s i s r e 0053120 q u i r e d t o f o r c e 0053140 t h e a c c e s s t o g o 0053160 t o t h e d i s k f o r 0053200 t h e c a r d t y p e i 0053220 f t h e c a r d t y p e 0053240 \r c a c h i n g p r o c e s s 0053260 i s n o t f i n i s h e d 0053300 b e f o r e t h i s f e t 0053320 c h i s b e i n g m a d e 0053340 . S o r t o f a k l u d 0053360 g e . ) ( T y p e ( O R ( 0053400 f e t c h ( \r C a r d O b j e 0053420 c t T y p e ) o f D A T U 0053440 M ) ( N C . G e t T y p e D 0053460 A T U M ) ) ( r e p l a c e 0053500 ( C a r d O b j e c t T y p e 0053520 ) o f D A T U M w i t h 0053540 N E W V A L U E ) ) ( \r A c t 0053560 i v e F l g ( f e t c h ( C 0053600 a r d O b j e c t A c t i v e 0053620 F l g ) o f D A T U M ) ( 0053640 r e p l a c e ( C a r d O b j 0053660 e c t A c t i v e F l g ) o 0053700 f D A T U M w i t h \r N E 0053720 W V A L U E ) ) ( A c t i v e 0053740 C a r d F l g ( f e t c h ( 0053760 C a r d O b j e c t A c t i v 0054000 e F l g ) o f D A T U M ) 0054020 ( r e p l a c e ( C a r d O b 0054040 j e c t A c t i v e F l g ) 0054060 o f \r D A T U M w i t h N 0054100 E W V A L U E ) ) ( C a r d C 0054120 a c h e ( f e t c h ( C a r 0054140 d O b j e c t C a r d C a c h 0054160 e ) o f D A T U M ) ( r e 0054200 p l a c e ( C a r d O b j e c 0054220 t \r C a r d C a c h e ) o f 0054240 D A T U M w i t h N E W V 0054260 A L U E ) ) ( U s e r D a t a 0054300 ( f e t c h ( C a r d O b j 0054320 e c t U s e r D a t a ) o f 0054340 D A T U M ) ( r e p l a c e 0054360 ( \r C a r d O b j e c t U s 0054400 e r D a t a ) o f D A T U M 0054420 w i t h N E W V A L U E ) ) 0054440 ( S u b s t a n c e ( L E T 0054460 ( ( \ C a c h e ( f e t c h 0054500 ( C a r d O b j e c t C a r 0054520 d C a c h e ) \r o f D A T U 0054540 M ) ) ) ( A N D \ C a c h e 0054560 ( f e t c h ( C a r d C a c 0054600 h e S u b s t a n c e ) o f 0054620 \ C a c h e ) ) ) ( L E T 0054640 ( ( \ C a c h e ( f e t c h 0054660 ( C a r d O b j e c t \r C a r 0054700 d C a c h e ) o f D A T U M 0054720 ) ) ) ( C O N D ( \ C a c h 0054740 e ( r e p l a c e ( C a r d 0054760 C a c h e S u b s t a n c e ) 0055000 o f \ C a c h e w i t h 0055020 N E W V A L U E ) ) ( T ( \r 0055040 r e p l a c e ( C a r d O b j 0055060 e c t C a r d C a c h e ) o 0055100 f D A T U M w i t h ( c r 0055120 e a t e C a r d C a c h e S 0055140 u b s t a n c e _ N E W V A 0055160 L U E ) ) N E W V A L U E ) ) 0055200 ) ) ( \r L i n k s ( L E T 0055220 ( ( \ C a c h e ( f e t c h 0055240 ( C a r d O b j e c t C a r d 0055260 C a c h e ) o f D A T U M ) 0055300 ) ) ( A N D \ C a c h e ( 0055320 f e t c h ( C a r d C a c h e 0055340 L i n k s ) o f \r \ C a c 0055360 h e ) ) ) ( L E T ( ( \ C a 0055400 c h e ( f e t c h ( C a r d 0055420 O b j e c t C a r d C a c h e 0055440 ) o f D A T U M ) ) ) ( C 0055460 O N D ( \ C a c h e ( r e p 0055500 l a c e ( C a r d C a c h e 0055520 \r L i n k s ) o f \ C a c h 0055540 e w i t h N E W V A L U E ) 0055560 ) ( T ( r e p l a c e ( C 0055600 a r d O b j e c t C a r d C a 0055620 c h e ) o f D A T U M w i 0055640 t h ( c r e a t e C a r d C 0055660 a c h e \r L i n k s _ N E 0055700 W V A L U E ) ) N E W V A L U 0055720 E ) ) ) ) ( F r o m L i n k s 0055740 ( L E T ( ( \ C a c h e ( 0055760 f e t c h ( C a r d O b j e c 0056000 t C a r d C a c h e ) o f 0056020 D A T U M ) ) \r \ L i n k s ) 0056040 ( A N D \ C a c h e ( S E 0056060 T Q \ L i n k s ( f e t c h 0056100 ( C a r d C a c h e L i n k 0056120 s ) o f \ C a c h e ) ) ( 0056140 f e t c h ( L i n k s C a c h 0056160 e F r o m L i n k s ) o f \r 0056200 \ L i n k s ) ) ) ( L E T 0056220 ( ( \ C a c h e ( O R ( f e 0056240 t c h ( C a r d O b j e c t 0056260 C a r d C a c h e ) o f D A 0056300 T U M ) ( r e p l a c e ( C 0056320 a r d O b j e c t C a r d C a 0056340 c h e ) \r o f D A T U M w 0056360 i t h ( c r e a t e C a r d 0056400 C a c h e ) ) ) ) \ L i n k s 0056420 ) ( S E T Q \ L i n k s ( 0056440 f e t c h ( C a r d C a c h e 0056460 L i n k s ) o f \ C a c h 0056500 e ) ) ( C O N D ( \r \ L i n 0056520 k s ( r e p l a c e ( L i n 0056540 k s C a c h e F r o m L i n k 0056560 s ) o f \ L i n k s w i t 0056600 h N E W V A L U E ) ) ( T 0056620 ( r e p l a c e ( C a r d C a 0056640 c h e L i n k s ) o f \r \ 0056660 C a c h e w i t h ( c r e a 0056700 t e L i n k s C a c h e F r 0056720 o m L i n k s _ N E W V A L 0056740 U E ) ) N E W V A L U E ) ) ) 0056760 ) ( T o L i n k s ( L E T 0057000 ( ( \ C a c h e ( f e t c h 0057020 ( \r C a r d O b j e c t C a r 0057040 d C a c h e ) o f D A T U M 0057060 ) ) \ L i n k s ) ( A N D 0057100 \ C a c h e ( S E T Q \ L i 0057120 n k s ( f e t c h ( C a r d 0057140 C a c h e L i n k s ) o f 0057160 \ C a c h e ) ) \r ( f e t c h 0057200 ( L i n k s C a c h e T o L 0057220 i n k s ) o f \ L i n k s ) 0057240 ) ) ( L E T ( ( \ C a c h e 0057260 ( O R ( f e t c h ( C a r 0057300 d O b j e c t C a r d C a c h 0057320 e ) o f D A T U M ) ( \r r 0057340 e p l a c e ( C a r d O b j e 0057360 c t C a r d C a c h e ) o f 0057400 D A T U M w i t h ( c r e 0057420 a t e C a r d C a c h e ) ) ) 0057440 ) \ L i n k s ) ( S E T Q 0057460 \ L i n k s ( f e t c h ( \r 0057500 C a r d C a c h e L i n k s ) 0057520 o f \ C a c h e ) ) ( C O 0057540 N D ( \ L i n k s ( r e p l 0057560 a c e ( L i n k s C a c h e 0057600 T o L i n k s ) o f \ L i n 0057620 k s w i t h N E W V A L U E 0057640 ) ) ( T \r ( r e p l a c e 0057660 ( C a r d C a c h e L i n k s 0057700 ) o f \ C a c h e w i t h 0057720 ( c r e a t e L i n k s C a 0057740 c h e T o L i n k s _ N E 0057760 W V A L U E ) ) N E W V A L U 0060000 E ) ) ) ) ( \r G l o b a l L i 0060020 n k s ( L E T ( ( \ C a c h 0060040 e ( f e t c h ( C a r d O b 0060060 j e c t C a r d C a c h e ) 0060100 o f D A T U M ) ) \ L i n k 0060120 s ) ( A N D \ C a c h e ( 0060140 S E T Q \ L i n k s ( \r f e 0060160 t c h ( C a r d C a c h e L 0060200 i n k s ) o f \ C a c h e ) 0060220 ) ( f e t c h ( L i n k s C 0060240 a c h e G l o b a l L i n k s 0060260 ) o f \ L i n k s ) ) ) ( 0060300 L E T ( ( \ C a c h e ( O R 0060320 ( \r f e t c h ( C a r d O b 0060340 j e c t C a r d C a c h e ) 0060360 o f D A T U M ) ( r e p l a 0060400 c e ( C a r d O b j e c t C 0060420 a r d C a c h e ) o f D A T 0060440 U M w i t h ( c r e a t e 0060460 C a r d C a c h e \r ) ) ) ) \ 0060500 L i n k s ) ( S E T Q \ L i 0060520 n k s ( f e t c h ( C a r d 0060540 C a c h e L i n k s ) o f 0060560 \ C a c h e ) ) ( C O N D ( 0060600 \ L i n k s ( r e p l a c e 0060620 ( L i n k s C a c h e \r G l o 0060640 b a l L i n k s ) o f \ L i 0060660 n k s w i t h N E W V A L U 0060700 E ) ) ( T ( r e p l a c e 0060720 ( C a r d C a c h e L i n k s 0060740 ) o f \ C a c h e w i t h 0060760 ( c r e a t e L i n k s C a 0061000 c h e \r G l o b a l L i n k s 0061020 _ N E W V A L U E ) ) N E 0061040 W V A L U E ) ) ) ) ( P r o p 0061060 L i s t ( L E T ( ( \ C a c 0061100 h e ( f e t c h ( C a r d O 0061120 b j e c t C a r d C a c h e ) 0061140 o f D A T U M ) \r ) ) ( A 0061160 N D \ C a c h e ( f e t c h 0061200 ( C a r d C a c h e P r o p 0061220 L i s t ) o f \ C a c h e ) 0061240 ) ) ( L E T ( ( \ C a c h e 0061260 ( f e t c h ( C a r d O b j 0061300 e c t C a r d C a c h e ) o 0061320 f \r D A T U M ) ) ) ( C O N 0061340 D ( \ C a c h e ( r e p l a 0061360 c e ( C a r d C a c h e P r 0061400 o p L i s t ) o f \ C a c h 0061420 e w i t h N E W V A L U E ) 0061440 ) ( T ( r e p l a c e ( \r 0061460 C a r d O b j e c t C a r d C 0061500 a c h e ) o f D A T U M w 0061520 i t h ( c r e a t e C a r d 0061540 C a c h e P r o p L i s t _ 0061560 N E W V A L U E ) ) N E W V 0061600 A L U E ) ) ) ) ( R e g i o n 0061620 ( L E T \r ( ( \ C a c h e 0061640 ( f e t c h ( C a r d O b j e 0061660 c t C a r d C a c h e ) o f 0061700 D A T U M ) ) ) ( A N D \ 0061720 C a c h e ( f e t c h ( C a 0061740 r d C a c h e R e g i o n ) 0061760 o f \ C a c h e ) ) ) \r ( L 0062000 E T ( ( \ C a c h e ( f e t 0062020 c h ( C a r d O b j e c t C 0062040 a r d C a c h e ) o f D A T 0062060 U M ) ) ) ( C O N D ( \ C a 0062100 c h e ( r e p l a c e ( C a 0062120 r d C a c h e R e g i o n ) 0062140 o f \r \ C a c h e w i t h 0062160 N E W V A L U E ) ) ( T ( r 0062200 e p l a c e ( C a r d O b j e 0062220 c t C a r d C a c h e ) o f 0062240 D A T U M w i t h ( c r e 0062260 a t e C a r d C a c h e R e 0062300 g i o n _ \r N E W V A L U E 0062320 ) ) N E W V A L U E ) ) ) ) 0062340 ( S a v e d R e g i o n ( L E 0062360 T ( ( \ C a c h e ( f e t c 0062400 h ( C a r d O b j e c t C a 0062420 r d C a c h e ) o f D A T U 0062440 M ) ) ) ( A N D \r \ C a c h 0062460 e ( f e t c h ( C a r d C a 0062500 c h e S a v e d R e g i o n ) 0062520 o f \ C a c h e ) ) ) ( L 0062540 E T ( ( \ C a c h e ( f e t 0062560 c h ( C a r d O b j e c t C 0062600 a r d C a c h e ) o f \r D A 0062620 T U M ) ) ) ( C O N D ( \ C 0062640 a c h e ( r e p l a c e ( C 0062660 a r d C a c h e S a v e d R e 0062700 g i o n ) o f \ C a c h e 0062720 w i t h N E W V A L U E ) ) 0062740 ( T ( r e p l a c e ( \r C a 0062760 r d O b j e c t C a r d C a c 0063000 h e ) o f D A T U M w i t 0063020 h ( c r e a t e C a r d C a 0063040 c h e S a v e d R e g i o n 0063060 _ N E W V A L U E ) ) N E W 0063100 V A L U E ) ) ) ) ( I t e m D 0063120 a t e \r ( L E T ( ( \ C a c 0063140 h e ( f e t c h ( C a r d O 0063160 b j e c t C a r d C a c h e ) 0063200 o f D A T U M ) ) ) ( A N 0063220 D \ C a c h e ( f e t c h 0063240 ( C a r d C a c h e I t e m D 0063260 a t e ) o f \r \ C a c h e ) 0063300 ) ) ( L E T ( ( \ C a c h e 0063320 ( f e t c h ( C a r d O b j 0063340 e c t C a r d C a c h e ) o 0063360 f D A T U M ) ) ) ( C O N D 0063400 ( \ C a c h e ( r e p l a c 0063420 e ( C a r d C a c h e \r I t 0063440 e m D a t e ) o f \ C a c h 0063460 e w i t h N E W V A L U E ) 0063500 ) ( T ( r e p l a c e ( C 0063520 a r d O b j e c t C a r d C a 0063540 c h e ) o f D A T U M w i 0063560 t h ( c r e a t e C a r d C 0063600 a c h e \r I t e m D a t e _ 0063620 N E W V A L U E ) ) N E W V 0063640 A L U E ) ) ) ) ( L i n k s D 0063660 a t e ( L E T ( ( \ C a c h 0063700 e ( f e t c h ( C a r d O b 0063720 j e c t C a r d C a c h e ) 0063740 o f D A T U M ) ) ) \r ( A N 0063760 D \ C a c h e ( f e t c h 0064000 ( C a r d C a c h e L i n k s 0064020 D a t e ) o f \ C a c h e ) 0064040 ) ) ( L E T ( ( \ C a c h e 0064060 ( f e t c h ( C a r d O b j 0064100 e c t C a r d C a c h e ) o 0064120 f \r D A T U M ) ) ) ( C O N 0064140 D ( \ C a c h e ( r e p l a 0064160 c e ( C a r d C a c h e L i 0064200 n k s D a t e ) o f \ C a c 0064220 h e w i t h N E W V A L U E 0064240 ) ) ( T ( r e p l a c e ( 0064260 \r C a r d O b j e c t C a r d 0064300 C a c h e ) o f D A T U M 0064320 w i t h ( c r e a t e C a r 0064340 d C a c h e L i n k s D a t e 0064360 _ N E W V A L U E ) ) N E 0064400 W V A L U E ) ) ) ) ( T i t l 0064420 e D a t e ( \r L E T ( ( \ C 0064440 a c h e ( f e t c h ( C a r 0064460 d O b j e c t C a r d C a c h 0064500 e ) o f D A T U M ) ) ) ( 0064520 A N D \ C a c h e ( f e t c 0064540 h ( C a r d C a c h e T i t 0064560 l e D a t e ) o f \r \ C a c 0064600 h e ) ) ) ( L E T ( ( \ C a 0064620 c h e ( f e t c h ( C a r d 0064640 O b j e c t C a r d C a c h e 0064660 ) o f D A T U M ) ) ) ( C 0064700 O N D ( \ C a c h e ( r e p 0064720 l a c e ( C a r d C a c h e 0064740 \r T i t l e D a t e ) o f \ 0064760 C a c h e w i t h N E W V A 0065000 L U E ) ) ( T ( r e p l a c 0065020 e ( C a r d O b j e c t C a 0065040 r d C a c h e ) o f D A T U 0065060 M w i t h ( c r e a t e \r 0065100 C a r d C a c h e T i t l e D 0065120 a t e _ N E W V A L U E ) ) 0065140 N E W V A L U E ) ) ) ) ( P 0065160 r o p L i s t D a t e ( L E T 0065200 ( ( \ C a c h e ( f e t c h 0065220 ( C a r d O b j e c t C a r 0065240 d C a c h e \r ) o f D A T U 0065260 M ) ) ) ( A N D \ C a c h e 0065300 ( f e t c h ( C a r d C a c 0065320 h e P r o p L i s t D a t e ) 0065340 o f \ C a c h e ) ) ) ( L 0065360 E T ( ( \ C a c h e ( f e t 0065400 c h ( \r C a r d O b j e c t 0065420 C a r d C a c h e ) o f D A 0065440 T U M ) ) ) ( C O N D ( \ C 0065460 a c h e ( r e p l a c e ( C 0065500 a r d C a c h e P r o p L i s 0065520 t D a t e ) o f \ C a c h e 0065540 w i t h \r N E W V A L U E ) 0065560 ) ( T ( r e p l a c e ( C 0065600 a r d O b j e c t C a r d C a 0065620 c h e ) o f D A T U M w i 0065640 t h ( c r e a t e C a r d C 0065660 a c h e P r o p L i s t D a t 0065700 e _ N E W V A L U E ) \r ) 0065720 N E W V A L U E ) ) ) ) ( L i 0065740 n k s D i r t y F l g ( L E T 0065760 ( ( \ C a c h e ( f e t c h 0066000 ( C a r d O b j e c t C a r 0066020 d C a c h e ) o f D A T U M 0066040 ) ) ) ( A N D \ C a c h e 0066060 ( \r f e t c h ( C a r d C a c 0066100 h e L i n k s D i r t y F l g 0066120 ) o f \ C a c h e ) ) ) ( 0066140 L E T ( ( \ C a c h e ( f e 0066160 t c h ( C a r d O b j e c t 0066200 C a r d C a c h e ) o f D A 0066220 T U M ) ) ) ( \r C O N D ( \ 0066240 C a c h e ( r e p l a c e ( 0066260 C a r d C a c h e L i n k s D 0066300 i r t y F l g ) o f \ C a c 0066320 h e w i t h N E W V A L U E 0066340 ) ) ( T ( r e p l a c e ( 0066360 C a r d O b j e c t \r C a r d 0066400 C a c h e ) o f D A T U M 0066420 w i t h ( c r e a t e C a r 0066440 d C a c h e L i n k s D i r t 0066460 y F l g _ N E W V A L U E ) 0066500 ) N E W V A L U E ) ) ) ) ( 0066520 P r o p L i s t D i r t y F l g 0066540 ( \r L E T ( ( \ C a c h e 0066560 ( f e t c h ( C a r d O b j e 0066600 c t C a r d C a c h e ) o f 0066620 D A T U M ) ) ) ( A N D \ 0066640 C a c h e ( f e t c h ( C a 0066660 r d C a c h e P r o p L i s t 0066700 D i r t y F l g ) \r o f \ C 0066720 a c h e ) ) ) ( L E T ( ( \ 0066740 C a c h e ( f e t c h ( C a 0066760 r d O b j e c t C a r d C a c 0067000 h e ) o f D A T U M ) ) ) 0067020 ( C O N D ( \ C a c h e ( r 0067040 e p l a c e ( \r C a r d C a c 0067060 h e P r o p L i s t D i r t y 0067100 F l g ) o f \ C a c h e w 0067120 i t h N E W V A L U E ) ) ( 0067140 T ( r e p l a c e ( C a r d 0067160 O b j e c t C a r d C a c h e 0067200 ) o f D A T U M w i t h \r 0067220 ( c r e a t e C a r d C a c 0067240 h e P r o p L i s t D i r t y 0067260 F l g _ N E W V A L U E ) ) 0067300 N E W V A L U E ) ) ) ) ( S 0067320 u b s t a n c e D i r t y F l g 0067340 ( L E T ( ( \ C a c h e ( 0067360 f e t c h \r ( C a r d O b j e 0067400 c t C a r d C a c h e ) o f 0067420 D A T U M ) ) ) ( A N D \ 0067440 C a c h e ( f e t c h ( C a 0067460 r d C a c h e S u b s t a n c 0067500 e D i r t y F l g ) o f \ C 0067520 a c h e ) ) ) ( L E T \r ( ( 0067540 \ C a c h e ( f e t c h ( C 0067560 a r d O b j e c t C a r d C a 0067600 c h e ) o f D A T U M ) ) ) 0067620 ( C O N D ( \ C a c h e ( 0067640 r e p l a c e ( C a r d C a c 0067660 h e S u b s t a n c e D i r t 0067700 y F l g \r ) o f \ C a c h e 0067720 w i t h N E W V A L U E ) ) 0067740 ( T ( r e p l a c e ( C a 0067760 r d O b j e c t C a r d C a c 0070000 h e ) o f D A T U M w i t 0070020 h ( c r e a t e C a r d C a 0070040 c h e \r S u b s t a n c e D i 0070060 r t y F l g _ N E W V A L U 0070100 E ) ) N E W V A L U E ) ) ) ) 0070120 ( N e w C a r d F l g ( L E 0070140 T ( ( \ C a c h e ( f e t c 0070160 h ( C a r d O b j e c t C a 0070200 r d C a c h e ) o f \r D A T 0070220 U M ) ) ) ( A N D \ C a c h 0070240 e ( f e t c h ( C a r d C a 0070260 c h e N e w C a r d F l g ) 0070300 o f \ C a c h e ) ) ) ( L E 0070320 T ( ( \ C a c h e ( f e t c 0070340 h ( C a r d O b j e c t \r C 0070360 a r d C a c h e ) o f D A T 0070400 U M ) ) ) ( C O N D ( \ C a 0070420 c h e ( r e p l a c e ( C a 0070440 r d C a c h e N e w C a r d F 0070460 l g ) o f \ C a c h e w i 0070500 t h N E W V A L U E ) ) ( T 0070520 ( \r r e p l a c e ( C a r d 0070540 O b j e c t C a r d C a c h e 0070560 ) o f D A T U M w i t h 0070600 ( c r e a t e C a r d C a c h 0070620 e N e w C a r d F l g _ N 0070640 E W V A L U E ) ) N E W V A L 0070660 U E ) ) ) ) ( \r B e i n g D e 0070700 l e t e d F l g ( L E T ( ( 0070720 \ C a c h e ( f e t c h ( C 0070740 a r d O b j e c t C a r d C a 0070760 c h e ) o f D A T U M ) ) ) 0071000 ( A N D \ C a c h e ( f e 0071020 t c h ( C a r d C a c h e \r 0071040 B e i n g D e l e t e d F l g ) 0071060 o f \ C a c h e ) ) ) ( L 0071100 E T ( ( \ C a c h e ( f e t 0071120 c h ( C a r d O b j e c t C 0071140 a r d C a c h e ) o f D A T 0071160 U M ) ) ) ( C O N D ( \ C a 0071200 c h e ( \r r e p l a c e ( C 0071220 a r d C a c h e B e i n g D e 0071240 l e t e d F l g ) o f \ C a 0071260 c h e w i t h N E W V A L U 0071300 E ) ) ( T ( r e p l a c e 0071320 ( C a r d O b j e c t C a r d 0071340 C a c h e ) o f \r D A T U M 0071360 w i t h ( c r e a t e C a 0071400 r d C a c h e B e i n g D e l 0071420 e t e d F l g _ N E W V A L 0071440 U E ) ) N E W V A L U E ) ) ) 0071460 ) ( * * C l a s s v a r 0071500 i a b l e s o f t h e \r c 0071520 a r d o b j e c t { c l a s 0071540 s = = c a r d t y p e } ) 0071560 ( S u p e r T y p e ( L E T 0071600 ( ( N o t e C a r d T y p e 0071620 ( f e t c h ( C a r d T y p 0071640 e ) o f D A T U M ) ) ) ( 0071660 \r N C . G e t C a r d T y p e F 0071700 i e l d S u p e r T y p e N 0071720 o t e C a r d T y p e ) ) ) ( 0071740 L i n k D i s p l a y M o d e 0071760 ( L E T ( ( N o t e C a r d T 0072000 y p e ( f e t c h ( C a r d 0072020 T y p e ) \r o f D A T U M 0072040 ) ) ) ( N C . G e t C a r d T 0072060 y p e F i e l d L i n k D i s 0072100 p l a y M o d e N o t e C a r 0072120 d T y p e ) ) ) ( D e f a u l 0072140 t W i d t h ( L E T ( ( N o 0072160 t e C a r d T y p e ( \r f e t 0072200 c h ( C a r d T y p e ) o 0072220 f D A T U M ) ) ) ( N C . G 0072240 e t C a r d T y p e F i e l d 0072260 D e f a u l t W i d t h N o t 0072300 e C a r d T y p e ) ) ) ( D e 0072320 f a u l t H e i g h t ( L E T 0072340 ( ( \r N o t e C a r d T y p e 0072360 ( f e t c h ( C a r d T y 0072400 p e ) o f D A T U M ) ) ) 0072420 ( N C . G e t C a r d T y p e F 0072440 i e l d D e f a u l t H e i g 0072460 h t N o t e C a r d T y p e ) 0072500 ) ) ( \r L i n k A n c h o r M 0072520 o d e s S u p p o r t e d ( L 0072540 E T ( ( N o t e C a r d T y p 0072560 e ( f e t c h ( C a r d T 0072600 y p e ) o f D A T U M ) ) ) 0072620 ( N C . G e t C a r d T y p e 0072640 F i e l d \r L i n k A n c h o 0072660 r M o d e s S u p p o r t e d 0072700 N o t e C a r d T y p e ) ) ) 0072720 ( L i n k I c o n A t t a c h e 0072740 d B i t M a p ( L E T ( ( N 0072760 o t e C a r d T y p e ( f e t 0073000 c h ( C a r d T y p e \r ) 0073020 o f D A T U M ) ) ) ( N C . 0073040 G e t C a r d T y p e F i e l d 0073060 L i n k I c o n A t t a c h e 0073100 d B i t M a p N o t e C a r d 0073120 T y p e ) ) ) ( L e f t B u t 0073140 t o n M e n u I t e m s ( L E 0073160 T ( ( \r N o t e C a r d T y p 0073200 e ( f e t c h ( C a r d T 0073220 y p e ) o f D A T U M ) ) ) 0073240 ( N C . G e t C a r d T y p e 0073260 F i e l d L e f t B u t t o n 0073300 M e n u I t e m s N o t e C a 0073320 r d T y p e ) ) ) ( \r M i d d 0073340 l e B u t t o n M e n u I t e m 0073360 s ( L E T ( ( N o t e C a r 0073400 d T y p e ( f e t c h ( C a 0073420 r d T y p e ) o f D A T U 0073440 M ) ) ) ( N C . G e t C a r d 0073460 T y p e F i e l d \r M i d d l 0073500 e B u t t o n M e n u I t e m s 0073520 N o t e C a r d T y p e ) ) ) 0073540 ( * * M e t h o d s o f 0073560 t h e c a r d o b j e c t 0073600 { c l a s s = = c a r d 0073620 t y p e } ) ( M a k e F n ( 0073640 \r L E T ( ( N o t e C a r d T 0073660 y p e ( f e t c h ( C a r d 0073700 T y p e ) o f D A T U M ) 0073720 ) ) ( N C . G e t C a r d T y 0073740 p e F i e l d M a k e F n N 0073760 o t e C a r d T y p e ) ) ) ( 0074000 E d i t F n \r ( L E T ( ( N 0074020 o t e C a r d T y p e ( f e t 0074040 c h ( C a r d T y p e ) o 0074060 f D A T U M ) ) ) ( N C . G 0074100 e t C a r d T y p e F i e l d 0074120 E d i t F n N o t e C a r d T 0074140 y p e ) ) ) ( Q u i t F n \r 0074160 ( L E T ( ( N o t e C a r d T 0074200 y p e ( f e t c h ( C a r d 0074220 T y p e ) o f D A T U M ) 0074240 ) ) ( N C . G e t C a r d T y 0074260 p e F i e l d Q u i t F n N 0074300 o t e C a r d T y p e ) ) ) ( 0074320 \r M a k e R e a d O n l y F n 0074340 ( L E T ( ( N o t e C a r d T 0074360 y p e ( f e t c h ( C a r d 0074400 T y p e ) o f D A T U M ) 0074420 ) ) ( N C . G e t C a r d T y 0074440 p e F i e l d M a k e R e a d 0074460 O n l y F n \r N o t e C a r d 0074500 T y p e ) ) ) ( M a k e R e a 0074520 d W r i t e F n ( L E T ( ( 0074540 N o t e C a r d T y p e ( f e 0074560 t c h ( C a r d T y p e ) 0074600 o f D A T U M ) ) ) ( \r N C 0074620 . G e t C a r d T y p e F i e l 0074640 d M a k e R e a d W r i t e F 0074660 n N o t e C a r d T y p e ) ) 0074700 ) ( G e t F n ( L E T ( ( 0074720 N o t e C a r d T y p e ( f e 0074740 t c h ( C a r d T y p e ) 0074760 o f \r D A T U M ) ) ) ( N C 0075000 . G e t C a r d T y p e F i e l 0075020 d G e t F n N o t e C a r d 0075040 T y p e ) ) ) ( P u t F n ( 0075060 L E T ( ( N o t e C a r d T y 0075100 p e ( f e t c h ( C a r d 0075120 T y p e ) o f \r D A T U M ) 0075140 ) ) ( N C . G e t C a r d T y 0075160 p e F i e l d P u t F n N o 0075200 t e C a r d T y p e ) ) ) ( C 0075220 o p y F n ( L E T ( ( N o t 0075240 e C a r d T y p e ( f e t c h 0075260 ( C a r d T y p e ) o f 0075300 \r D A T U M ) ) ) ( N C . G e 0075320 t C a r d T y p e F i e l d C 0075340 o p y F n N o t e C a r d T y 0075360 p e ) ) ) ( M a r k D i r t y 0075400 F n ( L E T ( ( N o t e C a 0075420 r d T y p e ( f e t c h ( C 0075440 a r d \r T y p e ) o f D A 0075460 T U M ) ) ) ( N C . G e t C a 0075500 r d T y p e F i e l d M a r k 0075520 D i r t y F n N o t e C a r d 0075540 T y p e ) ) ) ( D i r t y P F 0075560 n ( L E T ( ( N o t e C a r 0075600 d T y p e ( \r f e t c h ( C 0075620 a r d T y p e ) o f D A T 0075640 U M ) ) ) ( N C . G e t C a r 0075660 d T y p e F i e l d D i r t y 0075700 P F n N o t e C a r d T y p e 0075720 ) ) ) ( C o l l e c t L i n k 0075740 s F n ( L E T ( ( \r N o t e 0075760 C a r d T y p e ( f e t c h 0076000 ( C a r d T y p e ) o f D 0076020 A T U M ) ) ) ( N C . G e t C 0076040 a r d T y p e F i e l d C o l 0076060 l e c t L i n k s F n N o t e 0076100 C a r d T y p e ) ) ) ( \r D e 0076120 l e t e L i n k s F n ( L E T 0076140 ( ( N o t e C a r d T y p e 0076160 ( f e t c h ( C a r d T y p 0076200 e ) o f D A T U M ) ) ) ( 0076220 N C . G e t C a r d T y p e F i 0076240 e l d D e l e t e L i n k s F 0076260 n \r N o t e C a r d T y p e ) 0076300 ) ) ( U p d a t e L i n k I c 0076320 o n s F n ( L E T ( ( N o t 0076340 e C a r d T y p e ( f e t c h 0076360 ( C a r d T y p e ) o f 0076400 D A T U M ) ) ) ( \r N C . G e 0076420 t C a r d T y p e F i e l d U 0076440 p d a t e L i n k I c o n s F n 0076460 N o t e C a r d T y p e ) ) ) 0076500 ( I n s e r t L i n k F n ( 0076520 L E T ( ( N o t e C a r d T y 0076540 p e ( f e t c h ( C a r d 0076560 \r T y p e ) o f D A T U M ) 0076600 ) ) ( N C . G e t C a r d T y 0076620 p e F i e l d I n s e r t L i 0076640 n k F n N o t e C a r d T y p 0076660 e ) ) ) ( T r a n s l a t e W 0076700 i n d o w P o s i t i o n F n 0076720 ( L E T ( ( \r N o t e C a r d 0076740 T y p e ( f e t c h ( C a r 0076760 d T y p e ) o f D A T U M 0077000 ) ) ) ( N C . G e t C a r d T 0077020 y p e F i e l d T r a n s l a 0077040 t e W i n d o w P o s i t i o n 0077060 F n \r N o t e C a r d T y p e 0077100 ) ) ) ( * * M e t h o d s 0077120 i n h e r i t e d f r o m 0077140 t h e c a r d s c u r r e n 0077160 t N o t e F i l e d e v i c 0077200 e ) ( M a r k C a r d D e l e 0077220 t e d F n ( \r f e t c h ( N 0077240 o t e F i l e M a r k C a r d 0077260 D e l e t e d F n ) o f ( f 0077300 e t c h ( C a r d N o t e F 0077320 i l e ) o f D A T U M ) ) ) 0077340 ( G e t C a r d I n f o F n 0077360 ( f e t c h ( \r N o t e F i l 0077400 e G e t C a r d I n f o F n ) 0077420 o f ( f e t c h ( C a r d 0077440 N o t e F i l e ) o f D A 0077460 T U M ) ) ) ( P u t C a r d P 0077500 a r t F n ( f e t c h ( N o 0077520 t e F i l e \r P u t C a r d P 0077540 a r t F n ) o f ( f e t c h 0077560 ( C a r d N o t e F i l e ) 0077600 o f D A T U M ) ) ) ( G e 0077620 t C a r d P a r t F n ( f e t 0077640 c h ( N o t e F i l e G e t 0077660 C a r d P a r t F n ) o f \r 0077700 ( f e t c h ( C a r d N o t 0077720 e F i l e ) o f D A T U M ) 0077740 ) ) ( O b t a i n W r i t e P 0077760 e r m i s s i o n F n ( f e t 0100000 c h ( N o t e F i l e O b t 0100020 a i n W r i t e P e r m i s s i 0100040 o n F n ) \r o f ( f e t c h 0100060 ( C a r d N o t e F i l e ) 0100100 o f D A T U M ) ) ) ( R e 0100120 l e a s e W r i t e P e r m i s 0100140 s i o n F n ( f e t c h ( N 0100160 o t e F i l e \r R e l e a s e 0100200 W r i t e P e r m i s s i o n F 0100220 n ) o f ( f e t c h ( C a 0100240 r d N o t e F i l e ) o f 0100260 D A T U M ) ) ) ( C a n c e l 0100300 C a c h e S u b s c r i p t i o 0100320 n F n ( f e t c h ( \r N o t 0100340 e F i l e C a n c e l C a c h 0100360 e S u b s c r i p t i o n F n ) 0100400 o f ( f e t c h ( C a r d 0100420 N o t e F i l e ) o f D A 0100440 T U M ) ) ) ) ( C R E A T E 0100460 ( c r e a t e C a r d O b j e 0100500 c t ) \r ) ( T Y P E ? ( T Y 0100520 P E ? C a r d O b j e c t D 0100540 A T U M ) ) ) \r ( D A T A T Y P 0100560 E L i n k s C a c h e ( T o 0100600 L i n k s F r o m L i n k s 0100620 G l o b a l L i n k s ) ) \r ( / 0100640 D E C L A R E D A T A T Y P E 0100660 ( Q U O T E C a r d O b j e c 0100700 t ) ( Q U O T E ( P O I N T 0100720 E R P O I N T E R P O I N T 0100740 E R P O I N T E R F L A G 0100760 F I X P F I X P F I X P F 0101000 I X P \r F I X P P O I N T E 0101020 R F L A G P O I N T E R F 0101040 L A G P O I N T E R P O I N 0101060 T E R ) ) ( Q U O T E ( ( C 0101100 a r d O b j e c t 0 P O I N 0101120 T E R ) ( C a r d O b j e c t 0101140 2 P O I N T E R ) \r ( C a 0101160 r d O b j e c t 4 P O I N T 0101200 E R ) ( C a r d O b j e c t 0101220 6 P O I N T E R ) ( C a r d 0101240 O b j e c t 6 ( F L A G B I 0101260 T S . 0 ) ) ( C a r d O b 0101300 j e c t 8 F I X P ) ( \r C 0101320 a r d O b j e c t 1 0 F I X 0101340 P ) ( C a r d O b j e c t 1 0101360 2 F I X P ) ( C a r d O b j 0101400 e c t 1 4 F I X P ) ( C a 0101420 r d O b j e c t 1 6 F I X P 0101440 ) ( C a r d O b j e c t 1 8 0101460 \r P O I N T E R ) ( C a r d 0101500 O b j e c t 1 8 ( F L A G B 0101520 I T S . 0 ) ) ( C a r d O 0101540 b j e c t 2 0 P O I N T E R 0101560 ) ( C a r d O b j e c t 2 0 0101600 ( F L A G B I T S . 0 ) ) 0101620 ( \r C a r d O b j e c t 2 2 0101640 P O I N T E R ) ( C a r d O 0101660 b j e c t 2 4 P O I N T E R 0101700 ) ) ) ( Q U O T E 2 6 ) ) \r 0101720 ( / D E C L A R E D A T A T Y P 0101740 E ( Q U O T E C a r d C a c 0101760 h e ) ( Q U O T E ( P O I N 0102000 T E R P O I N T E R P O I N * 0102040 T E R F I X P F I X P F I 0102060 X P \r F I X P F L A G F L 0102100 A G F L A G F L A G F L A 0102120 G F L A G ) ) ( Q U O T E 0102140 ( ( C a r d C a c h e 0 P O 0102160 I N T E R ) ( C a r d C a c h 0102200 e 2 P O I N T E R ) ( C a 0102220 r d C a c h e 4 \r P O I N T 0102240 E R ) ( C a r d C a c h e 6 0102260 P O I N T E R ) ( C a r d C 0102300 a c h e 8 P O I N T E R ) 0102320 ( C a r d C a c h e 1 0 F I 0102340 X P ) ( C a r d C a c h e 1 0102360 2 F I X P ) ( \r C a r d C a 0102400 c h e 1 4 F I X P ) ( C a 0102420 r d C a c h e 1 6 F I X P ) 0102440 ( C a r d C a c h e 8 ( F 0102460 L A G B I T S . 0 ) ) ( C 0102500 a r d C a c h e 8 ( F L A G 0102520 B I T S . 1 6 ) ) ( \r C a 0102540 r d C a c h e 8 ( F L A G B 0102560 I T S . 3 2 ) ) ( C a r d 0102600 C a c h e 8 ( F L A G B I T 0102620 S . 4 8 ) ) ( C a r d C a 0102640 c h e 8 ( F L A G B I T S 0102660 . 6 4 ) ) ( C a r d C a c h 0102700 e 8 \r ( F L A G B I T S . 0102720 8 0 ) ) ) ) ( Q U O T E 1 0102740 8 ) ) \r ( / D E C L A R E D A T 0102760 A T Y P E ( Q U O T E L i n 0103000 k s C a c h e ) ( Q U O T E 0103020 ( P O I N T E R P O I N T E R 0103040 P O I N T E R ) ) ( Q U O T 0103060 E ( ( L i n k s C a c h e 0 0103100 P O I N T E R ) \r ( L i n k 0103120 s C a c h e 2 P O I N T E R 0103140 ) ( L i n k s C a c h e 4 0103160 P O I N T E R ) ) ) ( Q U O T 0103200 E 6 ) ) \r ( D E F M A C R O 0103220 N C . W i t h W r i t e P e r m 0103240 i s s i o n ( C a r d F o r m 0103260 C a r d P a r t F o r m & R 0103300 E S T B o d y ) ( * ; ; ; 0103320 \r " E v a l u a t e B o d y 0103340 a f t e r o b t a i n i n g 0103360 W r i t e P e r m i s s i o n 0103400 f o r t h e C a r d P a r 0103420 t o f a C a r d . R e l 0103440 e a s e W r i t e p e r m i 0103460 s s i o n a f t e r w a r d s 0103500 . " \r ) ( * ; ; " f g h 0103520 8 / 3 0 / 8 6 F i r s t c r 0103540 e a t e d . " ) ( B Q U O T E 0103560 ( R E S E T L S T ( R E S E 0103600 T S A V E ( N C . A p p l y F 0103620 n O b t a i n W r i t e P e r 0103640 m i s s i o n F n \r ( \ , C 0103660 a r d F o r m ) ( \ , C a r 0103700 d P a r t F o r m ) ) ( B Q U 0103720 O T E ( A P P L Y * ( \ , 0103740 ( f e t c h ( C a r d R e l 0103760 e a s e W r i t e P e r m i s s 0104000 i o n F n ) o f ( \ , \r C 0104020 a r d F o r m ) ) ) ( \ , ( 0104040 \ , C a r d F o r m ) ) ( \ 0104060 , ( Q U O T E ( \ , C a r 0104100 d P a r t F o r m ) ) ) ) ) ) 0104120 ( \ , @ B o d y ) ) ) ) \r ( D 0104140 E F M A C R O N C . I f C a r 0104160 d P a r t N o t B u s y ( C a 0104200 r d F o r m C a r d P a r t F 0104220 o r m & R E S T B o d y ) 0104240 ( * ; ; \r " D o B o d y 0104260 i f c a n o b t a i n w r 0104300 i t e p e r m i s s i o n f 0104320 o r C a r d P a r t o f C 0104340 a r d . O t h e r w i s e c 0104360 a l l C a r d P a r t B u s y 0104400 . " ) ( * ; ; \r " f g h 0104420 8 / 3 0 / 8 6 F i r s t c r 0104440 e a t e d . " ) ( B Q U O T E 0104460 ( C O N D ( ( N O T ( N C 0104500 . A p p l y F n O b t a i n W 0104520 r i t e P e r m i s s i o n F n 0104540 ( \ , C a r d F o r m ) ( 0104560 \r \ , C a r d P a r t F o r m 0104600 ) ) ) ( N C . C a r d P a r t 0104620 B u s y ( \ , C a r d F o r 0104640 m ) ( \ , C a r d P a r t F 0104660 o r m ) ) N I L ) ( T ( R 0104700 E S E T L S T ( R E S E T S A 0104720 V E N I L \r ( B Q U O T E 0104740 ( A P P L Y * ( \ , ( f e t 0104760 c h ( C a r d R e l e a s e 0105000 W r i t e P e r m i s s i o n F 0105020 n ) o f ( \ , C a r d F o 0105040 r m ) ) ) ( \ , ( \ , C a 0105060 r d F o r m ) ) ( \ , ( \r \ 0105100 , C a r d P a r t F o r m ) ) 0105120 ) ) ) ( \ , @ B o d y ) ) ) 0105140 ) ) ) \r ( D E F M A C R O N C 0105160 . I f M u l t i p l e C a r d P 0105200 a r t s N o t B u s y ( C a r 0105220 d F o r m C a r d P a r t s L 0105240 i s t & R E S T B o d y ) 0105260 ( * ; ; \r " E s s e n t i a 0105300 l l y c a l l I f C a r d P 0105320 a r t N o t B u s y f o r a 0105340 w h o l e b u n c h o f 0105360 C a r d P a r t s " ) ( * ; 0105400 ; \r " f g h 8 / 3 0 / 8 6 0105420 F i r s t c r e a t e d . " ) 0105440 ( L E T ( ( F o r m U n d e 0105460 r C o n s t r u c t i o n ( B 0105500 Q U O T E ( P R O G N ( \ , 0105520 @ B o d y ) ) ) ) ) ( f o r 0105540 C a r d P a r t \r i n ( R 0105560 E V E R S E C a r d P a r t s 0105600 L i s t ) d o ( S E T Q F 0105620 o r m U n d e r C o n s t r u c 0105640 t i o n ( B Q U O T E ( N C 0105660 . I f C a r d P a r t N o t B u 0105700 s y ( \ , C a r d F o r m ) 0105720 \r ( Q U O T E ( \ , C a r 0105740 d P a r t ) ) ( \ , F o r m 0105760 U n d e r C o n s t r u c t i o 0106000 n ) ) ) ) ) F o r m U n d e r 0106020 C o n s t r u c t i o n ) ) \r ( 0106040 D E F M A C R O N C . M a p C 0106060 a r d s ( N o t e F i l e F 0106100 u n c t i o n & O P T I O N A 0106120 L C o l l e c t R e s u l t P 0106140 r e d i c a t e ) ( * ; ; 0106160 \r " M a p o v e r t h e e 0106200 n t r i e s i n a N o t e 0106220 F i l e s h a s h a r r a y 0106240 a p p l y i n g f u n c t i 0106260 o n t o t h e C a r d I D 0106300 a n d H a s h t a b l e 0106320 v a l u e f o r e a c h e 0106340 n t r y . " \r ) ( * ; ; " 0106360 r h t 7 / 1 4 / 8 6 : C h a 0106400 n g e d f r o m f u n c t i 0106420 o n t o m a c r o . " ) ( 0106440 * ; ; \r " f g h 7 / 1 6 / 0106460 8 6 F i x e d s e v e r a l 0106500 b u g s a n d r e o r g a 0106520 n i z e d m a c r o . " ) ( 0106540 C O N D ( C o l l e c t R e s 0106560 u l t P r e d i c a t e ( B Q 0106600 U O T E ( L E T ( \r C o l l 0106620 e c t i o n L i s t ) ( M A P 0106640 H A S H ( f e t c h ( N o t 0106660 e F i l e H a s h A r r a y ) 0106700 o f ( \ , N o t e F i l e 0106720 ) ) ( F U N C T I O N ( L A 0106740 M B D A ( V a l u e K e y ) 0106760 ( \r L E T ( P r e d i c a t 0107000 e R e s u l t ) ( B L O C K ) 0107020 ( C O N D ( ( S E T Q P r 0107040 e d i c a t e R e s u l t ( A 0107060 P P L Y * ( \ , C o l l e c 0107100 t R e s u l t P r e d i c a t e 0107120 ) V a l u e ) ) \r ( S E T Q 0107140 C o l l e c t i o n L i s t 0107160 ( C O N S ( A P P L Y * ( \ 0107200 , F u n c t i o n ) V a l u 0107220 e P r e d i c a t e R e s u l 0107240 t ) C o l l e c t i o n L i s 0107260 t ) ) ) ( T ( A P P L Y * 0107300 \r ( \ , F u n c t i o n ) V 0107320 a l u e ) ) ) ) ) ) ) C o l l 0107340 e c t i o n L i s t ) ) ) ( T 0107360 ( B Q U O T E ( M A P H A S 0107400 H ( f e t c h ( N o t e F i 0107420 l e H a s h A r r a y ) o f 0107440 ( \ , \r N o t e F i l e ) ) 0107460 ( F U N C T I O N ( L A M B 0107500 D A ( V a l u e K e y ) ( 0107520 B L O C K ) ( A P P L Y * ( 0107540 \ , F u n c t i o n ) V a l 0107560 u e ) ) ) ) ) ) ) ) \r ( R E C O 0107600 R D P r o p L i s t I t e m 0107620 ( P r o p e r t y N a m e V a 0107640 l u e O r i g i n a l L i s t 0107660 F l g A l l o w E d i t F l g 0107700 A l l o w S e l e c t F l g 0107720 B u t t o n F n ) ) \r ( D A T A 0107740 T Y P E L i n k ( U I D S 0107760 o u r c e C a r d D e s t i n 0110000 a t i o n C a r d A n c h o r 0110020 M o d e L a b e l D i s p l 0110040 a y M o d e U s e r D a t a ) 0110060 ) \r ( T Y P E R E C O R D L I 0110100 N K D I S P L A Y M O D E ( S 0110120 H O W T I T L E F L G S H O W 0110140 L I N K T Y P E F L G A T T A 0110160 C H B I T M A P F L G ) ( T Y 0110200 P E ? ( A N D ( E Q ( L E 0110220 N G T H \r D A T U M ) 4 ) 0110240 ( E Q ( C A R D A T U M ) 0110260 ( Q U O T E L I N K D I S P L 0110300 A Y M O D E ) ) ( F M E M B 0110320 ( C A D R D A T U M ) ( Q U 0110340 O T E ( T N I L F L O A T 0110360 ) ) ) ( F M E M B ( \r C A D 0110400 D R D A T U M ) ( Q U O T E 0110420 ( T N I L F L O A T ) ) ) 0110440 ( F M E M B ( C A D D D R 0110460 D A T U M ) ( Q U O T E ( T 0110500 N I L F L O A T ) ) ) T ) 0110520 ) ) \r ( / D E C L A R E D A T A 0110540 T Y P E ( Q U O T E L i n k 0110560 ) ( Q U O T E ( P O I N T E 0110600 R P O I N T E R P O I N T E * 0110660 R ) ) ( \r Q U O T E ( ( L i 0110700 n k 0 P O I N T E R ) ( L 0110720 i n k 2 P O I N T E R ) ( 0110740 L i n k 4 P O I N T E R ) 0110760 ( L i n k 6 P O I N T E R ) 0111000 ( L i n k 8 P O I N T E R 0111020 ) ( L i n k 1 0 \r P O I N 0111040 T E R ) ( L i n k 1 2 P O 0111060 I N T E R ) ) ) ( Q U O T E 0111100 1 4 ) ) \r ( D A T A T Y P E N 0111120 C P o i n t e r ( D e s t i n 0111140 a t i o n C a r d D i s p l a 0111160 y M o d e L a b e l U s e r 0111200 D a t a ) ) \r ( / D E C L A R E 0111220 D A T A T Y P E ( Q U O T E 0111240 N C P o i n t e r ) ( Q U O T 0111260 E ( P O I N T E R P O I N T 0111300 E R P O I N T E R P O I N T 0111320 E R ) ) ( Q U O T E ( ( N C 0111340 P o i n t e r 0 \r P O I N T 0111360 E R ) ( N C P o i n t e r 2 0111400 P O I N T E R ) ( N C P o i 0111420 n t e r 4 P O I N T E R ) 0111440 ( N C P o i n t e r 6 P O I 0111460 N T E R ) ) ) ( Q U O T E 8 0111500 ) ) \r ( D A T A T Y P E N o t 0111520 e C a r d T y p e ( T y p e N 0111540 a m e S u p e r T y p e S t 0111560 u b F l g F u l l D e f i n i 0111600 t i o n F i l e M a k e F n 0111620 ( M a k e F n I n h e r i t e d 0111640 F l g F L A G ) \r E d i t F 0111660 n ( E d i t F n I n h e r i t 0111700 e d F l g F L A G ) Q u i t 0111720 F n ( Q u i t F n I n h e r i 0111740 t e d F l g F L A G ) M a k 0111760 e R e a d O n l y F n ( \r M a 0112000 k e R e a d O n l y F n I n h e 0112020 r i t e d F l g F L A G ) M 0112040 a k e R e a d W r i t e F n ( 0112060 M a k e R e a d W r i t e F n I 0112100 n h e r i t e d F l g F L A G 0112120 ) G e t F n ( \r G e t F n I 0112140 n h e r i t e d F l g F L A G 0112160 ) P u t F n ( P u t F n I n 0112200 h e r i t e d F l g F L A G ) 0112220 C o p y F n ( C o p y F n I 0112240 n h e r i t e d F l g F L A G 0112260 ) M a r k D i r t y F n ( \r 0112300 M a r k D i r t y F n I n h e r 0112320 i t e d F l g F L A G ) D i 0112340 r t y P F n ( D i r t y P F n 0112360 I n h e r i t e d F l g F L A 0112400 G ) C o l l e c t L i n k s F 0112420 n ( \r C o l l e c t L i n k s 0112440 F n I n h e r i t e d F l g F 0112460 L A G ) D e l e t e L i n k s 0112500 F n ( D e l e t e L i n k s F 0112520 n I n h e r i t e d F l g F L 0112540 A G ) U p d a t e L i n k I c 0112560 o n s F n ( \r U p d a t e L i 0112600 n k I c o n s F n I n h e r i t 0112620 e d F l g F L A G ) I n s e 0112640 r t L i n k F n ( I n s e r t 0112660 L i n k F n I n h e r i t e d F 0112700 l g F L A G ) \r T r a n s l 0112720 a t e W i n d o w P o s i t i o 0112740 n F n ( T r a n s l a t e W i 0112760 n d o w P o s i t i o n F n I n 0113000 h e r i t e d F l g F L A G ) 0113020 L i n k D i s p l a y M o d e 0113040 ( \r L i n k D i s p l a y M o 0113060 d e I n h e r i t e d F l g F 0113100 L A G ) D e f a u l t W i d t 0113120 h ( D e f a u l t W i d t h I 0113140 n h e r i t e d F l g F L A G 0113160 ) D e f a u l t H e i g h t 0113200 ( \r D e f a u l t H e i g h t I 0113220 n h e r i t e d F l g F L A G 0113240 ) L i n k A n c h o r M o d e 0113260 s S u p p o r t e d ( L i n k 0113300 A n c h o r M o d e s S u p p o 0113320 r t e d I n h e r i t e d F l g 0113340 F L A G ) \r D i s p l a y e 0113360 d I n M e n u F l g ( D i s p 0113400 l a y e d I n M e n u F l g I n 0113420 h e r i t e d F l g F L A G ) 0113440 L i n k I c o n A t t a c h e 0113460 d B i t M a p ( \r L i n k I c 0113500 o n A t t a c h e d B i t M a p 0113520 I n h e r i t e d F l g F L A 0113540 G ) L e f t B u t t o n M e n 0113560 u I t e m s ( L e f t B u t t 0113600 o n M e n u I t e m s I n h e r 0113620 i t e d F l g F L A G ) \r M 0113640 i d d l e B u t t o n M e n u I 0113660 t e m s ( M i d d l e B u t t 0113700 o n M e n u I t e m s I n h e r 0113720 i t e d F l g F L A G ) ) M 0113740 a k e F n I n h e r i t e d F l 0113760 g _ T \r E d i t F n I n h 0114000 e r i t e d F l g _ T Q u 0114020 i t F n I n h e r i t e d F l g 0114040 _ T M a k e R e a d O n l 0114060 y F n I n h e r i t e d F l g 0114100 _ T \r M a k e R e a d W r i 0114120 t e F n I n h e r i t e d F l g 0114140 _ T G e t F n I n h e r i 0114160 t e d F l g _ T P u t F n 0114200 I n h e r i t e d F l g _ T 0114220 C o p y F n I n h e r i t e d 0114240 F l g _ T \r M a r k D i r 0114260 t y F n I n h e r i t e d F l g 0114300 _ T D i r t y P F n I n h 0114320 e r i t e d F l g _ T C o 0114340 l l e c t L i n k s F n I n h e 0114360 r i t e d F l g _ T \r D e 0114400 l e t e L i n k s F n I n h e r 0114420 i t e d F l g _ T U p d a 0114440 t e L i n k I c o n s F n I n h 0114460 e r i t e d F l g _ T I n 0114500 s e r t L i n k F n I n h e r i 0114520 t e d F l g _ T \r T r a n 0114540 s l a t e W i n d o w P o s i t 0114560 i o n F n I n h e r i t e d F l 0114600 g _ T L i n k D i s p l a 0114620 y M o d e I n h e r i t e d F l 0114640 g _ T D e f a u l t W i d 0114660 t h I n h e r i t e d F l g _ 0114700 T \r D e f a u l t W i d t h 0114720 I n h e r i t e d F l g _ T 0114740 D e f a u l t H e i g h t I n 0114760 h e r i t e d F l g _ T L 0115000 i n k A n c h o r M o d e s S u 0115020 p p o r t e d I n h e r i t e d 0115040 F l g _ T \r L i n k I c o 0115060 n A t t a c h e d B i t M a p I 0115100 n h e r i t e d F l g _ T 0115120 L e f t B u t t o n M e n u I t 0115140 e m s I n h e r i t e d F l g 0115160 _ T \r M i d d l e B u t t o 0115200 n M e n u I t e m s I n h e r i 0115220 t e d F l g _ T D i s p l 0115240 a y e d I n M e n u F l g I n h 0115260 e r i t e d F l g _ N I L 0115300 M a k e F n _ ( Q U O T E 0115320 \ \ F I L L M E / / ) \r E d i 0115340 t F n _ ( Q U O T E \ \ F 0115360 I L L M E / / ) Q u i t F n 0115400 _ ( Q U O T E \ \ F I L L M 0115420 E / / ) M a k e R e a d O n l 0115440 y F n _ ( Q U O T E \ \ F 0115460 I L L M E / / ) \r M a k e R e 0115500 a d W r i t e F n _ ( Q U O 0115520 T E \ \ F I L L M E / / ) G 0115540 e t F n _ ( Q U O T E \ \ 0115560 F I L L M E / / ) P u t F n 0115600 _ ( Q U O T E \ \ F I L L M 0115620 E / / ) C o p y F n _ ( \r 0115640 Q U O T E \ \ F I L L M E / / 0115660 ) M a r k D i r t y F n _ 0115700 ( Q U O T E \ \ F I L L M E / 0115720 / ) D i r t y P F n _ ( Q 0115740 U O T E \ \ F I L L M E / / ) 0115760 C o l l e c t L i n k s F n 0116000 _ ( \r Q U O T E \ \ F I L L 0116020 M E / / ) D e l e t e L i n k 0116040 s F n _ ( Q U O T E \ \ F 0116060 I L L M E / / ) U p d a t e L 0116100 i n k I c o n s F n _ ( Q U 0116120 O T E \ \ F I L L M E / / ) 0116140 \r I n s e r t L i n k F n _ 0116160 ( Q U O T E \ \ F I L L M E / 0116200 / ) T r a n s l a t e W i n d 0116220 o w P o s i t i o n F n _ ( 0116240 Q U O T E \ \ F I L L M E / / 0116260 ) L i n k D i s p l a y M o d 0116300 e _ ( \r Q U O T E \ \ F I 0116320 L L M E / / ) D e f a u l t W 0116340 i d t h _ ( Q U O T E \ \ 0116360 F I L L M E / / ) D e f a u l 0116400 t H e i g h t _ ( Q U O T E 0116420 \ \ F I L L M E / / ) \r L i 0116440 n k A n c h o r M o d e s S u p 0116460 p o r t e d _ ( Q U O T E 0116500 \ \ F I L L M E / / ) D i s p 0116520 l a y e d I n M e n u F l g _ 0116540 ( Q U O T E \ \ F I L L M E 0116560 / / ) \r L i n k I c o n A t t 0116600 a c h e d B i t M a p _ ( Q 0116620 U O T E \ \ F I L L M E / / ) 0116640 L e f t B u t t o n M e n u I 0116660 t e m s _ ( Q U O T E \ \ 0116700 F I L L M E / / ) \r M i d d l 0116720 e B u t t o n M e n u I t e m s 0116740 _ ( Q U O T E \ \ F I L L 0116760 M E / / ) ) \r ( / D E C L A R E 0117000 D A T A T Y P E ( Q U O T E 0117020 N o t e C a r d T y p e ) ( Q 0117040 U O T E ( P O I N T E R P O 0117060 I N T E R P O I N T E R P O 0117100 I N T E R P O I N T E R F L 0117120 A G P O I N T E R \r F L A G 0117140 P O I N T E R F L A G P O 0117160 I N T E R F L A G P O I N T 0117200 E R F L A G P O I N T E R 0117220 F L A G P O I N T E R F L A 0117240 G P O I N T E R F L A G P 0117260 O I N T E R F L A G \r P O I 0117300 N T E R F L A G P O I N T E 0117320 R F L A G P O I N T E R F 0117340 L A G P O I N T E R F L A G 0117360 P O I N T E R F L A G P O 0117400 I N T E R F L A G P O I N T 0117420 E R F L A G P O I N T E R 0117440 \r F L A G P O I N T E R F L 0117460 A G P O I N T E R F L A G 0117500 P O I N T E R F L A G P O I 0117520 N T E R F L A G P O I N T E 0117540 R F L A G P O I N T E R F 0117560 L A G ) ) ( Q U O T E ( ( \r 0117600 N o t e C a r d T y p e 0 P 0117620 O I N T E R ) ( N o t e C a r 0117640 d T y p e 2 P O I N T E R ) 0117660 ( N o t e C a r d T y p e 4 0117700 P O I N T E R ) ( N o t e C 0117720 a r d T y p e 6 P O I N T E 0117740 R ) ( \r N o t e C a r d T y p 0117760 e 8 P O I N T E R ) ( N o 0120000 t e C a r d T y p e 8 ( F L 0120020 A G B I T S . 0 ) ) ( N o 0120040 t e C a r d T y p e 1 0 P O 0120060 I N T E R ) ( N o t e C a r d 0120100 T y p e 1 0 ( \r F L A G B I 0120120 T S . 0 ) ) ( N o t e C a 0120140 r d T y p e 1 2 P O I N T E 0120160 R ) ( N o t e C a r d T y p e 0120200 1 2 ( F L A G B I T S . 0120220 0 ) ) ( N o t e C a r d T y p 0120240 e 1 4 P O I N T E R ) ( \r 0120260 N o t e C a r d T y p e 1 4 0120300 ( F L A G B I T S . 0 ) ) 0120320 ( N o t e C a r d T y p e 1 6 0120340 P O I N T E R ) ( N o t e C 0120360 a r d T y p e 1 6 ( F L A G 0120400 B I T S . 0 ) ) ( \r N o t 0120420 e C a r d T y p e 1 8 P O I 0120440 N T E R ) ( N o t e C a r d T 0120460 y p e 1 8 ( F L A G B I T S 0120500 . 0 ) ) ( N o t e C a r d 0120520 T y p e 2 0 P O I N T E R ) 0120540 ( N o t e C a r d T y p e 2 0120560 0 ( \r F L A G B I T S . 0 0120600 ) ) ( N o t e C a r d T y p e 0120620 2 2 P O I N T E R ) ( N o 0120640 t e C a r d T y p e 2 2 ( F 0120660 L A G B I T S . 0 ) ) ( N 0120700 o t e C a r d T y p e 2 4 P 0120720 O I N T E R ) ( \r N o t e C a 0120740 r d T y p e 2 4 ( F L A G B 0120760 I T S . 0 ) ) ( N o t e C 0121000 a r d T y p e 2 6 P O I N T 0121020 E R ) ( N o t e C a r d T y p 0121040 e 2 6 ( F L A G B I T S . 0121060 0 ) ) ( \r N o t e C a r d T 0121100 y p e 2 8 P O I N T E R ) 0121120 ( N o t e C a r d T y p e 2 8 0121140 ( F L A G B I T S . 0 ) ) 0121160 ( N o t e C a r d T y p e 3 0121200 0 P O I N T E R ) ( N o t e 0121220 C a r d T y p e 3 0 ( \r F L 0121240 A G B I T S . 0 ) ) ( N o 0121260 t e C a r d T y p e 3 2 P O 0121300 I N T E R ) ( N o t e C a r d 0121320 T y p e 3 2 ( F L A G B I T 0121340 S . 0 ) ) ( N o t e C a r 0121360 d T y p e 3 4 P O I N T E R 0121400 ) ( \r N o t e C a r d T y p e 0121420 3 4 ( F L A G B I T S . 0121440 0 ) ) ( N o t e C a r d T y p 0121460 e 3 6 P O I N T E R ) ( N 0121500 o t e C a r d T y p e 3 6 ( 0121520 F L A G B I T S . 0 ) ) ( 0121540 \r N o t e C a r d T y p e 3 8 0121560 P O I N T E R ) ( N o t e C 0121600 a r d T y p e 3 8 ( F L A G 0121620 B I T S . 0 ) ) ( N o t e 0121640 C a r d T y p e 4 0 P O I N 0121660 T E R ) ( N o t e C a r d T y 0121700 p e 4 0 ( \r F L A G B I T S 0121720 . 0 ) ) ( N o t e C a r d 0121740 T y p e 4 2 P O I N T E R ) 0121760 ( N o t e C a r d T y p e 4 0122000 2 ( F L A G B I T S . 0 ) 0122020 ) ( N o t e C a r d T y p e 0122040 4 4 P O I N T E R ) ( \r N o 0122060 t e C a r d T y p e 4 4 ( F 0122100 L A G B I T S . 0 ) ) ( N 0122120 o t e C a r d T y p e 4 6 P 0122140 O I N T E R ) ( N o t e C a r 0122160 d T y p e 4 6 ( F L A G B I 0122200 T S . 0 ) ) ( \r N o t e C 0122220 a r d T y p e 4 8 P O I N T 0122240 E R ) ( N o t e C a r d T y p 0122260 e 4 8 ( F L A G B I T S . 0122300 0 ) ) ( N o t e C a r d T y 0122320 p e 5 0 P O I N T E R ) ( 0122340 N o t e C a r d T y p e 5 0 0122360 ( \r F L A G B I T S . 0 ) ) 0122400 ( N o t e C a r d T y p e 5 0122420 2 P O I N T E R ) ( N o t e 0122440 C a r d T y p e 5 2 ( F L A 0122460 G B I T S . 0 ) ) ) ) ( Q 0122500 U O T E 5 4 ) ) \r ( P U T P R 0122520 O P S N C . A p p l y F n M 0122540 A C R O ( A r g s ( B Q U O 0122560 T E ( A P P L Y * ( f e t c 0122600 h ( C a r d ( \ , ( C A R 0122620 A r g s ) ) ) o f ( \ , 0122640 ( C A D R A r g s ) ) ) ( \r 0122660 \ , @ ( C D R A r g s ) ) ) 0122700 ) ) ) \r ( P U T P R O P S N C 0122720 . A p p l y S u p e r s F n M 0122740 A C R O ( A r g s ( B Q U O 0122760 T E ( L E T ( ( S u p e r T 0123000 y p e ( f e t c h ( C a r d 0123020 S u p e r T y p e ) o f ( 0123040 \ , ( C A D R \r A r g s ) ) 0123060 ) ) ) ( A P P L Y * ( N C . 0123100 G e t C a r d T y p e F i e l d 0123120 ( \ , ( C A R A r g s ) ) 0123140 S u p e r T y p e ) ( \ , @ 0123160 ( C D R A r g s ) ) ) ) ) ) 0123200 ) \r ( D E F M A C R O N C . G 0123220 e t C a r d T y p e F i e l d 0123240 ( F i e l d N a m e C a r d T 0123260 y p e N a m e F o r m ) ( * 0123300 ; ; \r " F e t c h t h e c 0123320 a r d t y p e d a t a t y p 0123340 e f i e l d p a s s e d d 0123360 i r e c t l y f o r F i e l 0123400 d N a m e ( f o r t h e c 0123420 a r d t y p e w h o s e n 0123440 a m e i s i n a v a r i 0123460 a b l e p a s s e d a s t 0123500 h e s e c o n d p a r a m e 0123520 t e r ) " \r ) ( * ; ; \r " 0123540 r h t 4 / 1 1 / 8 6 : W a s 0123560 t r y i n g t o a u t o l 0123600 o a d i f f i e l d o f 0123620 c a r d t y p e w a s n i 0123640 l . N o w o n l y t r i e 0123660 s t o a u t o l o a d i f 0123700 C a r d T y p e R e c o r d 0123720 i s n i l o r i f S t u 0123740 b F l g i s n o n - n i l . 0123760 " \r ) ( * ; ; \r " f g h 0124000 4 / 2 5 / 8 6 F i x t o a 0124020 b o v e f i x . C h e c k s 0124040 f o r C a r d T y p e R e c 0124060 o r d b e f o r e d o i n g 0124100 f e t c h ' s i n 2 c l 0124120 u a s e o f C O N D . " ) 0124140 ( \r * ; ; " k i r k & f g h 0124160 2 6 J u n 8 6 A d d e d c 0124200 h e c k f o r I n h e r i t 0124220 e d F l g t o a b o v e f 0124240 i x . C h a n g e d t o a 0124260 D E F M A C R O " ) ( * ; 0124300 ; \r " f g h 8 / 2 6 / 8 6 0124320 R e v a m p e d c o m p l e t 0124340 e l y t o c l e a n u p 0124360 a n d t o a c c o u n t f 0124400 o r c a s e w h e r e o n 0124420 e o f s u p e r t y p e s 0124440 i s a s t u b a n d m u 0124460 s t b e a u t o l o a d e d 0124500 . A d d e d a b i l i t y 0124520 t o h a n d l e \ \ E M P T 0124540 Y / / f i e l d s . " \r ) ( 0124560 * ; ; \r " k i r k 8 / 2 6 0124600 / 8 6 A d d e d c h e c k 0124620 f o r F M E M B o f F i e 0124640 l d N a m e i n ( R E C O R 0124660 D F I E L D N A M E S ( Q U O 0124700 T E N o t e C a r d T Y p e ) 0124720 ) b e f o r e e v a l i n g 0124740 f e t c h " \r ) ( * ; ; 0124760 \r " r h t 1 1 / 1 / 8 6 : A 0125000 d d e d c h e c k f o r N 0125020 I L C a r d T y p e N a m e . 0125040 A l s o c h e c k s w h e 0125060 t h e r c a r d i s t o p 0125100 l e v e l N o t e C a r d 0125120 t y p e b e f o r e f e t c 0125140 h i n g f r o m s u p e r 0125160 t y p e . " \r ) ( * ; ; \r 0125200 " r h t 1 1 / 9 / 8 6 : T o 0125220 t a l l y r e v a m p e d t 0125240 o u s e \ \ F I L L M E / / 0125260 f i e l d . N o l o n g e 0125300 r c a r e s a b o u t v a 0125320 l u e o f S t u b F l g . " 0125340 ) ( \r B Q U O T E ( L E T 0125360 ( ( C a r d T y p e N a m e ( 0125400 \ , C a r d T y p e N a m e F 0125420 o r m ) ) C a r d T y p e R e 0125440 c o r d F i e l d V a l u e ) 0125460 ( i f C a r d T y p e N a m 0125500 e t h e n ( i f \r ( O R 0125520 ( N U L L ( S E T Q C a r d 0125540 T y p e R e c o r d ( N C . C 0125560 a r d T y p e R e c o r d C a 0125600 r d T y p e N a m e ) ) ) ( E 0125620 Q ( S E T Q F i e l d V a l 0125640 u e ( f e t c h ( \r N o t e 0125660 C a r d T y p e ( \ , F i e 0125700 l d N a m e ) ) o f C a r d 0125720 T y p e R e c o r d ) ) ( Q U 0125740 O T E \ \ E M P T Y / / ) ) ) 0125760 t h e n ( * ; \r " e i t 0126000 h e r t h e c a r d t y p 0126020 e r e c o r d d o e s n ' t 0126040 e x i s t o r i t s j u 0126060 s t a s t u b - - e i t 0126100 h e r w a y i t n e e d s 0126120 t o b e a u t o l o a d e 0126140 d . " \r ) ( i f ( O R ( N 0126160 U L L ( N C . C a r d T y p e 0126200 L o a d e r C a r d T y p e N 0126220 a m e ( A N D C a r d T y p 0126240 e R e c o r d ( f e t c h ( 0126260 N o t e C a r d T y p e \r F u 0126300 l l D e f i n i t i o n F i l e 0126320 ) o f C a r d T y p e R e c 0126340 o r d ) ) ) ) ( N U L L ( S 0126360 E T Q C a r d T y p e R e c o 0126400 r d ( N C . C a r d T y p e R 0126420 e c o r d C a r d T y p e N a 0126440 m e ) ) \r ) ) t h e n ( N C 0126460 . R e p o r t E r r o r N I L 0126500 ( C O N C A T " C a n n o t 0126520 f i n d f u l l d e f i n 0126540 i t i o n o f c a r d t y 0126560 p e : " C a r d T y p e N a 0126600 m e ) ) ) ( i f ( \r E Q ( 0126620 S E T Q F i e l d V a l u e 0126640 ( f e t c h ( N o t e C a r d 0126660 T y p e ( \ , F i e l d N a 0126700 m e ) ) o f C a r d T y p e 0126720 R e c o r d ) ) ( Q U O T E 0126740 \ \ E M P T Y / / ) ) t h e n 0126760 ( \r * ; " s t i l l m a 0127000 r k e d \ \ E M P T Y / / " ) 0127020 ( N C . R e p o r t E r r o r 0127040 " N C . G e t C a r d T y p e 0127060 F i e l d " ( C O N C A T " 0127100 F i e l d n a m e " ( Q U 0127120 O T E ( \ , \r F i e l d N a 0127140 m e ) ) " o f c a r d t 0127160 y p e " C a r d T y p e N a 0127200 m e " s t i l l \ \ E M P 0127220 T Y / / a f t e r a u t o l 0127240 o a d i n g . " ) ) ) ) ( i f 0127260 ( E Q F i e l d V a l u e \r 0127300 ( Q U O T E \ \ F I L L M E 0127320 / / ) ) t h e n ( * ; \r 0127340 " F e t c h f i e l d f r o 0127360 m s u p e r t y p e . U 0127400 n f o r t u n a t e l y d i r 0127420 e c t r e c u r s i o n i s 0127440 n o t p o s s i b l e b e 0127460 c a u s e t h i s i s a 0127500 D E F M A C R O . " \r ) ( N C 0127520 . G e t C a r d T y p e F i e l 0127540 d O f S u p e r C a r d T y p 0127560 e N a m e ( Q U O T E ( \ , 0127600 F i e l d N a m e ) ) ) e l 0127620 s e F i e l d V a l u e ) ) ) 0127640 ) ) \r ( D E F M A C R O N C P 0127660 . A p p l y C a r d T y p e F n 0127700 ( F n C a r d & R E S T 0127720 A r g s ) ( * ; ; \r " A p 0127740 p l y t h e c a r d t y p e 0127760 f n F n t o C a r d a n 0130000 d t h e r e s t o f t h 0130020 e a r g s . " ) ( B Q U O T 0130040 E ( N C . A p p l y F n ( \ 0130060 , F n ) ( \ , C a r d ) 0130100 ( \r \ , @ A r g s ) ) ) ) \r ( 0130120 D E F M A C R O N C P . A p p 0130140 l y S u p e r T y p e F n ( F 0130160 n C a r d & R E S T A r g 0130200 s ) ( * ; ; ; \r " A p p l 0130220 y t h e c a r d t y p e f n 0130240 F n o f C a r d ' s s u 0130260 p e r t y p e t o t h e 0130300 g i v e n a r g s . " ) ( B 0130320 Q U O T E ( N C . A p p l y S 0130340 u p e r s F n ( \ , F n ) 0130360 ( \r \ , C a r d ) ( \ , @ 0130400 A r g s ) ) ) ) \r ( D E F M A C 0130420 R O N C P . M a p C a r d s 0130440 ( N o t e F i l e F u n c t i 0130460 o n & O P T I O N A L C o l 0130500 l e c t R e s u l t P r e d i c 0130520 a t e ) ( * ; ; ; \r " M a 0130540 p d o w n a l l n o t e c 0130560 a r d s ( i n c l u d i n g 0130600 f i l e b o x e s ) i n N o 0130620 t e F i l e p e r f o r m i n 0130640 g F u n c t i o n t o e a 0130660 c h . I f C o l l e c t R e 0130700 s u l t P r e d i c a t e i s 0130720 n o n - n i l , t h e n c 0130740 o l l e c t t h e r e s u l 0130760 t s o f a p p l y i n g F 0131000 u n c t i o n t o t h o s e 0131020 c a r d s s a t i s f y i n 0131040 g C o l l e c t R e s u l t P 0131060 r e d i c a t e . " \r ) ( * 0131100 ; ; ; " r h t 7 / 1 3 / 8 6 0131120 : N o w o n l y w o r k s 0131140 o n n o n - d e l e t e d 0131160 c a r d s . " ) ( * ; ; ; 0131200 \r " r h t 7 / 1 7 / 8 6 : r 0131220 e a r r a n g e d s l i g h t 0131240 l y . " ) ( B Q U O T E ( N 0131260 C . M a p C a r d s ( \ , N 0131300 o t e F i l e ) ( \ , ( A N 0131320 D F u n c t i o n ( B Q U O 0131340 T E ( \r F U N C T I O N ( L 0131360 A M B D A ( C a r d ) ( A N 0131400 D ( N C P . V a l i d C a r d 0131420 P C a r d ) ( A P P L Y * 0131440 ( \ , F u n c t i o n ) C a 0131460 r d ) ) ) ) ) ) ) ( \ , ( A 0131500 N D \r C o l l e c t R e s u l 0131520 t P r e d i c a t e ( B Q U O 0131540 T E ( F U N C T I O N ( L A 0131560 M B D A ( C a r d ) ( A N D 0131600 ( N C P . V a l i d C a r d P 0131620 C a r d ) ( A P P L Y * ( 0131640 \ , \r C o l l e c t R e s u l 0131660 t P r e d i c a t e ) C a r d 0131700 ) ) ) ) ) ) ) ) ) ) \r ( D E F M 0131720 A C R O N C P . M a p C a r d 0131740 s O f T y p e ( T y p e s N 0131760 o t e F i l e F u n c t i o n 0132000 & O P T I O N A L C o l l e 0132020 c t R e s u l t P r e d i c a t 0132040 e ) ( * ; ; \r " M a p d 0132060 o w n a l l f i l e b o x e 0132100 s i n t h e c u r r e n t 0132120 n o t e f i l e , p e r f o 0132140 r m i n g F u n c t i o n t 0132160 o e a c h . I f C o l l e 0132200 c t R e s u l t P r e d i c a t 0132220 e i s n o n - n i l , t h 0132240 e n c o l l e c t t h e r 0132260 e s u l t s o f a p p l y i 0132300 n g F u n c t i o n t o t 0132320 h o s e c a r d s s a t i s 0132340 f y i n g C o l l e c t R e s 0132360 u l t P r e d i c a t e . " \r ) 0132400 ( * ; ; " r h t 7 / 1 2 0132420 / 8 6 : N o w t a k e s a 0132440 r b i t r a r y t y p e s t 0132460 o m a p o v e r . " ) ( * 0132500 ; ; \r " r h t 7 / 1 7 / 8 0132520 6 : r e a r r a n g e d s l 0132540 i g h t l y . " ) ( B Q U O T 0132560 E ( N C P . M a p C a r d s 0132600 ( \ , N o t e F i l e ) ( \ 0132620 , ( A N D F u n c t i o n 0132640 ( B Q U O T E ( \r F U N C T I 0132660 O N ( L A M B D A ( C a r d 0132700 ) ( A N D ( F M E M B ( N 0132720 C P . C a r d T y p e C a r d 0132740 ) ( M K L I S T ( \ , T y 0132760 p e s ) ) ) ( A P P L Y * ( 0133000 F U N C T I O N ( \ , \r F u 0133020 n c t i o n ) ) C a r d ) ) ) 0133040 ) ) ) ) ( \ , ( A N D C o 0133060 l l e c t R e s u l t P r e d i 0133100 c a t e ( B Q U O T E ( F U 0133120 N C T I O N ( L A M B D A ( 0133140 C a r d ) ( A N D ( F M E M 0133160 B ( \r N C P . C a r d T y p e 0133200 C a r d ) ( M K L I S T ( 0133220 \ , T y p e s ) ) ) ( A P P 0133240 L Y * ( F U N C T I O N ( \ 0133260 , C o l l e c t R e s u l t P 0133300 r e d i c a t e ) ) C a r d ) 0133320 ) ) ) ) ) ) ) ) ) \r ( D E F M A 0133340 C R O N C P . W i t h L o c k 0133360 e d C a r d s ( & B O D Y B 0133400 o d y ) ( B Q U O T E ( N A 0133420 M E D - R E S E T L S T C a r 0133440 d L i s t R e s e t V a r ( \ 0133460 , @ B o d y ) ) ) ) \r ( T Y P 0133500 E R E C O R D N O T E C A R D 0133520 D A T E S ( S U B S T A N C E 0133540 D A T E L I N K S D A T E T 0133560 I T L E D A T E P R O P L I S 0133600 T D A T E ) ) \r ( D E F M A C R 0133620 O N C P . M a p L i n k s ( 0133640 N o t e F i l e F u n c t i o 0133660 n & O P T I O N A L C o l l 0133700 e c t R e s u l t P r e d i c a 0133720 t e ) ( * ; ; \r " M a p 0133740 d o w n a l l l i n k s i 0133760 n t h e c u r r e n t n o 0134000 t e f i l e , p e r f o r m i 0134020 n g L i n k F n t o e a c 0134040 h . " ) ( * ; ; \r " r h t 0134060 1 1 / 1 8 / 8 5 : U p d a t 0134100 e d t o h a n d l e n e w 0134120 n o t e f i l e a n d c a 0134140 r d o b j e c t f o r m a t 0134160 s . N o w a l l o w s c o 0134200 l l e c t i o n o f l i n k 0134220 s s a t i s f y i n g C o l 0134240 l e c t R e s u l t P r e d i c 0134260 a t e . " \r ) ( * ; ; " r 0134300 h t 7 / 1 7 / 8 6 : r e a r 0134320 r a n g e d s l i g h t l y . 0134340 " ) ( * ; ; \r " r h t 1 0134360 / 2 6 / 8 7 : N o w u s e s 0134400 M A P C O N C r a t h e r 0134420 t h a n A P P L Y ' i n g N 0134440 C O N C . " ) ( B Q U O T E 0134460 ( M A P C O N C ( N C P . M a 0134500 p C a r d s ( \ , \r N o t e 0134520 F i l e ) ( F U N C T I O N 0134540 ( L A M B D A ( C a r d ) ( 0134560 i f ( \ , C o l l e c t R e 0134600 s u l t P r e d i c a t e ) t 0134620 h e n ( f o r L i n k i n 0134640 ( \r N C . R e t r i e v e T o 0134660 L i n k s C a r d ) w h e n 0134700 ( A P P L Y * ( \ , C o l 0134720 l e c t R e s u l t P r e d i c 0134740 a t e ) L i n k ) c o l l e 0134760 c t ( A P P L Y * ( \ , F 0135000 u n c t i o n ) \r L i n k ) ) 0135020 e l s e ( f o r L i n k 0135040 i n ( N C . R e t r i e v e T 0135060 o L i n k s C a r d ) d o 0135100 ( A P P L Y * ( \ , F u n c 0135120 t i o n ) L i n k ) ) ) ) ) 0135140 ( \ , ( A N D \r C o l l e c 0135160 t R e s u l t P r e d i c a t e 0135200 ( B Q U O T E ( F U N C T I 0135220 O N T R U E ) ) ) ) ) ( F U 0135240 N C T I O N ( L A M B D A ( 0135260 X ) X ) ) ) ) ) \r ( D E F M A 0135300 C R O N C P . M a p L i n k s 0135320 O f T y p e ( T y p e s N o 0135340 t e F i l e F u n c t i o n 0135360 & O P T I O N A L C o l l e c 0135400 t R e s u l t P r e d i c a t e 0135420 ) ( * ; ; \r " M a p d o 0135440 w n a l l l i n k s i n 0135460 t h e g i v e n n o t e f i 0135500 l e , h a v i n g o n e o 0135520 f t h e g i v e n t y p e 0135540 s . " ) ( * ; ; \r " r h t 0135560 7 / 1 7 / 8 6 : r e a r r a 0135600 n g e d s l i g h t l y . " ) 0135620 ( * ; ; \r " r h t 1 / 2 0135640 6 / 8 7 : N o w u s e s M 0135660 A P C O N C r a t h e r t h 0135700 a n A P P L Y ' i n g N C O 0135720 N C . " ) ( B Q U O T E ( M 0135740 A P C O N C ( N C P . M a p C 0135760 a r d s ( \ , \r N o t e F i 0136000 l e ) ( F U N C T I O N ( L 0136020 A M B D A ( C a r d ) ( i f 0136040 ( \ , C o l l e c t R e s u 0136060 l t P r e d i c a t e ) t h e 0136100 n ( f o r L i n k i n ( 0136120 \r N C . R e t r i e v e T o L i 0136140 n k s C a r d ) w h e n ( 0136160 A N D ( F M E M B ( N C P . 0136200 L i n k T y p e L i n k ) ( 0136220 M K L I S T ( \ , T y p e s 0136240 ) ) ) ( A P P L Y * ( \ , 0136260 \r C o l l e c t R e s u l t P r 0136300 e d i c a t e ) L i n k ) ) 0136320 c o l l e c t ( A P P L Y * 0136340 ( \ , F u n c t i o n ) L i 0136360 n k ) ) e l s e ( f o r L 0136400 i n k i n ( \r N C . R e t r 0136420 i e v e T o L i n k s C a r d 0136440 ) w h e n ( F M E M B ( N 0136460 C P . L i n k T y p e L i n k 0136500 ) ( M K L I S T ( \ , T y 0136520 p e s ) ) ) d o ( A P P L Y 0136540 * ( \ , F u n c t i o n ) \r 0136560 L i n k ) ) ) ) ) ( \ , ( 0136600 A N D C o l l e c t R e s u l 0136620 t P r e d i c a t e ( B Q U O 0136640 T E ( F U N C T I O N T R U 0136660 E ) ) ) ) ) ( F U N C T I O N 0136700 ( L A M B D A ( X ) X ) ) 0136720 ) ) ) \r ( D A T A T Y P E C r 0136740 o s s F i l e L i n k S u b s t 0136760 a n c e ( C r o s s F i l e L 0137000 i n k D e s t C a r d U I D C 0137020 r o s s F i l e L i n k D e s t 0137040 N o t e F i l e U I D \r C r o 0137060 s s F i l e L i n k D e s t F i 0137100 l e H i n t ( C r o s s F i l 0137120 e L i n k T w o W a y F l g F 0137140 L A G ) R e m o t e C r o s s 0137160 F i l e L i n k C a r d U I D ) 0137200 ) \r ( / D E C L A R E D A T A T 0137220 Y P E ( Q U O T E C r o s s 0137240 F i l e L i n k S u b s t a n c 0137260 e ) ( Q U O T E ( P O I N T 0137300 E R P O I N T E R P O I N T 0137320 E R F L A G P O I N T E R ) 0137340 ) ( Q U O T E \r ( ( C r o s 0137360 s F i l e L i n k S u b s t a n 0137400 c e 0 P O I N T E R ) ( C 0137420 r o s s F i l e L i n k S u b s 0137440 t a n c e 2 P O I N T E R ) 0137460 ( C r o s s F i l e L i n k S 0137500 u b s t a n c e 4 \r P O I N 0137520 T E R ) ( C r o s s F i l e L 0137540 i n k S u b s t a n c e 4 ( 0137560 F L A G B I T S . 0 ) ) ( 0137600 C r o s s F i l e L i n k S u b 0137620 s t a n c e 6 P O I N T E R 0137640 ) ) ) ( Q U O T E 8 ) ) \r ( 0137660 R E C O R D S P E C I A L B R 0137700 O W S E R S P E C S ( F o n t 0137720 M o t h e r D P e r s o n a 0137740 l D F a m i l y D ) P e r s 0137760 o n a l D _ 1 0 ) \r ( R E C 0140000 O R D P O I N T E R L I S T 0140020 ( S T A T U S M A I N P T R 0140040 L I N K S P T R T I T L E P T 0140060 R P R O P S P T R I N D E X 0140100 P T R ) ) \r ( T Y P E R E C O R 0140120 D N O T E C A R D L I N K ( 0140140 L I N K I D S O U R C E I D 0140160 D E S T I N A T I O N I D A N 0140200 C H O R M O D E L I N K L A B 0140220 E L D I S P L A Y M O D E ) 0140240 ( T Y P E ? ( A N D \r ( E Q 0140260 ( L E N G T H D A T U M ) 0140300 7 ) ( N C . I D P ( f e t c 0140320 h ( N O T E C A R D L I N K 0140340 S O U R C E I D ) o f D A T 0140360 U M ) ) ( N C . I D P ( f e 0140400 t c h ( N O T E C A R D L I N 0140420 K \r D E S T I N A T I O N I D 0140440 ) o f D A T U M ) ) ) ) ) \r 0140460 ( P U T P R O P S N C D E C L 0140500 S F I L E T Y P E : T C O M 0140520 P L ) \r ( P U T P R O P S N C 0140540 D E C L S M A K E F I L E - E 0140560 N V I R O N M E N T ( : P A C 0140600 K A G E " I L " : R E A D T 0140620 A B L E " I N T E R L I S P " 0140640 : B A S E 1 0 ) ) \r ( P U T 0140660 P R O P S N C D E C L S C O 0140700 P Y R I G H T ( " X e r o x 0140720 C o r p o r a t i o n " 1 9 8 0140740 7 1 9 8 8 ) ) \r N I L \r 0140755