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

Package: Scheduling

Routine: SDM2


Information

SDM2 ;SF/GFT - MAKE APPOINTMENT ; 07 Jan 2000 6:30 PM

Source Information

Source file <SDM2.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Scheduling 8 ($$HANDLE,BEFORE,CANCEL)^SDAMEVT  SDLET^SDCNP1A  CANCEL^SDCNSLT  $$CODT^SDCOU  (,DOW,PRECAN,S)^SDM1  $$EXAE^SDOE  RT^SDUTL  (MESS,OPENEWL)^SDWLREB  
Kernel 3 ^%ZIS  ^%ZISC  $$UP^XLFSTR  
VA Fileman 3 NOW^%DTC  YN^DICN  ^DIR  
IHS Changes To Scheduling 1 $$PC^BSDU  
Registration 1 $$BADADR^DGUTL3  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Scheduling 3 SDM1  SDM3  SDN2  

Entry Points

Name Comments DBIA/ICR reference
DISP
C
FLEN
CAN
CNAM(SDCL) ;Return clinic name
PROT
STAT
CK1
AT
IN
SDAY
EVT ; -- separate tag if need to NEW vars
; -- cancel event
OUT

External References

Name Field # of Occurrence
NOW^%DTC STAT
^%ZIS CAN+16
^%ZISC CAN+18
$$PC^BSDU PROT+2
$$BADADR^DGUTL3 CAN+7
YN^DICN SDAY
^DIR CAN+11
$$HANDLE^SDAMEVT STAT
BEFORE^SDAMEVT STAT
CANCEL^SDAMEVT EVT+2
SDLET^SDCNP1A CAN+17
CANCEL^SDCNSLT OUT
$$CODT^SDCOU PROT+7
^SDM1 SDM2+8, SDAY+1, DISP
DOW^SDM1 OUT
PRECAN^SDM1 SDAY+1
S^SDM1 OUT
$$EXAE^SDOE CK1+2
RT^SDUTL CAN+4
MESS^SDWLREB STAT+3
OPENEWL^SDWLREB STAT+2
$$UP^XLFSTR SDM2+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,"PATIENT ALREADY HAS APPOINTMENT "
  • Line Location: SDM2+6
Function Call: READ
  • Timeout: DTIME
  • Line Location: SDM2+8
Function Call: WRITE
  • Prompt: "(",APL," MINUTES) THEN"
  • Line Location: SDM2+8
Function Call: WRITE
  • Prompt: "??",*7
  • Line Location: SDM2+8
Function Call: WRITE
  • Prompt: !,"RESPOND YES OR NO",!,"PATIENT ALREADY HAS APPOINTMENT "
  • Line Location: SDAY+0
Function Call: WRITE
  • Prompt: !
  • Line Location: CAN+11
Function Call: WRITE
  • Prompt: *7,!,"APPOINTMENT IN ",$P(^SC(SCI,0),"^",1)," CANCELLED!"
  • Line Location: OUT+0
Function Call: WRITE
  • Prompt: !,"APPOINTMENT NOW BEING MADE IN ",$P(^SC(SC,0),"^",1)
  • Line Location: OUT+0
Function Call: WRITE
  • Prompt: "AT ",$E(S_0,9,10),":",$E(S_"000",11,12)
  • Line Location: AT+0
Function Call: WRITE
  • Prompt: "NO APPNT'S SCHEDULED YET"
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X+$L(S)>72
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: S,": ",S(S)," "
  • Line Location: DISP+4
Routine Call
  • DIR
  • Line Location:
    • CAN+11
Routine Call
  • %ZIS
  • Line Location:
    • CAN+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] SDM2+8, CAN+1, CK1, STAT+1*, STAT+2
^DPT("ASDCN" STAT+1*
^DPT("ASDPSD" CAN, CAN+2, CK1+3!
^GMR(123 - [#123] CAN+21
^GMR(123.5 - [#123.5] CAN+21
^SC - [#44] CAN, CAN+1, CAN+3!, CAN+20, CAN+23!, CAN+24, CAN+25, CAN+26, OUT, C
, IN, PROT+2, CNAM+3, FLEN
^SC("AAS" CK1+1
^SC("ARAD" CAN+1!
^SC("AWAS1" CAN+21!
^SCE - [#409.68] CK1+2
^TMP("SDWLREB" STAT+2!, STAT+3
^TMP($J STAT+2!

Label References

Name Line Occurrences
$$CNAM PROT+3
AT SDAY
C CAN+1
CAN SDM2+8
CK1 CAN+2
EVT OUT
FLEN SDM2+8
IN SDM2+8, SDAY
OUT CAN+3, CAN+24
PROT SDM2+8
SDAY SDAY
STAT SDM2+8

Naked Globals

Name Field # of Occurrence
^( CAN!, CAN+1, FLEN, CK1
^("OB" CAN+3, C+1
^("SDPROT" PROT+2
^(0 SDM2+8, CAN, C, IN, CK1, STAT+1*
^(1 CAN+28*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SDAY*, SDAY+1, STAT+1
>> %ZIS("A" CAN+14*
>> %ZIS("B" CAN+14*
A CAN+13~*
>> APL SDM2+8, FLEN*
>> CNSLTLNK CAN+22*
>> DA CAN+1*, CAN+3, C+1*
DFN SDM2+8, CAN, CAN+1, CAN+2, CAN+7, CAN+13~, C, PROT+7, FLEN, CK1
, CK1+1, CK1+2, CK1+3, STAT, STAT+1, STAT+2, EVT+2
DIR CAN+11!
DIR("A" CAN+9*, CAN+10*
DIR("B" CAN+10*
DIR(0 CAN+11*
>> DIV CAN*, CAN+2, CK1+3
DTIME SDM2+8
DUZ PROT+2, STAT+1
HSI1 CAN+25*, CAN+26, CAN+28!
I SDM2+8*, CAN, CAN+1, CAN+3, CAN+4, CAN+5, CAN+13, CAN+15~, CAN+20, CAN+23
, CAN+24, CAN+25, CAN+26, CAN+27*, C, IN, PROT+2, PROT+3, PROT+7, FLEN
, STAT
IO CAN+16
>> POP CAN+16
S SDM2+8*, CAN, CAN+1, CAN+2, CAN+3, CAN+13, CAN+15~, CAN+20, CAN+23, CAN+26*
, CAN+27*, CAN+28, C, AT, CK1, CK1+1, CK1+2, CK1+3
SB1 CAN+25*, CAN+26, CAN+28!
SC CAN+5, CAN+13~, OUT, IN, STAT+2~*
SCGMR CAN+19~, CAN+21*
SCI CAN*, OUT!
SCLNK CAN+19~, CAN+20*, CAN+21, CAN+22
SCSNOD CAN+19~, CAN+20*
SCSRV CAN+19~, CAN+21*
SCSTPCOD CAN+19~, CAN+21*
>> SD SDM2+8, CAN+4, CAN+24, CAN+26, OUT, PROT+7, FLEN, STAT, STAT+1, STAT+2
SD1 CAN+25*!, CK1*, CK1+1*
SD1(1 CAN+25*
>> SD17 CAN+1*
>> SDADM CAN+20*
SDATA SDM2+7~, STAT, EVT+2
SDCL CAN+13~, CNAM~, CNAM+3
SDCL(1 CAN+13*
SDCMHDL SDM2+7~, STAT*, EVT+2
SDDIF1 CAN+25*, CAN+27, CAN+28!
SDHX CAN+15~
>> SDNSF OUT
SDP CAN+15~
>> SDPL CAN+4*, EVT+2
SDPROT SDM2+8, PROT!, PROT+5*, PROT+10*
SDQ CAN+26*, CAN+27*, CAN+28!
>> SDRT CAN+4*
>> SDSC CAN+4*, EVT+2
>> SDSX CAN+1*, C, C+1
>> SDSY CAN+1*, CAN+3, CAN+4, CAN+20, CAN+23, C*
>> SDTTM CAN+4*, EVT+2
SDWH CAN+13~*
SDX CNAM+2~, CNAM+3*, CNAM+4, CK1+2*
>> SDZ CK1*, CK1+1*, CK1+2, CK1+3
SI1 CAN+25*, CAN+26, CAN+28!
SL1 CAN+3*, CAN+26, CAN+28!
>> SS CAN+26*, CAN+27*
>> ST CAN+26*, CAN+27
>> STPCOD CAN+20*, CAN+21
>> STR CAN+27
>> TMP CAN+22*
TMPD CAN+20!
U CAN+3, CAN+20, CAN+21, IN, PROT+2, CNAM+3
X SDM2+8*, OUT*, STAT~
>> Y CAN+12
>> ZL FLEN*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All