Routine: MCARPACE

Information

MCARPACE ;WISC/RMP,TJK-COMBINED GENERATOR,LEAD ENTER/EDIT ;5/2/96 13:02

Name	Comments	DBIA/ICR reference
ALEAD
VLEAD
GEN2
EXIT
NUM(MCFILE)	;
LAST
DEM	; EDIT DEMOGRAPHIC INFORMATION ONLY
ORDER1	;

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!!!,"COMBINED IMPLANT/LEADS PROCEDURES",!!! Line Location: MCARPACE+2
Function Call: WRITE	Prompt: !,"Generator Information...." Line Location: MCARPACE+8
Function Call: WRITE	Prompt: !,"Atrial Lead Data...." Line Location: ALEAD+0
Function Call: WRITE	Prompt: !,"Ventricular Lead Data..." Line Location: VLEAD+0
Function Call: WRITE	Prompt: !,"GENERATOR DATA..." Line Location: GEN2+0
Function Call: WRITE	Prompt: !!,"No ",$S(MCFILE=698.1:"Ventricular",1:"Atrial")," Lead data entered for this patient",!! Line Location: LAST+1
Function Call: WRITE	Prompt: !!,"Last ",$S(MCFILE=698.1:"Ventricular",1:"Atrial")," Lead implanted on ",Y,!! Line Location: LAST+2
Function Call: WRITE	Prompt: @IOF,!!!,"DEMOGRAPHIC INFORMATION",!!! Line Location: DEM+1