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

Package: Scheduling

Routine: SDCNP0


Information

SDCNP0 ;ALB/LDB - CANCEL APPT. FOR A PATIENT ;MAR 15, 2017

Source Information

Source file <SDCNP0.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Scheduling 12 $$STATUS^SDAM1  ($$HANDLE,BEFORE,CANCEL)^SDAMEVT  (END,RD)^SDCNP  (CLRK,MTCH,NOPE)^SDCNP1  (CKK,CKK1,FLEN,PROT)^SDCNP1A  CANCEL^SDCNSLT  $$CODT^SDCOU  SDECCAN^SDEC08  
$$APPTGET^SDECUTL  DT^SDM0  $$EXAE^SDOE  RT^SDUTL  
VA FileMan 4 DD^%DT  NOW^%DTC  WAIT^DICD  ^DIE  
List Manager 1 $$LOWER^VALM1  

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

Package Total Caller Graph
Scheduling 3 SDAMC  SDC  SDCNP  

Entry Points

Name Comments DBIA/ICR reference
OVR ;Following code added SD/517
C
STATUS(LF) ;
CONSULT(CSSD,CSDT) ;
NO
BEGD
CHKSO
EN01
WH
DEL1
EN2
DEL
WH1
SDEC(DFN,S,SDCLI,SDWH,SDSCR,SDREM,SDNOW,SDDUZ,SDF) ;update SDEC APPOINTMENT /alb/sat SD/627
CK1
MORE
EVT ; -- separate tag if need to NEW vars
CAN

External References

Name Field # of Occurrence
DD^%DT MORE+3
NOW^%DTC CAN+6
WAIT^DICD EN2
^DIE CAN+3, CAN+6
$$STATUS^SDAM1 STATUS+2
$$HANDLE^SDAMEVT CAN+1
BEFORE^SDAMEVT CAN+1
CANCEL^SDAMEVT EVT+2
END^SDCNP NO+1
RD^SDCNP NO+1
CLRK^SDCNP1 CAN+12
MTCH^SDCNP1 DEL
NOPE^SDCNP1 WH1+5, WH1+6, DEL1+1
CKK^SDCNP1A DEL1
CKK1^SDCNP1A DEL1
FLEN^SDCNP1A EN2
PROT^SDCNP1A BEGD+3
CANCEL^SDCNSLT CAN+11
$$CODT^SDCOU BEGD+2
SDECCAN^SDEC08 SDEC+3
$$APPTGET^SDECUTL SDEC+2
DT^SDM0 WH1+4
$$EXAE^SDOE CK1+2
RT^SDUTL CAN+11
$$LOWER^VALM1 STATUS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,SDITEM
  • Line Location: WH1+2
Function Call: WRITE
  • Prompt: SDITEM
  • Line Location: WH1+3
Function Call: WRITE
  • Prompt: " ",$J(X,8)
  • Line Location: WH1+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: AT
  • Line Location: WH1+4
Function Call: READ
  • Prompt: ": "
  • Timeout: DTIME
  • Variable: APP
  • Line Location: WH+0
Function Call: WRITE
  • Prompt: !,*7,">>> Appointment #",A1," has a check out date and cannot be cancelled."
  • Line Location: BEGD+2
Function Call: WRITE
  • Prompt: ?41,$P(^UTILITY($J,"SDCNP",Z),"^",2)
  • Line Location: MORE+0
Function Call: WRITE
  • Prompt: " ",$S($P(^UTILITY($J,"SDCNP",Z),"^",4)?.N:"("_$P(^(Z),"^",4)_" MIN) ",1:$P(^(Z),"^",4))," ",$S($D(^SC($P(^(Z),"^",2),0)):$P(^(0),"^",1),1:"DELETED CLINIC"),$P(^UTILITY($J,"SDCNP",Z),"^",3)
  • Line Location: MORE+1
Function Call: WRITE
  • Prompt: !?5,"CONSULT ",Y,"/ ",CONSULT
  • Line Location: MORE+3
Function Call: WRITE
  • Prompt: ?55,"(",$E($$LOWER^VALM1($P($$STATUS^SDAM1(DFN,+^UTILITY($J,"SDCNP",Z),+$P(^(Z),U,2),$G(^DPT(DFN,"S",+^(Z),0))),";",3)),1,23),")"
  • Line Location: STATUS+2
Routine Call
  • DIE
  • Line Location:
    • CAN+3
    • CAN+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("FUNC" - [#.5] WH1+4
^DPT - [#2] EN2, CAN+3, CHKSO, CK1, STATUS+2
^DPT("ASDCN" CAN+4*
^DPT("ASDPSD" CAN, CAN+9, CK1+3!
^GMR(123 - [#123] MORE+3
^SC - [#44] BEGD+1, CAN, CAN+7, CAN+10!, CAN+12!, CAN+16, EN01, C, MORE+1, CONSULT+2
^SC("AAS" CK1+1
^SC("ARAD" CAN+12*
^SC("AWAS1" CAN+13!
^SCE - [#409.68] CK1+2
^UTILITY($J EN2*, WH1+1, BEGD, BEGD+2, BEGD+3*, CAN, CHKSO*, MORE, MORE+1, MORE+3
, OVR+11, STATUS+2

Label References

Name Line Occurrences
$$CONSULT MORE+3
BEGD DEL1
C CAN+7
CAN BEGD+3
CHKSO EN2
CK1 CAN+9
DEL WH1+5, WH1+6
EVT CAN+15
MORE WH1+4
NO WH1
OVR MORE
SDEC CAN+8
STATUS MORE+4
WH WH1+6, WH+1, OVR+11
WH1 DEL+1, DEL1+1

Naked Globals

Name Field # of Occurrence
^( EN2, WH1+4*, BEGD+2, CAN!, CAN+7, MORE+1, CK1, STATUS+2
^("OB" CAN+10, C+1
^(0 CAN, CAN+3*, CHKSO, MORE+1, CK1
^(1 EN01+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CAN+6
A1 DEL1*, BEGD, BEGD+2, BEGD+3, CAN, EVT+1~
>> APL EN2*
APP WH1*, WH1+5, WH1+6, WH*, WH+1, WH+2, DEL, DEL1, EVT+1~
>> AT WH1+4*, MORE
CNT CAN*, EVT+1~
CONSULT MORE+2~, MORE+3*, CONSULT+1*, CONSULT+2*, CONSULT+3
>> COV EN2, CHKSO*
CSDT MORE+2~, MORE+3*, CONSULT~, CONSULT+2
CSI CONSULT+1~, CONSULT+2*
CSND MORE+2~, MORE+3*, OVR+1
CSSD MORE+2~, MORE+3*, CONSULT~, CONSULT+2
DA CAN+3*, CAN+4!, CAN+6*!, CAN+7*, CAN+10, CAN+11*, C+1*
DA(1 CAN+3*, CAN+4, CAN+6*
DFN EN2, BEGD+2, CAN, CAN+1, CAN+3, CAN+6, CAN+8, CAN+9, CAN+12, C
, CHKSO, CONSULT+2, CK1, CK1+1, CK1+2, CK1+3, SDEC~, SDEC+2, STATUS+2, EVT+2
DIE CAN+3*!, CAN+6*!
DIV CAN*, CAN+9, CK1+3, EVT+1~
DR CAN+3*!, CAN+6*!
DTIME WH
DUZ CAN+8, SDEC+3
>> HDT EN2
HLDCSND WH1+2*, MORE+3*, OVR+1, OVR+9!
HSI BEGD+1*, EN01, EVT+1~
I BEGD*, BEGD+1, CAN, CAN+1, CAN+2, EN01+1*, EVT+1~
IOF WH1, OVR+11
J EN2*, DEL*, DEL1*, EVT+1~
>> L EN2*, WH1, CHKSO*
LF STATUS~, STATUS+1, STATUS+3
>> NDT EN2*, CHKSO
S BEGD*, CAN, CAN+1, CAN+3, CAN+6, CAN+7, CAN+8, CAN+9, CAN+10, CAN+11*
, CAN+12, EN01*, EN01+1*, EN01+2, C, CK1, CK1+1, CK1+2, CK1+3, SDEC~
, SDEC+2, EVT+1~
SB BEGD+1*, EN01, EVT+1~
>> SC EN2*
SD BEGD*, CAN+16, EN01, EVT+1~
>> SD0 EN2*
>> SD1 CK1*, CK1+1*
SDATA CAN+1~, EVT+2
SDCLI CAN+1~, CAN+2*, CAN+4, CAN+7, CAN+8, CAN+10, CAN+11*, CAN+12, CAN+16, EN01
, C, SDEC~, SDEC+2
SDCPHDL CAN+1~*, EVT+2
>> SDCTR WH1*, MORE*, OVR+8*, OVR+11*
>> SDCTRL WH1*, WH1+1, WH1+4, WH1+5*, WH*, WH+2*, OVR+11*
SDDA CAN+11*!
>> SDDH DEL*, DEL1*
>> SDDI DEL1*
SDDIF BEGD+1*, EN01+1, EVT+1~
>> SDDM DEL1*
SDDUZ SDEC~, SDEC+3
SDECAPPT SDEC+1~, SDEC+2*, SDEC+3
SDERR WH1, WH1+5, DEL*, DEL+1, DEL1, DEL1+1, EVT+1~
SDF SDEC~, SDEC+3
SDITEM WH1~, WH1+1*, WH1+2, WH1+3
>> SDJ CHKSO*
>> SDMSG WH+1*
>> SDNODE CAN+12*
SDNOW CAN+1~, CAN+6*, CAN+8, SDEC~, SDEC+3
>> SDPL CAN+11*, EVT+2
>> SDPRT BEGD+3
>> SDPV EN2, NO
SDREM CAN+3, CAN+8, SDEC~, SDEC+3
>> SDRT CAN+11*
>> SDSC CAN+11*, EVT+2
SDSCR CAN+8, SDEC~, SDEC+3
>> SDTM EN2
>> SDTTM CAN+11*, EVT+2
SDWH CAN+4, CAN+8, SDEC~, SDEC+3
>> SDX CK1*, CK1+1*, CK1+2*, CK1+3
SI BEGD+1*, EN01, EVT+1~
SL BEGD+1*, CAN+10*, EN01, EVT+1~
SS EN01*, EN01+1*, EVT+1~
>> ST EN01*, EN01+1
STARTDAY BEGD+1*, EVT+1~
STR BEGD+1*, EN01+1, EVT+1~
TLNK CAN+12*, CAN+13!
U BEGD+1, BEGD+2, CAN+10, CAN+12, MORE+3, OVR+1, CONSULT+2, STATUS+2
>> X WH1+4*, BEGD+1*, CAN+7*, C, C+1
Y WH1+4*, BEGD+1!, CAN+3*, CAN+7*, CAN+10, CAN+11*, CAN+12, EN01*, EN01+1*, C*
, MORE+2~, MORE+3*
>> Z WH1+1*, WH1+4, WH1+5, WH, MORE, MORE+1, MORE+3, OVR+11, STATUS+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All