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

Package: Scheduling

Routine: SCAPMC1


Information

SCAPMC1 ;ALB/REW - Team API's: PRTM ; JUN 26, 1995

Source Information

Source file <SCAPMC1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Scheduling 4 $$PRTP^SCAPMC8  (ERR,INIT)^SCAPMCU1  $$ACTHIST^SCAPMCU2  ($$OKARRAY,$$OKUSRCL)^SCAPU1  

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 SCAPMC  

Entry Points

Name Comments DBIA/ICR reference
PRTM(SCTEAM,SCDATES,SCUSRA,SCROLEA,SCLIST,SCERR) ; -- practitioners for team
; input:
; SCTEAM = ien of TEAM [required]
; SCDATES("BEGIN") = begin date to search (inclusive)
; [default: TODAY]
; ("END") = end date to search (inclusive)
; [default: TODAY]
; ("INCL") = 1: only use pracitioners who were on
; team for entire date range
; 0: anytime in date range
; [default: 1]
; SCUSRA = array of usr classes to use/exclude
; if $d(@scusra@('exclude')) -> list to exclude
; SCROLEA = array of roles to use/exclude
; SCERR = array NAME to store error messages.
; [ex. ^TMP("ORXX",$J
; Output:
; SCLIST() = array of practitioners
; Format:
; Subscript: Sequential # from 1 to n
; Piece Description
; 1 IEN of NEW PERSON file entry (#200)
; 2 Name of person
; 3 IEN of TEAM POSITION file (#404.57)
; 4 Name of Position
; 5 IEN OF USR CLASS(#8930) of POSITION (#404.57)
; 6 USR Class Name
; 7 IEN of STANDARD POSITION (#403.46)
; 8 Standard Role (Position) Name
; 9 Activation Date for 404.52 (not 404.59!)
; 10 Inactivation Date for 404.52
; 11 IEN of Position Ass History (404.52)
; 12 IEN of Preceptor Position
; 13 Name of Preceptor Position
ST
PRACQ
OKDATA() ; setup/check variables - return 1 if ok; 0 if error

External References

Name Field # of Occurrence
$$PRTP^SCAPMC8 ST+12
ERR^SCAPMCU1 OKDATA+6
INIT^SCAPMCU1 OKDATA+3
$$ACTHIST^SCAPMCU2 ST+11
$$OKARRAY^SCAPU1 ST+10
$$OKUSRCL^SCAPU1 ST+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SCTM(404.51 - [#404.51] OKDATA+4
^SCTM(404.57 - [#404.57] ST+5, ST+6

Label References

Name Line Occurrences
$$OKDATA ST+2
PRACQ ST+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
SCBEGIN ST+1~
SCDATES PRTM~, ST+11, ST+12
SCDTS ST+1~
SCEND ST+1~
SCERR PRTM~, ST+11, ST+12, PRACQ, OKDATA+6
SCESEQ ST+1~, OKDATA+6
SCINCL ST+1~
SCLIST PRTM~, ST+12
SCLSEQ ST+1~
SCN ST+1~
SCND ST~, ST+6*, ST+7, ST+9
SCOK ST~, OKDATA+1~, OKDATA+2*, OKDATA+3, OKDATA+4*, OKDATA+7
SCP ST+1~
SCPARM ST+1~, OKDATA+6
SCPARM("TEAM" OKDATA+5*
SCPOS0 ST~
SCPOSNM ST~
SCPRTM ST~
SCR ST~, ST+9*, ST+10
SCROLEA PRTM~, ST+10
SCTEAM PRTM~, ST+5, OKDATA+4, OKDATA+5
SCTP ST~, ST+4*, ST+5*, ST+6, ST+11, ST+12
SCU ST~, ST+7*, ST+8
SCUSRA PRTM~, ST+8
U ST+7, ST+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All