Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DICF1

Package: VA FileMan

Routine: DICF1


Information

DICF1 ;SEA/TOAD,SF/TKW-VA FileMan: Finder, Part 2 (Transform) ;1SEP2014

Source Information

Source file <DICF1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 6 ^%DT  $$OUT^DIALOGU  ($$SCREEN,ACCEPT)^DICL2  $$BACKFROM^DICUIX2  $$CONVQQ^DILIBF  $$ROOT^DIQGU  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
VA FileMan 3 DICF  DICF0  DICF2  

Entry Points

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

External References

Name Field # of Occurrence
^%DT CHK+9
$$OUT^DIALOGU LOWER+3, 24+3, 24+4, 24+5
$$SCREEN^DICL2 ENTRY+2
ACCEPT^DICL2 ENTRY+3
$$BACKFROM^DICUIX2 BACKFROM+19, BACKFROM+27
$$CONVQQ^DILIBF 22+4
$$ROOT^DIQGU 11+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( 13+3, 13+4
^DISV( 11+4

Label References

Name Line Occurrences
ENTRY 11+9, 12+4, 13+8
LONG VALUES+12, CHK+6
VALUES XFORM+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT CHK+8~, CHK+9*
B BACKFROM+19~*, BACKFROM+20, BACKFROM+27~*, BACKFROM+28
DI001 13+3~*, 13+6
DI01FLAG 13+4~*, 13+6
DI0NODE ENTRY+1~*, ENTRY+2, ENTRY+3
DIDENT SPECIAL~, ENTRY+3
DIEN SPECIAL~, 11+7*, 11+8*, 12+3*, 13+7*, 13+9*, ENTRY+1, ENTRY+2, ENTRY+3
>> DIERR 13+9
DIFIEN SPECIAL~, 11+3, ENTRY+2, ENTRY+3
DIFILE SPECIAL~, 11+3, 13+3, 13+4, 13+5, 13+6, ENTRY+1, ENTRY+2, ENTRY+3
DIFILE( 13+5, 13+6, ENTRY+1
DIFLAGS XFORM~, VALUES+12, LOWER+2, CHK+8~, COMMA+2, 21+2, 22+2, 23+4, 24+5, L10+2
L10+3, SPECIAL~, 13+6, ENTRY+2, ENTRY+3
DILIST SPECIAL~, ENTRY+3
DINDEX XFORM~, CHK+8~, SPECIAL~, ENTRY+2, ENTRY+3, BACKFROM~
DINDEX( VALUES+6*, CHK+5, COMMA+4, LONG+2, LONG+5, LONG+11*, LONG+12, LONG+13, LONG+14*
DINDEX("#" XFORM+3, BACKFROM+14
DINDEX("DONE" 13+9
DINODE 11+4~*, 11+5, 11+6, 11+7
DINODEL 11+5~*, 11+6, 11+7
DIOUT 21+6~*, 21+7, 21+11*, 21+12*, SPECIAL~, SPECIAL+2*, 11+2*, 12+2, 12+4*, 13+9*
DIPART1 21+3~*, 21+13
DIPART2 21+4~*, 21+13
DIPART3 21+5~*, 21+13
DIPC2 22+2~, 22+3*, 22+4*, 22+5
DIPIECE 21+7~*, 21+8
DIPIECE1 COMMA+3~*, COMMA+4, COMMA+5, 23+2, 24+3
DIPIECE2 22+2~, 22+3*, 22+4, 22+5, 23+4, 24+5
DIREF LONG+3~, DIREF*, DIREF+1, DIREF+2
DIROOT 11+3~*, 11+4, 11+6
DISCREEN XFORM~, CHK+8~, SPECIAL~, ENTRY+2
DISCREEN( VALUES+9!, 23+3*, 24+4*, LONG+8!*, LONG+16, L10+2*, L10+3*, L10+4*, L10+5*
DISLONG LONG+3~, LONG+15*, LONG+16*, DIREF+1, DIREF+2
DISPART LONG+3~, DIREF+1*, L10+3, L10+5
DISTEMP COMMA+3~*, 21+12, 21+13*, 21+14, 21+15*, 21+16, 22+5*, 23+3, 24+4
DISUB XFORM+3~*, VALUES+4, VALUES+5, VALUES+6, VALUES+8, VALUES+9, VALUES+10, VALUES+11, LOWER+2, LOWER+3
CHK+5, CHK+6, CHK+8~, COMMA+2, COMMA+3, COMMA+4, 21+8, 22+3, 23+2, 23+3
23+4, 24+2, 24+3, 24+4, 24+5, LONG+2, LONG+4, LONG+5, LONG+6, LONG+7
LONG+8, LONG+9, LONG+11, LONG+12, LONG+13, LONG+14, LONG+16, DIREFL10+2, L10+3
L10+4, L10+5, BACKFROM+14~*, BACKFROM+16, BACKFROM+18, BACKFROM+19, BACKFROM+20, BACKFROM+24, BACKFROM+26, BACKFROM+27
, BACKFROM+28
DISXACT LONG+3~, DIREF+2*, L10+2, L10+4
DIVAL BACKFROM+22~*, BACKFROM+23, BACKFROM+24*, BACKFROM+25, BACKFROM+26, BACKFROM+27, BACKFROM+28
DIVALUE XFORM~, CHK+8~, SPECIAL~, 11+2, 12+2, 12+3, 13+2, 13+5, 13+7, BACKFROM~
DIVALUE( VALUES+4*, VALUES+5, VALUES+6, VALUES+8!, VALUES+10*, VALUES+11, LOWER+2, LOWER+3*, CHK+6, CHK+8
COMMA+2, COMMA+3, 21+8, 22+3, 23+2*, 23+4*, 24+2, 24+3*, 24+5*, LONG+2
LONG+4, LONG+6, LONG+7!*, LONG+9*, LONG+11*, LONG+13*, BACKFROM+16, BACKFROM+18, BACKFROM+19, BACKFROM+24
, BACKFROM+26, BACKFROM+27
DIVALUE("BACK" BACKFROM+16*, BACKFROM+20*, BACKFROM+28*
DIVPIECE 21+7~, 21+8*, 21+9, 21+10*, 21+11, 21+12, 21+13
DUZ 11+4
I VALUES+5~*, VALUES+6, VALUES+8*, VALUES+9*, LONG+4*, LONG+6, LONG+7, LONG+8, LONG+9, LONG+10
LONG+11, LONG+13, LONG+16, DIREFL10+2, L10+3, L10+4, L10+5
J LONG+3~, LONG+12*, LONG+13, LONG+14
L LONG+5~*, LONG+6, LONG+9, LONG+12, LONG+14
M LONG+5~, LONG+12*
U 13+4
X CHK+8~*, LONG+3~, LONG+7*, LONG+8*
Y CHK+7~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All