DICF1 ;SEA/TOAD,SF/TKW-VA FileMan: Finder, Part 2 (Transform) ;1SEP2014
Source file <DICF1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| XFORM(DIFLAGS,DIVALUE,DISCREEN,DINDEX) | ;
; FIND--produce array of values and screens by transforming input ; subroutine, DIVALUE, DINDEX, & DISCREEN passed by reference |
|
| VALUES | ; Alternate Lookup Values
|
|
| LOWER | ; 2. Add Upper-case Lookup Value to Array, If Needed
|
|
| CHK | ; 3. Skip Remaining Transforms for Most Data Types
|
|
| COMMA | ; 4. Add Comma-piece Lookup Value to Arrays, If Needed
|
|
| 21 | ||
| 22 | ||
| 23 | ||
| 24 | ||
| LONG | ; 5. Add Long Lookup Value to Arrays, If Needed
|
|
| DIREF | ||
| L10 | ||
| SPECIAL(DIFILE,DIEN,DIFIEN,DIFLAGS,DIVALUE,DINDEX,DISCREEN,DIDENT,DIOUT,DILIST) | ;
; Process space-bar return, 'IEN or DIVALUE equal to an IEN. |
|
| 11 | ; 1. Handle Space Lookup Value (Space-bar Recall)
|
|
| 12 | ; Handle Accent-grave Lookup Value
|
|
| 13 | ; Handle Pure Numeric Lookup Value (Possible IEN)
|
|
| ENTRY | ; Execute screens, and if entry passes, do ACCEPT to add it to output.
|
|
| BACKFROM(DIVALUE,DINDEX) | ; create From values for backward collation
|
|
| EOR | ; end of routine DICF1
|
