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

Package: VA FileMan

Routine: DIV


Information

DIV ;SFISC/GFT - VERIFY FLDS ;5DEC2016

Source Information

Source file <DIV.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 6 YX^%DTC  ^DIC  ^DIR  (EN,HDR,LF,Q)^DIVR  ^DIVR1  (DIBT,IJ)^DIVU  
Kernel 2 ^%ZIS  ^%ZTLOAD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
VA FileMan 3 DIU  DIVR  DIVR1  
Lab Service 1 LRARVER  

Entry Points

Name Comments DBIA/ICR reference
ALLFLDS(A,DIVRTYPE)
ALL
DEVSEL ;Prompt for device
H
ENQUEUE ;Entry point for queued reports
DIC
Q
ALLPOINT ;
INIT ;Get header info and print first header
DIVROUT
VER(DIVRFILE,DIVRREC,DIVRDR,DIVROUT) ;
  • ICR #1618
    • Status: Active
    • Usage: Private
    NEXTLVL ;
    X

    External References

    Name Field # of Occurrence
    YX^%DTC INIT+4
    ^%ZIS DEVSEL+4, DEVSEL+18
    ^%ZTLOAD DEVSEL+14
    ^DIC DIC+4
    ^DIR ALL+2
    EN^DIVR DIC+8, ALLFLDS+5, ENQUEUE+7, ENQUEUE+8
    HDR^DIVR INIT+13
    LF^DIVR ALLFLDS+4
    Q^DIVR DIC+3, ENQUEUE+6
    ^DIVR1 VER+5
    DIBT^DIVU DIVROUT+3
    IJ^DIVU NEXTLVL+2

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $C(7)," NO ENTRIES ON FILE!"
    • Line Location: DIV+11
    Function Call: READ
    • Timeout: DTIME
    • Variable: X
    • Line Location: DIC+2
    Function Call: WRITE
    • Prompt: !,"VERIFY WHICH "_$P(^DD(A,0),U)_": "
    • Line Location: DIC+2
    Function Call: WRITE
    • Prompt: !!?5,"YES means that every field at this level in the file will"
    • Line Location: H+0
    Function Call: WRITE
    • Prompt: !?5,"be checked to see if it conforms to the input transform."
    • Line Location: H+1
    Function Call: WRITE
    • Prompt: !!?5,"NO means that ALL will be used to lookup a field in the"
    • Line Location: H+2
    Function Call: WRITE
    • Prompt: !?5,"file which begins with the letters ALL, e.g., ALLERGIES."
    • Line Location: H+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: DEVSEL+4
    Function Call: WRITE
    • Prompt: !,"Report queued!",!,"Task number: "_$G(ZTSK),!
    • Line Location: DEVSEL+15
    Function Call: WRITE
    • Prompt: !,"Report canceled!",!
    • Line Location: DEVSEL+16
    Routine Call
    • DIC
    • Line Location:
      • DIC+4
    Routine Call
    • DIR
    • Line Location:
      • ALL+2
    Routine Call
    • %ZIS
    • Line Location:
      • DEVSEL+4
      • DEVSEL+18

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZTSK - [#14.4] DEVSEL+3, DEVSEL+6
    ^DD( DIC+2, ALLFLDS, ALLFLDS+1, INIT+8
    ^DIBT - [#.401] DIVROUT+4!, DIVROUT+6*, DIVROUT+7*
    ^DIC - [#1] ALLPOINT+2, INIT+7
    ^TMP("DIVR1" DIVROUT+6, DIVROUT+9, X!
    ^UTILITY("DIVR" DIC+4!

    Label References

    Name Line Occurrences
    ALL DIC+3
    ALLFLDS DIC+3, ALLPOINT+2, NEXTLVL+3, ENQUEUE+6
    DEVSEL DIC+3, DIC+7, ALLPOINT+1
    DIC DIC+5, DIC+6
    INIT DIC+3, DIC+7, ALLPOINT+2, ENQUEUE+5
    NEXTLVL ALLFLDS+1
    Q DIC+3, DIC+7
    X DIVROUT, DIVROUT+8

    Naked Globals

    Name Field # of Occurrence
    ^( ALLFLDS
    ^("NM" INIT+8
    ^(0 DIV+11, INIT+7

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % INIT+1~, DEVSEL+9~, DEVSEL+11*, DEVSEL+12*, DEVSEL+13*
    %H INIT+1~, INIT+4*
    %ZIS DEVSEL+2~, DEVSEL+3*
    A DIC, DIC+2, DIC+3, DIC+6*, DIC+8, ALLPOINT+1~, ALLPOINT+2*, ALLFLDS~, ALLFLDS+5, NEXTLVL+1~
    , NEXTLVL+2*, NEXTLVL+3, INIT+7, INIT+8, DEVSEL+2~, DEVSEL+8, DEVSEL+10, ENQUEUE+1*, ENQUEUE+6, ENQUEUE+7
    , ENQUEUE+8
    COUNT DIVROUT+2~, DIVROUT+5*, DIVROUT+6*, DIVROUT+7
    DA NEXTLVL+1~, ENQUEUE+7
    DE NEXTLVL+1~
    >> DIC DIC*
    >> DIC("S" DIC+1*
    >> DIC("W" DIC*
    >> DIC(0 DIC*
    DIR Q!, ALL+2!
    DIR("??" ALL*
    DIR("A" ALL+1*
    DIR(0 ALL*
    DIRUT DIC+3, Q!, ALLPOINT+1~, ALLPOINT+2, ALLFLDS, INIT+2!
    >> DIU DIV+10
    DIUTIL DIV+8~*
    DIVA DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVDAT DIV+8~, INIT+5*
    DIVFIL DIV+8~, INIT+7*, INIT+8*, INIT+9*
    DIVI DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVJ DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVMODE DIV+8~, DIC+3*, DEVSEL+12, DEVSEL+13, ENQUEUE+6, ENQUEUE+7
    DIVPG DIV+8~
    DIVRDR VER~
    >> DIVRFI0 DIVROUT+3
    DIVRFILE VER~
    DIVROUT VER~, DIVROUT, DIVROUT+1, DIVROUT+3, DIVROUT+9
    DIVRREC VER~
    DIVRTYPE ALLFLDS~, ALLFLDS+2, NEXTLVL+3
    DIVT DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVV DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVY DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVZ DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DQI DIC+3, DIC+4!, ALLFLDS*, NEXTLVL+1~*
    DR DIC+6*, ALLFLDS*, ALLFLDS+1, ALLFLDS+2, ALLFLDS+3, NEXTLVL+2~
    DT DIVROUT+7
    DTIME DIC+2
    I NEXTLVL+1~, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    I( DIC+6*
    I(0 DIV+10*
    IO INIT+11
    IO("Q" DEVSEL+6
    IOF INIT+12
    >> IOP DEVSEL+18*
    IOSL ALLFLDS+4
    IOST INIT+12
    J DIV+9!, NEXTLVL+1~, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    J( DIC+6*
    N Q!
    P DIV+10*, DIC+6*, Q!, NEXTLVL+1~, NEXTLVL+2*
    POP DIV+8~, DIC+3, DIC+7, ALLPOINT+1, DEVSEL+1, DEVSEL+6*
    >> Q ENQUEUE+3*
    >> S ENQUEUE+3*
    T DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    U DIC+2, DIC+6, ALLFLDS, ALLFLDS+1, DIVROUT+7, INIT+7
    V DIV+10*, DIC+6*, NEXTLVL+1~, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    X DIC+2*, DIC+3, DIC+5, ALL+2*, INIT+1~, DEVSEL+2~
    Y DIC+3, DIC+5, DIC+6, DIC+8, ALLFLDS*, ALLFLDS+5, NEXTLVL+2~, DIVROUT+2~, DIVROUT+3, DIVROUT+4
    , DIVROUT+6, DIVROUT+7, INIT+1~, INIT+5, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*, ENQUEUE+8
    Y(0 DIC+6, ALLFLDS*
    Z DIVROUT+2~, DIVROUT+5*, DIVROUT+6*, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    >> ZTDESC DEVSEL+8*
    >> ZTRTN DEVSEL+7*
    >> ZTSAVE( DEVSEL+11*, DEVSEL+12*, DEVSEL+13*
    ZTSK DEVSEL+15, DEVSEL+17!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All