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,ANU - CANCEL APPT. FOR A PATIENT ;MAR 15, 2017

Source Information

Source file <SDCNP0.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Scheduling 13 $$STATUS^SDAM1  $$FIND^SDAM2  ($$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  (,FILE)^DIE  
List Manager 1 $$LOWER^VALM1  

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

Package Total Caller Graph
Scheduling 5 SDAMC  SDC  SDCNP  SDESBLKANDMOVE1  SDESCCAVAIL  

Entry Points

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

External References

Name Field # of Occurrence
DD^%DT MORE+3
NOW^%DTC CAN+6
WAIT^DICD EN2
^DIE CAN+3, CAN+6
FILE^DIE SDEC+9
$$STATUS^SDAM1 STATUS+2
$$FIND^SDAM2 BEGD+3
$$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+5
CANCEL^SDCNSLT CAN+11
$$CODT^SDCOU BEGD+4
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: ": "
  • Variable: APP
  • Timeout: DTIME
  • Line Location: WH+0
Function Call: WRITE
  • Prompt: !,*7,">>> Appointment #",A1," has a check in date and cannot be cancelled."
  • Line Location: BEGD+3
Function Call: WRITE
  • Prompt: !,*7,">>> Appointment #",A1," has a check out date and cannot be cancelled."
  • Line Location: BEGD+4
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
Routine Call
  • DIE
  • Line Location:
    • SDEC+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("FUNC" - [#.5] WH1+4
^DPT - [#2] EN2CAN+3, CHKSOCK1, STATUS+2
^DPT("ASDCN" CAN+4*
^DPT("ASDPSD" CANCAN+9, CK1+3!
^GMR(123 - [#123] MORE+3
^SC - [#44] BEGD+1, BEGD+3, CANCAN+7, CAN+10!, CAN+12!, CAN+16, EN01CMORE+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, BEGDBEGD+3, BEGD+4, BEGD+5*, CAN, CHKSO*, MOREMORE+1
MORE+3, OVR+11, STATUS+2

Label References

Name Line Occurrences
$$CONSULT MORE+3
BEGD DEL1
C CAN+7
CAN BEGD+5
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
^( EN2WH1+4*, BEGD+3, BEGD+4, CAN!, CAN+7, MORE+1, CK1, STATUS+2
^("OB" CAN+10, C+1
^(0 CANCAN+3*, CHKSOMORE+1, CK1
^(1 EN01+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CAN+6
A1 DEL1*, BEGDBEGD+3, BEGD+4, BEGD+5, CANEVT+1~
>> APL EN2*
APP WH1*, WH1+5, WH1+6, WH*, WH+1, WH+2, DELDEL1EVT+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 EN2BEGD+3, BEGD+4, CANCAN+1, CAN+3, CAN+6, CAN+8, CAN+9, CAN+12
CCHKSO, CONSULT+2, CK1CK1+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*, EN01EVT+1~
I BEGD*, BEGD+1, CANCAN+1, CAN+2, EN01+1*, EVT+1~
IOF WH1OVR+11
J EN2*, DEL*, DEL1*, EVT+1~
>> L EN2*, WH1, CHKSO*
LF STATUS~, STATUS+1, STATUS+3
>> NDT EN2*, CHKSO
REOPEN CAN+8~*
S BEGD*, CANCAN+1, CAN+3, CAN+6, CAN+7, CAN+8, CAN+9, CAN+10, CAN+11*
CAN+12, EN01*, EN01+1*, EN01+2, CCK1CK1+1, CK1+2, CK1+3, SDEC~
, SDEC+2, EVT+1~
SB BEGD+1*, EN01EVT+1~
>> SC EN2*
SD BEGD*, CAN+16, EN01EVT+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, SDEC+6
SDECFDA SDEC+5~
SDECFDA( SDEC+7*
SDECIENS SDEC+5~, SDEC+6*, SDEC+7
SDECMSG SDEC+5~, SDEC+8!
SDERR WH1WH1+5, DEL*, DEL+1, DEL1DEL1+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+5
>> SDPV EN2NO
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*, EN01EVT+1~
SL BEGD+1*, CAN+10*, EN01EVT+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+3, BEGD+4, CAN+10, CAN+12, MORE+3, OVR+1, CONSULT+2, STATUS+2
>> X WH1+4*, BEGD+1*, CAN+7*, CC+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, WHMOREMORE+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