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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SDM

Package: Scheduling

Routine: SDM


Information

SDM ;SF/GFT,ALB/BOK - MAKE AN APPOINTMENT ; 22 Jul 2016 4:33 PM

Source Information

Source file <SDM.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Scheduling 8 $$RESTPT^SCAPMCU4  MAIL^SCMCCON  (,A)^SDCNSLT  (,DT)^SDM0  CS^SDM1A  ^SDM4  I^SDUTL  $$CLNCK^SDUTL2  
Registration 4 EN^DGREGAED  LANGDEL^DGRPE  $$SUB^DGSAUTL  KVAR^VADPT  
VA FileMan 3 ^DIC  YN^DICN  ^DIE  

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

Package Total Caller Graph
Scheduling 8 SD OERR MAKE APPT  SDAM2  SDCO5  SDM  SDM4  SDMM  SDMULT  SDNEXT  
Automated Information Collection System 1 IBDFDE1  
Automated Medical Information Exchange 1 DVBCSCHD  

Entry Points

Name Comments DBIA/ICR reference
EN1
EN
PEND
E
EN2
CHKSO
END
OERR
  • ICR #739
    • Status: Retired
    • Usage: Private
  • ICR #10042
    • Status: Active
    • Usage: Supported
    HELP
    CNAM(SDCL) ;Return clinic name

    External References

    Name Field # of Occurrence
    EN^DGREGAED PEND+25
    LANGDEL^DGRPE PEND+24
    $$SUB^DGSAUTL EN1+16
    ^DIC EN1EN1+11
    YN^DICN PEND+3
    ^DIE PEND+14, PEND+19, PEND+23
    $$RESTPT^SCAPMCU4 EN2+5
    MAIL^SCMCCON EN2+16
    ^SDCNSLT EN2+18
    A^SDCNSLT EN2
    ^SDM0 EN1+11, EN2EN2+19
    DT^SDM0 EN+4, PEND+8, CHKSO+1
    CS^SDM1A EN1+10
    ^SDM4 EN1+14
    I^SDUTL EN1
    $$CLNCK^SDUTL2 EN1+1
    KVAR^VADPT END

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,?5,"Clinic MUST be corrected before continuing."
    • Line Location: EN1+2
    Function Call: WRITE
    • Prompt: !,*7,"Access to ",$$CNAM(+SC)," is prohibited!",!,"Only users with a special code may access this clinic.",*7
    • Line Location: EN1+9
    Function Call: WRITE
    • Prompt: !?10,*7,"PATIENT HAS DIED."
    • Line Location: EN1+13
    Function Call: WRITE
    • Prompt: !?3,*7,VADM(7)
    • Line Location: EN+3
    Function Call: WRITE
    • Prompt: !,"SCHEDULED FOR ADMISSION ON "
    • Line Location: EN+4
    Function Call: WRITE
    • Prompt: !,"DISPLAY PENDING APPOINTMENTS:"
    • Line Location: PEND+2
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: $X>9
    • Line Location: PEND+8
    Function Call: WRITE
    • Prompt: CN,".",?4
    • Line Location: PEND+8
    Function Call: WRITE
    • Prompt: ?23
    • Line Location: PEND+8
    Function Call: WRITE
    • Prompt: ?23
    • Line Location: PEND+8
    Function Call: WRITE
    • Prompt: !,"NOTE - PATIENT IS NOW IN WARD "_SDW
    • Line Location: E+1
    Function Call: WRITE
    • Prompt: !,?5,"Patient has restricted consults due to team assignment(s):"
    • Line Location: EN2+9
    Function Call: WRITE
    • Prompt: !,?10,SCRESTA(SCTM)
    • Line Location: EN2+11
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: $X>9
    • Line Location: CHKSO+1
    Function Call: WRITE
    • Prompt: ?10,"*"
    • Line Location: CHKSO+1
    Function Call: WRITE
    • Prompt: ?32,$S(SDJ=3:"LAB",SDJ=4:"XRAY",1:"EKG")
    • Line Location: CHKSO+1
    Function Call: WRITE
    • Prompt: !,"YES - TO DISPLAY FUTURE APPOINTMENTS",!,"NO - FUTURE APPOINTMENTS NOT DISPLAYED"
    • Line Location: HELP+0
    Routine Call
    • DIC
    • Line Location:
      • EN1
      • EN1+11
    Routine Call
    • DIE
    • Line Location:
      • PEND+14
      • PEND+19
      • PEND+23

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls
    ^SC - [#44] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("XY" PEND+6
    ^DGS(41.1 - [#41.1] EN+4
    ^DPT - [#2] EN1+13, EN+3, PENDPEND+1, PEND+8, PEND+11, PEND+16, PEND+21, PEND+25, E+1
    EN2CHKSOCHKSO+1
    ^SC - [#44] EN1+4, EN1+5, EN1+8, EN1+9, PEND+8, PEND+9, EN2+1, EN2+2, CHKSO+2, CNAM+3
    ^SD(409.1 - [#409.1] CHKSO

    Label References

    Name Line Occurrences
    $$CNAM EN1+9
    CHKSO PEND+8
    EN EN1+17
    END EN1EN1+2, EN1+9, EN1+11, EN1+13, EN1+14, EN1+17, PEND+1
    HELP PEND+1
    PEND HELP
    SDM EN1+2, EN1+9, EN1+11, EN1+13, EN1+14, EN1+17, OERR

    Naked Globals

    Name Field # of Occurrence
    ^( EN1+13, PEND+8, PEND+25, E+1, EN2CHKSO+2
    ^("I" EN1+5
    ^("SDPROT" EN1+9
    ^("SL" EN1
    ^("XY" PEND+6
    ^(0 EN+4, PEND+8, EN2CHKSOCHKSO+1, CHKSO+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % PEND*, PEND+1, PEND+2*, PEND+5, END!
    %DT END!
    >> %Y PEND+4
    A END+2!
    ARG END+1!
    ASKC END!
    CC END+2!
    CCX END+1!
    CCXN END+1!
    CLNIEN END+2!
    CN PEND+7*, PEND+8, PEND+9*, END+2!
    CNIEN PEND+9*, END+2!
    CNPAT PEND+9*, END+2!
    CNSLTLNK END+2!
    CNSULT END+2!
    CNT END+2!
    COLLAT EN1+14, END+1!
    CONS END+2!
    COV PEND+8, CHKSO*, END!
    CPRSTAT END+2!
    CW END+2!
    DA PEND+8*, PEND+12*, PEND+17*, PEND+22*, END!
    >> DFN EN1+11*, EN1+12*, EN1+13, EN+3, EN+4, PENDPEND+1, PEND+8, PEND+9, PEND+11
    PEND+12, PEND+16, PEND+17, PEND+21, PEND+22, PEND+25, E+1, EN2EN2+5, EN2+16
    CHKSOCHKSO+1, CHKSO+2, OERR*
    DIC EN1*!, EN1+11*, END!
    DIC("A" EN1*
    DIC("S" EN1*
    DIC(0 EN1*, EN1+11*
    DIE EN1+11*, PEND+12*, PEND+17*, PEND+22*, END!
    DP END!
    DR PEND+12*, PEND+14!, PEND+17*, PEND+19!, PEND+22*, PEND+23!, EN2+17!, END!
    DR(2 PEND+13*, PEND+18*, PEND+22*
    DSH END+2!
    DT EN+4, PENDPEND+1, PEND+8, EN2+5, EN2+16
    DTENTR END+2!
    DTIN END+2!
    DTLMT END+2!
    DTR END+2!
    DUZ EN1+9
    DX PEND+6~
    DY PEND+6~
    FLG PEND+25~
    FLG(1 PEND+25*
    HEY END!
    HSI EN1+8*, END!
    HX END+1!
    HY PEND+9, CHKSO*, CHKSO+1, CHKSO+2, CHKSO+3, END!
    I EN+4*, END+1!
    IOSL PEND+8
    J CHKSO+2*, END!
    ND END+2!
    NOSHOW END+2!
    >> ORACTION EN1+11
    >> ORVP OERR
    P8 END+2!
    PROC END+2!
    PT END+2!
    PTIEN END+2!
    PTNM END+2!
    PXR END+1!
    RTMP END+2!
    S END+1!
    SB EN1+8*, END!
    SC EN1+7, EN1+8*, EN1+9, EN2EN2+1, END!
    SCCLNM EN2+8*, EN2+16, EN2+17!
    >> SCOKCONS EN2+12
    SCPTTM END+2!
    SCREST EN2+5*, EN2+6, EN2+12, EN2+16, EN2+17!
    SCRESTA EN2+4~
    SCRESTA( EN2+11
    SCTM EN2+7~, EN2+10*, EN2+11*
    SD EN1+7!, END+1!
    SD1 END+2!
    SD17 END!
    >> SDAMERR EN1+9*, EN1+13*
    SDAMSCN END+2!
    SDAP16 END+1!
    SDAPTYP EN1+3!, EN1+16, END!
    >> SDAT16 PEND+8, CHKSO*
    SDATE END+2!
    SDCL CNAM~, CNAM+3
    >> SDCLN EN1EN1+1, EN1+2, EN1+3, EN1+9, EN1+11, EN1+14, EN1+17
    SDDIF EN1+8*, END!
    SDDIS EN2*, END+1!
    SDDOT END+2!
    SDEDT END+1!
    SDEND PEND+6~, PEND+8
    >> SDFN EN1+11, EN1+12, EN1+13
    SDII END+2!
    SDIN EN1+3!, EN1+5*, EN1+6!
    SDINA EN1+6!*, END+1!
    SDINC END+2!
    SDINCM END+2!
    SDJ CHKSO+1*, END!
    SDLEN END+2!
    SDLN PEND+8, CHKSO+2*, END!
    SDMAX END!
    >> SDMLT END+4
    SDMLT1 EN!, PEND+4*, END+4!
    SDMM SDM+10*, END+1!
    >> SDMULT EN2EN2+18
    SDNS END+2!
    SDRE EN1+3!, EN1+5*
    SDRES EN1+1~*, EN1+2
    SDSC END!
    SDSI END+2!
    SDST END+2!
    SDSTR END+2!
    SDSTRTDT END+2!
    SDTY END+1!
    SDU END!
    SDW EN1+10*, E+1*, END+1!
    SDX CNAM+2~, CNAM+3*, CNAM+4
    SDXSCAT EN1+16*, END+3!
    SDXXX EN1+3!, EN1+17!, PEND+26, E+2
    SDXY PEND+6~*
    SDYC END!
    SENDER END+3!
    SERVICE END+3!
    SI EN1+8*, END!
    SL EN1+8*, E, END!
    SM END+1!
    SRV END+3!
    SS END+1!
    SSC PEND+8, PEND+9, CHKSO*, CHKSO+2, END!
    ST END+1!
    STARTDAY EN1+8*, END!
    STATUS END+3!
    STPCOD EN1+4*, END+3!
    STR EN1+8*, END!
    TMP END+3!
    TMPYCLNC EN1+4*, END+3!
    TYPE END+3!
    U EN1+4, EN1+5, EN1+8, EN1+9, EN1+11, EN1+13, ENEN+4, PEND+8, PEND+9
    PEND+25, EEN2EN2+2, CHKSOCHKSO+1, CHKSO+2, CNAM+3
    >> VADM(7 EN+3
    >> VAEL(9 EN
    WY EN1+10*, END+1!
    X EN1+8*, EN1+11, EN2*, END+1!
    >> XQORQUIT OERR*
    XX EN2*, END+1!
    Y EN1EN1+1*, EN1+3*, EN1+4, EN1+5, EN1+7, EN1+8!, EN1+11, EN+3*, EN+4*
    PEND+8*, E*, EN2EN2+1*, EN2+2*, EN2+8, CHKSOCHKSO+1*, CHKSO+3*, END+1!
    Y(0 EN+3*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All