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

Package: Scheduling

Routine: SDCLK


Information

SDCLK ;ALB/MJB/MLI - LOOK UP CLERK WHO MADE APPOINTMENT ; 22 FEB 88

Source Information

Source file <SDCLK.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 ^%DT  ^DIC  DT^DIQ  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Changes To Scheduling 1 ASDAMB  
Scheduling 1 SD SDCLK  

Entry Points

Name Comments DBIA/ICR reference
A
STATUS
C
EN
QA
ON
H
P5
L
Q
P

External References

Name Field # of Occurrence
^%DT A, ON+3
^DIC EN, C+1
DT^DIQ P+1, P+4, STATUS+1, STATUS+3, L+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,"No appointments scheduled for this patient."
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: "There are no appointments for this patient to this clinic."
  • Line Location: C+4
Function Call: READ
  • Prompt: "Enter APPOINTMENT DATE/TIME: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,"Patient Name",?32,": ",$P(^(0),U),?60,"SSN: ",$E(SDS,1,3),"-",$E(SDS,4,5),"-",$E(SDS,6,10),!,"Clinic Name",?32,": ",$S($D(^SC(SDIFN,0)):$P(^(0),U),1:""),!,"Appointment Date/Time",?32,": "
  • Line Location: P+0
Function Call: WRITE
  • Prompt: !!,"Appointment Made By",?32,": "
  • Line Location: P+4
Function Call: WRITE
  • Prompt: $S($D(^VA(200,SDC,0)):$P(^(0),U),1:"")
  • Condition for execution: SDC
  • Line Location: P+4
Function Call: WRITE
  • Prompt: !,"Date Appointment Made",?32,": "
  • Line Location: P+4
Function Call: WRITE
  • Prompt: !,"Date Appointment Made",?32,": "
  • Line Location: P+4
Function Call: WRITE
  • Prompt: $S(SDPP=1:"C&P",SDPP=2:"10-10",SDPP=3:"SCHEDULED VISIT",SDPP=4:"UNSCHED. VISIT",1:"")
  • Line Location: P+5
Function Call: WRITE
  • Prompt: !,"Appointment Type",?32,": "
  • Line Location: P+6
Function Call: WRITE
  • Prompt: SDAP1
  • Line Location: P+6
Function Call: WRITE
  • Prompt: !,"Appt. Cancelled to make ",!,"this appt.",?32,": ",$P(^SC($P(SDP,U,17),0),U)
  • Line Location: P+7
Function Call: WRITE
  • Prompt: !!,"Appointment Status",?32,": "
  • Line Location: STATUS+0
Function Call: WRITE
  • Prompt: $P($P($P(SDSTAT,"^",3),";",SD9),":",2)
  • Line Location: STATUS+0
Function Call: WRITE
  • Prompt: !,"No-show/Cancelled By",?32,": ",SDP1
  • Line Location: STATUS+1
Function Call: WRITE
  • Prompt: !,"No-show/Cancel Date/Time"
  • Line Location: STATUS+1
Function Call: WRITE
  • Prompt: !,"No-show/Cancel Date/Time"
  • Line Location: STATUS+1
Function Call: WRITE
  • Prompt: !,"Cancellation Reason",?32,": ",$P(^SD(409.2,SDP2,0),U)
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !,"Cancellation Remarks",?32,": "
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !,"Cancellation Remarks",?32,": "
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !,"Rescheduled for",?32,": "
  • Line Location: STATUS+3
Function Call: WRITE
  • Prompt: !
  • Line Location: STATUS+4
Function Call: WRITE
  • Prompt: !,"No appointments on date selected."
  • Line Location: ON+2
Function Call: WRITE
  • Prompt: @IOF,"Choose from: "
  • Line Location: ON+3
Function Call: WRITE
  • Prompt: !,?5,I,")",?9
  • Line Location: ON+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: QA+0
Function Call: WRITE
  • Prompt: !!,"Enter:",!,"(1) '??' to see a list of appointments.",!,"(2) Date alone to see appointments for this patient to this clinic on a date.",!,"(3) A valid appointment date after JAN 1, 1982.",!!
  • Line Location: H+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: P5+0
Routine Call
  • DIC
  • Line Location:
    • EN
    • C+1

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)
^DD(2.98 STATUS
^DPT - [#2] EN, C+3, P, P+3, P+5, STATUS+2
^SC - [#44] P, P+1, P+7
^SD(409.1 - [#409.1] P+6
^SD(409.2 - [#409.2] STATUS+2
^UTILITY($J C!, C+3*, C+4, A, STATUS+4!, Q!, ON, L*, L+1, P5
^VA(200 - [#200] P+4, STATUS+1

Label References

Name Line Occurrences
A A, STATUS+5, ON+2, QA, H
C C+4, A
EN EN, C+1
H A
L A
ON A
P ON+1, QA, L+1, P5
P5 L+1, P5
Q EN, L+1, P5
QA QA

Naked Globals

Name Field # of Occurrence
^( C+3, P+1
^("R" STATUS+2
^(0 C+3, P, P+1, P+4, P+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q!
%DT A*, Q!
%DT(0 A*
%Y Q!
C Q!
DFN EN*, C+3, P, P+1, P+3, P+5, STATUS+2, Q!
DIC EN*, C+1*, C+4!, P+6!, STATUS+4!, Q!
DIC("A" C+1*
DIC("S" C+1*
DIC(0 EN*, C+1*
DIPGM Q!
DTIME A, QA, P5
I C+3*, P+1*, STATUS+4!*, Q!, ON*, ON+3*, L*, L+1*, P5
IOF ON+3
J Q!, ON*, ON+1, ON+3, QA
N Q!, ON*, QA*
SD STATUS+4, Q!, L*, L+1, P5
SD9 STATUS*, STATUS+4!
SDA A+1*, P+1, P+3, P+5, STATUS+2, STATUS+4!, Q!, ON+1*, QA*, P5*
SDAP P+6*, STATUS+4!
SDAP1 P+6*, STATUS+4!
SDB Q!, ON*
SDC P+1*, P+2*, P+4*, Q!
SDC1 P+3!*, P+4, Q!
SDC2 P+3!*, P+4, Q!
SDD A!, STATUS+4!, Q!, ON+2
SDD( ON*, ON+1, ON+3, QA
SDE Q!, ON*
SDF Q!, L*, L+1, P5*
SDFT Q!, L*, L+2*, P5
SDIFN C+2*, C+3, P, P+1, Q!
SDP P+5*, P+6, P+7, STATUS+1, STATUS+2, STATUS+3, Q!
SDP1 STATUS+1*, STATUS+4!
SDP2 STATUS+2*, STATUS+4!
SDP3 P+5*, STATUS+1, STATUS+4!
SDP4 STATUS+3*, STATUS+4!
SDPP P+5*, Q!
SDQ STATUS+4!, Q!, L+1, P5*
SDS P*, P+1!*, P+2*, P+4, P+5*, STATUS, Q!
SDSTAT STATUS*, Q!
U C+3, P, P+1, P+4, P+5, P+6, P+7, STATUS+1, STATUS+2, STATUS+3
X C+1, A*, P+6!, STATUS+4!, Q!, ON+3*, QA*, P5*
X5 STATUS+2*, STATUS+4!
Y EN, C+1, C+2, A, A+1, P+1*, P+4*, P+6!, STATUS+1*, STATUS+3*
, STATUS+4!, Q!, ON*, L+1*
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