Routine: SCAPMCU2

Package	Total	Call Graph
Scheduling	3	$$PRTP^SCAPMC ($$DATES,ERR,INIT)^SCAPMCU1 $$PCPROV^SCAPMCU3

Package

Total

Call Graph

Scheduling

$$PRTP^SCAPMC ($$DATES,ERR,INIT)^SCAPMCU1 $$PCPROV^SCAPMCU3

Package	Total	Caller Graph
Scheduling	51	SCAPMC1 SCAPMC12 SCAPMC13 SCAPMC15 SCAPMC17 SCAPMC19 SCAPMC20 SCAPMC21 SCAPMC23 SCAPMC24 SCAPMC3 SCAPMC30 SCAPMC4 SCAPMC5 SCAPMC7 SCAPMC9 SCAPMCU1 SCMCBK SCMCBK1 SCMCBK6 SCMCBK8 SCMCCV SCMCCV3 SCMCDD SCMCDD1 SCMCLK SCMCMM SCMCPM1 SCMCPT2 SCMCQK1 SCMCQK2 SCMCRT1A SCMCTMU SCMCTMU2 SCMCTPU2 SCMCTSK SCMCTSK1 SCMCTSK2 SCMCTSK3 SCMCTSK5 SCMCTSK6 SCMCTSK9 SCMRBK SCRPV1A SCUTBK11 SCUTBK12 SDCO31 SDUTL3 SDWLE1 SDWLE20 SDWLTR
Registration	3	DGRRLU6 DGRRLUA DGRRPSD2
Automated Information Collection System	1	IBDFRPC3

Package

Total

Caller Graph

Scheduling

SCAPMC1  SCAPMC12  SCAPMC13  SCAPMC15  SCAPMC17  SCAPMC19  SCAPMC20  SCAPMC21
SCAPMC23  SCAPMC24  SCAPMC3  SCAPMC30  SCAPMC4  SCAPMC5  SCAPMC7  SCAPMC9
SCAPMCU1  SCMCBK  SCMCBK1  SCMCBK6  SCMCBK8  SCMCCV  SCMCCV3  SCMCDD
SCMCDD1  SCMCLK  SCMCMM  SCMCPM1  SCMCPT2  SCMCQK1  SCMCQK2  SCMCRT1A
SCMCTMU  SCMCTMU2  SCMCTPU2  SCMCTSK  SCMCTSK1  SCMCTSK2  SCMCTSK3  SCMCTSK5
SCMCTSK6  SCMCTSK9  SCMRBK  SCRPV1A  SCUTBK11  SCUTBK12  SDCO31  SDUTL3
SDWLE1  SDWLE20  SDWLTR

Registration

DGRRLU6 DGRRLUA DGRRPSD2

Automated Information Collection System

IBDFRPC3

Entry Points

Name	Comments	DBIA/ICR reference
HISTPTTP(DFN,SCTP,DATE)	;404.43 entry for pt,position - if active on date
GETPCTM(DFN,DATE,ASSTYPE)	;return pc team for a date ; DFN - pointer to patient file ; DATE - date of interest ; ASSTYPE - Default=1 (PC Team) ; returns sctm
EXTMPRTP(SCTP,DATE)	;returns external of team and practitioner for position
QTDTBF
NMPCPR(DFN,DATE,PCROLE)	;returns ien & name of pract filling pc position ; DFN - pointer to patient file ; DATE - date of interest ; PCROLE - Practitioner Position where '1' = PC provider ; '2' = PC attending ; '3' = PC associate provider	ICR #1590 Status: Active Usage: Controlled Subscription
NMPCTP(DFN,DATE,PCROLE)	;returns ien & name of pc position ; (See GETPCTP for variables)	ICR #3284 Status: Active Usage: Private
QTEXT
HISTPTTM(DFN,SCTM,DATE)	;404.42 entry for tm,position - if active on date ; return -1 if error, 0 if no active entry or 404.42 entyr if one
GETPC(DFN,DATE,PCROLE,ASSTYPE)	;return pc position & team for a date ; DFN - pointer to patient file ; DATE - date of interest (Default=DT) ; PCROLE - Default=1 (PC Practitioner Position) note 2= pc attending ; ASSTYPE - Default=1 (PC Team) ; returns sctp^sctm^assigned to pc?
ALPHA(INARRAY,OUTARRAY)	;not supported - for PCMM only ; returns array sorted by 2nd piece's value ; it keeps the 0 node -it does not return any x-ref values ; it only converts arrays of type 1-n to another 1-n array
ACTHIST(FILE,IEN,SCDATES,SCERR,SCLIST)	;is entry active for a time period? ; Input Parameters: ; File = either 404.52 or 404.58 or 404.59 ; IEN = pointer to team(404.51) or team position(404.57) ; SCDATES = (SEE PRIOR DEFINITION) ; SCLIST = Output array ; Returned: ; status (-1:error\|0:inactive\|1:active)^ien for file^actdt^inacdt ; which ien depends on status
DTBEFORE(FILE,IEN,STATUS,DATE)	;return next date before given one
NMPCTM(DFN,DATE,PCROLE)	;returns ien & name of pc team ; (See GETPCTM for variables)
QTACTH
DTAFTER(FILE,IEN,STATUS,DATE)	;return next date after given one
ACTHISTB(FILE,IEN)	;boolean active function
GETPCTP(DFN,DATE,PCROLE)	;return pc position for a date ; DFN - pointer to patient file ; DATE - date of interest ; PCROLE - Default=1 (PC Practitioner Position) note 2= pc attending ; returns sctp,or 0 if none or -1 if error
GETPRTP(SCTP,DATE)	;returns ien & name of practitioner filling position ; Returned [Error:-1,Else: sc200^practname]
QTDTAF
LOOP
EXT(FILE,IEN)	;return external value of team or team position file

Name	Field # of Occurrence
$$PRTP^SCAPMC	GETPRTP+6
$$DATES^SCAPMCU1	LOOP+1, LOOP+16
ERR^SCAPMCU1	LOOP+14
INIT^SCAPMCU1	ACTHIST+14
$$PCPROV^SCAPMCU3	NMPCPR+19

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SCPT(404.41 - [#404.41]	GETPC+8
^SCPT(404.42 - [#404.42]	HISTPTTM+5, HISTPTTM+6, HISTPTTM+7, GETPCTM+10, GETPCTM+13, GETPCTM+14, GETPCTM+15
^SCPT(404.43 - [#404.43]	HISTPTTP+5, HISTPTTP+6, HISTPTTP+7, GETPCTP+11, GETPCTP+12, GETPCTP+13
^SCTM(404.51 - [#404.51]	EXT+4, EXTMPRTP+4, NMPCTM+4
^SCTM(404.57 - [#404.57]	EXT+7, EXTMPRTP+4, NMPCTP+4
^TMP($J	ALPHA+8*, ALPHA+10, ALPHA+12, ALPHA+15!

Name	Line Occurrences
$$ACTHIST	ACTHISTB+3
$$EXT	LOOP+9, LOOP+22
$$GETPCTM	GETPC+8, NMPCTM+3
$$GETPCTP	GETPC+8, NMPCTP+3
$$GETPRTP	EXTMPRTP+3
$$NMPCTP	NMPCPR+18
QTACTH	ACTHIST+12, ACTHIST+15
QTDTAF	DTAFTER+3
QTDTBF	DTBEFORE+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTDT	GETPC+7~, GETPCTM+6~, GETPCTM+10, GETPCTM+11, GETPCTM+13, GETPCTM+14, GETPCTP+6~, GETPCTP+11, GETPCTP+12
ASSTYPE	GETPC~, GETPC+8, GETPCTM~, GETPCTM+7*, GETPCTM+10, GETPCTM+13, GETPCTM+14
DATE	DTAFTER~, DTAFTER+5, DTBEFORE~, DTBEFORE+5, GETPC~, GETPC+8, HISTPTTP~, HISTPTTP+2, HISTPTTP+4, HISTPTTP+8 , HISTPTTM~, HISTPTTM+2, HISTPTTM+4, HISTPTTM+8, GETPCTM~, GETPCTM+8, GETPCTM+10, GETPCTM+17, GETPCTP~, GETPCTP+8 , GETPCTP+11, GETPCTP+16, GETPRTP~, GETPRTP+3*, GETPRTP+4, GETPRTP+5, EXTMPRTP~, EXTMPRTP+3, NMPCTP~, NMPCTP+3 , NMPCPR~, NMPCPR+18, NMPCPR+19, NMPCTM~, NMPCTM+3
DFN	GETPC~, GETPC+8, HISTPTTP~, HISTPTTP+2, HISTPTTP+5, HISTPTTP+6, HISTPTTM~, HISTPTTM+2, HISTPTTM+5, HISTPTTM+6 , GETPCTM~, GETPCTM+10, GETPCTM+13, GETPCTM+14, GETPCTP~, GETPCTP+11, GETPCTP+12, NMPCTP~, NMPCTP+3, NMPCPR~ , NMPCPR+18, NMPCTM~, NMPCTM+3
DT	GETPCTM+8, GETPCTP+8, GETPRTP+3
>> EFFDT	DTAFTER+5, DTAFTER+6, DTBEFORE+5, DTBEFORE+6
FILE	DTAFTER~, DTAFTER+3, DTAFTER+4, DTBEFORE~, DTBEFORE+3, DTBEFORE+4, ACTHISTB~, ACTHISTB+3, ACTHIST~, ACTHIST+12 , ACTHIST+13, LOOP+1, LOOP+6, LOOP+7, LOOP+8, LOOP+9, LOOP+10, LOOP+16, LOOP+19, LOOP+20 , LOOP+21, LOOP+22, LOOP+23, EXT~, EXT+3, EXT+6
HISTIEN	HISTPTTP+3~, HISTPTTP+6, HISTPTTP+7, HISTPTTP+8, HISTPTTM+3~, HISTPTTM+6, HISTPTTM+7, HISTPTTM+8
IEN	DTAFTER~, DTAFTER+3, DTBEFORE~, DTBEFORE+3, ACTHISTB~, ACTHISTB+3, ACTHIST~, ACTHIST+12, LOOP+1, LOOP+6 , LOOP+9, LOOP+10, LOOP+16, LOOP+19, LOOP+22, LOOP+23, EXT~, EXT+4, EXT+7
INACTDT	GETPC+7~, GETPCTP+6~, GETPCTP+13*, GETPCTP+15, GETPCTP+16
INARRAY	ALPHA~, ALPHA+6, ALPHA+7, ALPHA+14
OK	ACTHIST+10~, ACTHIST+11, ACTHIST+14, ACTHIST+15, ACTHIST+17, LOOP+1, LOOP+4, LOOP+12, LOOP+18, QTACTH
OUTARRAY	ALPHA~, ALPHA+6, ALPHA+14
PCAP	NMPCPR+9~, NMPCPR+14, NMPCPR+15, NMPCPR+19
PCROLE	GETPC~, GETPC+8, GETPCTP~, GETPCTP+9, GETPCTP+11, GETPCTP+12, NMPCTP~, NMPCTP+3, NMPCPR~, NMPCPR+14 , NMPCPR+16*, NMPCPR+18, NMPCTM~, NMPCTM+3
ROOT	DTAFTER+4, DTAFTER+6, DTBEFORE+4, DTBEFORE+6, ACTHIST+10~, ACTHIST+13*
SCA	ACTHIST+10~, LOOP+1*, LOOP+2, LOOP+5, LOOP+6, LOOP+9, LOOP+10
SCACT	HISTPTTP+3~, HISTPTTP+5, HISTPTTP+6, HISTPTTP+8, HISTPTTM+3~, HISTPTTM+5, HISTPTTM+6, HISTPTTM+8
SCACTB	ACTHISTB+2~
SCBEGIN	ACTHIST+10~, LOOP+1, LOOP+17
SCDATE	ACTHIST+10~, ACTHIST+16, LOOP+1, LOOP+2, LOOP+5*, LOOP+13, LOOP+16
SCDATES	ACTHIST~
SCDT	HISTPTTP+3~, HISTPTTP+4, HISTPTTP+5, HISTPTTM+3~, HISTPTTM+4, HISTPTTM+5
SCDTS	ACTHIST+10~
SCE	ACTHIST+10~, LOOP+1*
SCEND	ACTHIST+10~, ACTHIST+16
SCERR	ACTHIST~, LOOP+14
>> SCESEQ	LOOP+14
SCEXT	EXT+1~, EXT+2, EXT+4, EXT+5, EXT+7, EXT+8*, QTEXT
SCGOOD	GETPCTM+6~, GETPCTM+12, GETPCTM+13, GETPCTM+16
SCINACT	HISTPTTP+3~, HISTPTTP+7, HISTPTTP+8, HISTPTTM+3~, HISTPTTM+7, HISTPTTM+8
SCINCL	ACTHIST+10~, LOOP
SCINDT	GETPCTM+6~, GETPCTM+15*, GETPCTM+16, GETPCTM+17
SCLIST	ACTHIST~, LOOP+6, LOOP+7, LOOP+8, LOOP+9, LOOP+10, LOOP+19, LOOP+20, LOOP+21, LOOP+22 , LOOP+23
>> SCN	LOOP+7, LOOP+8, LOOP+9, LOOP+10, LOOP+20, LOOP+21, LOOP+22, LOOP+23
SCNDX	ALPHA+4~, ALPHA+9, ALPHA+10, ALPHA+12
SCNODE	ALPHA+4~, ALPHA+7*, ALPHA+8
SCOK	GETPCTP+6~, GETPCTP+7*
>> SCPARM	LOOP+14
>> SCPARM("EFFEC	TIVE DATE" , LOOP+13*
SCPR	GETPRTP+2~
SCPR(1	GETPRTP+7
SCPRDTS	GETPRTP+2~
SCPRDTS("BEGIN"	GETPRTP+4*
SCPRDTS("END"	GETPRTP+5*
SCPTA	GETPC+7~, GETPCTP+6~
SCPTTMA	GETPCTM+6~, GETPCTM+14*, GETPCTM+15
SCPTTPA	GETPCTP+6~
SCTM	GETPC+7~, HISTPTTM~, HISTPTTM+2, HISTPTTM+5, HISTPTTM+6, GETPCTM+6~, GETPCTM+12, GETPCTM+13, GETPCTM+14, GETPCTM+17 , GETPCTP+6~
SCTP	GETPC+7~, HISTPTTP~, HISTPTTP+2, HISTPTTP+5, HISTPTTP+6, GETPCTM+6~, GETPCTP+6~, GETPCTP+7, GETPCTP+12, GETPCTP+15 , GETPCTP+16, GETPCTP+18, GETPRTP~, GETPRTP+6, EXTMPRTP~, EXTMPRTP+3, EXTMPRTP+4, NMPCPR+9~, NMPCPR+18, NMPCPR+19
SCX	DTAFTER+1~, DTAFTER+2, DTAFTER+6, QTDTAF, DTBEFORE+1~, DTBEFORE+2, DTBEFORE+6, QTDTBF, EXTMPRTP+2~, EXTMPRTP+3* , EXTMPRTP+4, ALPHA+4~, ALPHA+5, ALPHA+7, ALPHA+8, ALPHA+11, ALPHA+12, ALPHA+14
SCY	ALPHA+4~, ALPHA+5, ALPHA+13, ALPHA+14
STATUS	DTAFTER~, DTBEFORE~
TPDALP	GETPCTP+6~, GETPCTP+12*, GETPCTP+13
TPLP	GETPCTP+6~, GETPCTP+12*, GETPCTP+15, GETPCTP+16
U	LOOP+1, LOOP+9, LOOP+17, LOOP+19, LOOP+22, LOOP+23, QTACTH, EXT+4, EXT+6, EXT+7 , GETPC+8, HISTPTTP+7, HISTPTTM+7, GETPCTM+15, GETPCTP+13, GETPRTP+7, EXTMPRTP+4, NMPCTP+4, NMPCTM+4, ALPHA+8
X	ACTHISTB+2~, ACTHISTB+3, ACTHISTB+4, ACTHIST+10~, ACTHIST+11, LOOP+1, LOOP+2, LOOP+3, LOOP+9, LOOP+16 , LOOP+17, LOOP+19, LOOP+22, LOOP+23, QTACTH, GETPRTP+2~, GETPRTP+6, GETPRTP+7, NMPCTP+2~, NMPCTP+3 , NMPCTP+4, NMPCTM+2~, NMPCTM+3*, NMPCTM+4

Customize PDF page

Package: Scheduling

Routine: SCAPMCU2

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 55

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: