Routine: SRSREQUT

Information

SRSREQUT ;B'HAM ISC/MAM - REQUEST UTILITIES ; 29 SEPT 1992 10:35 am

Source file <SRSREQUT.m>

Package	Total	Call Graph
Surgery	1	OPT^SRSUPRQ
VA Fileman	1	^DIE

Package	Total	Caller Graph
Surgery	3	SRSCONR SRSMREQ SRSWREQ

Name	Comments	DBIA/ICR reference
LFTOVR	; check for outstanding requests
COMP
LIST	;
UP
NEW
LOOP	; break procedure if greater than 70 characters

Name	Field # of Occurrence
^DIE	COMP+2
OPT^SRSUPRQ	UP+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The following "_GRAMMER_" outstanding for "_SRNM_":",! Line Location: LFTOVR+2
Function Call: READ	Timeout: DTIME Variable: SROUTS Line Location: UP+0
Function Call: WRITE	Prompt: !!,"Enter a RETURN if you would like to delete, update, or change the date of the",!,"requested cases." Line Location: UP+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: NEW+0
Function Call: WRITE	Prompt: !!,"Enter 'YES' to continue with this option to make a new request, or RETURN to",!,"quit." Line Location: NEW+1
Function Call: WRITE	Prompt: !,CNT_".",?5,SRSDT,!,?5,SROPS(1) Line Location: LIST+2
Function Call: WRITE	Prompt: !,?5,SROPS(2) Line Location: LIST+2
Function Call: WRITE	Prompt: !,?5,SROPS(2) Line Location: LIST+2
Function Call: WRITE	Prompt: !,?5,SROPS(2) Line Location: LIST+2
Routine Call	DIE Line Location: COMP+2

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	LFTOVR+3, COMP, COMP+1, COMP+2, LIST+1
^SRF("AR"	LFTOVR+1

Name	Field # of Occurrence
>> CNT	LFTOVR+1, LFTOVR+3, UP, LIST+2
DA	COMP+2!*
DIE	COMP+2!*
DR	COMP+2!*
DTIME	UP, NEW
>> GRAMMER	LFTOVR+2*
>> I	LFTOVR+3*
>> LOOP	LOOP+1*
>> M	LIST+1*, LOOP+1
MM	LIST+1!, LOOP+1*
MMM	LIST+1!, LOOP+1*
SRCASE	LFTOVR+1!
SRCASE(	LFTOVR+1*, LFTOVR+3
SRCASE(0	LFTOVR+2
SRCASE(2	LFTOVR+2
>> SRDFN	UP+3*
>> SRDONE	LFTOVR+1, COMP, COMP+2
>> SRNM	LFTOVR+2, NEW
>> SROPER	LIST+1, LOOP+1
SROPS	LIST+1!
SROPS(	LOOP+1*
SROPS(1	LIST+1*, LIST+2
SROPS(2	LIST+2
SROPS(3	LIST+2
SROPS(4	LIST+2
>> SROUTS	UP, UP+1, UP+2, UP+3
>> SRSDPT	LFTOVR+1, UP+3
>> SRSDT	LFTOVR+3*, LIST+2
>> SRSOP	LIST+1*
>> SRSOTH	UP+3, NEW, NEW+2
>> SRSOUT	UP+3*
>> SRSRDT	LFTOVR+1*
>> SRTN	LFTOVR+1, LFTOVR+3, COMP, COMP+1, COMP+2, LIST+1
>> X	NEW, NEW+1, NEW+2