Routine: SRTPHRT2

Package	Total	Call Graph
Surgery	2	^SRTPHRT3 HDR^SRTPUTL
VA Fileman	2	^DIE EN^DIQ1

Package	Total	Caller Graph
Surgery	2	SRTPHRT1 SRTPRH

Entry Points

Name	Comments	DBIA/ICR reference
DISP	; display fields
END
HELP
ONE	; edit one item
START
RANGE	; range of numbers
COMM	; Other Cardiomyopathy

External References

Name	Field # of Occurrence
^DIE	ONE+1
EN^DIQ1	DISP+4
^SRTPHRT3	START+2
HDR^SRTPUTL	START+6, DISP+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: SRTPHRT2+2
Function Call: WRITE	Prompt: !!,"A Transplant Assessment must be selected prior to using this option.",!!,"Press <RET> to continue " Line Location: SRTPHRT2+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: START+1
Function Call: WRITE	Prompt: !! Line Location: START+8
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 '3' to update Ischemic Cardiomyopathy.)" 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: !,"Recipient Diagnosis",?40,"HLA Typing (#,#,#)" Line Location: DISP+6
Function Call: WRITE	Prompt: !,"==================================",?40,"==================" Line Location: DISP+7
Function Call: WRITE	Prompt: !,"1. Dilated Cardiomyopathy:",?31,$P(SRAO(1),"^"),?40,"12. Recipient HLA-A: ",$P(SRAO(12),"^") Line Location: DISP+8
Function Call: WRITE	Prompt: !,"2. Coronary Artery Disease:",?31,$P(SRAO(2),"^"),?40,"13. Recipient HLA-B: ",$P(SRAO(13),"^") Line Location: DISP+9
Function Call: WRITE	Prompt: !,"3. Ischemic Cardiomyopathy:",?31,$P(SRAO(3),"^"),?40,"14. Recipient HLA-C: ",$P(SRAO(14),"^") Line Location: DISP+10
Function Call: WRITE	Prompt: !,"4. Alcoholic Cardiomyopathy:",?31,$P(SRAO(4),"^"),?40,"15. Recipient HLA-BW: ",$P(SRAO(15),"^") Line Location: DISP+11
Function Call: WRITE	Prompt: !,"5. Valvular Cardiomyopathy:",?31,$P(SRAO(5),"^"),?40,"16. Recipient HLA-DR: ",$P(SRAO(16),"^") Line Location: DISP+12
Function Call: WRITE	Prompt: !,"6. Sarcoidosis:",?31,$P(SRAO(6),"^"),?40,"17. Recipient HLA-DQ: ",$P(SRAO(17),"^") Line Location: DISP+13
Function Call: WRITE	Prompt: !,"7. Idiopathic Cardiomyopathy:",?31,$P(SRAO(7),"^") Line Location: DISP+14
Function Call: WRITE	Prompt: !,"8. Viral Cardiomyopathy:",?31,$P(SRAO(8),"^") Line Location: DISP+15
Function Call: WRITE	Prompt: !,"9. Peripartum Cardiomyopathy:",?31,$P(SRAO(9),"^") Line Location: DISP+16
Function Call: WRITE	Prompt: !,"10. Rejection:",?31,$P(SRAO(10),"^") Line Location: DISP+17
Function Call: WRITE	Prompt: !,"11. Other Cardiomyopathy:" Line Location: DISP+18
Function Call: WRITE	Prompt: !!,SRLINE Line Location: DISP+19
Function Call: WRITE	Prompt: ?27,SREXT Line Location: COMM+1
Function Call: WRITE	Prompt: ?27,X Line Location: COMM+2
Function Call: WRITE	Prompt: ?27,$E(X,1,J-1) Line Location: COMM+3
Routine Call	DIE Line Location: ONE+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

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	SRTPHRT2+2, START+1, HELP+3
I	DISP+5, COMM+2~, COMM+3
IOF	END, HELP
J	COMM+2~, COMM+3*
SRAO	DISP+2!
SRAO(	START+3, START+8, ONE+1, DISP+5*
SRAO(1	DISP+8
SRAO(10	DISP+17
SRAO(11	DISP+18
SRAO(12	DISP+8
SRAO(13	DISP+9
SRAO(14	DISP+10
SRAO(15	DISP+11
SRAO(16	DISP+12
SRAO(17	DISP+13
SRAO(2	DISP+9
SRAO(3	DISP+10
SRAO(4	DISP+11
SRAO(5	DISP+12
SRAO(6	DISP+13
SRAO(7	DISP+14
SRAO(8	DISP+15
SRAO(9	DISP+16
>> SRCURL	RANGE+1*
>> SRDR	DISP+3*, DISP+4, DISP+5
>> SREMIL	START+8, RANGE+1, ONE+1
>> SREXT	DISP+18*, COMM+1, COMM+2
>> SRHPG	DISP+1*
>> SRLINE	DISP+19
>> SRNOMORE	RANGE+1, ONE+1
>> SRNOVA	DISP+1
>> SRPAGE	DISP+1*
>> SRQ	DISP+2*
>> SRSHEMP	RANGE+1*
>> SRSOUT	START, START+1, START+3, START+4, HELP+3
>> SRTPP	SRTPHRT2+2, ONE+1, DISP+4, DISP+5
SRX	START+4, START+5, HELP+1, HELP+2, DISP+4!, DISP+5*
SRY	DISP+4!
SRY(	DISP+5
>> SRZ	DISP+5*
X	SRTPHRT2+2, START+1, START+2, START+3, START+4, START+5, START+7, START+8, HELP+3, RANGE+1 , COMM+2~, COMM+3*
Y	START+4, ONE+1, COMM+2~, COMM+3
>> Z	START+4*

Customize PDF page

Package: Surgery

Routine: SRTPHRT2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend: