DICL1 ;SEA/TOAD,SF/TKW-VA FileMan: Lookup: Lister, Part 2 ;10/15/98 14:19
Source file <DICL1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PREP | ; set up subfile's DA array under DIEN, init how many found,
; set max, and init array of last entries returned. |
|
| PTR | ; if 1st indexed field is a pointer or var.ptr., and we're not doing
; a quick list, we build info for the ; pointer chain(s) to the end file(s) and do the search. |
|
| GETLIST | ; build the output list when first subscript not a ptr. or var.ptr.
|
|
| DSPHLP | ; If we're displaying entries for online ^DIC help, display the rest
|
|
| KTMPIX | ; if we've built temporary indexes, we delete them:
|
|
| FINAL | ; cleanup after search.
|
|
| KILLB(DIFILE) | ; Kill temporary "B" index on current file DIFILE or pointed-to files.
|
|
| SETMAP(DIDENT,DILIST) | ; Set map node for unpacked format
|
|
| SETM2 |
