Routine: SRTPVAN

Package	Total	Call Graph
VA Fileman	2	^DIE ^DIK
Surgery	1	START^SRTPNEW

Package	Total	Caller Graph
Surgery	1	SRTPTRAN

Entry Points

External References

Name	Field # of Occurrence
^DIE	CHG+9, ST+4, CLEAN+10
^DIK	ST+5
START^SRTPNEW	CHG+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This assessment has already been verified and transmitted. It cannot be",!,"changed. If the assessment was transmitted in error, use the option 'Update",!,"an Assessment Transmitted in Error'." Line Location: SRTPVAN+5
Function Call: WRITE	Prompt: !!,"This assessment has already been verified. It cannot be changed. If the",!,"assessment was verified in error, use the option 'Update an Assessment Verified",!,"in Error'." Line Location: SRTPVAN+6
Function Call: WRITE	Prompt: !!,"This assessment has a current status of "_$S(SRSTAT="I":"'Incomplete'",1:"'Complete/Unverified'") Line Location: CHG+0
Function Call: WRITE	Prompt: !,"The Transplant Assessment Indicator is a "_$S(SRATYPE="V":"VA",SRATYPE="N":"Non-VA",1:"")_" type" Line Location: CHG+1
Function Call: READ	Timeout: DTIME Variable: SRYN Line Location: CHG+2
Function Call: WRITE	Prompt: !!,"No action has been taken." Line Location: CHG+3
Function Call: WRITE	Prompt: !!,"Enter <RET> if this assessment was selected in error and the status should not ",!,"be changed. If you want to change this assessment type, enter 'YES'." Line Location: CHG+4
Function Call: WRITE	Prompt: !!,"No action has been taken." Line Location: CHG+5
Function Call: WRITE	Prompt: !!,"Changing Assessment type..." Line Location: CHG+9
Function Call: READ	Timeout: DTIME Variable: SRYN Line Location: ST+0
Function Call: WRITE	Prompt: !!,"No action has been taken." Line Location: ST+1
Function Call: WRITE	Prompt: !!,"Enter <RET> if this assessment was selected in error and should not be changed.",!,"If you want to delete this assessment, enter 'YES'." Line Location: ST+2
Function Call: WRITE	Prompt: !!,"This case has been completed/Transmitted and must remain in the file for your records." Line Location: ST+3
Function Call: WRITE	Prompt: !!,"Deleting Transplant Assessment..." Line Location: ST+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: RET+0
Function Call: WRITE	Prompt: !!,"Press <RET> to continue " Line Location: RET+0
Routine Call	DIE Line Location: CHG+9 ST+4 CLEAN+10

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	CHG+7!, ST+4!, ST+5!*, CLEAN+10!
DIE	CHG+7!, ST+4!, CLEAN+9*
DIK	ST+5!*
DR	CHG+7!, ST+4!, CLEAN+9*, CLEAN+10!
DTIME	CHG+2, ST, RET
>> I	CLEAN+9*
>> SR("RA"	SRTPVAN+4*
SRATYPE	SRTPVAN+3~, SRTPVAN+4*, CHG+1, CHG+2, CHG+5, CHG+6, CHG+7, CHG+8, CLEAN+2, CLEAN+4
SRCHG	SRTPVAN+3~, CHG+5*, CHG+6!
SRNTYPE	SRTPVAN+3~, CLEAN+1*, CLEAN+2, CLEAN+4
SRORG	SRTPVAN+3~, SRTPVAN+4*, CLEAN+3, CLEAN+5, CLEAN+6, CLEAN+7, CLEAN+8
>> SRSOUT	CHG+2, CHG+3, CHG+5, ST, ST+1*
SRSTAT	SRTPVAN+3~, SRTPVAN+4, SRTPVAN+5, SRTPVAN+6, CHG, DEL+1, ST+3
>> SRTN	CHG+5, CHG+6
>> SRTPDT	CHG+7
SRTPP	SRTPVAN+2, SRTPVAN+4, CHG+6, CHG+7, CHG+8, DEL+1, ST+4, ST+5, CLEAN+1, RET!
SRVA	CHG+5*, CHG+6!
SRVAR	SRTPVAN+3~, CLEAN+1, CLEAN+3, CLEAN+5, CLEAN+6, CLEAN+7, CLEAN+8, CLEAN+9
SRYN	SRTPVAN+3~, CHG+2, CHG+3, CHG+4, ST, ST+1, ST+2
>> X	RET*

Customize PDF page

Package: Surgery

Routine: SRTPVAN

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
ST
DEL	; delete assessment
RET
CLEAN	; clean up the database after changing the transplant type
CHG

Name	Line Occurrences
CHG	CHG+4
CLEAN	CHG+9
RET	SRTPVAN+5, SRTPVAN+6, CHG+3, CHG+5, CHG+9, ST+3
ST	ST+2