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

Package: Scheduling

Routine: SDNDIS


Information

SDNDIS ;ALB/TMP - CHECK FOR AND DISCHARGE PATIENTS EXCEEDING MAX # OF NO SHOWS ; 8-14-86

Source Information

Source file <SDNDIS.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 ^%DT  

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

Package Total Caller Graph
Scheduling 1 SDN  

Entry Points

Name Comments DBIA/ICR reference
DIS
NUM
DISCH

External References

Name Field # of Occurrence
^%DT NUM+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,".. Searching for patients who have exceeded the maximum # of no-shows allowed ..",!
  • Line Location: DIS+0
Function Call: WRITE
  • Prompt: !!,$S($D(^SC(I,0)):$P(^(0),"^",1),1:" "),?35,": ",SDCTR(I)," patient",$S(SDCTR(I)>1:"s ",1:" "),"exceeded max # of NO SHOWS"
  • Line Location: DIS+2
Function Call: WRITE
  • Prompt: !!,"No patients discharged ",!!,"The records of the patients who have exceeded the maximum NO SHOW limit",!,"will need to be reviewed for possible discharge from the specified clinics !"
  • Line Location: DIS+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DIS+4
Function Call: WRITE
  • Prompt: *7,!,"Please note that this patient -- ",$P($P(^DPT(+A,0),U),",",2)," ",$P($P(^(0),U),",",1)," --SSN ",$P(^(0),U,9),!,"has exceeded the maximum # of NO SHOWS",!,"in the following clinic : ",$P(^SC(SDC,0),U,1),!!
  • Line Location: NUM+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DIS+1, NUM+2, NUM+4, DISCH+1
^SC - [#44] DIS+2, NUM, NUM+4, DISCH
^UTILITY($J DIS+1

Label References

Name Line Occurrences
DISCH NUM
NUM DIS+1

Naked Globals

Name Field # of Occurrence
^( NUM+2, DISCH+1
^("SDP" NUM
^("SL" DISCH
^(0 DIS+2, NUM+2, NUM+4, DISCH+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT NUM+1*
>> A DIS+1*, NUM+2, NUM+4, DISCH+1
>> A0 DIS+1*
A1 DIS+1!, NUM+2, DISCH+1*
>> A2 NUM+2*
>> B DIS+1*
DT NUM+1*, NUM+2
FSW DIS+1!
>> GDATE DIS+1*
>> I DIS+2*, DISCH+1*
>> I1 DISCH+1*
>> POP NUM*
>> SC DIS+1*, NUM, NUM+2, NUM+3, DISCH
>> SDC NUM+3*, NUM+4, DISCH*, DISCH+1
>> SDCMAX NUM*, NUM+2, NUM+3
>> SDCONS NUM*, NUM+2*, NUM+3
SDCTR DIS!, DIS+2, DIS+4!
SDCTR( DIS+2, NUM+3*
SDIS DISCH+1!*
>> SDZSC NUM+2*
U NUM+2, NUM+4, DISCH+1
>> X NUM+1*
>> Y NUM+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All