Routine: SRTPUTL

Package	Total	Call Graph
Surgery	2	$$HW^SROACL1 RET^SRTPCOM
VA FileMan	2	EN^DDIOL CHK^DIE
General Medical Record - Vitals	1	EN1^GMRVUT0
Kernel	1	($$FMADD,$$FMDIFF)^XLFDT
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Surgery	32	SRTPASS SRTPDONR SRTPHRT1 SRTPHRT2 SRTPHRT3 SRTPHRT4 SRTPHRT5 SRTPHRT6 SRTPKID1 SRTPKID2 SRTPKID3 SRTPKID4 SRTPKID6 SRTPLIV1 SRTPLIV2 SRTPLIV3 SRTPLIV4 SRTPLIV5 SRTPLIV6 SRTPLIV7 SRTPLUN1 SRTPLUN2 SRTPLUN3 SRTPLUN5 SRTPPAS SRTPRACE SRTPRH SRTPRK SRTPRLI SRTPRLU SRTPTMIT ^SRT

Entry Points

Name	Comments	DBIA/ICR reference
ADT	; set 'ADT x-ref
KADT	; kill 'ADT' x-ref
AT	; set logic for AT x-ref on DATE OF LAST TRANSMISSION
KAT	; kill logic for AT x-ref on DATE OF LAST TRANSMISSION
AGE	; set logic of the 'AGE' x-ref on the Donor's Date of Birth
KAGE	; 'KILL' logic of the 'AGE' x-ref on the Date of Birth
Y
HLA	; called by input transform of the HLA TYPING fields
PVR	; called by input transform of the PVR VASODILATION fields
CHK199	; check entries of the Tobacco Use Timeframe field (#199) based on the value of the Tobacco Use field.
TUT	; set default value for tobacco use timeframe
HW	; get weight & height from Vitals
WT
HT
F69(SRTPP)	; restrict selection of DCD & SCD for heart transplant
F147(SRTPP)	; screen out DIET for Lung, Liver, and Kidney
HDR	; print screen header
SRHDR
TR(SRI)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,SRHDR(I) Line Location: HDR+2
Function Call: WRITE	Prompt: ?(79-$L(SRHPG)),SRHPG Line Location: HDR+2
Function Call: WRITE	Prompt: ! Line Location: HDR+3
Function Call: WRITE	Prompt: "-" Line Location: HDR+3
Function Call: WRITE	Prompt: ! Line Location: HDR+4
Routine Call	DIE Line Location: WT+2 HT+7

FileNo	Call Tags
^SRT - [#139.5]	CHK^DIE

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	SRHDR+2
^SRT - [#139.5]	ADT+1, KADT+1, AT+2, KAT+2, AGE+3, AGE+4, KAGE+1, PVR+2, PVR+3, CHK199+2 , CHK199+3, TUT+1, WT, WT+1, WT+2, HT, HT+2, HT+8*, F69+2, F147+2 , SRHDR, SRHDR+2, SRHDR+3
^SRT("ADT"	ADT+1*, KADT+1!
^SRT("AT"	AT+1*, AT+2!, KAT+1!, KAT+2!
^UTILITY($J	HT+2!, HT+3, HT+4, HT+5, HT+6

Name	Line Occurrences
$$TR	SRHDR+3

Name	Field # of Occurrence
>> DA	ADT+1, KADT+1, AT+1, AT+2, KAT+1, KAT+2, AGE+2, KAGE+1, CHK199+1*, CHK199+2 , CHK199+3
>> DFN	SRHDR*
DOB	AGE+1~, AGE+3*, AGE+4
DOT	AGE+1~, AGE+3*, AGE+4
>> DR	PVR+2, PVR+3
GMRVSTR	HT+1~, HT+2*
GMRVSTR(0	HT+2*
I	HDR+2, HDR+3, SRHDR~, SRHDR+3*
IOF	HDR+1
RESULTS	HT+2!
SRBDATA	HT+1~, HT+6*
SRBIEN	HT+1~, HT+5*, HT+6
SRBRDT	HT+1~, HT+4*, HT+5, HT+6
>> SRCASE	SRHDR*, SRHDR+1
SREND	HW+1~, WT+1, HT+2
SREQ	HW+1~
SREX	HW+1~, WT+1, WT+2, HT+6, HT+7
SREY	HW+1~, WT+2, HT+7, HT+8
SRHDR	HDR+1, SRHDR!, SRHDR+1*
SRHDR(	HDR+2
SRHDR(1	SRHDR+4*
SRHPG	HDR+2, HDR+3!
SRHTDT	HT+1~
SRI	TR~, TR+1
SRINVDT	ADT+1!, KADT+1!
>> SRNOVA	SRHDR+1
SROK	F69+1~, F69+2, F69+3, F147+1~, F147+2, F147+3
>> SROPER	SRHDR+3, SRHDR+4
SRPAGE	HDR+1, HDR+3!
>> SRSDATE	SRHDR+2*, SRHDR+4
SRSTRT	HW+1~, WT+1*
SRTPP	AGE+2, AGE+3, AGE+4, KAGE+1, PVR+2, PVR+3, CHK199+1, TUT+1, WT, WT+1 , WT+2, HT, HT+2, HT+8, F69~, F69+2, F147~, F147+2, SRHDR, SRHDR+2 , SRHDR+3
>> SRVACO	SRHDR*, SRHDR+1
SRX	AT+1~, AT+2, KAT+1~, KAT+2, HLA+1~, PVR+1~, PVR+4
SRY	PVR+1~, PVR+2, PVR+3, PVR+4
>> VA("PID"	SRHDR+1
>> VADM(1	SRHDR+1
X	ADT+1, KADT+1, AT+1, AT+2, KAT+1, KAT+2, Y!, Y+1, HLA+1!, PVR+1!* , PVR+4!, CHK199+2!, CHK199+3!, TUT+1*, SRHDR~
>> Y	F69+2, F147+2, SRHDR+2*