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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DIOZ

Package: VA FileMan

Routine: DIOZ


Information

DIOZ ;SFISC/TKW - COMPILED SORT TEMPLATE ;30NOV2012

Source Information

Source file <DIOZ.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 6 (NOW,YX)^%DTC  ($$EZBLD,BLD,MSG)^DIALOG  ^DIC  $$NXTNO^DICLIB  OS^DII  ^DIR  

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: 4

Package Total Caller Graph
VA FileMan 4 DI SORT COMPILE  DIO  DIO2  DIO4  

Entry Points

Name Comments DBIA/ICR reference
ENCU ;MARK A SORT TEMPLATE FOR ROUTINE COMPILATION
EN1
DIC
ENC ;CREATE COMPILED SORT ROUTINE
; NB: next 2 lines same in EN. Need to make shared.
NEW
NXTNO(DRN) ; GET NEXT AVAILABLE ROUTINE NUMBER
N1
N2
N3
ENRLS(DRN) ; MAKE ROUTINE NUMBER AVAILABLE FOR REUSE & DELETE ROUTINE
R
R1
QSV
QER
TXT ;;

External References

Name Field # of Occurrence
NOW^%DTC NEW+1
YX^%DTC NEW+1
$$EZBLD^DIALOG ENCU+1, EN1+7, EN1+12
BLD^DIALOG EN1+3, EN1+7, EN1+8, EN1+12, EN1+13, ENC+3, ENC+4, N2
MSG^DIALOG QER+1
^DIC DIC+2
$$NXTNO^DICLIB N2
OS^DII EN1+2, ENC+2
^DIR EN1+8, EN1+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),$$EZBLD^DIALOG(101)
  • Line Location: ENCU+1
Function Call: WRITE
  • Prompt: !!,$C(7),DIR("?",2),!,DIR("?")
  • Line Location: EN1+15
Routine Call
  • DIALOG
  • Line Location:
    • ENCU+1
    • EN1+7
    • EN1+12
Routine Call
  • DIALOG
  • Line Location:
    • EN1+3
    • EN1+7
    • EN1+8
    • EN1+12
    • EN1+13
    • ENC+3
    • ENC+4
    • N2
Routine Call
  • DIALOG
  • Line Location:
    • QER+1
Routine Call
  • DIC
  • Line Location:
    • DIC+2
Routine Call
  • DIR
  • Line Location:
    • EN1+8
    • EN1+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("OS" - [#.7] EN1+3, ENC+3, ENC+9, R1+1
^DI( N1N3N3+1*!, R, R1*!
^DIBT - [#.401] EN1+6, EN1+9*, EN1+14!, NEW+3
^DIC(3 NEW+3
^TMP("DIBTC" ENC+4, ENC+7, ENC+10!
^UTILITY($J ENC+7*, ENC+8*, NEW+2!, NEW+3*, NEW+4*
^VA(200 - [#200] NEW+3

Label References

Name Line Occurrences
DIC EN1+4
ENRLS QSV
N1 N1
N2 N2+1
N3 N1N2+1
NEW ENC+6
NXTNO NEW
QSV EN1+3, ENC+3, ENC+4, ENC+6
R R1+2
R1 ENRLS+1

Naked Globals

Name Field # of Occurrence
^( ENC+7
^("ROUOLD" EN1+9*
^(0 NEW+3, R1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ENC+5~
%H ENC+5~
%I ENC+5~
DDH EN1~
>> DIBT1 NEW+3
DIBTPGM ENC+9, NEW*, NEW+3, QSV!
DIC EN1~, DIC*
DIC("S" DIC+1*
DIC("W" DIC*
DIC(0 DIC*
DICLEAN ENRLS+1~*, R1+2
>> DIERR ENC+6, NEWQER+1*
DILOCK NXTNO+1~, N1*, N2*, N2+1, N3*
DIOZ EN1~, EN1+4*, EN1+9, EN1+14
>> DIQUIET QER
DIR EN1~, ENC+5~
DIR("?" EN1+10, EN1+15
DIR("B" EN1+8*, EN1+13*
DIR(0 EN1+5*
DIROUT EN1~, ENC+5~
DIRUT EN1~, ENC+5~
>> DISYS EN1+2, EN1+3, ENC+2, ENC+3, ENC+9, R1+1
>> DP NEW+3
DRN ENC+5~, NEW, NXTNO~, NXTNO+1*, N1*, N2*, N3N3+1, ENRLS~, ENRLS+1*
, R*, R1R1+1, QSV
DTOUT EN1~, ENC+5~
DUOUT EN1~, ENC+5~
DUZ NEW+3
DUZ(0 ENCU+1
I ENC+5~, ENC+7*, ENC+8*
J ENC+5~, ENC+7*
K ENC+5~, ENC+7*, ENC+8*
U ENC+9, NEW+3, R1
X EN1~, EN1+12, ENC+5~, ENC+7*, ENC+8*, ENC+9*, ENRLS+1~, R1+1*
X(1 EN1+12*
X(2 EN1+12*
Y EN1~, EN1+4, EN1+6, EN1+8, EN1+13, ENC+5~, NEW+3

Marked Items

Name Field # of Occurrence
$T(DIOZ+1 NEW+4
$T(TXT+I ENC+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All