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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SCMCTMU2

Package: Scheduling

Routine: SCMCTMU2


Information

SCMCTMU2 ;ALB/REW - Team-Patient Utilities ; 1 Apr 96

Source Information

Source file <SCMCTMU2.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Scheduling 2 $$TMPT^SCAPMC  ($$ACTHIST,$$GETPCTM)^SCAPMCU2  

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 SCAPMC6  SCMCPM1  SCMCQK  SCMCQK1  SCMCQK2  

Entry Points

Name Comments DBIA/ICR reference
RESTENR ;call when pt is set to 'restrict consults' & he is enrolled in clinic
END
YSPTTMPC(DFN,SCACT) ;is it ok to give patient a new pc team?
; Return [OK:1,Not OK: 0^Message]
QTOKPC
OKACPTTM(DFN,SCTM,SCDATE,SCACTIVE) ;is patient active from now till forever?
; Returned: 1: Not active from now till forever, 0 = Active sometime
; DFN - Pointer to Patient File
; SCTM - Team File ien of interest
; SCDATE - Start Date
; SCACTIVE- Must Team be active on date or just sometime in future?
ENDOKTM
OKPTTMPC(DFN,SCTM,DATE) ;
QTOKTM
OKINPTTM(DFN,SCTM,SCINACT) ;no future pt-position assignments?

External References

Name Field # of Occurrence
$$TMPT^SCAPMC OKACPTTM+14
$$ACTHIST^SCAPMCU2 OKACPTTM+13
$$GETPCTM^SCAPMCU2 YSPTTMPC+4, OKPTTMPC+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SCPT(404.42 - [#404.42] YSPTTMPC+7, YSPTTMPC+9
^SCPT(404.43 - [#404.43] OKINPTTM+4, OKINPTTM+5, OKINPTTM+6, OKINPTTM+7
^SCTM(404.51 - [#404.51] YSPTTMPC+10, OKPTTMPC+4
^SCTM(404.57 - [#404.57] OKINPTTM+8
^TMP($J RESTENR+3

Label References

Name Line Occurrences
$$YSPTTMPC OKPTTMPC+10
END RESTENR+1
ENDOKTM OKACPTTM+13
QTOKPC YSPTTMPC+5, YSPTTMPC+8
QTOKTM OKPTTMPC+4, OKPTTMPC+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATE OKPTTMPC~, OKPTTMPC+5, OKPTTMPC+10
DFN RESTENR+1, YSPTTMPC~, YSPTTMPC+4, YSPTTMPC+7, YSPTTMPC+9, OKACPTTM~, OKACPTTM+14, OKPTTMPC~, OKPTTMPC+5, OKPTTMPC+10
, OKINPTTM~, OKINPTTM+1, OKINPTTM+4, OKINPTTM+5, OKINPTTM+6
DT YSPTTMPC+4, OKACPTTM+8
OK OKINPTTM+2~, OKINPTTM+3*, OKINPTTM+4, OKINPTTM+9*, OKINPTTM+10*, OKINPTTM+11
SCACERR OKACPTTM+6~
SCACLST OKACPTTM+6~
SCACLST("SCTM" OKACPTTM+15
SCACT YSPTTMPC~, YSPTTMPC+7
SCACTIVE OKACPTTM~, OKACPTTM+11*, OKACPTTM+13
>> SCCL RESTENR+2*, RESTENR+3*, RESTENR+4
SCDATE OKACPTTM~, OKACPTTM+8
SCINACT OKINPTTM~, OKINPTTM+1, OKINPTTM+10
SCOK YSPTTMPC+2~, YSPTTMPC+5*, YSPTTMPC+10*, YSPTTMPC+11*, QTOKPC, OKACPTTM+6~, OKACPTTM+7*, OKACPTTM+13*, OKACPTTM+14*, OKACPTTM+15*
, ENDOKTM, OKPTTMPC+1~, OKPTTMPC+2*, OKPTTMPC+4*, OKPTTMPC+8*, OKPTTMPC+10*, QTOKTM
SCPCTM OKPTTMPC+1~, OKPTTMPC+5*, OKPTTMPC+6, OKPTTMPC+7
SCPTTP0 OKINPTTM+2~, OKINPTTM+7*, OKINPTTM+8, OKINPTTM+9, OKINPTTM+10
SCPTTPDT OKINPTTM+2~, OKINPTTM+5*, OKINPTTM+6
SCPTTPI OKINPTTM+2~, OKINPTTM+6*, OKINPTTM+7
SCTM YSPTTMPC+2~, YSPTTMPC+4*, YSPTTMPC+5, YSPTTMPC+9*, YSPTTMPC+10, OKACPTTM~, OKACPTTM+13, OKACPTTM+15, OKPTTMPC~, OKPTTMPC+4
, OKPTTMPC+7, OKINPTTM~, OKINPTTM+1, OKINPTTM+8
SCTMDT OKACPTTM+6~, OKACPTTM+13
SCTMDT("BEGIN" OKACPTTM+8*
SCTMDT("END" OKACPTTM+9*
SCTMDT("INCL" OKACPTTM+10*
SCTP OKINPTTM+2~, OKINPTTM+3*, OKINPTTM+4*, OKINPTTM+5, OKINPTTM+6
SCX YSPTTMPC+2~, YSPTTMPC+7*, YSPTTMPC+8, YSPTTMPC+9
U YSPTTMPC+5, YSPTTMPC+10, OKPTTMPC+4, OKINPTTM+8, OKINPTTM+9, OKINPTTM+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All