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 ;10:06 AM 28 Jun 1999 [ 04/02/2003 8:25 AM ]

Source Information

Source file <DIV.m>

Call Graph

Call Graph Total: 8

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

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
VA Fileman 3 DIU  DIVR  DIVR1  
Lab Service 1 LRARVER  
Local Area Programs 1 AZHLSCFV  

Entry Points

Name Comments DBIA/ICR reference
Q
ALL
DEVSEL ;Prompt for device
H
FLDS
DIC
1
DIVROUT
INIT ;Get header info and print first header
ENQUEUE ;Entry point for queued reports
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
    ^DIVR 1+3, ENQUEUE+7
    HDR^DIVR INIT+13
    LF^DIVR FLDS+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+7
    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: I
    • Line Location: 1+1
    Function Call: WRITE
    • Prompt: W
    • Line Location: 1+1
    Function Call: WRITE
    • Prompt: " ",W
    • Line Location: 1+1
    Function Call: WRITE
    • Prompt: "--",$P(Y(0),U),"--"
    • Line Location: FLDS+3
    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, FLDS, FLDS+1, INIT+8
    ^DIBT( DIVROUT+4!, DIVROUT+6*, DIVROUT+7*
    ^DIC - [#1] INIT+7
    ^TMP("DIVR1" DIVROUT+6, DIVROUT+9, X!
    ^UTILITY("DIVR" DIC+4!

    Label References

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

    Naked Globals

    Name Field # of Occurrence
    ^( FLDS
    ^("NM" INIT+8
    ^(0 DIV+7, 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+2, DIC+6*, FLDS, NEXTLVL+1~, NEXTLVL+2*, INIT+7, INIT+8, DEVSEL+2~, DEVSEL+8, DEVSEL+10
    , ENQUEUE+1*
    C Q!
    COUNT DIVROUT+2~, DIVROUT+5*, DIVROUT+6*, DIVROUT+7
    DA 1+2!*, NEXTLVL+1~
    >> DDC 1+2*
    DE NEXTLVL+1~
    >> DIC DIC*
    >> DIC("S" DIC+1*
    >> DIC("W" DIC*
    >> DIC(0 DIC*
    >> DIFLD 1+2*
    DIR Q!, ALL+2!
    DIR("??" ALL*
    DIR("A" ALL+1*
    DIR(0 ALL*
    DIRUT DIC+3, Q!, FLDS, FLDS+3, FLDS+4, INIT+2!
    >> DIU DIV+6
    DIUTIL DIV+4~*
    DIVA DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVDAT DIV+4~, INIT+5*
    DIVFIL DIV+4~, INIT+7*, INIT+8*, INIT+9*
    DIVI FLDS+4~*, DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVJ DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DIVMODE DIV+4~, DIC+3*, DEVSEL+12, DEVSEL+13, ENQUEUE+6, ENQUEUE+7
    DIVPG DIV+4~
    DIVRDR VER~
    >> DIVRFI0 DIVROUT+3
    DIVRFILE VER~
    DIVROUT VER~, DIVROUT, DIVROUT+1, DIVROUT+3, DIVROUT+9
    DIVRREC VER~
    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 1+2*, DEVSEL+9~, DEVSEL+10*, ENQUEUE+1, ENQUEUE+2!
    DQI DIC+3, DIC+4!, FLDS*, NEXTLVL+1~*
    DR DIC+6*, 1, FLDS*, FLDS+1, FLDS+2, FLDS+3, NEXTLVL+2~
    DT DIVROUT+7
    DTIME DIC+2
    I NEXTLVL+1~, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    I( DIC+6*
    I(0 DIV+6*
    IO INIT+11
    IO("Q" DEVSEL+6
    IOF INIT+12
    >> IOP DEVSEL+18*
    IOST INIT+12
    J DIV+5!, NEXTLVL+1~, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    J( DIC+6*
    N Q!
    P DIV+6*, DIC+6*, Q!, NEXTLVL+1~, NEXTLVL+2*
    POP DIV+4~, DIC+3, DIC+7, DEVSEL+1, DEVSEL+6*
    Q DIV+6*, DIC+6, Q!, ENQUEUE+3*
    S DIV+6*, DIC+6, Q!, ENQUEUE+3*
    T 1*, 1+1, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    U DIC+2, DIC+6, 1+2, FLDS, FLDS+1, FLDS+3, DIVROUT+7, INIT+7
    V DIV+6*, DIC+6*, Q!, NEXTLVL+1~, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    >> W 1+1*
    X DIC+2*, DIC+3, DIC+5, ALL+2*, INIT+1~, DEVSEL+2~
    Y DIC+3, DIC+5, DIC+6, 1+2, FLDS*, NEXTLVL+2~, DIVROUT+2~, DIVROUT+3, DIVROUT+4, DIVROUT+6
    , DIVROUT+7, INIT+1~, INIT+5, DEVSEL+2~, DEVSEL+10, ENQUEUE+1*
    Y(0 DIC+6, 1+2, FLDS*, FLDS+3
    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