Routine: SROSRRT

Package	Total	Call Graph
VA Fileman	4	^DIC FILE^DICN ^DIE ^DIK
Surgery	1	^SRRTINIT

Entry Points

Name	Comments	DBIA/ICR reference
ADD	; add option Tissue Examination Report (SROTRPT) to the ; Non-O.R. Procedures (Enter/Edit) Menu
END	;
HELP	; help message for updating SRNON-OR input template
TEMP	; update input template SRONOP-ENTER

External References

Name	Field # of Occurrence
^DIC	ADD+8, ADD+10, END+1, END+3
FILE^DICN	ADD+13
^DIE	ADD+14
^DIK	END+2, END+3
^SRRTINIT	TEMP+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This routine will add the Tissue Examination Report to the Non-O.R.",!,"Procedures (Enter/Edit) Menu. It also provides the ability to add the" Line Location: ADD+4
Function Call: WRITE	Prompt: !,"fields BRIEF CLIN HISTORY, OPERATIVE FINDINGS, and SPECIMENS to the",!,"SRNON-OR input template.",!!,"After updating the input template, the TISSUE EXAM/NON O.R. entry in the" Line Location: ADD+5
Function Call: WRITE	Prompt: !,"PACKAGE file will be removed. It was created to provide the template",!,"updates and is no longer needed. The PACKAGE file entry SURGERY V3.0" Line Location: ADD+6
Function Call: WRITE	Prompt: !,"PATCH, which was created by an earlier Surgery patch, will be removed",!,"also since it, too, is no longer needed." Line Location: ADD+7
Function Call: WRITE	Prompt: !!,"You are missing the Non-O.R. Procedures (Enter/Edit) Menu. Please contact",!,"your local ISC customer service representative for assistance." Line Location: ADD+9
Function Call: WRITE	Prompt: !!,"You are missing the Tissue Examination Report option. Please contact your",!,"local ISC customer service representative for assistance." Line Location: ADD+11
Function Call: WRITE	Prompt: !!,"Adding the Tissue Examination Report to Non-O.R. Procedures (Enter/Edit)..." Line Location: ADD+12
Function Call: WRITE	Prompt: !!,"This routine provides the ability to overlay the input template SRNON-OR.",!,"This template is used within the option ""Edit Non-O.R. Procedure"" to" Line Location: TEMP+3
Function Call: WRITE	Prompt: !,"update Non-O.R. Procedure information." Line Location: TEMP+4
Function Call: WRITE	Prompt: !!,"If you have already made local changes to this template, you may opt to",!,"bypass this portion of the process and update your input template manually." Line Location: TEMP+5
Function Call: WRITE	Prompt: !,"The fields to be added are SPECIMENS, BRIEF CLIN HISTORY, and OPERATIVE",!,"FINDINGS." Line Location: TEMP+6
Function Call: READ	Timeout: DTIME Variable: SRYN Line Location: TEMP+7
Function Call: WRITE	Prompt: !!,"Enter ""YES"" or ""NO"". If you need additional help, enter ""?""." Line Location: TEMP+10
Function Call: WRITE	Prompt: !!,"No updates have been made to the SRNON-OR template." Line Location: TEMP+11
Function Call: WRITE	Prompt: !!,"Updating the SRNON-OR template.",! Line Location: TEMP+12
Function Call: WRITE	Prompt: !!,"Removing SURGERY V3.0 PATCH from PACKAGE file..." Line Location: END+3
Function Call: WRITE	Prompt: !!,"The process is complete. The Tissue Examination Report can now be printed",!,"for Non-O.R. Procedures." Line Location: END+4
Function Call: WRITE	Prompt: !!,"Enter ""YES"" if you want to overlay the input template SRNON-OR. If you have",!,"made local changes to this template, answering ""YES"" will remove them." Line Location: HELP+1
Function Call: WRITE	Prompt: !,"If you have made local changes and do not wish to have them removed, you should",!,"answer ""NO"" to this question. Then, using VA FileMan, add the fields" Line Location: HELP+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: HELP+3
Function Call: WRITE	Prompt: !,"SPECIMENS, OPERATIVE FINDINGS, and BRIEF CLIN HISTORY to the SRNON-OR",!,"template.",!!,"Press RETURN to continue: " Line Location: HELP+3
Routine Call	DIE Line Location: ADD+14
Routine Call	DIC Line Location: ADD+8 ADD+10 END+1 END+3

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	ADD+13!, ADD+14!, END+2!, END+3!*, END+5!
DA(1	ADD+13, ADD+14
DD	ADD+13!
DIC	ADD+8!, ADD+10!, ADD+13!, END+1!, END+2!, END+3!*, END+5!
DIC(0	ADD+8, ADD+10, ADD+13, END+1, END+3*
DIE	ADD+14!*, END+5!
DIK	END+2!, END+3!, END+5!
DINUM	ADD+13!, END+5!
DLAYGO	ADD+13*, END+5!
DO	ADD+13!, END+5!
DR	ADD+13!, ADD+14!*, END+5!
DTIME	TEMP+7, HELP+3
SRMENU	ADD+8*, ADD+9, ADD+12, ADD+13, ADD+14, END+5!
SRPKG	END+1, END+2, END+3, END+5!
SRSOUT	ADD+3, TEMP+2, END+5!, HELP+3
SRSUB	ADD+13*, ADD+14, END+5!
SRTISS	ADD+10*, ADD+11, ADD+12, ADD+13, END+5!
SRYN	TEMP+7, TEMP+8, TEMP+9, TEMP+10, TEMP+11, END+5!
X	ADD+8!, ADD+10!, ADD+13!, ADD+14!, END+1, END+3!, END+5!, HELP+3
Y	ADD+8!, ADD+10!, ADD+13!, ADD+14!, END+1, END+3!, END+5!

Customize PDF page

Package: Surgery

Routine: SROSRRT

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: