Routine: SRTPHRT1

Information

SRTPHRT1 ;BIR/SJA - HEART-RECIPIENT INFORMATION ;03/04/08

Package	Total	Call Graph
Surgery	4	^SRTPHRT2 COMM^SRTPLIV1 $$OUT^SRTPLUN1 (HDR,HW,SRHDR)^SRTPUTL
VA Fileman	2	^DIE EN^DIQ1

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: SRTPHRT1+2
Function Call: WRITE	Prompt: !!,"A Transplant Assessment must be selected prior to using this option.",!!,"Press <RET> to continue " Line Location: SRTPHRT1+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: START+1
Function Call: WRITE	Prompt: @IOF Line Location: END+0
Function Call: WRITE	Prompt: @IOF,!!!!,"Enter the number or range of numbers you want to edit. Examples of proper",!,"responses are listed below." Line Location: HELP+0
Function Call: WRITE	Prompt: !!,"1. Enter 'A' to update all information.",!!,"2. Enter a number (1-"_SRX_") to update the information in that field. (For",!," example, enter '1' to update VACO ID.)" Line Location: HELP+1
Function Call: WRITE	Prompt: !!,"3. Enter a range of numbers (1-"_SRX_") separated by a ':' to enter a range",!," of items. (For example, enter '1:4' to update items 1, 2, 3 and 4.)",! Line Location: HELP+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: HELP+3
Function Call: WRITE	Prompt: !! Line Location: RANGE+1
Function Call: WRITE	Prompt: !,"2. Date of Transplant:",?29,Y Line Location: NONVA+2
Function Call: WRITE	Prompt: !,SRLINE Line Location: NONVA+18
Routine Call	DIE Line Location: ONE+1

FileNo	Call Tags
^SRT - [#139.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	NONVA+2
^SRT - [#139.5]	NONVA+7, NONVA+9

Name	Line Occurrences
DISP	START
END	SRTPHRT1+2, START+1, START+2, START+3, START+4
HELP	START+3, START+4
ONE	START+8, RANGE+1
RANGE	START+7
START	START+3, START+4, START+7, START+8

Name	Field # of Occurrence
DA	ONE+1, DISP+4!
DIC	DISP+4!*
DIE	ONE+1!*
DIQ	DISP+4!*
DIQ(0	DISP+4*
DR	ONE+1!, DISP+2!, DISP+4!
DTIME	SRTPHRT1+2, START+1, HELP+3
>> I	DISP+5*
IOF	END, HELP
SRAO	DISP+2!
SRAO(	START+3, START+8, ONE+1, ONE+2, DISP+5*
SRAO(1	VA+1, NONVA+1
SRAO(10	VA+10, NONVA+13
SRAO(11	VA+11, NONVA+14
SRAO(12	VA+12, NONVA+15
SRAO(13	VA+13, NONVA+16
SRAO(14	NONVA+17
SRAO(15	NONVA+3
SRAO(16	NONVA+4
SRAO(17	NONVA+5
SRAO(18	NONVA+8
SRAO(2	VA+2, NONVA+2
SRAO(3	VA+3, NONVA+3
SRAO(4	VA+4, NONVA+4
SRAO(5	VA+5, NONVA+5
SRAO(6	VA+6, NONVA+7*, NONVA+8
SRAO(7	VA+7, NONVA+9*, NONVA+10
SRAO(8	VA+8, NONVA+11
SRAO(9	VA+9, NONVA+12
>> SRCURL	RANGE+1*
>> SRDR	DISP+3*, DISP+4, DISP+5
>> SREMIL	START+8, RANGE+1, ONE+1, ONE+2
>> SREXT	VA+13, NONVA+17
>> SRHPG	DISP+1*
>> SRLINE	SRTPHRT1+3*, NONVA+18
>> SRNOMORE	RANGE+1, ONE+1
>> SRNOVA	DISP+1, DISP+3, VA, NONVA
>> SRPAGE	DISP+1*
>> SRQ	DISP+2*
>> SRSHEMP	RANGE+1*
>> SRSOUT	SRTPHRT1+2, SRTPHRT1+3, START, START+1, START+3, START+4, HELP+3
>> SRTPP	SRTPHRT1+2, ONE+1, DISP+4, DISP+5, NONVA+7, NONVA+9
SRX	START+4, START+5, HELP+1, HELP+2, DISP+4!, DISP+5*
SRY	DISP+4!
SRY(	DISP+5
>> SRZ	DISP+5*
>> X	SRTPHRT1+2, START+1, START+2, START+3, START+4, START+5, START+7, START+8, HELP+3*, RANGE+1
>> Y	START+4, ONE+1, NONVA+2
>> Z	START+4*