Routine: SCMRBK

Package	Total	Call Graph
Scheduling	10	($$PTTM,$$PTTP)^SCAPMC $$PTTP^SCAPMC11 $$PTTM^SCAPMC2 ALPHA^SCAPMCU2 $$ACPTATP^SCAPMR21 $$ACPTRATM^SCAPMR6 (BAD,BAD2,CLRVAR,NEWVAR,PARSE)^SCMCBK1 $$PASSCNT^SCMCBK5 DISCHPOS^SCRPMTA (CHK,TMP)^SCUTBK
Kernel	2	^%ZTLOAD $$NOW^XLFDT
VA Fileman	1	NOW^%DTC

Entry Points

Name	Comments	DBIA/ICR reference
FILEQ
FILTOUT(DD,AD)
POSFILE(SCOK,SC)
BKGPOS
BLKTM
PTPOSLST(SCOK,SC)
PTFILE(SCOK,SC)	; File the patient assignments in the ^TMP($J,"SC TEAM ASSIGN",SCDFN) global ; 'SCMC FILE PAT TM REASGN'
PTGET(SCDATA,SC)
PTTMLST(SCOK,SC)
BLKPOS
BKGTM
PTBLDQ
DISCHPOS(SCOK,SC)
BKG(SCX)	;hand off to taskman
S(SCX)
PTLSTBLD(SCOK,SCVAL)	; Build the list of patients to be assigned in the ^TMP($J,"SCPATIENT LIST",DFN) global ; 'SC BLD PAT LIST'
T	;;

External References

Name	Field # of Occurrence
NOW^%DTC	PTFILE+8
^%ZTLOAD	BKG+9
$$PTTM^SCAPMC	BLKTM+4
$$PTTP^SCAPMC	BLKPOS+4
$$PTTP^SCAPMC11	PTPOSLST+24
$$PTTM^SCAPMC2	PTTMLST+14
ALPHA^SCAPMCU2	PTPOSLST+35, PTTMLST+26
$$ACPTATP^SCAPMR21	BKGPOS+2
$$ACPTRATM^SCAPMR6	BKGTM+2
BAD^SCMCBK1	BKGTM+4
BAD2^SCMCBK1	BKGPOS+5
CLRVAR^SCMCBK1	PTGET+23, BKGTM+8, BKGPOS+9, PTPOSLST+38, PTTMLST+30
NEWVAR^SCMCBK1	PTPOSLST+4, PTTMLST+5
PARSE^SCMCBK1	PTGET+17, PTFILE+11, POSFILE+10, PTPOSLST+11, PTTMLST+9
$$PASSCNT^SCMCBK5	BKG+11
DISCHPOS^SCRPMTA	DISCHPOS+10
CHK^SCUTBK	PTGET+14, PTLSTBLD+5, PTFILE+6, POSFILE+6, PTPOSLST+5, PTTMLST+6, DISCHPOS+5
TMP^SCUTBK	PTGET+15, PTLSTBLD+6, PTFILE+7, POSFILE+7, PTPOSLST+6, PTTMLST+7, DISCHPOS+6
$$NOW^XLFDT	POSFILE+8

Used in RPC

RPC Name	Call Tags
SCMC BLD TEAM PAT LIST	PTTMLST
SCMC FILE PAT TM REASGN	PTFILE
SCMC BLD REASSIGN PAT LIST	PTLSTBLD
SCMC DIS TEAM POS	DISCHPOS
SCMC FILE PAT POS REASGN	POSFILE
SCMC BLD POS PAT LIST	PTPOSLST

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP(	PTGET+19, PTGET+20, PTGET+21!, PTLSTBLD+11!, PTLSTBLD+15*, BKGTM+7!, BKGPOS+8!
^TMP("SCMC"	PTPOSLST+25!, PTTMLST+15!
^TMP($J	PTPOSLST+13!, PTPOSLST+26, PTPOSLST+28, PTPOSLST+31, PTPOSLST+33, PTTMLST+10!, PTTMLST+16, PTTMLST+19, PTTMLST+20, PTTMLST+24 , PTTMLST+28

Label References

Name	Line Occurrences
$$FILTOUT	PTPOSLST+32
$$S	BKG+4, BKG+5, BKG+11
BKG	PTFILE+22, POSFILE+20
FILEQ	PTFILE+12, POSFILE+13
PTBLDQ	PTLSTBLD+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PTFILE+9
AD	FILTOUT~, FILTOUT+3, FILTOUT+11
ASNST	PTPOSLST+3~
>> ASNSTAT	PTPOSLST+9*, FILTOUT+3, FILTOUT+7, FILTOUT+11
DD	FILTOUT~, FILTOUT+3, FILTOUT+7, FILTOUT+11
DUZ	PTFILE+19, POSFILE+17
FC	PTPOSLST+3~, PTPOSLST+29, PTPOSLST+34, PTPOSLST+36
FD	PTPOSLST+3~, PTPOSLST+7*, PTPOSLST+19, FILTOUT+7, FILTOUT+11
I	PTGET+12~, PTGET+19, PTGET+20, PTPOSLST+30, PTPOSLST+31, PTPOSLST+33, PTTMLST+18, PTTMLST+19, PTTMLST+20, PTTMLST+24
>> I1	PTPOSLST+28*, PTPOSLST+30
PD	PTPOSLST+3~, PTPOSLST+31*, PTPOSLST+32
SC	PTGET~, PTGET+17, PTFILE~, PTFILE+11, POSFILE~, POSFILE+10, PTPOSLST~, PTPOSLST+11, PTTMLST~, PTTMLST+9 , DISCHPOS~
SC("ASSIGNSTAT"	PTPOSLST+9
SC("BKG"	PTFILE+22, POSFILE+20
SC("DATE"	DISCHPOS+10
SC("DFN"	DISCHPOS+10
SC("FROMDATE"	PTPOSLST+7
SC("FROMPOSITION"	POSFILE+12
SC("NOP"	BKG+9, BKG+11
SC("POSITION"	POSFILE+11
SC("RESTRICT"	PTFILE+16
SC("TMASGN"	DISCHPOS+10
SC("TODATE"	PTPOSLST+8
SC("TYPE"	PTFILE+15, POSFILE+16
SCADDFLD	PTFILE+3~, POSFILE+3~
SCADDFLD(	PTFILE+15, PTFILE+16, PTFILE+19, PTFILE+20, POSFILE+16, POSFILE+17, POSFILE+18*
SCADTM	POSFILE+4~, POSFILE+14*, BKGPOS+2
SCBAD	PTFILE+3~, BKGTM+4, POSFILE+3~, BKGPOS+5
SCBEGIN	DISCHPOS+4~
>> SCBLOCK	BLKPOS+4, BLKTM+4
SCDATA	PTGET~
SCDATA(	PTGET+20*
SCDATES	DISCHPOS+4~
SCDD	PTTMLST+4~, PTTMLST+21*, PTTMLST+22
SCDFN	PTLSTBLD+3~, PTLSTBLD+14*, PTLSTBLD+15
>> SCDTRNG("BEGIN"	PTPOSLST+19*
>> SCDTRNG("END"	BLKPOS+2, BLKPOS+3, BLKPOS+5, BLKTM+2, BLKTM+3, BLKTM+5, PTPOSLST+20*
>> SCDTRNG("INCL"	PTPOSLST+21*
SCDTVAR	PTFILE+3~, BKGTM+2, POSFILE+4~, BKGPOS+2, FILTOUT+3, FILTOUT+11, PTTMLST+22, PTTMLST+23
SCEND	PTGET+12~, PTGET+19, PTGET+21, DISCHPOS+4~
SCERMSG	PTFILE+3~, POSFILE+3~, PTPOSLST+24
SCERR	DISCHPOS+4~, DISCHPOS+8*, DISCHPOS+9, DISCHPOS+10, DISCHPOS+11
SCFILE	PTFILE+3~, POSFILE+3~
>> SCFRMPOS	PTPOSLST+24
>> SCFRMTM	BKGTM+2, PTTMLST+14
SCINCL	DISCHPOS+4~
SCJOB	PTGET+12~, PTGET+19, PTGET+20, PTGET+21, PTLSTBLD+3~, PTLSTBLD+13, PTLSTBLD+15, PTFILE+3~, PTFILE+12, BKGTM+1 , BKGTM+7, POSFILE+3~, POSFILE+13, BKGPOS+1*, BKGPOS+8
SCJOBID	PTGET+12~, PTGET+19, PTGET+20, PTGET+21
SCLAST	PTGET+12~, PTGET+21
>> SCLOC	PTPOSLST+24, PTPOSLST+26, PTTMLST+14, PTTMLST+16
SCMAFLD	POSFILE+4~
SCNEW	PTFILE+3~, POSFILE+3~
SCNEW1	POSFILE+4~
SCNOW	PTFILE+4~, PTFILE+9, PTFILE+20, POSFILE+4~, POSFILE+8, POSFILE+18
SCOK	PTLSTBLD~, PTLSTBLD+8, PTLSTBLD+10, PTLSTBLD+11, PTLSTBLD+16, PTFILE~, BKGTM+4, POSFILE~, BKGPOS+5, PTPOSLST~ , PTPOSLST+15, PTPOSLST+24, PTPOSLST+36, PTTMLST~, PTTMLST+12, PTTMLST+14, PTTMLST+28, DISCHPOS~, DISCHPOS+7, DISCHPOS+11*
SCOK(	BKGTM+5, BKGPOS+6, BKG+11*
SCOK(0	BKG+10*
>> SCOK1	BLKPOS+4, BLKTM+4
SCOLD	PTFILE+3~, BKGTM+4, POSFILE+3~, BKGPOS+5
SCOTH	PTFILE+3~, BKGTM+2
SCPOSFRM	POSFILE+4~, POSFILE+12*, BKGPOS+2
SCPOSTO	POSFILE+4~, POSFILE+11*, BKGPOS+2
SCSTART	PTGET+12~, PTGET+19
SCTEAM	PTFILE+3~, BKGTM+2, POSFILE+3~
SCVAL	PTLSTBLD~, PTLSTBLD+9, PTLSTBLD+13, PTLSTBLD+14, PTLSTBLD+15
SCX	PTFILE+3~, BKGTM+2, BKGTM+5, POSFILE+3~, BKGPOS+2, BKGPOS+6, BLKPOS+1~, BLKPOS+2, BLKPOS+5, BLKTM+1~ , BLKTM+2, BLKTM+5, BKG~, BKG+4, BKG+5, S~
TD	PTPOSLST+3~, PTPOSLST+8, PTPOSLST+20, FILTOUT+7, PTTMLST+4~, PTTMLST+20, PTTMLST+21, PTTMLST+23
U	PTLSTBLD+13, PTLSTBLD+14, PTLSTBLD+15, BKGTM+5, BKGPOS+6, PTPOSLST+32, PTPOSLST+36, PTTMLST+21, PTTMLST+23, PTTMLST+28 , BKG+10, BKG+11
ZTDESC	PTFILE+4~, BKG+5*
ZTDTH	PTFILE+4~, BKG+6*
ZTPRI	PTFILE+4~, BKG+3*
>> ZTQUEUED	BKGTM+1, BKGTM+3, BKGPOS+1, BKGPOS+4
ZTRTN	PTFILE+4~, BKG+4*
>> ZTSAVE("SC*"	BKG+7*
>> ZTSAVE("^TMP($J,"	BKG+8*
>> ZTSK	BKG+10

Marked Items

Name	Field # of Occurrence
$T(T+SCX	S

Customize PDF page

Package: Scheduling

Routine: SCMRBK

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Used in RPC

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items