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 |  All
Print Page as PDF
Routine: DIKZ

Package: VA Fileman

Routine: DIKZ


Information

DIKZ ;SFISC/XAK-XREF COMPILER ;19JAN2010

Source Information

Source file <DIKZ.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA Fileman 13 ($$EZBLD,BLD,MSG)^DIALOG  ^DIC  WAIT^DICD  DT^DICRW  (CALLOUT,INIZE)^DIEFU  DELETROU^DIEZ  OS^DII  LOADALL^DIKC1  
^DIKZ0  ^DIKZ1  (RNM,SIZ)^DIPZ0  ^DIR  A^DIU21  

Caller Graph

Caller Graph Total: 38

Package Total Caller Graph
VA Fileman 12 DI DD COMPILE  DICD  DICE0  DIFROMS2  DIKCUTL3  DIKD  DIKZ0  DIKZ1  
DIPKINIT  DIPOS140  DIU20  DIU21  
PCC New Encounter Form 4 VEN8INIT  VENKINIT  VENLINIT  VENMINIT  
Automated Information Collection System 2 IBDEINIT  IBDFUTI  
IHS RPMS CHR System 2 BCH1INIT  BCH2INIT  
Inpatient Medications 2 PSJAINIT  PSJVINIT  
Integrated Billing 2 IBEFUTL1  IBINIT  
Registration 2 DG687PRE  DGUTL1  
Auto Replenishment Ward Stock 1 PSGWINIT  
Commitment Register 1 ACRF14PS  
Dietetics 1 FHINIT  
IHS Support HL7 Interfaces 1 BHLINIT  
IHS VA Support Files 1 AVAPINIT  
IHS VA Utilities 1 XBINIT  
Local Area Programs 1 AZHNINIT  
Pharmacy Data Management 1 PSSPOST  
Problem List 1 GMPLINIT  
Tucson 1 BZSMINIT  
Utilities 1 AUP6INIT  
Utility Tables 1 AUTINIT  

Entry Points

Name Comments DBIA/ICR reference
Q1
RTE ;
EN ;
  • ICR #10025
    • Status: Active
    • Usage: Supported
    SV ; transfer the accumulated code in ^UTILITY($J,#) to ^UTILITY($J,0,#)
    ; (the routine buffer) and call SAVE to flush the buffer into a routine
    ; whenever it's full. Flush the buffer one more time when done.
    Q
    EN1
    EN2(Y,DIKZFLGS,X,DMAX,DIKZRLA,DIKZZMSG) ;Silent or Talking with parameter passing
  • ICR #1056
    • Status: Active
    • Usage: Private
    Q2
    FILE
    NEWR ;
    SAVE ; save the accumulated code in ^UTILITY($J,0,#) as a routine
    EN2E

    External References

    Name Field # of Occurrence
    $$EZBLD^DIALOG DIKZ+3, EN1+1, FILE+2, EN+1, NEWR+2
    BLD^DIALOG EN+1, SAVE+7, EN2+20, EN2+21, EN2+22, EN2+23, EN2+24, EN2+31
    MSG^DIALOG EN2E
    ^DIC FILE
    WAIT^DICD EN+5
    DT^DICRW EN+5
    CALLOUT^DIEFU EN2E+1
    INIZE^DIEFU EN2+19
    DELETROU^DIEZ EN+5
    OS^DII EN1
    LOADALL^DIKC1 EN+11
    ^DIKZ0 EN+17, EN+23
    ^DIKZ1 EN+26
    RNM^DIPZ0 FILE+1
    SIZ^DIPZ0 EN1+3
    ^DIR FILE+2
    A^DIU21 EN+5, Q

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $C(7),$$EZBLD^DIALOG(101)
    • Line Location: DIKZ+3
    Function Call: WRITE
    • Prompt: $C(7),$$EZBLD^DIALOG(820)
    • Line Location: EN1+1
    Routine Call
    • DIALOG
    • Line Location:
      • EN+1
      • SAVE+7
      • EN2+20
      • EN2+21
      • EN2+22
      • EN2+23
      • EN2+24
      • EN2+31
    Routine Call
    • DIALOG
    • Line Location:
      • DIKZ+3
      • EN1+1
      • FILE+2
      • EN+1
      • NEWR+2
    Routine Call
    • DIC
    • Line Location:
      • FILE
    Routine Call
    • DIALOG
    • Line Location:
      • EN2E
    Routine Call
    • DIR
    • Line Location:
      • FILE+2

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( EN+29*, SAVE+8*, RTE+4, EN2+21
    ^DD("OS" - [#.7] EN1+1, SAVE+7
    ^DD("ROU" EN2+26
    ^DIC - [#1] EN+3
    ^TMP("DIKC" EN+10!, EN+11, Q1+2!
    ^UTILITY("DIK" EN+2!
    ^UTILITY($J EN+2!, EN+15*, EN+21*, Q1+1!, SV+4*, SAVE+2*, SAVE+3, SAVE+4*, SAVE+5*, SAVE+6*
    , NEWR+1, NEWR+2!, NEWR+3*

    Label References

    Name Line Occurrences
    EN EN2+29
    EN2E EN2+20, EN2+21, EN2+22, EN2+23, EN2+24, EN2+30
    NEWR EN+15, EN+21, SAVE+8
    Q EN+4, EN+17, EN+23
    Q1 EN1+3, FILE, FILE+1, FILE+2
    Q2 EN+15, EN+21, EN+26
    RTE EN+17, EN+23
    SAVE SV+5, SV+6
    SV RTE+28

    Naked Globals

    Name Field # of Occurrence
    ^( SV+4!, SAVE+3!
    ^("DIK" Q1+1!
    ^("GL" EN+3
    ^(2 NEWR+3*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % Q1!, SV+4*, SAVE+1, SAVE+2, SAVE+3*, NEWR+1
    %H Q1!
    %I EN2+14~
    %X EN1~, EN2+13~
    %Y Q1!
    A EN+14*, EN+20*, Q1!, RTE+28*
    DH EN+3*, EN+5, Q1!, SAVE+8, NEWR+3, RTE+28*
    DH(1 Q, RTE+28
    DIC FILE!*, Q1!, EN2+14~
    DIC(0 FILE*
    DICS EN2+14~
    DIFILENO EN+2~, EN+3*, EN+11, EN+29
    DIFM EN2+17~*
    DIK EN+2~, EN+14*, EN+20*, Q1+1!, EN2+14~
    DIK( RTE+3, RTE+5, RTE+23, RTE+26*
    DIK0 Q1+1!
    DIK1 Q1+1!
    DIK2 EN+3*, EN+4, EN+14, EN+20, Q1+1!
    DIK4 Q1!
    DIK6 Q1+1!
    DIK8 Q1!
    DIKA EN+14*, EN+20*, Q1+1!
    DIKC Q1!
    DIKCT Q1+1!, SAVE+4
    DIKFIL RTE+1~, RTE+3*, RTE+4, RTE+5, RTE+9*, RTE+11, RTE+12, RTE+13, RTE+14, RTE+18*
    , RTE+19, RTE+20, RTE+21, RTE+22, RTE+23, RTE+27!
    DIKGO EN+16*, EN+22*, Q1!
    DIKJ EN1~, EN2+13~
    DIKL2 Q2!, SAVE+8!
    DIKLIST RTE+1~, RTE+8*, RTE+26, RTE+27!
    DIKLIST( RTE+11, RTE+12, RTE+13, RTE+14*, RTE+18, RTE+19*, RTE+20*, RTE+21, RTE+22, RTE+23*
    DIKLW Q2!, SAVE+4, SAVE+5, SAVE+6
    DIKMF EN+9~, EN+11
    DIKP RTE+1~, RTE+10*, RTE+11, RTE+12*, RTE+13, RTE+21*, RTE+22, RTE+23, RTE+27!
    DIKQ Q1!
    DIKR Q1+1!, SV+4*, SAVE+1, SAVE+2, SAVE+3*, SAVE+4, SAVE+5, SAVE+6, NEWR+2*
    DIKRT Q2!, SAVE+6, SAVE+8, NEWR+1, RTE+28*
    DIKSUB RTE+1~, RTE+4*, RTE+5, RTE+8, RTE+13*, RTE+14, RTE+15!, RTE+22*, RTE+23
    DIKSUB( RTE+5*, RTE+9, RTE+14
    DIKVR EN+14*, EN+20*, Q1+1!, SAVE+4
    DIKZDH NEWR+1*, NEWR+3, NEWR+4!
    DIKZFLGS EN2~, EN2+15, EN2+18~
    DIKZMORE SV+5~*, SAVE+8
    DIKZOVFL Q1+1!
    DIKZQ EN+6*, EN+17, EN+23, EN+29, Q, Q1+1!, SAVE+8, NEWR+2*
    DIKZRIEN EN2+13~, EN2+25*, EN2+31
    DIKZRLA SAVE+7, NEWR+2, EN2~, EN2+18~, EN2+25*, EN2+26*, EN2+28
    DIKZRLAF SAVE+7*, NEWR+2*, EN2+13~, EN2+27*, EN2+30, EN2+31
    DIKZRLAZ EN2+13~
    DIKZS EN+1, EN+5, SAVE+7, NEWR+2, EN2+13~, EN2+15*, EN2+16, EN2+18~, EN2+30, EN2E
    DIKZZ Q1+1!
    DIKZZ1 Q1+1!
    DIKZZMSG EN2~, EN2E+1
    DIPZ FILE~*, FILE+3!
    DIQUIET EN2+13~, EN2+16*
    DIR FILE+2!, EN+1, SAVE+7~, EN2+13~
    DIR("A" FILE+2*
    DIR(0 FILE+2*
    DIROUT Q1!
    DIRUT FILE+2, Q1!
    >> DISYS EN1, EN1+1, SAVE+7
    DIXRLIST EN+9~
    DK1 EN2+13~
    DMAX EN1+3*, FILE*, EN+4, EN+6*, Q1+1!, SV+4, NEWR+1, EN2~, EN2+18~, EN2+26*
    DNM FILE+1*, FILE+3, EN+3*, EN+5, EN+16, EN+22, EN+29, Q1!, SV+3, SAVE+4
    , SAVE+5, SAVE+6, SAVE+7, SAVE+8, NEWR+2, NEWR+3, EN2+13~
    DNM(1 SV+3*, SAVE+4
    DRN EN+6*, EN+22, Q1!, SV+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, NEWR+2*, NEWR+3
    DT NEWR+3
    DTIME EN1+2*
    DTOUT EN1+3, FILE+1, Q1!
    DU Q1!
    DUOUT EN1+3, FILE+1, Q1!
    DUZ(0 DIKZ+3
    DV Q1!
    DW Q1!
    DW1 Q1!
    T EN+6*, Q1!, SV+4*, NEWR+1, NEWR+2*
    U EN1+2*, SAVE+6
    X EN1+3, FILE, FILE+1, FILE+3*, EN+3, EN+5*, EN+14*, EN+15, EN+20*, EN+21
    , Q*, Q1!, SAVE+7~*, RTE+3, RTE+5, RTE+23, RTE+26, EN2~, EN2+18~, EN2+22
    , EN2+23, EN2+24
    X(1 SAVE+7*
    Y FILE, FILE+2, FILE+3*, EN+1, EN+3, Q1!, EN2~, EN2+18~, EN2+20, EN2+21
    , EN2+25
    Y(1 EN+1*!
    Y(3 EN+1*!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All