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

Package: Scheduling

Routine: SCMCTPU


Information

SCMCTPU ;ALB/REW - Team Position Utilities ; 9 Jun 1995

Source Information

Source file <SCMCTPU.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Scheduling 1 $$DATES^SCAPMCU1  
VA FileMan 1 EN^DDIOL  

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

Package Total Caller Graph
Scheduling 8 SCMCCV3  SCMCCV5  SCMCQK1  SCMCQK2  SCMCTPU2  SCMCTSK3  SCRPU1  SCRPV1A  

Entry Points

Name Comments DBIA/ICR reference
ACTPTTM(SCPTTM,SCDT) ;is the patient- team assignment currently active?
; Used by computed field #300 (CURRENTLY ACTIVE?) OF file #404.57
; Input:
; SCPTTM - Pointer to Patient Team Assignment file -404.42
; SCDT - Date to check for, Default=DT
; Returns
; status^status change date
; status:
; 1 if after effective date and before inactive date
; 0 if not yet active or inactivated already
; -1 if error
ACTTP(SCTP,SCDT) ;is the team position currently active?
; Used by computed field #300 (CURRENTLY ACTIVE?) OF file #404.57
; Input:
; SCTP - Pointer to Team Position file #404.57
; SCDT - Date to check for, Default=DT
; Returns
; status^status change date
; status:
; 1 if after effective date and before inactive date
; 0 if not yet active or inactivated
; -1 if error
QTACTTP
ITSCF(CRITERIA,REPORT,X) ;
AKEY(REPORT,SORT,X) ;
IPTF(POSITION,TEAM,X) ;input transform for 404.57
OKACTTP(SCNODE,ACTDT) ;input transform for position assigned date for 404.43
QTOKAC
OKINTP(SCNODE,INACTDT) ;input transform for inactivation date for 404.43
QTOKIN
OKTP(DA,SCX) ;used by team position field of 404.43
QTOKTP
OKROLE(DA,SCX) ;used by role .05 field of 404.43
QTOKRL
USEUSR() ;should user class functionality be employed?
; Returned [1=Use USR Class,0=Don't)
ACCLIN(SC44,DATE) ;is clinic active on this date?
; Return: 1=Yes,0=N0

External References

Name Field # of Occurrence
EN^DDIOL ITSCF+11, AKEY+11, IPTF+8
$$DATES^SCAPMCU1 ACTTP+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] ACCLIN+3
^SCPT(404.42 - [#404.42] ACTPTTM+15, OKTP+8, OKROLE+7
^SCPT(404.43 - [#404.43] OKTP+2, OKROLE+2
^SCTM(404.57 - [#404.57] IPTF+4, IPTF+5, IPTF+7, OKTP+6
^SD(404.91 - [#404.91] USEUSR+2
^SD(404.92 - [#404.92] AKEY+8, AKEY+9, AKEY+10
^SD(404.93 - [#404.93] ITSCF+8, ITSCF+9, ITSCF+10

Label References

Name Line Occurrences
$$ACTPTTM OKACTTP+10
$$ACTTP OKACTTP+9, OKINTP+11
QTOKAC OKACTTP+5
QTOKIN OKINTP+5
QTOKTP OKTP+5, OKROLE+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTDT OKACTTP~, OKACTTP+5, OKACTTP+7, OKACTTP+9, OKACTTP+10
CRITERIA ITSCF~, ITSCF+8*, ITSCF+10
DA ITSCF+7, ITSCF+8, ITSCF+9, AKEY+7, AKEY+8, AKEY+9, IPTF+3, IPTF+4, IPTF+5, OKTP~
, OKTP+2, OKROLE~, OKROLE+2
DATE ACCLIN~, ACCLIN+4
>> DGQUIET ITSCF+11, AKEY+11, IPTF+8
>> DIUTIL IPTF+2
DT ACTPTTM+14, ACTTP+14
EFFDT ACTPTTM+13~, ACTTP+13~, ACTTP+17*, QTACTTP
INACTDT OKINTP~, OKINTP+5, OKINTP+9, OKINTP+11
OK OKACTTP+2~, OKACTTP+3*, OKACTTP+5*, OKACTTP+7*, OKACTTP+9*, OKACTTP+10*, QTOKAC, OKINTP+2~, OKINTP+3*, OKINTP+5*
, OKINTP+7*, OKINTP+9*, OKINTP+11*, QTOKIN, OKTP+1~, OKTP+3*, OKTP+5*, OKTP+8*, QTOKTP, OKROLE+1~
, OKROLE+3*, OKROLE+5*, OKROLE+9*, QTOKRL
POSITION IPTF~, IPTF+4*, IPTF+7
REPORT ITSCF~, ITSCF+9*, ITSCF+10, AKEY~, AKEY+8*, AKEY+10
SC44 ACCLIN~, ACCLIN+3
SCDT ACTPTTM~, ACTPTTM+14*, ACTPTTM+17, ACTTP~, ACTTP+14*, ACTTP+15
SCNODE ACTPTTM+13~, ACTPTTM+15*, ACTPTTM+17, OKACTTP~, OKACTTP+5, OKACTTP+7, OKACTTP+9, OKACTTP+10, OKINTP~, OKINTP+5
, OKINTP+7, OKINTP+9, OKINTP+11, OKTP+1~, OKTP+2*, OKTP+5, OKTP+7, OKROLE+1~, OKROLE+2*, OKROLE+5
, OKROLE+6
SCOK ACTPTTM+13~
SCPC OKROLE+1~, OKROLE+7*, OKROLE+9
SCPTTM ACTPTTM~, ACTPTTM+15
SCPTTMA OKTP+1~, OKTP+7*, OKTP+8, OKROLE+1~, OKROLE+6*, OKROLE+7
SCTM OKTP+1~, OKTP+6*, OKTP+8
SCTP ACTTP~, ACTTP+15
SCX ACTTP+13~, ACTTP+15*, ACTTP+16, ACTTP+17, OKTP~, OKTP+5, OKTP+6, OKROLE~, OKROLE+5, OKROLE+9
, ACCLIN+2~, ACCLIN+3*, ACCLIN+4
SORT AKEY~, AKEY+9*, AKEY+10
STATUS ACTPTTM+13~, ACTTP+13~, ACTTP+16*, ACTTP+17, QTACTTP
TEAM IPTF~, IPTF+5*, IPTF+7
U ACTPTTM+17, ACTTP+16, ACTTP+17, QTACTTP, ITSCF+8, ITSCF+9, AKEY+8, AKEY+9, IPTF+4, IPTF+5
, OKACTTP+5, OKACTTP+7, OKACTTP+9, OKACTTP+10, OKINTP+7, OKINTP+9, OKINTP+11, OKTP+6, OKTP+7, OKTP+8
, OKROLE+5, OKROLE+6, OKROLE+7, OKROLE+9
X ITSCF~, ITSCF+7, ITSCF+12!, AKEY~, AKEY+7, AKEY+12!, IPTF~, IPTF+3, IPTF+9!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All