SCAPMC12 ;ALB/REW - Team API's: TPPR ; 2/10/00 8:14am
Source file <SCAPMC12.m>
| Package | Total | Call Graph | 
|---|---|---|
| Scheduling | 4 | BLD^SCAPMC24 (ERR,INIT)^SCAPMCU1 $$ACTHIST^SCAPMCU2 $$OKARRAY^SCAPU1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| OKDATA() | ;setup/check variables | |
| TPPR(SC200,SCDATES,SCPURPA,SCROLEA,SCLIST,SCERR) | ; -- positions for a pract ; input: ; SC200 = ien of NEW PERSON file(#200) [required] ; SCDATES("BEGIN") = begin date to search (inclusive) ; [default: TODAY] ; ("END") = end date to search (inclusive) ; [default: TODAY] ; ("INCL") = 1: only use patients who were assigned to ; team for entire date range ; 0: anytime in date range ; [default: 1] ; SCPURPA -array of pointers to team purpose file 403.47 ; if none are defined - returns all teams ; if @SCPURPA@('exclude') is defined - exclude listed teams ; SCROLEA - array of pointers to standard position file 403.46 ; if none are defined - returns all positions ; if @SCROLEA@('exclude') is defined - exclude listed roles ; SCLIST -array name to store list ; [ex. ^TMP("SCPT",$J)] ; ; SCERR = array NAME to store error messages. ; [ex. ^TMP("ORXX",$J)] | |
| PRACQ | ||
| ST | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SCTM(404.51 - [#404.51] | ST+18 | 
| ^SCTM(404.52 - [#404.52] | ST+6, ST+7 | 
| ^SCTM(404.57 - [#404.57] | ST+10, ST+21 | 
| ^VA(200 - [#200] | OKDATA+4 | 
| Name | Line Occurrences | 
|---|---|
| $$OKDATA | ST+3 | 
| PRACQ | ST+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| SC200 | TPPR~, ST+6, OKDATA+4, OKDATA+5 | 
| SCACTHIS | ST~, ST+12*, ST+13, ST+16, ST+23 | 
| SCBEGIN | ST+1~ | 
| SCDATES | TPPR~, ST+12 | 
| SCDTS | ST+1~ | 
| SCEND | ST+1~ | 
| SCERR | TPPR~, ST+12, PRACQ, OKDATA+6 | 
| SCESEQ | ST+1~, OKDATA+6 | 
| SCINCL | ST+1~ | 
| SCLIST | TPPR~, ST+23 | 
| SCLSEQ | ST+1~ | 
| SCN | ST+1~ | 
| SCOK | OKDATA+1~, OKDATA+2*, OKDATA+3, OKDATA+4*, OKDATA+8 | 
| >> SCP | ST+18*, ST+19 | 
| SCPARM | ST+1~, OKDATA+6 | 
| SCPARM("Practitioner" | OKDATA+5* | 
| SCPTA | ST~, ST+20* | 
| SCPURPA | TPPR~, ST+19 | 
| SCR | ST~, ST+21*, ST+22, ST+23 | 
| SCROLEA | TPPR~, ST+22 | 
| SCTM | ST~, ST+10*, ST+11, ST+18, ST+23 | 
| SCTP | ST~, ST+8*, ST+9, ST+10, ST+12, ST+21, ST+23 | 
| SCTPA | ST~, ST+5*, ST+6*, ST+7, ST+16 | 
| SCTPA0 | ST~, ST+7*, ST+8 | 
| SCTPPR | ST~ | 
| U | ST+8, ST+10, ST+18, ST+21 |