Routine: SROPCEU0

Package	Total	Call Graph
VA Fileman	3	NOW^%DTC ^DIC ^DIR
Surgery	2	(TMP,UTIL)^SROPCEP ^SROSTOP
PCE Patient Care Encounter	1	($$DATA2PCE,$$DELVFILE)^PXAPI
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Surgery	1	SROPCEU

Entry Points

Name	Comments	DBIA/ICR reference
CASE	; print case info
HDR	; print heading
S1
TOT
SUBHD
REFILE	; re-file cases in PCE
DEM	; get patient dempgraphic information
CLIN	; get associated clinic
PROC	; get principal procedure
PAGE

External References

Name	Field # of Occurrence
NOW^%DTC	SROPCEU0+8
^DIC	REFILE+1
^DIR	PAGE+1
$$DATA2PCE^PXAPI	REFILE+7
$$DELVFILE^PXAPI	REFILE+4
TMP^SROPCEP	REFILE+6
UTIL^SROPCEP	REFILE+5
^SROSTOP	HDR+1
DEM^VADPT	DEM+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$S(SRSPEC:"SPECIALTY: "_SRSPECN,1:" * * * ALL SPECIALTIES * * *") Line Location: SROPCEU0+12
Function Call: WRITE	Prompt: !!," Total with NO status: ",$J(SRCNT(0),5) Line Location: TOT+0
Function Call: WRITE	Prompt: !," Total with NON-COUNT: ",$J(SRCNT(12),5) Line Location: TOT+1
Function Call: WRITE	Prompt: !,"Total with ACTION REQUIRED: ",$J(SRCNT(14),5),!,?28,"-----" Line Location: TOT+2
Function Call: WRITE	Prompt: !," Total cases identified: ",$J(SRCNT,5) Line Location: TOT+3
Function Call: WRITE	Prompt: !!," * * * COMBINED TOTALS FOR ALL SPECIALTIES * * *" Line Location: S1+4
Function Call: WRITE	Prompt: ! Line Location: SUBHD+1
Function Call: WRITE	Prompt: !,SRSDATE,?23,SRTN,?38,$S(SRSORT:$E(SRLOC,1,20),1:$E(SRSSNM,1,20)),?61,$S(IOM<82:$E(SRSTATUS,1,19),1:SRSTATUS) Line Location: CASE+6
Function Call: WRITE	Prompt: ?23,SRPROC(3) Line Location: CASE+7
Function Call: WRITE	Prompt: ! Line Location: CASE+8
Function Call: WRITE	Prompt: "-" Line Location: CASE+8
Function Call: WRITE	Prompt: ! Line Location: PAGE+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(SRINST)\2),SRINST Condition for execution: $E(IOST)="P" Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(SRRPT)\2),SRRPT,?(IOM-10),$J("Page "_SRPAGE,9),!,?(IOM-$L(SRTITLE)\2),SRTITLE,!,?(IOM-$L(SRFRTO)\2),SRFRTO Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(SRPRINT)\2),SRPRINT Line Location: HDR+3
Function Call: WRITE	Prompt: ! Condition for execution: SRSUB Line Location: HDR+3
Function Call: WRITE	Prompt: !!,"DATE OF "_$S(SRFLG=1:"OPERATION",SRFLG=2:"PROCEDURE",1:"OP/PROCEDURE"),?23,"CASE #",?38,$S(SRSORT:"CLINIC",1:"SPECIALTY"),?61,"SCHED STATUS",!,"PATIENT NAME",?23,"PRINCIPAL PROCEDURE",!,"PATIENT ID (AGE)" Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: HDR+5
Function Call: WRITE	Prompt: "=" Line Location: HDR+5
Routine Call	DIC Line Location: REFILE+1
Routine Call	DIR Line Location: PAGE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	SROPCEU0+5, SROPCEU0+8, DEM+1
^ECC(723	CASE+3
^SC - [#44]	CLIN+4
^SRF - [#130]	CASE+2, CASE+3, DEM+1, PROC+1, CLIN+1, CLIN+2, CLIN+3, REFILE+4
^SRO(137.45 - [#137.45]	CASE+3, CLIN+2
^SRS - [#131.7]	CLIN+2
^TMP("SR69"	SROPCEU0+10, CASE+4, REFILE+3
^TMP("SRPXAPI"	REFILE+8!
^TMP("SRSP"	S1, S1+1, S1+2, S1+4, CASE+4

Label References

Name	Line Occurrences
CASE	SROPCEU0+10, S1+1
CLIN	CASE+5
DEM	CASE+6
HDR	SROPCEU0+10, PAGE
PAGE	SROPCEU0+11, S1, S1+2, S1+4, CASE+1
PROC	CASE+6
S1	SROPCEU0+9
SUBHD	HDR+6
TOT	S1+3, S1+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SROPCEU0+8
>> DFN	DEM+1*
DIC	REFILE+1!*
DIC(0	REFILE+1*
DIR	PAGE+1!
DIR(0	PAGE+1*
>> DTOUT	PAGE+1
>> DUOUT	PAGE+1
>> EDATE	SROPCEU0+5
>> ENDATE	SROPCEU0+5*, SROPCEU0+8
>> I	CASE+8, PROC+3, HDR+5*
IO	SROPCEU0+5
IOF	HDR+2
IOM	CASE+6, CASE+8, HDR+2, HDR+3, HDR+5
IOSL	SROPCEU0+11, S1+2, CASE+1
IOST	PAGE, HDR+2, HDR+3
>> J	PROC+3*
>> K	PROC+2, PROC+3
>> SDATE	SROPCEU0+5
>> SR(0	DEM+1*
>> SRAGE	CASE+7, DEM+1*
>> SRCNT	TOT+3, S1+2, S1+4
>> SRCNT(0	TOT, S1+2, S1+4
>> SRCNT(12	TOT+1, S1+2, S1+4
>> SRCNT(14	TOT+2, S1+2, S1+4
>> SRFILE	REFILE+2*
>> SRFLG	SROPCEU0+7, CASE+7, HDR+4
>> SRFRTO	SROPCEU0+8*, HDR+2
>> SRHALT	HDR+1
>> SRHDR	SROPCEU0+5, PAGE, HDR+5
>> SRINST	SROPCEU0+8*, HDR+2
>> SRK	REFILE+2*, REFILE+5
>> SRLOC	CASE+6, CLIN+1, CLIN+2, CLIN+3, CLIN+4
>> SRNEW	SROPCEU0+5, S1, SUBHD, SUBHD+1, HDR+6
>> SRNON	CASE+2*, CASE+3, CASE+7, CLIN+2, CLIN+3
>> SRPAGE	SROPCEU0+5, HDR+2, HDR+5
>> SRPKG	REFILE+1*, REFILE+7
>> SRPRINT	SROPCEU0+8*, HDR+3
SRPROC	PROC+1!
SRPROC(	PROC+2, PROC+3
SRPROC(1	CASE+7, PROC+1*
SRPROC(2	CASE+7
SRPROC(3	CASE+7
>> SRRPT	SROPCEU0+6*, HDR+2
>> SRS	REFILE+2*, REFILE+7
>> SRSDATE	CASE+6, DEM+1*
>> SRSDT	DEM+1*
>> SRSEL	SROPCEU0+10, S1+1, HDR+4
>> SRSITE("SITE"	SROPCEU0+8
>> SRSNM	CASE+7, DEM+1, DEM+2
>> SRSORT	SROPCEU0+9, SUBHD+1, CASE+4, CASE+5, CASE+6, HDR+4, HDR+6
>> SRSOUT	SROPCEU0+5, SROPCEU0+10, SROPCEU0+11, S1, S1+1, S1+2, S1+4, CASE+1, PAGE+1, HDR+1*
>> SRSP	S1*
>> SRSPEC	SROPCEU0+12
>> SRSPECN	SROPCEU0+12, S1*, S1+1, S1+2, SUBHD, CASE+4, HDR+6
>> SRSS	CASE+3*, CLIN+2
>> SRSSN	CASE+7, DEM+1*
>> SRSSNM	CASE+3*, CASE+6
>> SRSTATUS	CASE+4*, CASE+6
>> SRSUB	SROPCEU0+5, TOT+3, S1+2, S1+4, HDR+3, HDR+4, HDR+5*
>> SRTITLE	SROPCEU0+7*, HDR+2
>> SRTN	SROPCEU0+10, S1+1, CASE+2, CASE+3, CASE+4, CASE+6, DEM+1, PROC+1, CLIN+1, CLIN+2 , CLIN+3, REFILE+2, REFILE+3, REFILE+4
>> SRV	REFILE+4, REFILE+7
SRVISIT	REFILE+1~, REFILE+4*, REFILE+7
SRVSIT	REFILE+1~, REFILE+4, REFILE+7
>> STARTDT	SROPCEU0+5*, SROPCEU0+8
>> VA("PID"	DEM+1
>> VADM(1	DEM+1, DEM+2
>> VADM(3	DEM+1
>> X	S1+2, S1+4, PROC+1, PROC+2, PROC+3, CLIN+1, CLIN+2, CLIN+3, REFILE+1
>> X1	DEM+1*
>> X2	DEM+1*
>> Y	SROPCEU0+5, SROPCEU0+8, DEM+1, PROC+3, CLIN+2*, REFILE+1
>> ZTQUEUED	HDR+1

Customize PDF page

Package: Surgery

Routine: SROPCEU0

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: