Routine: SCAPMC21

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Package	Total	Call Graph
Scheduling	7	($$ACPTTM,$$TPPT)^SCAPMC (ERR,INIT)^SCAPMCU1 $$HISTPTTM^SCAPMCU2 AFTERTP^SCMCDD1 $$OKPREC5^SCMCLK MAILLST^SCMCTPM $$PCRLPTTP^SCMCTPU2
VA Fileman	1	(FILE,UPDATE)^DIE

Package

Total

Call Graph

Scheduling

($$ACPTTM,$$TPPT)^SCAPMC (ERR,INIT)^SCAPMCU1 $$HISTPTTM^SCAPMCU2 AFTERTP^SCMCDD1 $$OKPREC5^SCMCLK MAILLST^SCMCTPM $$PCRLPTTP^SCMCTPU2

VA Fileman

(FILE,UPDATE)^DIE

Package	Total	Caller Graph
Scheduling	7	SCAPMC SCMCBK SCMCBK1 SCMCBK8 SCMCCV2 SCMCQK1 SCMCQK2

Package

Total

Caller Graph

Scheduling

SCAPMC SCMCBK SCMCBK1 SCMCBK8 SCMCCV2 SCMCQK1 SCMCQK2

Entry Points

Name	Comments	DBIA/ICR reference
QTCKPC
ACPTATP(DFNA,SCTP,SCFIELDA,SCACT,SCERR,SCYESTM,SCMAINA,SCNEWTP,SCNEWTM,SCOLDTP,SCBADTP)	;list of patients to a position (pt TP assgn - #404.43 and possibly #404.42 ; input: as per ACPTTP (above with the following change:) ; DFNA = is the literal value of a patient array (e.g. "scpt" ; there is at least one scpt(dfn)="" defined ; SCNEWTP = Subset of DFNA that was NEWLY assigned to a Position ; SCNEWTM = Subset of DFNA that was NEWLY assigned to a Team ; SCOLDTP = Subset of DFNA that was already assigned to Position ; SCBADTP = Subset of DFNA that was NOT assigned to Position ; output: Count of Patients (New or Old) assigned to Position
APTTPQ
CHKPC(DFN)	;not stand-alone
TM
ACPTTP(DFN,SCTP,SCFIELDA,SCACT,SCERR,SCYESTM,SCMAINA)	;add/edit a patient to a position (pt TP assgn - #404.43 ; input: ; DFN = pointer to PATIENT file (#2) ; SCTP = pointer to TEAM POSTION file (#404.57) ; SCFIELDA= array of extra field entries - scfielda('fld#')=value ; SCACT = date to activate [default=DT] ; SCERR = array NAME to store error messages. ; [ex. ^TMP("ORXX",$J)] ; SCYESTM = Should team assignment be made, if none active now?[1=YES] ; SCMAINA= array of extra field entries for 404.42 (only if scyestm=1)
OKDATA()	;setup/check variables

External References

Name	Field # of Occurrence
FILE^DIE	ACPTTP+41
UPDATE^DIE	TM+9
$$ACPTTM^SCAPMC	ACPTTP+52
$$TPPT^SCAPMC	ACPTTP+32
ERR^SCAPMCU1	OKDATA+7
INIT^SCAPMCU1	OKDATA+3
$$HISTPTTM^SCAPMCU2	ACPTTP+43
AFTERTP^SCMCDD1	TM+14
$$OKPREC5^SCMCLK	ACPTTP+29
MAILLST^SCMCTPM	ACPTATP+25
$$PCRLPTTP^SCMCTPU2	CHKPC+4

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	OKDATA+4
^SCTM(404.57 - [#404.57]	ACPTTP+21, OKDATA+4

Name	Line Occurrences
$$ACPTTP	ACPTATP+13
$$CHKPC	ACPTTP+26
$$OKDATA	ACPTTP+20
APTTPQ	ACPTTP+20, ACPTTP+26, ACPTTP+30, ACPTTP+32, ACPTTP+35, TM
QTCKPC	CHKPC+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	ACPTTP~, ACPTTP+26, ACPTTP+32, ACPTTP+43, ACPTTP+52, ACPTATP+9~, ACPTATP+12*, ACPTATP+13, ACPTATP+17, ACPTATP+18 , ACPTATP+21, ACPTATP+23, OKDATA+4, OKDATA+5, CHKPC~, CHKPC+4
DFNA	ACPTATP~, ACPTATP+12
DT	ACPTATP+25, OKDATA+8
HISTPTTP	ACPTTP+18~
SC	ACPTTP+18~
SC(	ACPTTP+36, ACPTTP+40, TM+5, TM+6, TM+7, TM+8
SCACT	ACPTTP~, ACPTTP+23, ACPTTP+29, ACPTTP+36, ACPTTP+43, ACPTTP+52, TM+8, ACPTATP~, ACPTATP+13, OKDATA+8* , CHKPC+4
>> SCADDFLD	ACPTATP+25
SCAPTDT	ACPTTP+19~
SCAPTDT("BEGIN"	ACPTTP+23*
SCAPTDT("END"	ACPTTP+24*
SCAPTDT("INCL"	ACPTTP+25*
SCAPTTPE	ACPTTP+19~
SCAPTTPO	ACPTTP+19~
SCAPTTPO("SCTP"	ACPTTP+33
SCBADTP	ACPTATP~, ACPTATP+23, ACPTATP+25
SCCNT	ACPTATP+9~, ACPTATP+11, ACPTATP+16, ACPTATP+20*, ACPTATP+26
SCERR	ACPTTP~, ACPTTP+41, ACPTTP+52, TM+9, TM+10, ACPTATP~, ACPTATP+13, OKDATA+7
SCESEQ	ACPTTP+18~, OKDATA+7
SCFIELDA	ACPTTP~, ACPTTP+26, ACPTTP+37, ACPTTP+39, ACPTTP+40, ACPTTP+46, ACPTTP+47, ACPTTP+48, ACPTTP+49, ACPTTP+50 , ACPTTP+51, TM+2, TM+4, TM+5, ACPTATP~, ACPTATP+13, CHKPC+3, CHKPC+5, CHKPC+7
SCFLD	ACPTTP+18~, ACPTTP+38, ACPTTP+39, ACPTTP+40, TM+3, TM+4, TM+5
SCIEN	ACPTTP+18~, TM+10!
SCIEN(1	TM+12
SCMAINA	ACPTTP~, ACPTTP+47, ACPTTP+48, ACPTTP+49, ACPTTP+50, ACPTTP+51, ACPTTP+52, ACPTATP~, OKDATA+9*
SCMESS	ACPTTP+19~, ACPTTP+27, ACPTTP+30, APTTPQ
SCNEWTM	ACPTTP+19~, ACPTATP~, ACPTATP+18
SCNEWTP	ACPTTP+19~, TM+13*, APTTPQ, ACPTATP~, ACPTATP+17, ACPTATP+25
SCNOMAIL	ACPTATP+9~, ACPTATP+10*, ACPTATP+24!
SCOK	OKDATA+1~, OKDATA+2, OKDATA+3, OKDATA+4, OKDATA+10, CHKPC+1~, CHKPC+2, CHKPC+6, CHKPC+8*, QTCKPC
SCOLDTP	ACPTATP~, ACPTATP+21, ACPTATP+25
SCPARM	ACPTTP+18~, OKDATA+7
SCPARM("PATIENT"	OKDATA+5*
SCPARM("POSITION"	OKDATA+6*
SCPTTMA	ACPTTP+18~, ACPTTP+43, ACPTTP+46, ACPTTP+52, TM, TM+6, APTTPQ
SCPTTPA	ACPTTP+18~, ACPTTP+33, ACPTTP+35, ACPTTP+36, ACPTTP+40, TM+12, TM+14, APTTPQ
SCTM	ACPTTP+18~, ACPTTP+21*, ACPTTP+33, ACPTTP+43, ACPTTP+52
SCTMFLDA	ACPTTP+19~
SCTP	ACPTTP~, ACPTTP+21, ACPTTP+29, ACPTTP+33, TM+7, ACPTATP~, ACPTATP+13, ACPTATP+25, OKDATA+4, OKDATA+6 , CHKPC+4
SCX	ACPTTP+19~, ACPTTP+29, ACPTTP+30, ACPTATP+9~, ACPTATP+13, ACPTATP+15, ACPTATP+17, ACPTATP+18, ACPTATP+19, ACPTATP+21 , ACPTATP+22, ACPTATP+23, CHKPC+1~, CHKPC+4*, CHKPC+6, CHKPC+8
SCYESTM	ACPTTP~, ACPTTP+46, ACPTATP~, ACPTATP+13
U	ACPTTP+21, ACPTTP+30, APTTPQ, ACPTATP+15, ACPTATP+18, ACPTATP+19, ACPTATP+23, CHKPC+8

Customize PDF page

Package: Scheduling

Routine: SCAPMC21

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: