(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED " 1-Feb-98 09:33:15" ("compiled on " {DSK}disk2>jdstools>lc3>lispcore3.0>internal>library>ARQUERY.;1) "31-Jan-98 19:10:48" bcompl'd in "Medley 31-Jan-98 ..." dated "31-Jan-98 19:12:50") (FILECREATED "28-Sep-90 15:09:52" {DSK}local>lde>lispcore>internal>library>ARQUERY.;2 145824 changes to%: (VARS ARQUERYCOMS) previous date%: "15-Jun-90 11:31:57" {DSK}local>lde>lispcore>internal>library>ARQUERY.;1) AR.QFORM.CREATE :D8 (L (2 DONTSPAWN 1 WINDOW 0 AR.INDEX.FILE.NAME)) NB—@A g@d²dið¬3µg@hAd´dið¬3µgAhhgg(75 ADD.PROCESS 8 AR.QFORM.GROUP.CREATE) (70 AR.QUERY.FORM.TEMP 65 NAME 52 QUOTE 31 QUOTE 14 AR.QFORM.GROUP.CREATE) () AR.QFORM.GROUP.CREATE :D8 (L (2 NO.BROWSER 1 WINDOW 0 INDEX.FILENAME) F 15 ARBOLDFONT F 16 AR.IDENTIFICATION.STRING F 17 DEFAULTFONT F 18 AR.QFORM.FORMAT F 19 AR.QFORM.SPECS) ë`d`¿dW¿di¿dk¿dg¿dg ¿dg¿jdnÿdhHdI ¿ á`d`¿dW¿di¿dk¿dg¿dg ¿dg¿jdnÿdh¹dI ¿ Zg »A µW"È ¼lLÖ ½lLÖi ¾llWÈ ÔÖi _¿h____¿Ad ³j¿OKÔKÔMÔ_¿A µnNOÔ _O_¿ONÔKÔOOO_W o _¿OOOÕ°#_ É_ONÕKÕONh_¿OggOglÈOOgnÿÿOOggOggiOggiJOggOl O@µd _´‚±½OgOOgo B’±‚HOgg¿OW o _Ogg¿OgO¿Ogl lLÖi ¿OWW&W$ggh ¿Oggi(744 WINDOWADDPROP 725 AR.FORM.CREATE 697 PUTWINDOWPROP 691 HEIGHTIFWINDOW 671 PUTWINDOWPROP 656 ATTACHWINDOW 637 CREATEW 632 CONCAT 617 ATTACHWINDOW 594 PUTWINDOWPROP 589 CREATE.MONITORLOCK 572 PUTWINDOWPROP 550 AR.INDEX.OPEN 545 AR.QFORM.GET.DEFAULT.INDEX 534 GETPROMPTWINDOW 525 ATTACHWINDOW 507 WINDOWADDPROP 489 WINDOWADDPROP 471 PUTWINDOWPROP 454 PUTWINDOWPROP 432 PUTWINDOWPROP 415 PUTWINDOWPROP 371 \INSUREWINDOW 344 CREATEW 339 CONCAT 292 GETREGION 278 REGIONP 258 WINDOWP 238 HEIGHTIFWINDOW 216 HEIGHTIFWINDOW 205 HEIGHTIFWINDOW 184 WINDOWP 177 GETWINDOWPROP 166 MENUWINDOW 83 MENUWINDOW) (738 AR.QUERY.CLOSEFN 733 CLOSEFN 716 AR.QFORM.TITLEMENU 711 TITLEMENUFN 679 MINSIZE 664 QFORM.ENTRY.WINDOW 651 JUSTIFY 646 BOTTOM 612 JUSTIFY 607 BOTTOM 579 AR.INDEX.MONITORLOCK 565 AR.INDEX.DATA 520 JUSTIFY 515 TOP 501 AR.QUERY.EXPANDFN 496 EXPANDFN 483 AR.QUERY.SHRINKFN 478 SHRINKFN 466 AR.QFORM.ICONFN 461 ICONFN 439 MAXSIZE 422 MINSIZE 410 AR.QUERY.FORM 405 AR.WINDOW.PROC.NAME 228 FONTDESCRIPTOR 193 FONTDESCRIPTOR 172 HEIGHT 141 DEFAULTMENUHELDFN 132 CLRPROMPT 123 AR.BROWSER.COMMANDFN 98 AR.QUERY.MENU.ITEMS 91 |MENUTYPE#| 54 DEFAULTMENUHELDFN 45 CLRPROMPT 36 AR.BROWSER.COMMANDFN 11 AR.BROWSER.MENU.ITEMS 4 |MENUTYPE#|) ( 627 " Query Browser" 584 "AR Index" 334 " Query Specification") AR.QFORM.GET.DEFAULT.INDEXA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 10 QFORMWINDOW F 11 AR.INDEX.CACHE.FILE.NAME F 12 AR.INDEX.DEFAULT.FILE.NAME F 13 AR.IDENTIFICATION.STRING F 14 AR.ALWAYS.CACHE.INDEX F 15 ARBOLDFONT) î W W ‚ H³WoWo¿IµrWIµ'oW ¿WW ¿oW °4g [Hg Zµ(WoK J ¿Wiðg±šKó³ØI`ooI´o¼dL¿di¿dW¿dl¿dg ¿dg¿jdnÿdh½dM ¿_¿W É¾ONNO ÕlÛÔNO Õidgð”¿H±dgð”¿I± gð¢±‘WgoWoWgg_¿_¿WoHo¿WoHIµW Y¿WgO¿WgO¿Wgh¿I„W ¿(490 CLEARW 483 SHOULDNT 475 PUTWINDOWPROP 461 PUTWINDOWPROP 446 PUTWINDOWPROP 431 AR.PROMPT.PRINT 425 COPYFILE 406 AR.PROMPT.PRINT 382 PUTWINDOWPROP 365 PUTWINDOWPROP 360 CONCAT 300 MENU 292 BITMAPHEIGHT 287 CHECK/MENU/IMAGE 272 BITMAPWIDTH 267 CHECK/MENU/IMAGE 249 \INSUREWINDOW 135 CL:FORMAT 130 AR.QFORM.GDATE 124 AR.QFORM.GDATE 108 GETFILEINFO 95 GETFILEINFO 83 PRIN1 70 PRIN1 60 PRIN1 38 AR.PROMPT.PRINT 13 INFILEP 6 INFILEP) (469 ICONWINDOW 454 ICONFN 439 TITLE 377 TEXTICON 372 ICONFN 343 TITLE 331 :COPY 319 :OLD 306 :NEW 219 DEFAULTMENUHELDFN 210 CLRPROMPT 160 |MENUTYPE#| 146 :COPY 103 ICREATIONDATE 90 ICREATIONDATE) ( 414 " finished writing " 401 "..." 395 "Copying " 355 " Index" 348 "Fetching " 179 (("Use local cache (ignore master)" :OLD "Use the local index cache, even though there is a newer master index")) 171 ("Use master index directly" :NEW "Use the master index directly, without caching it.") 166 ("Copy master index to local cache" :COPY "Copy the master index file to the local cache file (this will take a while), then use the local cache.") 118 "Local cache (~A) is older than master index (~A)" 76 " does not yet exist" 53 "Local cache " 33 " so will use cache" 26 "Can't find ") AR.QFORM.GET.DEFAULT.INDEXA0011 :D8 (F 0 QFORMWINDOW) PggPgh(27 PUTWINDOWPROP 15 WINDOWDELPROP) (21 PROCESS 10 AR.QFORM.CREATE.ABORT 5 CLOSEFN) () AR.QFORM.GET.DEFAULT.INDEX :D8 (P 0 *UPPER-CASE-FILE-NAMES* I 0 QFORMWINDOW F 1 AR.INDEX.CACHE.FILE.NAME F 2 AR.ALWAYS.CACHE.INDEX F 3 AR.INDEX.DEFAULT.FILE.NAME) [Q‘R¡S@g`@ggg @gg¿@gh¿$(84 PUTWINDOWPROP 71 WINDOWDELPROP 55 \MVLIST 50 AR.QFORM.GET.DEFAULT.INDEXA0001 40 WINDOWADDPROP 24 PUTWINDOWPROP) (78 PROCESS 66 AR.QFORM.CREATE.ABORT 61 CLOSEFN 45 AR.QFORM.GET.DEFAULT.INDEXA0011 35 AR.QFORM.CREATE.ABORT 30 CLOSEFN 19 \RUNNING.PROCESS 14 PROCESS) () AR.QFORM.CREATE.ABORT :D8 (L (0 WINDOW)) #@ É.Hd² ´ Ho (32 PROCESS.EVAL 19 PROCESSP 5 \INSUREWINDOW) NIL ( 27 (ERROR!)) AR.QFORM.GDATE :D8 (L (0 DT)) @µoo (18 GDATE) NIL ( 13 (DATEFORMAT DAY.OF.WEEK DAY.SHORT NO.SECONDS) 7 "Date unknown?") AR.QUERY.WHENSELECTEDFN :D8 (L (0 ITEM)) @d NIL NIL () AR.QUERY.CLOSEFN :D8 (L (0 WINDOW)) @g (10 AR.QUERY.CLOSE/SHRINK) (5 :CLOSE) () AR.QUERY.SHRINKFN :D8 (L (0 WINDOW)) @g (10 AR.QUERY.CLOSE/SHRINK) (5 :SHRINK) () AR.QUERY.CLOSE/SHRINK :D8 (L (1 HOW 0 WINDOW)) ‘@g HµYAgð²@g@g ¿@ @ Agð´#@ghY ´Ighh ²¤ho i ¥gH ¿°ƒ(140 DEL.PROCESS 127 MOUSECONFIRM 121 CL:FORMAT 108 PROCESSP 101 PUTWINDOWPROP 87 WINDOWP 81 PUTWINDOWPROP 60 AR.INDEX.FILE.CLOSE 54 AR.KILL.ATTACHED.TEDIT.CLOSEFN 47 PUTWINDOWPROP 42 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (133 DON'T 95 AR.QUERY.WINDOW 75 AR.DISPLAY.WINDOW 66 :CLOSE 37 TEXTSTREAM 31 SAVED-TEXTSTREAM 22 :SHRINK 5 BROWSER.BUSY) ( 116 "Browser is busy with ~A; Click LEFT to confirm aborting it.") AR.QUERY.EXPANDFN :D8 (L (0 WINDOW)) (@ghH´@Hggh(37 AR.INSTALL.TEDITSTREAM 11 PUTWINDOWPROP) (29 NILL 24 TITLEMENUFN 5 SAVED-TEXTSTREAM) () AR.QFORM.ICONFN :D8 (L (1 OLDICON 0 WINDOW)) Aµ`h@g (24 ICONW 19 GETWINDOWUSERPROP) (14 ICONPOSITION 7 AR.QFORM.ICON) () AR.INDEX.OPENA0001 :D8 (P 2 *CONDITION-HANDLER-BINDINGS* P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 3 SI::CONDITION-CASE-LITERALS F 4 *CONDITION-HANDLER-BINDINGS* F 5 FILENAME F 6 A0143) *i@STUgg cg(32 \MVLIST 27 OPENSTREAM) (39 :NORMAL 22 OLD 17 INPUT) () AR.INDEX.OPEN :D8 (L (0 QFORMWINDOW) P 8 A0143 P 7 SI::CONDITION-CASE-LITERALS P 0 *UPPER-CASE-FILE-NAMES* I 1 FILENAME) % p@iooO ]dgð—¿O$°dÃ˜¿M¼hL$ˆO ^¹NZ²@hoJ hIl(Í4Id lÕ Id I` [ddgð³¿I ¿@o hIK³MgKKKKKKKKÕKÛkÙK»@o K(289 AR.PROMPT.PRINT 187 AR.PROMPT.PRINT 175 CLOSEF 155 READ 144 SETFILEPTR 139 \DWIN 132 SETFILEPTR 124 GETEOFPTR 105 AR.PROMPT.PRINT 100 CL:FORMAT 78 \MVLIST 72 SI::CONDITION-CASE-ERROR 30 AR.INDEX.OPENA0001 14 AR.PROMPT.PRINT) (208 AR.INDEX.DATA 165 AR.INDEX.DATA 150 FILERDTBL 113 STREAM 53 CL:ERROR 37 :NORMAL) ( 284 "done." 182 "failed: Bad index format" 94 "failed: ~A" 19 (SI::CREATE-CONDITION-CASE-LITERALS (QUOTE CL:ERROR)) 9 "Opening index file... ") AR.INDEX.FILE.REOPEN :D8 (L (0 QFORMWINDOW) P 0 *UPPER-CASE-FILE-NAMES* F 1 AR.INDEX.FILE) VQ ³M@o Q ggcdl(Í4@o @g Qh(77 GETWINDOWUSERPROP 66 AR.PROMPT.PRINT 42 OPENSTREAM 27 FULLNAME 18 AR.PROMPT.PRINT 5 OPENP) (72 AR.INDEX.DATA 51 STREAM 37 OLD 32 INPUT) ( 61 " done] " 13 " [Re-opening index file...") AR.INDEX.FILE.CLOSE :D8 (L (0 QFORMWINDOW)) @g H ´H (29 CLOSEF 21 OPENP 10 GETWINDOWUSERPROP) (5 AR.INDEX.DATA) () AR.QFORM.QUERY :D8 (L (0 QFORMWINDOW)) $@g@g @g (33 AR.QUERY 28 AR.GET.BUTTON.FIELD.AS.LIST 16 AR.GET.BUTTON.FIELD.AS.LIST) (23 |Sort List:| 11 |Query List:| 5 AND) () AR.QFORM.BUTTONFN :D8 (L (2 WINDOW 1 SEL 0 OBJ) F 0 \WINDOW F 1 of) 'P QAÉ@g (36 AR.QFORM.ACTIONFN 31 IMAGEOBJPROP 19 fetch 5 TEXTOBJ) (26 MBTEXT 12 SELECTION) () AR.GET.QLIST.PROMPT.MENU :D8 (L (0 QFORMWINDOW) F 16 AR.QUERY.SPEC.ITEMS) Æ@g µ‚±á@g QH¹`do¿oghogg hHaNµ‚±…Oi W ´ohogW hho »dK¿dg¿di¿dg ¿dg¿jdnÿdh¼dL ¿½@gMM_Ig'_²f0O°$dZOJhh_¿Oµ Oh_‚O&_¿µÝO_¿Odgð´¿Oi ¿OhogoOhhO°>OdoooO ´&goOooO h_¿OµOh__¿N^±þO&_¿°ô(415 AR.QLIST.MENU.COMPARISONS 381 STRPOS 325 SORT 237 PUTWINDOWPROP 169 \APPEND2 164 \APPEND2 159 \APPEND2 119 SORT 84 AR.QLIST.MENU.COMPARISONS 27 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (388 SUBITEMS 339 SUBITEMS 313 Subsystem%: 250 ENUMERATED.FIELD.KEYLIST 231 AR.QLIST.PROMPT.MENU 204 DEFAULTMENUHELDFN 195 CLRPROMPT 181 AR.QUERY.WHENSELECTEDFN 139 SUBITEMS 79 Number%: 74 SUBITEMS 63 Number%: 43 |MENUTYPE#| 22 AR.INDEX.DATA 5 AR.QLIST.PROMPT.MENU) ( 406 ("Search this field for specified substring") 400 (HAS) 393 "has" 374 "Date" 369 "Search this field for specified substring" 363 (HAS) 344 "--blank--" 334 "Match against a specific value from submenu ->" 154 (("--Clear--" :CLEAR "Clear the Query spec and start over")) 134 "Select custom queries from submenu" 128 "Special" 69 "Use submenu to choose a numeric range" 58 ("(NOT" "(OR" "(AND") 50 "Query Options") AR.QLIST.MENU.COMPARISONS :D8 (L (0 FIELD.NAME)) (@`°d[@Khh¸IµHhZH&¹µçJNIL (7 AR.COMPARISON.OPERATORS) () AR.QFORM.PROMPT.LIST.FN :D8 (L (2 WINDOW 1 SEL 0 OBJ) P 0 *PACKAGE*) W `ÁAÉYÉº@g [dgð˜¿J °gð–J „ ¼h½L¢±ñIAÉ h_¿_¿Ldgð›¿IO ±Æ ’±PLd•d²µ±¯i`±2gð²QL¾JkN\µ±Š µ‚±Ld²%¿Kgð²Li`lmþ±éLi`±ÚLdgð²"¿oLi`o±®` ¢±„L__¿O_¿Ogðšoo‰ooh_¿oOi`Odgð²!¿gO gO †O o°LgLhi`]¼ILOÉOÉÔ_¿IoOL Ô¿oL ²IOj¿I °M²IOoL Ôlhi ¿lhJ J (596 CURSORPOSITION 589 DSPYPOSITION 579 TEDIT.SETSEL 568 STRPOS 549 TEDIT.NEXT 542 TEDIT.SETSEL 531 STRPOS 519 TEDIT.INSERT 513 NCHARS 498 TEDIT.INSERT 468 MKSTRING 441 CONCAT 431 AR.MAKE.COMPARISON.STRING 423 CONCAT 418 AR.MAKE.COMPARISON.STRING 406 AR.MAKE.COMPARISON.STRING 382 MKSTRING 310 MEMB 295 CONCAT 285 MKSTRING 251 MKSTRING 236 SUBSTRING 227 MKSTRING 194 STRINGP 163 MKSTRING 133 STRINGP 125 TEDIT.DELETE 100 MBUTTON.FIND.NEXT.FIELD 78 MENU 73 SHOULDNT 67 AR.GET.SLIST.PROMPT.MENU 52 AR.GET.QLIST.PROMPT.MENU 36 IMAGEOBJPROP) (488 SELECTION 479 SELECTION 463 FILERDTBL 450 IS 411 <= 399 >= 390 btwn 377 FILERDTBL 335 Number%: 305 AR.COMPARISON.OPERATORS 280 FILERDTBL 263 HAS 246 FILERDTBL 222 FILERDTBL 212 |Sort List:| 172 FUNCTION 158 FILERDTBL 114 :CLEAR 93 SELECTION 59 |Sort List:| 43 |Query List:| 31 MBTEXT 21 TEXTOBJ 13 SELECTION 4 *INTERLISP-PACKAGE*) ( 562 " IS " 525 ">>" 505 " " 436 ")" 369 "(" 358 "date<<%"" 353 "%">>" 347 "num<<" 342 ">>" 290 " HAS >>string<<)" 272 "(") AR.QFORM.TITLEMENU :D8 (L (0 WINDOW)) p`µR`g` HdI¿di¿dg ¿dg¿jdnÿdhHdI ¿ H´@ H (109 TEDIT.INSERT 103 TEXTSTREAM 91 MENU 27 REMOVE) (86 AR.QFORM.TITLEMENU 57 DEFAULTMENUHELDFN 48 CLRPROMPT 22 AR.COMPARISON.OPERATORS 17 btwn 11 |MENUTYPE#| 4 AR.QFORM.TITLEMENU) () AR.MAKE.COMPARISON.STRING :D8 (L (1 TEMPLATE 0 OP)) Ko@oA@gð©@dgð—¿o°gð§@gð•o„oA (72 CONCAT) (50 <= 42 < 27 >= 18 >) ( 63 "" 57 "hi" 35 "lo" 10 " " 4 " ") AR.GET.BUTTON.FIELD.AS.LISTA0001 :D8 (L (0 STREAM) F 0 *MAX-PARENS* F 1 *PARENS* F 2 FIELD.VAL F 3 FIELD.NAME F 4 FORMWINDOW) 6PoR c¿QkÔcPó²TioSo ¿l)(49 ERROR! 43 AR.PROMPT.PRINT 12 CL:COUNT) NIL ( 37 ", command aborted" 31 "Malformed " 6 #\() AR.GET.BUTTON.FIELD.AS.LIST :D8 (P 6 *READTABLE* P 5 *MAX-PARENS* P 4 *PARENS* P 3 FIELD.VAL I 1 FIELD.NAME I 0 FORMWINDOW) Š @ !HA ¹HI K º j¼Jgg`1 JhJdJð²$¿Ljó²HLl) IK ÔkÔO_¿Oµ Oh__¿°ÁO&_¿°¹(107 TEDIT.INSERT 99 NCHARS 91 ALLOCSTRING 71 CL:READ 55 SETFILEINFO 33 OPENSTRINGSTREAM 24 MBUTTON.NEXT.FIELD.AS.TEXT 15 AR.FIND.BUTTON 5 TEXTOBJ) (60 FILERDTBL 50 AR.GET.BUTTON.FIELD.AS.LISTA0001 45 ENDOFSTREAMOP) () AR.BROWSER.PRINTFN :D8 (L (2 WINDOW 1 ITEM 0 BROWSER)) ÓAÉB B H§JH ¿oHB¿oB HJg Jg C Mµ‡_¿Lµh_¿O_¿OµOlÔI °E²2NO ¿NIO»OdKó‘¿K_¿OlÔOÕI OIkOdlÔ ¿M½L¼°‹(200 AR.PRINT.PADDED 183 SPACES 168 COPYBYTES 145 SETFILEPTR 131 SPACES 87 GETWINDOWUSERPROP 76 GETWINDOWUSERPROP 61 PRIN1 49 PRINTNUM 33 AR.ENSURY.QUERY.DATA.ITEM 19 MAINWINDOW 13 GETSTREAM) (82 AR.FORM.SCRATCH.STREAM 71 AR.DISPLAY.FIELDS 5 TABLEITEM) ( 55 " " 39 (FIX 5)) AR#.FROM.ITEM :D8 (L (1 QFORMWINDOW 0 ITEM)) @ÉHd©¿AH ¿H(23 AR.ENSURY.QUERY.DATA.ITEM) (5 TABLEITEM) () AR.BROWSER.COMMANDFN :D8 (L (2 BUTTON 1 MENU 0 ITEM)) ®A !Hg d¢±‘g @º¹JµIZ²gggHhgIhgJhg@hgAhgBhhgo@ gg Hgo(171 AR.PROMPT.PRINT 154 ADD.PROCESS 138 CONCAT 39 GETWINDOWUSERPROP 24 GETWINDOWUSERPROP 10 MAINWINDOW 5 WFROMMENU) (161 :CLEAR 148 DON'T 143 BEFOREEXIT 126 NAME 109 QUOTE 100 QUOTE 91 QUOTE 82 QUOTE 73 QUOTE 64 QUOTE 59 AR.BROWSER.DO.COMMAND 34 TABLEBROWSER 19 QFORM.ENTRY.WINDOW) ( 166 "There are no ARs in the browser." 131 "AR-") AR.BROWSER.DO.COMMANDA0001 :D8 (L (3 PROCNAME 2 MENU 1 ITEM 0 WINDOW)) 9@ghABjCd²!`g ð´@ É. (54 TTY.PROCESS 47 \INSUREWINDOW 38 PROCESSPROP 19 SHADEITEM 11 PUTWINDOWPROP) (33 NAME 28 \TTY.PROCESS 5 BROWSER.BUSY) () AR.BROWSER.DO.COMMAND :D8 (L (5 BUTTON 4 MENU 3 ITEM 2 FN 1 BROWSER 0 WINDOW) F 2 SI::*RESETFORMS* F 3 AR.WHENSELECTEDSHADE) °CDÉ ³DÉHµ hb¿@g`²#A ¹CI •IµÓi°ÐHX°Çg@CD@ É.d´$ ´g ¿`g hhdRcCDS@ @AElB(166 AR.PROMPT.CLEAR 160 SHADEITEM 138 PROCESSPROP 122 TTY.PROCESS 110 TTY.PROCESSP 100 \INSUREWINDOW 74 MEMBER 59 TB.BROWSER.BUSY 51 PUTWINDOWPROP 13 MEMBER) (133 NAME 128 \TTY.PROCESS 117 BACKGROUND 91 AR.BROWSER.DO.COMMANDA0001 46 \RUNNING.PROCESS 41 BROWSER.BUSY 21 MENU 6 MENU) () AR.BROWSER.SELECTED.ARS :D8 (L (2 LASTPROP 1 BROWSER 0 WINDOW)) ˜Ag H¬@o hB¡H@B 1H³Ig µIg µIYg gð²º@gI¿I¢±”I [g Z²J ³Ig Z—J ²oi@ ¢±ÿchY°JId ²<¿@ioio ¿id@ i²H@ ¿I i ¿I²JI ³Ig ¿i ¿KH@ °>here<< to make new window." 95 "Select AR Edit window to use") AR.BROWSER.HARDCOPY :D8 (L (2 BUTTON 1 BROWSER 0 WINDOW)) J@A H´=0H°d@ ¹JµIh[I&ºµêK@ X´@ioH(71 AR.PROMPT.PRINT 55 AR.HARDCOPY 50 GETPROMPTWINDOW 26 AR#.FROM.ITEM 6 AR.BROWSER.SELECTED.ARS) NIL ( 65 "Done, ") AR.QFORM.SORTA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 12 AR.MAX.INDEX P 11 AR.INDEX.FIELD.LIST P 9 AR.INDEX.FIELD.SPECS P 7 AR.INDEX.ENTRY.SIZE P 5 AR.INDEX.ENTRY.END.PTR P 3 AR.INDEX.ENTRY.BEGIN.PTR P 1 AR.INDEX.FILE I 0 SI::*CLEANUP-FORMS* F 19 QFORMWINDOW F 20 TBROWSER) :W&g hgW&g ñH¹HZ»J\½L^_¿N__¿O__¿O_¿I §W& ¿W&g W&g _¿_¿O¬W&o W&g OôœW&o O³W&o ¿Oi ŠW&OO_´dW&o W(0O°(d_¿`dO¿_ ¿O"µ O h_$‚O &_"¿µÙO$ W&gOW&gO(311 PUTWINDOWPROP 297 PUTWINDOWPROP 283 TB.REPLACE.ITEMS 225 AR.PROMPT.PRINT 209 AR.SORT.BY 197 SORT 188 AR.PROMPT.PRINT 171 AR.PROMPT.PRINT 155 GETWINDOWUSERPROP 142 AR.PROMPT.PRINT 121 GETWINDOWUSERPROP 109 AR.GET.BUTTON.FIELD.AS.LIST 96 AR.INDEX.FILE.REOPEN 88 OPENP 34 GETWINDOWUSERPROP 22 OBTAIN.MONITORLOCK 11 GETWINDOWUSERPROP) (304 AR.ENTRIES 290 AR.ENTRY.ALIST.SLIST 244 |TABLEITEMTYPE#| 150 AR.ENTRY.ALIST.SLIST 116 AR.ENTRIES 104 |Sort List:| 29 AR.INDEX.DATA 17 WITH.MONITOR 6 AR.INDEX.MONITORLOCK) ( 220 "done." 183 "Sorting by AR#..." 166 "List is already sorted" 137 "There is nothing to sort.") AR.QFORM.SORT :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 1 TBROWSER I 0 QFORMWINDOW) g ¿$(22 SI::MONITOR-UNWIND 17 \MVLIST 12 AR.QFORM.SORTA0001) (7 SI::MONITOR-UNWIND) () AR.SORT.BYA0001 :D8 (L (1 Y 0 X)) @Aýóµ@Aó¨@AýóhNIL NIL () AR.SORT.BY :D8 (L (2 SLIST 1 ENTRIES 0 QFORMWINDOW) F 16 AR.INDEX.FIELD.SPECS F 17 AR.SORT.EQUIVALENTS) +B¡h@o @B B @A°d»jK¸IµHhZH&¹µìJ@g k”Hµ0Ig ±É¼@Lo¿LW g'] lÛ_¿LW"°d_¿MO'_¿O‡dOM½µöµâOjðž@ioLhLJgg_¿Ih_¿_µKOkØÖ»HX±ÿd_¿OO ^›OdKMN'ÖÔ¿O°Íd_¿Oµ Oh_‚O&_¿µçO(248 CL:NTH 206 CL:POSITION 187 AR.PROMPT.PRINT 125 LENGTH 107 AR.PROMPT.PRINT 90 SORT 68 GETWINDOWUSERPROP 27 REVERSE 21 AR.ENSURE.QUERY.FIELDS 14 AR.PROMPT.PRINT) (201 CAR 196 :KEY 118 ENUMERATED.FIELD.KEYLIST 85 AR.SORT.BYA0001 63 AR.FIELD.DESCRIPTIONS) ( 181 "Can't sort on field " 102 " " 9 "Sorting by ") AR.GET.SLIST.PROMPT.MENU :D8 (L (0 QFORMWINDOW) F 9 AR.SORT.SPEC.ITEMS) è @g µ‚±°@g AH¹`do¿H1Mµ|N W´ohogWhho ºdJ¿di¿dg¿dg ¿dg¿jdnÿdh»dK ¿¼@gLLdIg'_¿OµOh_^¿M]±ÿeO&_°ô(188 PUTWINDOWPROP 120 \NCONC2 115 \NCONC2 75 SORT 27 GETWINDOWUSERPROP 10 GETWINDOWUSERPROP) (200 ENUMERATED.FIELD.KEYLIST 182 AR.SLIST.PROMPT.MENU 155 DEFAULTMENUHELDFN 146 CLRPROMPT 137 AR.QUERY.WHENSELECTEDFN 95 SUBITEMS 43 |MENUTYPE#| 22 AR.INDEX.DATA 5 AR.SLIST.PROMPT.MENU) ( 110 (("--Clear--" :CLEAR "Clear the Sort spec and start over")) 90 "Select custom sort orders from submenu" 84 "Special" 50 "Sort Options") AR.ENSURE.QUERY.FIELDS :D8 (L (1 FIELDS 0 QFORMWINDOW)) =@A@g 2HµJ @A dI¨¼Kµ Lh[Z¿HX°ÜL&[°÷(33 AR.ENSURE.QUERY.DATA 26 AR.AUGMENT.QUERY.FIELDS 12 GETWINDOWUSERPROP) (7 AR.FIELD.DESCRIPTIONS) () AR.ENSURE.QUERY.DATA :D8 (L (2 ENTRIES 1 FIELDS 0 QFORMWINDOW) F 25 AR.INDEX.FILE F 26 AR.INDEX.ENTRY.BEGIN.PTR F 27 AR.INDEX.ENTRY.SIZE) GW2q@g _ ¾h½Bµ@g bYµi’±¶BB Oµh²Y0 B°D¢h°àI°×_¿OO_ó–OµÝi°ÚO_°ÏdZJ_¿Oµ Oh_‚O&_¿µãOi b¿Aið©Ah¼[µDh²&@ ]mÿ ¿HW4 ¿Bjd#Oµ2OjAið´O kÙCOµDh\O3 •L³¶i°±K°¨_d³OOO_OÕW6ÖÕ_¿O_¿O_°£__²/Aið©OdA¤¿°!O_œHO ¿j_¿BAOµO_¿OkÔ_¿±ÿu_ d’±Ç³:O hNAk_0O(ó³%g_.¿O,µO.h_,_*¿O0kÔ°àO.&_,¿°ôO*¿OO _$¿O²;O$gð²cHO OÕ ¿O kØ_¿O$H _&jð¬O&kÙO °6h°3O$_"².jO"ó²'HOO"ÕkÕ ¿O"M HMO"¿¿OOð•O i¿O_±ÿ(558 COPYBYTES 547 GETFILEPTR 538 SETFILEPTR 505 CL:NTH 476 \INCFILEPTR 446 CL:NTHCDR 335 SETFILEPTR 280 AR.COLLECT.ENTRY.FIELDS 219 LENGTH 191 SETFILEPTR 182 SETFILEPTR 174 AR.GET.SCRATCH.STREAM 151 SORT 39 GETWINDOWUSERPROP 22 LENGTH 15 GETWINDOWUSERPROP) (461 ? 399 ? 34 AR.ENTRIES 10 AR.FIELD.DESCRIPTIONS) () AR.COLLECT.ENTRY.FIELDS :D8 (L (2 LASTOFFSET 1 DESCRS 0 ENTRY) F 10 AR.INDEX.ENTRY.SIZE F 11 AR.INDEX.FILE F 12 AR.MAX.INDEX) Á @d³$h0A°g¸IµHhZH&¹µíJ¿@AWW@WðU H¾IµB½N²úM_3 ²mNgð²cKOBÕ ¿OlÔb¿K _¿NOjð“O°;LšMMÕ°KJlÕ ¿BJÔb¿K OÕ_jðhð´mÿOÕOh¿I¹N±ÿz(160 \DWIN 147 \INCFILEPTR 111 \DWIN 96 \INCFILEPTR) (83 ? 16 ?) () AR.ENSURY.QUERY.DATA.ITEMA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 5 AR.MAX.INDEX P 4 AR.INDEX.ENTRY.BEGIN.PTR P 3 AR.INDEX.ENTRY.SIZE P 2 AR.INDEX.FILE I 0 SI::*CLEANUP-FORMS* F 17 QFORMWINDOW F 18 ENTRY) JW"g W"g Hid³W"o ¿¿Hhi¿IIIIW"g W"g W$J §W" ¿Omÿ JO W$NjW$NbO_¿Oµ W$i_¿O²ñO_²pO_²2Ogð²\JOOÔ ¿OJ _ jð¬O kÙO °8h°5O_²0jOó²)JOOÕkÕ ¿OO JOO¿¿O_¿O±ÿg(313 COPYBYTES 301 GETFILEPTR 291 SETFILEPTR 258 CL:NTH 237 SETFILEPTR 162 AR.COLLECT.ENTRY.FIELDS 153 SETFILEPTR 148 AR.ENTRY.PTR.FROM.INDEX 140 SETFILEPTR 130 AR.INDEX.FILE.REOPEN 122 OPENP 110 GETWINDOWUSERPROP 98 GETWINDOWUSERPROP 63 OBTAIN.MONITORLOCK 54 ALLOW.BUTTON.EVENTS 48 AR.PROMPT.PRINT 34 OBTAIN.MONITORLOCK 23 GETWINDOWUSERPROP 11 GETWINDOWUSERPROP) (223 ? 105 AR.FORM.SCRATCH.STREAM 93 AR.FIELD.DESCRIPTIONS 18 AR.INDEX.DATA 6 AR.INDEX.MONITORLOCK) ( 43 " [Browser busy; please wait] ") AR.ENSURY.QUERY.DATA.ITEM :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 ENTRY I 0 QFORMWINDOW F 3 LISPXHIST) S!g ¿$(23 SI::RESETUNWIND 18 \MVLIST 13 AR.ENSURY.QUERY.DATA.ITEMA0001) (8 SI::RESETUNWIND) () AR.AUGMENT.QUERY.FIELDS :D8 (L (1 FIELDS 0 QFORMWINDOW) F 11 AR.INDEX.FIELD.SPECS) A `A°Qd]W\g'»MKµLg'µ*oM Lg'K´ Lg'¸IµHhZˆ °ÞH&¹µ°J@g @g $J³'@ j @ggjhdIHjó´K\µ@gJI ]d²=HA k_Nó³%g_¿OµOh__¿OkÔ°áO&_¿°ôO ¿Mh¿L°¥(249 \NCONC2 188 PUTWINDOWPROP 183 \NCONC2 159 PUTWINDOWPROP 135 \SETEOFPTR 129 AR.GET.SCRATCH.STREAM 117 GETWINDOWUSERPROP 106 GETWINDOWUSERPROP 84 AR.KEYVALS.FROM.KEYLIST 50 HELP 5 LENGTH) (211 ? 176 AR.FIELD.DESCRIPTIONS 146 Number%: 141 AR.FIELD.DESCRIPTIONS 112 AR.ENTRIES 101 AR.FIELD.DESCRIPTIONS 66 FIELD.END.PTR 56 FIELD.BEGIN.PTR 36 ENUMERATED.FIELD.KEYLIST 24 FIELD.OFFSET) ( 44 "Field for display is neither string nor enumerated") AR.KEYVALS.FROM.KEYLIST :D8 (L (0 KEYLIST)) @kHµi²00@°%ºIJð¢h°ðH¸IkÔ¹°ád¸IµHhZH&¹µïJo @@°d[Kh¸IµHhZH&¹µèJi k1H²$IHð´ HH¸¼Kµ Lh[ºIkÔ¹°âL&»°÷J(109 SORT 69 HELP) NIL ( 64 "Enumerated keys out of order. RETURN to continue") AR.QFORM.SUMMARYA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 QFORMWINDOW F 1 STREAM) PQ (6 AR.PRINT.SUMMARY) NIL () AR.QFORM.SUMMARYA0002 :D8 (F 0 STREAM) P (5 CLOSEF) NIL () AR.QFORM.SUMMARY :D8 (P 0 STREAM I 0 QFORMWINDOW F 1 AR.IDENTIFICATION.STRING) M@ ´E@o hQo g H ¿$@o (74 AR.PROMPT.PRINT 59 CLOSEF 53 \MVLIST 48 AR.QFORM.SUMMARYA0001 35 AR.OPEN.IP.STREAM 30 CONCAT 18 AR.PROMPT.PRINT 5 AR.QFORM.SUMMARIZE.CHECK) (43 AR.QFORM.SUMMARYA0002) ( 69 "done." 25 " Summary" 13 "Printing summary...") AR.QFORM.SUMMARY.TEXT :D8 (L (0 QFORMWINDOW)) @ ´mo@g h@ hg @ H²?@gH@gghg@H X@ioH@o (126 AR.PROMPT.PRINT 114 AR.PROMPT.PRINT 101 PUTWINDOWPROP 96 PACKFILENAME.STRING 90 AR.MAKE.SUMMARY.TEXT.FILE 66 PUTWINDOWPROP 51 AR.PROMPT.CLEAR 42 PROMPTFORWORD 30 GETPROMPTWINDOW 23 GETWINDOWUSERPROP 5 AR.QFORM.SUMMARIZE.CHECK) (83 BODY 77 VERSION 72 AR.SUMMARY.FILE.NAME 60 AR.SUMMARY.FILE.NAME 36 TTY 18 AR.SUMMARY.FILE.NAME) ( 121 " ... aborted" 108 "Wrote " 12 "File Name: ") AR.MAKE.SUMMARY.FILEA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 0 *UPPER-CASE-FILE-NAMES* I 0 SI::*CLEANUP-FORMS* F 2 QFORMWINDOW F 3 FILENAME F 4 SI::*RESETFORMS* F 5 FIELDS-TO-PRINT) ` S µSgg¹gIhhdTcRioI o RIURo I (93 FULLNAME 87 AR.PROMPT.PRINT 76 AR.PRINT.SUMMARY 68 AR.PROMPT.PRINT 57 FULLNAME 26 OPENSTREAM 8 STREAMP) (32 CLOSE-AND-MAYBE-DELETE 21 NEW 16 OUTPUT) ( 82 " done." 62 "..." 51 "Writing ") AR.MAKE.SUMMARY.FILE :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 FIELDS-TO-PRINT I 1 FILENAME I 0 QFORMWINDOW F 3 LISPXHIST) S!g ¿$(23 SI::RESETUNWIND 18 \MVLIST 13 AR.MAKE.SUMMARY.FILEA0001) (8 SI::RESETUNWIND) () AR.MAKE.SUMMARY.TEXT.FILEA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 S F 1 QFORMWINDOW F 2 A0162) QP ¿P hc¿$(18 \MVLIST 13 FULLNAME 6 AR.PRINT.SUMMARY) NIL () AR.MAKE.SUMMARY.TEXT.FILEA0002 :D8 (F 0 S F 1 A0162) PgQ(11 CL:CLOSE) (5 :ABORT) () AR.MAKE.SUMMARY.TEXT.FILE :D8 (L (1 FILENAME) P 2 A0162 P 1 S P 0 *UPPER-CASE-FILE-NAMES* I 0 QFORMWINDOW) CAgggg ig IgJ¿$(60 CL:CLOSE 48 \MVLIST 43 AR.MAKE.SUMMARY.TEXT.FILEA0001 29 OPEN) (54 :ABORT 38 AR.MAKE.SUMMARY.TEXT.FILEA0002 23 :NEW-VERSION 18 :IF-EXISTS 13 :OUTPUT 8 :DIRECTION) () AR.QFORM.SUMMARY.TEDIT :D8 (L (0 QFORMWINDOW) F 7 AR.TEDIT.FIELDS F 8 AR.SUMMARY.FIELDS F 9 AR.IDENTIFICATION.STRING) å@ ´‚±Égg 1gl ¹WµWºlXI JjLµ‚±Ml ÔÖ lÜ Wo [gg@o @HJ@o HKhgigIghddddl0dddhddddo h¾MlNÔÔ½L\±ÿ_(209 TEDIT 197 TEDIT.SINGLE.PAGEFORMAT 151 AR.PROMPT.PRINT 140 AR.PRINT.SUMMARY 132 AR.PROMPT.PRINT 121 PUTWINDOWPROP 105 CREATEW 100 CONCAT 88 GETBOXREGION 81 WIDTHIFWINDOW 57 CHARWIDTH 41 FONTCREATE 26 OPENSTREAM 5 AR.QFORM.SUMMARIZE.CHECK) (171 PAGEFORMAT 165 FONT 159 LEAVETTY 116 TEXTICON 111 ICONFN 34 GACHA 21 BOTH 16 {NODIRCORE}) ( 191 (LANDSCAPE? T) 146 "done." 127 "Creating summary..." 95 " Summary") AR.QFORM.SUMMARIZE.CHECK :D8 (L (0 QFORMWINDOW)) @g µ@o h(23 AR.PROMPT.PRINT 10 GETWINDOWUSERPROP) (5 AR.ENTRIES) ( 18 "There are no ARs to summarize") AR.OPEN.IP.STREAM :D8 (L (1 DOCUMENT.NAME 0 FILE) P 0 *UPPER-CASE-FILE-NAMES* F 4 DEFAULTLANDPAGEREGION) ©@ohddg ¹TTnöÕTTn ìÔº@ggigJgJoI Õn ìÕl I Ûl gIhh»A² KggAKg K(165 STREAMPROP 158 STREAMPROP 131 OPENIMAGESTREAM 109 ALLOCSTRING 101 CHARWIDTH 88 STRINGWIDTH 49 CREATEREGION 21 FONTCREATE) (153 PRINTOPTIONS 146 DOCUMENT.NAME 141 PRINTOPTIONS 114 FONTS 73 HEADING 67 REGION 61 LANDSCAPE 56 INTERPRESS 15 INTERPRESS) ( 82 "Page 999" 7 (TERMINAL 6)) AR.PRINT.PADDED :D8 (L (4 PRINTWIDTH 3 MAXCHARS 2 START 1 STREAM 0 STR)) îAg bÀ@dd3@ð²¿@ÁÉXÊ¹kº@ÁÊ jðhð°Qd ¨¿@ bÊjð¦@ ‚@É¸@l ¹@dÊjð¥ Èº@dÊjð¥ ‚Ê‡lDð»IBkÙÕ\dCó“i¾C¼BkÙJÔ]dLÔmÿÔM_¿_¿OOó³1AK–HOÐÈƒHOÂ_¿_É(_¿OOlO¿OkÔ_°ÎDµ N´BLÔLÕA ¿°ð(233 SPACES 120 %%ARRAY-TYPE-NUMBER 103 %%ARRAY-OFFSET 89 \GETBASEFIXP 76 %%ARRAY-BASE 62 MKSTRING 54 STRINGP 10 \GETSTREAM) (192 STREAM 5 OUTPUT) () AR.IP.FROM.SUMMARYA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 7 SI::*RESETFORMS* F 8 SUMMARYFILE F 9 IPFILENAME) ’pgWggXhhdWcgWµgoghgH YhhdWcHg k¾½NMó³IH ¼[É(ºKLlJ¿NkÔ^°äI (143 FULLNAME 103 GETFILEINFO 79 AR.OPEN.IP.STREAM 74 PACKFILENAME.STRING 24 OPENSTREAM) (121 STREAM 98 LENGTH 67 BODY 61 VERSION 51 EXTENSION 42 CLOSEF 19 OLD 14 INPUT 7 CLOSEF) ( 56 "IP") AR.IP.FROM.SUMMARY :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 IPFILENAME I 0 SUMMARYFILE F 3 LISPXHIST) S!g ¿$(23 SI::RESETUNWIND 18 \MVLIST 13 AR.IP.FROM.SUMMARYA0001) (8 SI::RESETUNWIND) () AR.PRINT.SUMMARYA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 12 AR.MAX.INDEX P 11 AR.INDEX.FIELD.LIST P 9 AR.INDEX.FIELD.SPECS P 7 AR.INDEX.ENTRY.SIZE P 5 AR.INDEX.ENTRY.END.PTR P 3 AR.INDEX.ENTRY.BEGIN.PTR P 1 AR.INDEX.FILE I 0 SI::*CLEANUP-FORMS* F 47 STREAM F 48 QFORMWINDOW F 49 FIELDS-TO-PRINT F 50 AR.SUMMARY.MIN.LINES F 51 AR.IDENTIFICATION.STRING) #/W`g hgW`g áH¹HZ»J\½L^_¿N__¿O__¿O_¿I §W` ¿W`0Wb°d_¿O µ Oh_"‚O&_ ¿µçO" W`g W`g BW^ ²hW^ _$¿lxW^ _&¿ƒi_(¿nÿÿW^ oW^ ¿oO W^¿oW^ ¿WfW^ ¿oW^ ¿W^ ¿oW^ ¿Ig W^ ¿W^ oW^ ¿W`g W^ ¿W^ oW^ ¿W`g µoW^ ¿W^ ¿W^ oW^klO(´l WbW`g lcO*µ%O0_"W^ W^ Oa$O<µ‚±€h_6¿O(¯O$O&O.ÖÔW^ ¿O6_8W^kO6_:O(´dlÔ ¿O.O:ÔlÔ_.¿O8O,ggO:O6_4¿O2µO4h_2_0¿O*_*±ÿjO4&_2¿°ò_>¿oO>W^¿j_F¿l_D¿l_H¿O>_B¿O"a+OJµ=OL_@¿W^ ¿Wd¢±Xh_¿O@’±©WdOFÕkÕ_jñ¢±?W^ ¿OkÙ°ì_R_T¿OROB _VOHOTÔlÔ_H¿h°7O(¯O$O&ODÖÔW^ ¿W^OVOTjO O(´ OHl_H¿ ´ORhðhðODOTÔlÔ_D¿³OR_P¿ONµOPh_N_L¿OJ_J±ÿDOP&_N¿°òOFkÔ_F¿l_H_D¿O@_¿O"!.OXµW^ ¿hO@ _@±ÿ&_Z_\¿OZOð©OHO\ÔlÔ°EO(¯O$O&ODÖÔW^ ¿W^OZOB O\OFO\ÖO O(´OH ¤Oh¿O_²’l_H¿ODO\ÔlÔ_D¿OX_X±ÿxO<_<±ýÙ(1012 AR.PRINT.SUMMARY.FIELD 991 CL:NTH 978 DSPXPOSITION 930 DREMOVE 921 TERPRI 827 AR.PRINT.SUMMARY.FIELD 800 DSPXPOSITION 765 CL:NTH 740 TERPRI 701 TERPRI 656 PRINTNUM 594 CL:POSITION 563 AR.PRINT.PADDED 534 DSPXPOSITION 496 TERPRI 489 TERPRI 467 GETWINDOWUSERPROP 453 AR.PRINT.PADDED 431 TERPRI 423 TERPRI 415 PRIN1 401 GETWINDOWUSERPROP 388 PRIN1 376 TERPRI 368 PRIN1 361 GETWINDOWUSERPROP 348 PRIN1 336 TERPRI 328 PRIN1 321 GETFILEINFO 309 PRIN1 296 PRIN1 289 DATE 283 PRIN1 270 PRIN1 260 PRIN1 247 PRINTNUM 240 LENGTH 227 PRIN1 215 LINELENGTH 197 CHARWIDTH 185 DSPLEFTMARGIN 175 IMAGESTREAMP 165 GETWINDOWUSERPROP 153 GETWINDOWUSERPROP 141 AR.ENSURE.QUERY.FIELDS 96 AR.INDEX.FILE.REOPEN 88 OPENP 34 GETWINDOWUSERPROP 22 OBTAIN.MONITORLOCK 11 GETWINDOWUSERPROP) (589 CAR 584 :KEY 462 AR.FIELD.DESCRIPTIONS 396 AR.ENTRY.ALIST.SLIST 356 AR.ENTRY.ALIST.QLIST 316 CREATIONDATE 160 AR.FORM.SCRATCH.STREAM 148 AR.ENTRIES 29 AR.INDEX.DATA 17 WITH.MONITOR 6 AR.INDEX.MONITORLOCK) ( 644 (FIX 5) 436 " AR#" 408 "AR#" 381 "Sorted by: " 341 "Generated with Query Spec: " 302 " from index dated " 276 "s generated on " 253 " " 233 (FIX 1) 220 "Summary of ") AR.PRINT.SUMMARY :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 2 FIELDS-TO-PRINT I 1 STREAM I 0 QFORMWINDOW F 2 AR.SUMMARY.FIELDS) #B£Rb¿ g ¿$(28 SI::MONITOR-UNWIND 23 \MVLIST 18 AR.PRINT.SUMMARYA0001) (13 SI::MONITOR-UNWIND) () AR.PRINT.SUMMARY.FIELD :D8 (L (5 NSPACES 4 SCRATCH 3 START 2 WIDTH 1 VALUE 0 STREAM)) vEµ/Ad²_¿DACÔ ACÕQBdHó‘¿H¼k]Ló²HBó²+ijð³ÑE@ ¿°Ç@D »ZÉ(¹JKlI¿MkÔ°ÏE´BHÕ@ h@CkÔBE´d (115 AR.PRINT.PADDED 98 SPACES 58 SPACES 18 SETFILEPTR) (71 STREAM) () AR.QUERYA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 12 AR.MAX.INDEX P 11 AR.INDEX.FIELD.LIST P 9 AR.INDEX.FIELD.SPECS P 7 AR.INDEX.ENTRY.SIZE P 5 AR.INDEX.ENTRY.END.PTR P 3 AR.INDEX.ENTRY.BEGIN.PTR P 1 AR.INDEX.FILE I 0 SI::*CLEANUP-FORMS* F 29 QFORMWINDOW F 30 SLIST F 31 QLIST F 32 AR.DISPLAY.FIELDS) ?W:g hgW:g áH¹HZ»J\½L^_¿N__¿O__¿O_¿I §W: ¿W:g AOŸOg _ µ;W:ioW:W> _&d³)W:io¿W:gh±th ¿°ÀW:ioO& o ¿W:gh¿W:g0O&°dh_(¿O*µ O(h_,‚O(&_*¿µæO,_&¿W:O²D0W@_$°d_.¿O0µ O.h_2‚O.&_0¿µçO2_¿W<²OW(572 PUTWINDOWPROP 557 AR.PROMPT.PRINT 544 TB.REPLACE.ITEMS 536 TB.MAKE.BROWSER 451 PUTWINDOWPROP 436 PUTWINDOWPROP 421 PUTWINDOWPROP 414 AR.SORT.BY 391 AR.ENSURE.QUERY.DATA 382 AR.QUERY.SMALLP 370 AR.AUGMENT.QUERY.FIELDS 359 \APPEND2 354 CL:SET-DIFFERENCE 290 PUTWINDOWPROP 237 PUTWINDOWPROP 223 AR.PROMPT.PRINT 212 LENGTH 194 TB.REPLACE.ITEMS 185 PUTWINDOWPROP 171 AR.PROMPT.PRINT 153 AR.QUERY.EVAL 144 AR.PROMPT.PRINT 127 GETWINDOWUSERPROP 109 GETWINDOWUSERPROP 96 AR.INDEX.FILE.REOPEN 88 OPENP 34 GETWINDOWUSERPROP 22 OBTAIN.MONITORLOCK 11 GETWINDOWUSERPROP) (565 AR.ENTRY.ALIST.QLIST 528 AR.BROWSER.PRINTFN 523 PRINTFN 473 |TABLEITEMTYPE#| 444 AR.DISPLAY.FIELDS 429 AR.ENTRY.ALIST.SLIST 403 AR.ENTRIES 245 AR.ENTRIES 231 AR.FIELD.DESCRIPTIONS 179 AR.ENTRIES 122 TABLEBROWSER 104 QFORM.ENTRY.WINDOW 29 AR.INDEX.DATA 17 WITH.MONITOR 6 AR.INDEX.MONITORLOCK) ( 552 " done." 217 " ARs. " 205 "Found " 166 "No matching ARs found." 139 "Searching...") AR.QUERY :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 2 SLIST I 1 QLIST I 0 QFORMWINDOW) g ¿$(22 SI::MONITOR-UNWIND 17 \MVLIST 12 AR.QUERYA0001) (7 SI::MONITOR-UNWIND) () AR.QUERY.SMALLP :D8 (L (2 ENTRIES 1 BROWSERWINDOW 0 QFORMWINDOW)) B Ag AÈ Ûóhð(16 GETWINDOWPROP 5 LENGTH) (22 FONTDESCRIPTOR 11 HEIGHT) () AR.QUERY.EVAL :D8 (L (3 NEGFLG 2 ANDINDEXES 1 QLIST 0 QFORMWINDOW)) ðAµ @A dgð²¿C™@AB@ABdgð²¿Cš@ABi@ABgð²!A²¬A³§@ABChðb¿b¿b¿b¿°AdgðŸ@AABC dgðŸ@AABC dgð³,dgð³#dgð³dgð¯dgð§dgðš¿@ABC¿@A (237 AR.BAD.QUERY 228 AR.QUERY.COMPARE 166 AR.QUERY.IS 142 AR.QUERY.HAS 76 AR.QUERY.OR 66 AR.QUERY.AND 43 AR.QUERY.AND 33 AR.QUERY.NAND 10 AR.BAD.QUERY) (216 ~= 208 = 200 <= 191 < 182 >= 173 > 149 IS 125 HAS 82 NOT 50 OR 18 AND) () AR.BAD.QUERY :D8 (L (1 ITEM 0 QFORMWINDOW)) @ioA(17 ERROR! 12 AR.PROMPT.PRINT) NIL ( 6 "Bad Query Spec: ") AR.QUERY.AND :D8 (L (4 RECURSIVE-P 3 NEGFLG 2 ANDINDEXES 1 CLAUSES 0 QFORMWINDOW)) ^Aš@ACb¿B³@AAb¿hCb¿AHµB¹B´üD³@oB o¿@IBCb¿HX°Í(84 AR.QUERY.EVAL 74 AR.PROMPT.PRINT 64 LENGTH 31 AR.QUERY.EVAL 10 AR.QUERY.SORT.CLAUSES) NIL ( 69 ") " 58 "(") AR.QUERY.NAND :D8 (L (2 ANDINDEXES 1 CLAUSES 0 QFORMWINDOW)) @Ahdi Bi(17 AR.QUERY.COMBINE.RESULT 10 AR.QUERY.AND) NIL () AR.QUERY.SORT.CLAUSES :D8 (L (2 NEGFLG 1 CLAUSES 0 QFORMWINDOW)) @ ‘ AYµ%h²hA__¾h]\¿Nµ5Ob¿00A±¶Zdgð§dgð’¿i¿h•J³Æi°ÁI°¸]dgð”¿M°Fgð´EMgð´80M°"d»gKh_¿Oµ Oh_‚O&_¿µÞON \—OL^±ÿgN_^±ÿad_HBO_¿Oµ Oh_‚O&_¿µÜOggg°d_¿Oµ Oh_‚O&_¿µçO(253 CL:STABLE-SORT 203 AR.QUERY.SORT.VALUE 174 \NCONC2 5 AR.QUERY.SORT.ORDER) (248 CAR 243 :KEY 238 < 136 NOT 117 OR 104 NOT 92 AND 65 NOT 57 AND) () AR.QUERY.SORT.ORDER :D8 (L (0 QFORMWINDOW) F 17 AR.INDEX.FIELD.SPECS) ÷@g µfPW"°(d[g'µTKg'Kg'ÕKhI¹µÙHi Ii hjr Mµ(OZdd@gJJ KhH¸°º_¿N_¿h_¿0O°(d\OL_ð‘NƒNkÔ^h_šOµ:O_ _¿µÙO _¿NOÔkÔO_¿OµOh__¿M]±ÿyO&_¿°ô _O°Ä(238 LAST 118 LENGTH 111 PUTWINDOWPROP 79 SORT 72 REVERSE 67 SORT 10 GETWINDOWUSERPROP) (105 AR.QUERY.SORT.ORDER 46 FIELD.BEGIN.PTR 38 FIELD.END.PTR 28 ENUMERATED.FIELD.KEYLIST 5 AR.QUERY.SORT.ORDER) () AR.QUERY.SORT.VALUE :D8 (L (2 NEGFLG 1 SORT.ORDER 0 CLAUSE)) ¶@dgð¿Bhðb¿@b°ëdgð²*@nè2HµIºIJAB¼»LdKó‘¿K¹HX°ãgð²(@mÿ2HµIºIJAB¼[Ló‘K€L¹HX°ä@!Hdgð“¿AŽgð•Bhðb¿AY@'µIºBœHgð¤IJÕJ(105 AR.QUERY.SORT.VALUE 58 AR.QUERY.SORT.VALUE) (171 HAS 143 ~= 132 HAS 78 OR 30 AND 7 NOT) () AR.QUERY.OR :D8 (L (2 ANDINDEXES 1 CLAUSES 0 QFORMWINDOW)) _A1HµJ¹@IB»0K²4J²1KJýó–KK»°JdKýó¤¿K»JJº¾Mµ Nh]¼°ÒN&½°ÍLKµJ ºHX°©(87 \NCONC2 19 AR.QUERY.EVAL) NIL () AR.QUERY.COMBINE.RESULT :D8 (L (2 NEGFLG 1 ANDINDEXES 0 INDEXES) F 5 AR.MAX.INDEX) ‰AµB¢±Uj2IHó²CJAHµI¼@¢h°Ld@ó–¿@b°ñ@ð´@b¿iBð©L»JµKhZ¹HX°ÌK&º°ø@²Id@ýó’¿h@ð¥¿@b¿i©I¼Kµ Lh[ºIkÔY°L&»°÷@(104 HELP) NIL () AR.QUERY.IS :D8 (L (4 NEGFLG 3 ANDINDEXES 2 VALUE 1 FIELD.NAME 0 QFORMWINDOW) F 2 AR.INDEX.FIELD.SPECS F 3 AR.INDEX.FIELD.LIST) ¦ARHg'Y²F@AB¢j°/IBdd3@ð’¿B„ 'µ@ioBoA ¿Hg'CD AS ³@ioAB˜B jð™@ACD@ioAo @ABCD (163 AR.QUERY.HAS 152 AR.PROMPT.PRINT 132 AR.QUERY.IS.EMPTY 120 NCHARS 111 ERROR! 106 AR.PROMPT.PRINT 91 MEMB 83 AR.QUERY.IS.EXACTLY 68 ERROR! 62 AR.PROMPT.PRINT 39 MKATOM) (74 FIELD.BEGIN.PTR 12 ENUMERATED.FIELD.KEYLIST) ( 146 " -- will use HAS" 140 "Can't use IS on non-enumerated field " 100 "Unknown field name: " 55 " for field: " 49 "Unknown value ") AR.QUERY.IS.EXACTLY :D8 (L (5 NEGFLG 4 ANDINDEXES 3 BEGIN 2 SEARCH.KEY 1 FIELD.NAME 0 QFORMWINDOW) F 6 AR.INDEX.FILE F 7 AR.MAX.INDEX) ‚@AoDµVC Wj2IHó²FJVCHÔ DAIµJ½VMHÕ ¿MkØ¸V BðEð©M¼KµLh[ºIY°×L&»°øV BðEð©I¼Kµ Lh[ºIkÔY°£L&»°÷(68 \INCFILEPTR 47 SETFILEPTR 21 SETFILEPTR 11 AR.PROMPT.PRINT) NIL ( 6 " ") AR.QUERY.COMPARE.ENUMERATEDA0001 :D8 (L (1 QFORMWINDOW 0 VALUE) F 0 FIELD.KEYLIST) @¡jP@dd3@ð’¿@„ '(19 MKATOM) NIL () AR.QUERY.COMPARE.ENUMERATED :D8 (L (5 BEGIN 3 NEGFLG 2 ANDINDEXES 1 CLAUSE 0 QFORMWINDOW) I 4 FIELD.KEYLIST F 16 AR.INDEX.FILE F 17 AR.MAX.INDEX) :@ACg¡ H¹HZ»J\½L^_¿N_¿Igð´@AKEBO __¿@AoIgð”KmÿÔ»Mgð–OkÔ_¿B²qW EB_Ô BAOµO_¿W OOÕ ¿OkØ_¿W _Kóhð´Ohðµ OOóhðOð³O_¿OµOh__¿O_°®O&_¿°óW E W"j2OOó³AW _Kóhð´Ohðµ OOóhðOð³O_¿OµOh__¿OkÔ_°ÆO&_¿°òO(233 SETFILEPTR 155 \INCFILEPTR 127 SETFILEPTR 83 AR.PROMPT.PRINT 64 AR.QUERY.IS.EXACTLY 12 AR.QUERY.COMPARE.PARSE) (102 < 89 > 47 = 7 AR.QUERY.COMPARE.ENUMERATEDA0001) ( 78 " ") AR.QUERY.IS.EMPTY :D8 (L (3 NEGFLG 2 ANDINDEXES 1 FIELD.NAME 0 QFORMWINDOW) F 12 AR.INDEX.ENTRY.SIZE F 13 AR.INDEX.FIELD.SPECS F 14 AR.INDEX.FILE F 15 AR.MAX.INDEX) @AoAWQHg'¹Hg'Hg'ÕºWlÕ»W¼W½Bµ#jLjI ¿L BO¢±‚OLBI lÔ ¿BBNµO_¿LOOÕWÖlÕ ¿L OdMð“¿J°kØ_¿LK ¿L ýóCð²O_¿OµOh__¿N^°¦O&_¿°õLK ¿ONMð•i_¿J…L _ýóCð²N_¿OµOh__¿NkÔ¾±ÿDO&_¿°ó(241 \DWIN 222 \INCFILEPTR 178 \DWIN 171 \INCFILEPTR 149 \DWIN 142 \INCFILEPTR 108 SETFILEPTR 100 AR.ENTRY.PTR.FROM.INDEX 79 \DWIN 72 SETFILEPTR 67 AR.ENTRY.PTR.FROM.INDEX 11 AR.PROMPT.PRINT) (40 FIELD.BEGIN.PTR 33 FIELD.END.PTR 25 FIELD.OFFSET) ( 6 " ") AR.QUERY.HAS :D8 (L (4 NEGFLG 3 ANDINDEXES 2 SEARCH.STRING 1 FIELD.NAME 0 QFORMWINDOW) F 15 AR.INDEX.FILE F 16 AR.INDEX.FIELD.SPECS F 17 AR.INDEX.FIELD.LIST F 18 AR.MAX.INDEX) ”AW qHg'Y³>AW" ³@ioA@ioAo @ABCD B˜B jð™@ACD@AoB ºHg'»Hg'KÕ¼W$kØ½h^_¿C¢±ŸLC ²tCILCROµˆ_¿OµO_jðhð´BWKOÔdOJÕÔhi` Dð³O_¿OµOh__¿O_¿O_¿°¤O&_¿°ìC_I ¾MC kØ]ð¬MI ¼ƒj_¾WKNÔ ¿LKÔJÕ1BWhOhi` µOOMINLJ CDKÕ_¿Oµ Oh__¿°ÁO&_¿°¹(373 AR.QUERY.COMBINE.RESULT 366 AR.INDICES.FROM.FILEPTRS 348 FFILEPOS 320 SETFILEPTR 304 AR.ENTRY.VALUE.FROM.INDEX 291 LAST 283 AR.ENTRY.VALUE.FROM.INDEX 229 FILEPOS 167 AR.COLLECT.SHAPES 157 AR.SPARSE.QUERYP 116 NCHARS 110 AR.PROMPT.PRINT 97 AR.QUERY.IS.EMPTY 85 NCHARS 76 AR.QUERY.IS 65 AR.PROMPT.PRINT 45 ERROR! 40 AR.PROMPT.PRINT 25 MEMB) (342 UPPERCASEARRAY 223 UPPERCASEARRAY 131 FIELD.END.PTR 123 FIELD.BEGIN.PTR 13 FIELD.OFFSET) ( 105 " " 59 " -- will use IS" 53 "Can't use HAS on enumerated field " 34 "Unknown field name: ") AR.COLLECT.SHAPES :D8 (L (2 TOTALSIZE 1 OFFSET 0 INDEXES) F 9 AR.INDEX.ENTRY.SIZE F 10 AR.INDEX.FILE F 11 AR.MAX.INDEX) z WQW¹WlÕºH@A lÔ ¿@»0@°Ld½HMKÕWÖlÕ ¿H \MdIð“¿B°kØ»HJ ¿H LÕh¾OµNh_N&_¿µµO(92 \DWIN 85 \INCFILEPTR 65 \DWIN 58 \INCFILEPTR 30 SETFILEPTR 22 AR.ENTRY.PTR.FROM.INDEX) NIL () AR.COLLECT.SIZES :D8 (L (4 TOTALSIZE 3 MAX.INDEX 2 OFFSET 1 HI.INDEX 0 LO.INDEX) F 8 AR.INDEX.ENTRY.SIZE F 9 AR.INDEX.FILE) KA@WlÕ@B W5IHó‘MLJ ¿jKICð‘D…L [ÕÕ_¿NµOh^½IkÔY°ÒO&¾°ö(46 \DWIN 31 \INCFILEPTR 13 AR.ENTRY.VALUE.FROM.INDEX) NIL () AR.SPARSE.QUERYP :D8 (L (1 ANDINDEXES 0 DATALENGTH)) @ãâA ó(8 LENGTH) NIL () AR.INDICES.FROM.FILEPTRS :D8 (L (6 PATLENGTH 5 HI.PTR 4 LO.PTR 3 FIELD.OFFSET 2 HI.INDEX 1 LO.INDEX 0 FILEPTRS)) å BAÕ@¡hHjðšo ¿@¨EDÕHÛ\jð–AHlÛ°A@DÕLÛHkÙ½dMñ‘¿MÔYBIÕkð‘E»IdAð“¿DºŽC ºK¥»@h_¿^µIJb ¿b°‘Jó²jOdŸh¿@AICDJF NKµIkØC [ó³'h_¿NN¾JÕFýó£i_¿N—NdKó²ë¿O´Ih€hNdIkØBCKEF N_°‚(220 \NCONC2 215 \NCONC2 210 AR.INDICES.FROM.FILEPTRS 151 AR.ENTRY.VALUE.FROM.INDEX 137 AR.INDICES.FROM.FILEPTRS 93 AR.ENTRY.VALUE.NEXT 85 AR.ENTRY.VALUE.FROM.INDEX 23 HELP) NIL ( 18 "HI=LO and still have fileptrs to find.") AR.QUERY.COMPARE :D8 (L (3 NEGFLG 2 ANDINDEXES 1 CLAUSE 0 QFORMWINDOW) F 4 AR.INDEX.FIELD.SPECS F 5 AR.INDEX.FIELD.LIST) ÖA1HTYg'ºh»J²@ABCJIg' Hdgðš¿@ABCU ³@ioHHgð™@ABCoH ™@ABCAdgð§dgð’¿i¿h²*A[™K jð²@HBAgð‘C‚Chð@ioH(211 ERROR! 206 AR.PROMPT.PRINT 192 AR.QUERY.IS.EMPTY 165 NCHARS 126 AR.QUERY.GENERAL.DATE 116 STRPOS 104 AR.QUERY.DATE 86 ERROR! 81 AR.PROMPT.PRINT 66 MEMB 59 AR.QUERY.NUMBER 39 AR.QUERY.COMPARE.ENUMERATED) (180 = 144 ~= 136 = 93 Date%: 47 Number%: 32 FIELD.BEGIN.PTR 14 ENUMERATED.FIELD.KEYLIST) ( 200 "Can't use numeric comparison on " 110 "Date" 75 "Unknown field name: ") AR.QUERY.COMPARE.PARSE :D8 (L (3 VALUEFN 2 NEGFLG 1 CLAUSE 0 QFORMWINDOW)) ùAqH¹HºH»JI@lCZ3 ¢±ÕIgðªIdgð²3¿Kd¢±¯K»\gðªLgð¢±¥C¾KK»L@lN]3 ±ƒgðªIdgð²R¿K³Igð•g„g¹Bhðb¿i°PI¼J½KK»Ygð¨Igð²EC_¿KK»I@lOZ3 °!gð’i°Igð²Bhðb¿gYK«IJLMBh@A (246 AR.BAD.QUERY) (223 = 209 ~= 198 = 169 >= 161 > 136 > 130 >= 123 < 110 <= 101 < 72 <= 64 < 44 >= 35 >) () AR.QUERY.NUMBER :D8 (L (3 NEGFLG 2 ANDINDEXES 1 CLAUSE 0 QFORMWINDOW)) Û@ACg¡ H¹HZ»J\½L^_¿N_¿0 O²KOó²@Ao¿¿@o @K __¿O_¿Idgð²K¿O–OkÔ_¿M²0@OO __¿O_¿Mgð¢O¦OkÙ_¿OOBOgð²¼O´OhBO(216 AR.QUERY.COMBINE.RESULT 191 AR.QUERY.PRODUCE.INDEXES 148 \MVLIST 143 AR.INDEX.FROM.NUMBER 96 \MVLIST 91 AR.INDEX.FROM.NUMBER 84 AR.PROMPT.PRINT 72 ERROR! 66 AR.PROMPT.PRINT 12 AR.QUERY.COMPARE.PARSE) (197 = 167 < 116 > 7 CL:IDENTITY) ( 79 "Number: " 61 " specifies a null interval.") AR.QUERY.PRODUCE.INDEXES :D8 (L (3 NEGFLG 2 ANDINDEXES 1 HI.INDEX 0 LO.INDEX) F 3 AR.MAX.INDEX) tBµ*C²j@kÙ Ad—kØS @AµS !H—Hd@ýó¯¿A´J¹H²HdAó•ŠZX°åYX°ïX¿C˜JµHHBIµ JµI¡A¨Bh¿°òh(41 AR.COLLECT.N 30 \NCONC2 25 AR.COLLECT.N 14 AR.COLLECT.N) NIL () AR.COLLECT.N :D8 (L (1 HI 0 LO)) !A@2IHó‘JI¼Kµ Lh[ºIkÔY°íL&»°÷NIL NIL () AR.INDEX.FROM.NUMBER :D8 (L (3 HI.HINT 2 LO.HINT 1 NUM 0 QFORMWINDOW) F 5 AR.MAX.INDEX) ‡BµjCµU2AI Zýó³!AJð•Ii$Cšo ¿IkØh$AH Zó³4HAJð’i°;B´8o ¿°*AK \ýó’K¹‹ALð•Ki$K¸HIHÕlÛÔ[Hð²ÛIh$(95 AR.ENTRY.VALUE.FROM.INDEX 85 SHOULDNT 60 AR.ENTRY.VALUE.FROM.INDEX 44 SHOULDNT 17 AR.ENTRY.VALUE.FROM.INDEX) NIL ( 80 "AR# less than upper bound" 39 "AR# greater than upper bound") AR.QUERY.DATE :D8 (L (3 NEGFLG 2 ANDINDEXES 1 CLAUSE 0 QFORMWINDOW) F 6 AR.INDEX.FIELD.SPECS) :@ACQH¹HZ»J¼AV½@IMK´@KMiBL(55 AR.QUERY.PRODUCE.INDEXES 48 AR.INDEX.FROM.DATE 36 AR.INDEX.FROM.DATE 7 AR.QUERY.PARSE.DATES) NIL () AR.QUERY.GENERAL.DATE :D8 (L (3 NEGFLG 2 ANDINDEXES 1 CLAUSE 0 QFORMWINDOW) F 31 AR.INDEX.FIELD.SPECS F 32 AR.INDEX.FILE F 33 AR.MAX.INDEX) Ø@ACáH¹HZ»J¼AW>]g'¾Mg'_¿Mg'OÕ_¿W@_¿h___¿BµWB_jO Oó¢±¿O"NO!OOO_ Ô OBRO&µˆ_.¿O$µO(_0_"jó´POO0O Õ ¿O"Oð«O"_ _OkO"O¿O0O"Ô_ ¿O _dœIó´KhðµKOóLð³O._,¿O*µO,h_*_(¿O&_&¿O$_$¿±ÿsO,&_*¿°ëO"O dnóÔ_¿OdOó’¿ONOO OOO N Ô ¿O BO2µO6 _"¿O nôÔ_ ±þì_BoJo ¿J´$Adgð”¿JkØgð§Agð“JkÙJ(193 AR.PROMPT.PRINT 188 GDATE 168 IDATE 163 CONCAT 137 IDATE 128 IDATE 123 CONCAT 110 \MVLIST 105 CL:GET-DECODED-TIME 91 IDATE 86 CONCAT 80 SHOULDNT 8 IDATE) (224 = 216 >= 204 <= 67 > 59 <= 44 ~= 35 = 26 >= 17 <) ( 183 (DATEFORMAT NO.SECONDS) 177 "[ = " 154 " " 100 " " 74 " 23:59:59" 52 " 0:00:00") AR.QUERY.PARSE.DATES :D8 (L (2 NEGFLG 1 CLAUSE 0 QFORMWINDOW)) e@ABgaH¹HZ»J\½L¾M²KMó²@Ao¿¿@AoKMµIgð´ doÔNh(73 AR.PROMPT.PRINT 59 ERROR! 53 AR.PROMPT.PRINT 12 AR.QUERY.COMPARE.PARSE) (83 = 7 AR.QUERY.PARSE.DATESA0001) ( 92 86401 68 " " 48 " specifies a null interval.") AR.INDEX.FROM.DATE :D8 (L (3 UPPER.BOUNDP 2 FIELD.SPEC 1 DATE 0 QFORMWINDOW) F 3 AR.MAX.INDEX) |jSIB žAIB óC´bIIkÙY°ækØ¸HdB ²õ¿AHB ýó²-Chð´;HB µJkÔZdIð²ñ¿HIHÕlÛÔ¹‡Aó’J¹J¸HIHÕlÛÔZdHð²Ð¿C²£H(72 AR.DATE.FROM.INDEX 55 AR.DATE.FROM.INDEX 44 AR.DATE.FROM.INDEX 20 AR.DATE.FROM.INDEX 11 AR.DATE.FROM.INDEX) NIL () AR.DATE.FROM.INDEX :D8 (L (1 FIELD.SPEC 0 INDEX) F 4 AR.INDEX.FILE F 5 AR.MAX.INDEX) `@Ag' 1@UðŸAg'Ag'Õ„HÕYjð³/THAg'Ô I ZkITJ [d”jó´Kh(83 IDATE 77 AIN 68 ALLOCSTRING 62 SETFILEPTR 40 AR.ENTRY.VALUE.NEXT 12 AR.ENTRY.VALUE.FROM.INDEX) (55 FIELD.BEGIN.PTR 32 FIELD.BEGIN.PTR 25 FIELD.END.PTR 6 FIELD.OFFSET) () AR.NUMS.FROM.QUERYA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 12 AR.MAX.INDEX P 11 AR.INDEX.FIELD.LIST P 9 AR.INDEX.FIELD.SPECS P 7 AR.INDEX.ENTRY.SIZE P 5 AR.INDEX.ENTRY.END.PTR P 3 AR.INDEX.ENTRY.BEGIN.PTR P 1 AR.INDEX.FILE I 0 SI::*CLEANUP-FORMS* F 16 QFORMWINDOW) W g hgW g ÁH¹HZ»J\½L^_¿N__¿O__¿O_¿I §W ¿W o 0W g °d_¿Oµ Oh_‚O&_¿µåO(124 GETWINDOWUSERPROP 109 AR.ENSURE.QUERY.DATA 96 AR.INDEX.FILE.REOPEN 88 OPENP 34 GETWINDOWUSERPROP 22 OBTAIN.MONITORLOCK 11 GETWINDOWUSERPROP) (119 AR.ENTRIES 29 AR.INDEX.DATA 17 WITH.MONITOR 6 AR.INDEX.MONITORLOCK) ( 104 (Number%:)) AR.NUMS.FROM.QUERY :D8 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 QFORMWINDOW) -@o b´ g ¿$(38 SI::MONITOR-UNWIND 33 \MVLIST 28 AR.NUMS.FROM.QUERYA0001 11 AR.SELECT.WINDOW) (23 SI::MONITOR-UNWIND) ( 6 "Select Query form window") AR.ENTRY.PTR.FROM.INDEX :D8 (L (1 OFFSET 0 INDEX) F 0 AR.INDEX.ENTRY.SIZE F 1 AR.INDEX.ENTRY.BEGIN.PTR) A—@PÖAÔQÔ@PÖQÔNIL NIL () AR.ENTRY.VALUE.FROM.INDEX :D8 (L (1 FIELD.OFFSET 0 INDEX) F 0 AR.INDEX.FILE F 1 AR.INDEX.ENTRY.SIZE F 2 AR.INDEX.ENTRY.BEGIN.PTR) PA•@QÖAÔ‚@QÖRÔ P (24 \DWIN 18 SETFILEPTR) NIL () AR.ENTRY.VALUE.NEXT :D8 (F 0 AR.INDEX.FILE F 1 AR.INDEX.ENTRY.SIZE) PQlÕ P (15 \DWIN 9 \INCFILEPTR) NIL () AR.SELECT.WINDOWA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS*) d” (16 MAINWINDOW 9 WHICHW 4 GETPOSITION) NIL () AR.SELECT.WINDOW :D8 (L (0 PROMPT)) @ g ¿$(25 CLRPROMPT 20 \MVLIST 15 AR.SELECT.WINDOWA0001 5 PROMPTPRINT) (10 CLRPROMPT) () AR.INCFILEPTR :D8 (NAME \PAGED.INCFILEPTR L (1 AMOUNT 0 STREAM) P 0 \INTERRUPTABLE) Ø0@ÈAÔ@Éº¹nIó¬JIãâÔºInÿå°%jIó²wJnIÕkÙYãâÕºjJó‘jºnInÿåÕkÙ¹@ @dÊ 0jð³¿@dÉ ¿@jÏ 0¿@jÍ¿@h@J@IÍhjAó™@ ¿i°@dÉ²”¿I@Èóhð²„@IÍh(173 \UPDATEOF 112 \SETIODIRTY 83 \UPDATEOF) (209 STREAM 196 STREAM 184 STREAM 158 STREAM 149 STREAM 140 STREAM 130 STREAM 119 STREAM 105 STREAM 90 STREAM 18 STREAM 8 STREAM) () (PRETTYCOMPRINT ARQUERYCOMS) (RPAQQ ARQUERYCOMS ((COMS (* ; "Query window management") (FNS AR.QFORM.CREATE AR.QFORM.GROUP.CREATE AR.QFORM.GET.DEFAULT.INDEX AR.QFORM.CREATE.ABORT AR.QFORM.GDATE AR.QUERY.WHENSELECTEDFN AR.QUERY.CLOSEFN AR.QUERY.SHRINKFN AR.QUERY.CLOSE/SHRINK AR.QUERY.EXPANDFN AR.QFORM.ICONFN AR.INDEX.OPEN AR.INDEX.FILE.REOPEN AR.INDEX.FILE.CLOSE AR.QFORM.QUERY AR.QFORM.BUTTONFN AR.GET.QLIST.PROMPT.MENU AR.QLIST.MENU.COMPARISONS AR.QFORM.PROMPT.LIST.FN AR.QFORM.TITLEMENU AR.MAKE.COMPARISON.STRING AR.GET.BUTTON.FIELD.AS.LIST)) (COMS (* ; "AR Browser window stuff") (FNS AR.BROWSER.PRINTFN AR#.FROM.ITEM AR.BROWSER.COMMANDFN AR.BROWSER.DO.COMMAND AR.BROWSER.SELECTED.ARS AR.BROWSER.DISPLAY AR.BROWSER.EDIT AR.BROWSER.HARDCOPY)) (COMS (* ; "Sorting") (FNS AR.QFORM.SORT AR.SORT.BY AR.GET.SLIST.PROMPT.MENU AR.ENSURE.QUERY.FIELDS AR.ENSURE.QUERY.DATA AR.COLLECT.ENTRY.FIELDS AR.ENSURY.QUERY.DATA.ITEM AR.AUGMENT.QUERY.FIELDS AR.KEYVALS.FROM.KEYLIST)) ( COMS (* ; "Printing summaries") (FNS AR.QFORM.SUMMARY AR.QFORM.SUMMARY.TEXT AR.MAKE.SUMMARY.FILE AR.MAKE.SUMMARY.TEXT.FILE AR.QFORM.SUMMARY.TEDIT AR.QFORM.SUMMARIZE.CHECK AR.OPEN.IP.STREAM AR.PRINT.PADDED AR.IP.FROM.SUMMARY) (FNS AR.PRINT.SUMMARY AR.PRINT.SUMMARY.FIELD)) (COMS (* ; "Evaluating AR queries") (FNS AR.QUERY AR.QUERY.SMALLP AR.QUERY.EVAL AR.BAD.QUERY AR.QUERY.AND AR.QUERY.NAND AR.QUERY.SORT.CLAUSES AR.QUERY.SORT.ORDER AR.QUERY.SORT.VALUE AR.QUERY.OR AR.QUERY.COMBINE.RESULT) (FNS AR.QUERY.IS AR.QUERY.IS.EXACTLY AR.QUERY.COMPARE.ENUMERATED AR.QUERY.IS.EMPTY) (FNS AR.QUERY.HAS AR.COLLECT.SHAPES AR.COLLECT.SIZES AR.SPARSE.QUERYP AR.INDICES.FROM.FILEPTRS) (FNS AR.QUERY.COMPARE AR.QUERY.COMPARE.PARSE AR.QUERY.NUMBER AR.QUERY.PRODUCE.INDEXES AR.COLLECT.N AR.INDEX.FROM.NUMBER) (FNS AR.QUERY.DATE AR.QUERY.GENERAL.DATE AR.QUERY.PARSE.DATES AR.INDEX.FROM.DATE AR.DATE.FROM.INDEX) (FNS AR.NUMS.FROM.QUERY AR.ENTRY.PTR.FROM.INDEX AR.ENTRY.VALUE.FROM.INDEX AR.ENTRY.VALUE.NEXT AR.SELECT.WINDOW)) (COMS (* ; "Patch for nasty bug in \INCFILEPTR") (FNS AR.INCFILEPTR) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (AND ( CCODEP (QUOTE AR.INCFILEPTR) (MOVD (QUOTE AR.INCFILEPTR) (QUOTE \PAGED.INCFILEPTR) NIL T)))))) (COMS ( * ;; "Set up file names. We use VARS on AR.INDEX.DEFAULT.FILE.NAME to force it correct in the case where the index is moving. If user has set it to some disk file for manual caching, make that the cache name" ) (INITVARS (AR.INDEX.CACHE.FILE.NAME (AND (BOUNDP (QUOTE AR.INDEX.DEFAULT.FILE.NAME)) (STRPOS "DSK" ( UNPACKFILENAME.STRING AR.INDEX.DEFAULT.FILE.NAME (QUOTE HOST)) NIL NIL T NIL UPPERCASEARRAY) AR.INDEX.DEFAULT.FILE.NAME)) (AR.ALWAYS.CACHE.INDEX :ASK)) (VARS (AR.INDEX.DEFAULT.FILE.NAME "{AR:MV:Envos}AR.INDEX"))) (VARS (AR.QFORM.TITLEMENU) AR.QFORM.FORMAT AR.QFORM.SPECS AR.QFORM.ICON AR.COMPARISON.OPERATORS) (INITVARS (AR.BROWSER.MENU.ITEMS (QUOTE (("Display" AR.BROWSER.DISPLAY "Display selected AR in a readonly window") ("Edit" AR.BROWSER.EDIT "Edit selected AR in an AREdit window (uses same window as last time unless you select with middle button).") ("Hardcopy AR(s)" AR.BROWSER.HARDCOPY "Make hardcopy of the complete content of the selected AR(s)")))) ( AR.QUERY.MENU.ITEMS (QUOTE (("Query" (AR.QFORM.QUERY) "Search the AR database for ARs matching the Query List") ("Sort" AR.QFORM.SORT "Sort the ARs in the browser window using the new Sort List") ("Hardcopy Summary" AR.QFORM.SUMMARY "Print to your default printer a summary of the ARs displayed in the browser" (SUBITEMS ( "Text Summary" AR.QFORM.SUMMARY.TEXT "Make a plain text version of the summary on a file") ( "TEdit Summary" AR.QFORM.SUMMARY.TEDIT "Edit (using TEdit) a plain text version of the summary")))))) (AR.WHENSELECTEDSHADE 4672) (AR.DISPLAY.FIELDS (QUOTE ((Status%: 5) (Subject%: 50) (Attn%: 15) ( System%: 13) (Subsystem%: 13)))) (AR.SUMMARY.FIELDS (QUOTE ((Date%: 9 T) (System%: 13 T) (Subsystem%: 14) (Status%: 10 T) (Attn%: 13) (Subject%: 55) (Priority%: 10) (Difficulty%: 10) (Impact%: 8) ( |Problem Type:| 13)))) (AR.TEDIT.FIELDS) (AR.SUMMARY.MIN.LINES 2) (AR.CLEANUP.SORT.ORDER (QUOTE ( System%: Subsystem%: Status%: Priority%: Impact%:))) (AR.SORT.EQUIVALENTS (QUOTE ((Status%: (Open Open/Unreleased)))))) (ADDVARS (AR.SORT.SPEC.ITEMS ("Standard Summary Order" (FUNCTION (LAMBDA NIL AR.CLEANUP.SORT.ORDER)) "Sort order used by AR Cleanup when producing personal summaries.")) ( AR.QUERY.SPEC.ITEMS ("Status is UnFixed" "(OR (Status: >= Open/Unreleased) (Status: = Incomplete))" "AR is somehow Open, i.e., not Fixed, Declined or Obsoleted") ("Status is Resolved" "(AND (Status: >= Obsolete) (Status: <= Fixed)" "AR has been taken care of--Fixed, Declined, etc.") ( "Mandatory" "(AND (Status: >= Open/Unreleased) (Priority: = Absolutely) (Problem%% Type: ~= Feature))" "Non-Feature AR has priority Absolutely and is still open somehow"))) (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS AR.INDEX.DATA ARQUERYDATA ARINDEXDESCR) (GLOBALVARS AR.QFORM.ICON AR.BROWSER.MENU.ITEMS AR.QUERY.MENU.ITEMS AR.COMPARISON.OPERATORS AR.QFORM.TITLEMENU) (LOCALVARS . T) (FUNCTIONS WITH.AR.QUERY ARSPECGET) (P (CL:PROCLAIM (CONS (QUOTE CL:SPECIAL) (RECORDFIELDNAMES (QUOTE AR.INDEX.DATA)))) (CASE DFNFLG ((PROP ALLPROP) (* ; "When I load this file PROP, need to get these defs evaled, grumble") (LET ((DFNFLG T)) (MAPC (QUOTE ( WITH.AR.QUERY ARSPECGET)) (FUNCTION (LAMBDA (FN) (CL:EVAL (GETDEF FN (QUOTE FUNCTIONS) NIL (QUOTE ( NOERROR)))))))))) (* ; "These aren't ours, but declare them to reduce the warnings from compiler & masterscope") (CL:PROCLAIM (QUOTE (CL:SPECIAL DEFAULTFONT DEFAULTLANDPAGEREGION)))) (CONSTANTS (AR.BYTES.PER.PTR 4)) (FILES ( SOURCE) TABLEBROWSERDECLS)) (DECLARE%: EVAL@COMPILE DOCOPY (P (CL:PROCLAIM (QUOTE (CL:SPECIAL AR.INDEX.DEFAULT.FILE.NAME AR.INDEX.CACHE.FILE.NAME AR.ALWAYS.CACHE.INDEX AR.QFORM.SPECS AR.QFORM.FORMAT AR.WHENSELECTEDSHADE AR.DISPLAY.FIELDS AR.SUMMARY.MIN.LINES AR.SUMMARY.FIELDS AR.TEDIT.FIELDS AR.QUERY.SPEC.ITEMS AR.SORT.SPEC.ITEMS AR.SORT.EQUIVALENTS))))))) (AND (CCODEP (QUOTE AR.INCFILEPTR) (MOVD (QUOTE AR.INCFILEPTR) (QUOTE \PAGED.INCFILEPTR) NIL T))) (RPAQ? AR.INDEX.CACHE.FILE.NAME (AND (BOUNDP (QUOTE AR.INDEX.DEFAULT.FILE.NAME)) (STRPOS "DSK" ( UNPACKFILENAME.STRING AR.INDEX.DEFAULT.FILE.NAME (QUOTE HOST)) NIL NIL T NIL UPPERCASEARRAY) AR.INDEX.DEFAULT.FILE.NAME)) (RPAQ? AR.ALWAYS.CACHE.INDEX :ASK) (RPAQ AR.INDEX.DEFAULT.FILE.NAME "{AR:MV:Envos}AR.INDEX") (RPAQQ AR.QFORM.TITLEMENU NIL) (RPAQQ AR.QFORM.FORMAT (|Query List:| CR |Sort List:| CR)) (RPAQQ AR.QFORM.SPECS ((|Query List:| FIELDTYPE STRING FN AR.QFORM.PROMPT.LIST.FN) (|Sort List:| FIELDTYPE STRING FN AR.QFORM.PROMPT.LIST.FN) (Query FIELDTYPE BUTTON FN AR.QFORM.BUTTONFN FONT ARBUTTONFONT) (|Print File:| FIELDTYPE STRING) (Print FIELDTYPE BUTTON FN AR.QFORM.BUTTONFN FONT ARBUTTONFONT) (|Update List:| FIELDTYPE STRING) (Update FIELDTYPE BUTTON FN AR.QFORM.BUTTONFN FONT ARBUTTONFONT) (|Print Index Stats| FIELDTYPE BUTTON FN AR.QFORM.BUTTONFN FONT ARBUTTONFONT) (Debug FIELDTYPE BUTTON FN AR.QFORM.BUTTONFN FONT ARBUTTONFONT))) (RPAQQ AR.QFORM.ICON #*(60 110)OOOOOOOOOOOOOOO@OOOOOOOOOOOOOOO@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@EMML@@@@@C@L@@@@GGGF@@@@@C@L@@@AMMMML@@@@C@L@@@CGGGGF@@@@C@L@@@MMMMMM@@@@C@L@@AGGGGGG@@@@C@L@@AMMMMMMH@@@C@L@@CGGGGGG@@@@C@L@@AMMMMMML@@@C@L@@CGGGGGGF@@@C@L@@AMMHAMML@@@C@L@@CGF@AGGF@@@C@L@@AML@@MML@@@C@L@@CGD@@GGF@@@C@L@@AML@@EML@@@C@L@@CGF@@GGF@@@C@L@@AML@@EML@@@C@L@@CGF@@GGD@@@C@L@@AML@@MML@@@C@L@@@GD@AGGD@@@C@L@@@EH@AMMH@@@C@L@@@@@@GGG@@@@C@L@@@@@AMMM@@@@C@L@@@@@CGGF@@@@C@L@@@@@EMML@@@@C@L@@@@@GGG@@@@@C@L@@@@@EMM@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@EML@@@@@C@L@@@@@GGD@@@@@C@L@@@@@AMH@@@@@C@L@@@@@AG@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@GO@@@@@@C@L@@@@@OGH@@@@@C@L@@@@@MML@@@@@C@L@@CH@OGF@@@@@C@L@@OL@MMN@CN@@C@L@ALL@OGF@CO@@C@L@GHN@MMN@GCH@C@L@N@F@OGF@FAL@C@LCH@F@MMN@F@G@C@LC@@BCOOO@L@CHC@L@@@CGOOOIL@ALC@L@@@CO@@CMH@@NC@L@@@CL@@@O@@@FC@L@@@CH@@@G@@@@C@L@@@O@@@@CH@@@C@L@@@LCOCO@L@@@C@L@@@LGOCOHN@@@C@L@GAHNCCALF@@@C@L@GMHLCC@LF@@@C@L@MOHLCC@LGOL@C@LAHC@LCC@LCON@C@LAHC@LCC@LC@N@C@LC@C@OOCOLC@C@C@LC@C@OOCOLC@C@C@LF@C@LCCG@C@AHC@LF@C@LCCCHC@AHC@LF@C@LCCALC@@LC@LF@CHLCC@LF@@NC@L@@AHLCC@LF@@FC@L@@AHLCC@LF@@FC@L@@@LLCC@LL@@@C@L@AOLLCC@LON@@C@L@AOLLCC@LON@@C@L@AHN@CC@ALF@@C@L@AHF@CC@AHC@@C@L@CHF@CC@AHC@@C@L@C@C@CC@C@AH@C@L@C@CHCC@G@AH@C@L@C@AHCC@F@AH@C@L@B@@N@@AN@AL@C@L@F@@G@@CL@@L@C@L@F@@CNCOH@@N@C@L@N@@AOON@@@F@C@L@L@@@CN@@@@C@C@LAH@@@@@@@@@CHC@LAH@@@@@@@@@ALC@LC@@@@@@@@@@ALC@LF@@@@@@@@@@@NC@LF@@@@@@@@@@@FC@L@@@@@@@@@@@@BC@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@L@@@@@@@@@@@@@C@OOOOOOOOOOOOOOO@OOOOOOOOOOOOOOO@ ) (RPAQQ AR.COMPARISON.OPERATORS (> >= < <= = ~= btwn)) (RPAQ? AR.BROWSER.MENU.ITEMS (QUOTE (("Display" AR.BROWSER.DISPLAY "Display selected AR in a readonly window") ("Edit" AR.BROWSER.EDIT "Edit selected AR in an AREdit window (uses same window as last time unless you select with middle button).") ("Hardcopy AR(s)" AR.BROWSER.HARDCOPY "Make hardcopy of the complete content of the selected AR(s)")))) (RPAQ? AR.QUERY.MENU.ITEMS (QUOTE (("Query" (AR.QFORM.QUERY) "Search the AR database for ARs matching the Query List") ("Sort" AR.QFORM.SORT "Sort the ARs in the browser window using the new Sort List") ("Hardcopy Summary" AR.QFORM.SUMMARY "Print to your default printer a summary of the ARs displayed in the browser" (SUBITEMS ( "Text Summary" AR.QFORM.SUMMARY.TEXT "Make a plain text version of the summary on a file") ( "TEdit Summary" AR.QFORM.SUMMARY.TEDIT "Edit (using TEdit) a plain text version of the summary")))))) (RPAQ? AR.WHENSELECTEDSHADE 4672) (RPAQ? AR.DISPLAY.FIELDS (QUOTE ((Status%: 5) (Subject%: 50) (Attn%: 15) (System%: 13) (Subsystem%: 13 )))) (RPAQ? AR.SUMMARY.FIELDS (QUOTE ((Date%: 9 T) (System%: 13 T) (Subsystem%: 14) (Status%: 10 T) (Attn%: 13) (Subject%: 55) (Priority%: 10) (Difficulty%: 10) (Impact%: 8) (|Problem Type:| 13)))) (RPAQ? AR.TEDIT.FIELDS) (RPAQ? AR.SUMMARY.MIN.LINES 2) (RPAQ? AR.CLEANUP.SORT.ORDER (QUOTE (System%: Subsystem%: Status%: Priority%: Impact%:))) (RPAQ? AR.SORT.EQUIVALENTS (QUOTE ((Status%: (Open Open/Unreleased))))) (ADDTOVAR AR.SORT.SPEC.ITEMS ("Standard Summary Order" (FUNCTION (LAMBDA NIL AR.CLEANUP.SORT.ORDER)) "Sort order used by AR Cleanup when producing personal summaries.")) (ADDTOVAR AR.QUERY.SPEC.ITEMS ("Status is UnFixed" "(OR (Status: >= Open/Unreleased) (Status: = Incomplete))" "AR is somehow Open, i.e., not Fixed, Declined or Obsoleted") ("Status is Resolved" "(AND (Status: >= Obsolete) (Status: <= Fixed)" "AR has been taken care of--Fixed, Declined, etc.") ( "Mandatory" "(AND (Status: >= Open/Unreleased) (Priority: = Absolutely) (Problem%% Type: ~= Feature))" "Non-Feature AR has priority Absolutely and is still open somehow")) (CL:PROCLAIM (QUOTE (CL:SPECIAL AR.INDEX.DEFAULT.FILE.NAME AR.INDEX.CACHE.FILE.NAME AR.ALWAYS.CACHE.INDEX AR.QFORM.SPECS AR.QFORM.FORMAT AR.WHENSELECTEDSHADE AR.DISPLAY.FIELDS AR.SUMMARY.MIN.LINES AR.SUMMARY.FIELDS AR.TEDIT.FIELDS AR.QUERY.SPEC.ITEMS AR.SORT.SPEC.ITEMS AR.SORT.EQUIVALENTS))) (PUTPROPS ARQUERY COPYRIGHT ("Venue & Xerox Corporation" 1988 1989 1990)) NIL