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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SDAMU

Package: Scheduling

Routine: SDAMU


Information

SDAMU ;ALB/MJK - AM Utilities ; 12/1/91

Source Information

Source file <SDAMU.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 1 EN^XQOR  
List Manager 1 PAUSE^VALM1  
Scheduling 1 $$STATUS^SDAM1  
VA FileMan 1 NOW^%DTC  

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

Package Total Caller Graph
Scheduling 17 SCRPW16  SDAL  SDAM RT MAS-CHART-PROFILE  SDAM RT MAS-CHART-REQUEST  SDAM RT MAS-FILL-NEXT  SDAM RT MAS-RE-CHARGE  SDAMOC  SDAMOS  
SDAMQ  SDAMQ2  SDAMQ3  SDAPICO  SDCO2  SDCO3  SDCO4  SDCOM  
SDMHAP  
PCE Patient Care Encounter 2 PXBAPI21  PXUTLSCC  
Automated Information Collection System 1 IBDFDE0  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
SWITCH() ; -- date of ci switch over
NOW() ; -- return current date and time (NOW)
BARC(TTYPE,ON,OFF) ; -- barcode on/off
CURRENT ; -- computed field (2.98,100)
  • ICR #1580
    • Status: Retired
    • Usage: Controlled Subscription
    CLINIC(SDCL) ; -- generic screen for hos. loc. entries
    ; input: SDCL := ifn of HOSPITAL LOCATION file
    ; returned := [ 0 | do not use entry ; 1 | use entry ]
  • ICR #1580
    • Status: Retired
    • Usage: Controlled Subscription
    DIV(SDCL,VAUTD,SDNAME,SDLEN) ; -- find division for clinic
    ; input: SDCL := clinic ifn
    ; VAUTD := array defined by VAUTOMA
    ; SDLEN := length of name to pass back [optional]
    ; output: SDNAME := name of division
    ; return: := division ifn
    RT(SDRTOPT) ; -- rt call for newing and return to LM

    External References

    Name Field # of Occurrence
    NOW^%DTC NOW+1
    $$STATUS^SDAM1 CURRENT+1
    PAUSE^VALM1 RT+6
    EN^XQOR RT+4

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZIS(2 - [#3.2] BARC+1
    ^DG(40.8 - [#40.8] DIV+9, DIV+10
    ^DG(43 - [#43] DIV+9
    ^DIC(19 - [#19] RT+2
    ^DIC(195.4 - [#195.4] RT+3
    ^DPT - [#2] CURRENT+1
    ^SC - [#44] CLINIC+5, DIV+9

    Naked Globals

    Name Field # of Occurrence
    ^("BAR0" BARC+1
    ^("BAR1" BARC+1
    ^("OOS" CLINIC+5
    ^(0 CURRENT+1, DIV+10

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % NOW+2
    >> D0 CURRENT+1
    >> D1 CURRENT+1
    DFN RT+1~
    OFF BARC~, BARC+1*, BARC+2
    ON BARC~, BARC+1*, BARC+2
    R RT+1~
    RTDIV RT+1~
    RTE RT+1~
    RTJR RT+1~
    RTPGM RT+1~
    RTY RT+1~
    SDCL CLINIC~, CLINIC+5, DIV~, DIV+9
    SDLEN DIV~, DIV+8~*, DIV+10
    SDNAME DIV~, DIV+10*
    SDRTOPT RT~, RT+2
    TTYPE BARC~, BARC+1
    U DIV+9, DIV+10, RT+6
    VAUTD DIV~, DIV+11
    VAUTD( DIV+11
    X CURRENT+1*, CLINIC+5~*, CLINIC+6, DIV+7~, DIV+9*, DIV+10, DIV+11, RT+1~, RT+2*, RT+3
    , RT+4*
    X("OOS" CLINIC+5*, CLINIC+6
    >> XQORNOD(0 RT+6
    Y RT+1~
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All