Routine: SROALCP

Information

SROALCP ;BIR/MAM - COMPLETE ASSESSMENTS (PRINTER) ;01/18/07

Package	Total	Call Graph
Surgery	4	CPTS^SROAUTL0 TECH^SROPRIN ^SROSTOP $$MANDIV^SROUTL0
Registration	1	DEM^VADPT
VA Fileman	1	D^DIQ

Package	Total	Caller Graph
Surgery	1	SROALC

Name	Line Occurrences
Function Call: WRITE	Prompt: !,SRTN,?20,SRANM_" "_VA("PID"),?67,$P(SRSS,"("),?107,SRTECH,!,SRDT,?20,SROPS(1) Line Location: SET+12
Function Call: WRITE	Prompt: !,?20,SROPS(2) Line Location: SET+12
Function Call: WRITE	Prompt: !,?20,SROPS(2) Line Location: SET+12
Function Call: WRITE	Prompt: !,?20,SROPS(2) Line Location: SET+12
Function Call: WRITE	Prompt: !,?20,"CPT Codes: " Line Location: SET+13
Function Call: WRITE	Prompt: ! Line Location: SET+15
Function Call: WRITE	Prompt: "-" Line Location: SET+15
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?53,"COMPLETED RISK ASSESSMENTS",?120,"PAGE "_SRPAGE,!,?(132-$L(SRINST)\2),SRINST,!,?58,"SURGERY SERVICE",?100,"DATE REVIEWED:" Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,"REVIEWED BY:" Line Location: HDR+3
Function Call: WRITE	Prompt: !!,"ASSESSMENT #",?20,"PATIENT",?67,"SURGICAL SPECIALTY",?107,"ANESTHESIA TECHNIQUE",!,"OPERATION DATE",?20,"OPERATIVE PROCEDURE(S)",! Line Location: HDR+4
Function Call: WRITE	Prompt: "=" Line Location: HDR+4

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SROALCP+3, SET+4, SET+5, SET+6, OTHER+1, OTHER+2
^SRF("AC"	SROALCP+3
^SRO(137.45 - [#137.45]	SET+8

Name	Field # of Occurrence
>> DFN	SET+4*
I	SET+4~, SET+5, SET+13~, SET+14
IOF	HDR+2
IOSL	SET+3
>> LINE	SET+15, HDR+4
>> LOOP	LOOP+1*
>> M	SET+7*, LOOP+1
MM	SET+7!, LOOP+1*
MMM	SET+7!, LOOP+1*
>> SR("RA"	SROALCP+3*, SET+2, SET+9
>> SRA(0	SET+4*, SET+8, SET+11
>> SRANM	SET+4*, SET+12
>> SRASSN	SET+4*
SRCPTT	SET+1!*
>> SRDFN	SROALCP+2*
>> SRDT	SET+11*, SET+12
>> SRED	SROALCP+3
>> SRFRTO	HDR+3
>> SRHALT	HDR+1
>> SRINST	HDR+2
>> SRINSTP	SROALCP+3
SRL	SET+13~*
>> SRLONG	OTHER+1*, OTHER+2
>> SROPER	SET+5, SET+6, SET+7, OTHER+1, OTHER+3, LOOP+1*
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	SET+7!
SROPS(	LOOP+1*
SROPS(1	SET+7*, SET+12
SROPS(2	SET+12
SROPS(3	SET+12
SROPS(4	SET+12
>> SROTHER	SET+5, OTHER+1, OTHER+2
>> SRPAGE	SROALCP+2, SET+3, HDR+2
SRPROC	SET+13~
SRPROC(	SET+14
>> SRSD	SROALCP+3*
>> SRSOUT	SROALCP+2, SROALCP+3, SET+3, HDR+1
>> SRSS	SET+8, SET+9, SET+12
>> SRTECH	SET+12
>> SRTN	SROALCP+3*, SET+4, SET+5, SET+6, SET+12, OTHER+1, OTHER+2
>> TYPE	SET+9*
>> VA("PID"	SET+4, SET+12
VADM	SET+4!
VADM(1	SET+4
>> X	SET+6*
>> Y	SET+11*
>> ZTQUEUED	HDR+1