Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Entry Points | Interaction Calls

Print Page as PDF

Routine: SRSWREQ

Package: Surgery

Routine: SRSWREQ

Information

SRSWREQ ;BIR/MAM - REQUEST FROM WAITING LIST ;08/11/05

Source Information

Source file <SRSWREQ.m>

Entry Points

Name	Comments	DBIA/ICR reference
DEAD
LIST
REQ
DATE
END
ARRAY	; set array for waiting list info
OK

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,! Line Location: SRSWREQ+3
Function Call: WRITE	Prompt: !!,"The records show that "_SRNM_" died on "_Y_".",! Line Location: DEAD+1
Function Call: WRITE	Prompt: !!,"There are no entries on the Waiting List for "_SRNM_"." Line Location: DEAD+2
Function Call: WRITE	Prompt: @IOF,!,"Procedures Entered on the Waiting List for "_SRNM_": ",!! Line Location: LIST+0
Function Call: READ	Variable: SRW Timeout: DTIME Line Location: LIST+3
Function Call: READ	Variable: X Timeout: DTIME Line Location: LIST+4
Function Call: WRITE	Prompt: !!,"Select the number corresponding to the entry for which the request will",!,"be made.",!!,"Press RETURN to continue " Line Location: LIST+4
Function Call: WRITE	Prompt: ! Line Location: DATE+0
Function Call: WRITE	Prompt: !!,"Requests cannot be made for past dates.",!!,"Press RETURN to continue " Line Location: DATE+1
Function Call: WRITE	Prompt: ! Line Location: END+0
Function Call: WRITE	Prompt: @IOF Line Location: END+1
Function Call: WRITE	Prompt: !,CNT_". "_SRSERV,?40,"Date Entered on List: "_SRDT,!,?3,SROPER,! Line Location: ARRAY+3
Function Call: READ	Variable: SRYN Timeout: DTIME Line Location: OK+0
Function Call: WRITE	Prompt: !!,"Enter RETURN if this is the procedure that you would like to make into a",!,"request. Otherwise, enter 'NO'." Line Location: OK+1

Info | Source | Entry Points | Interaction Calls