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: SROWRQ

Package: Surgery

Routine: SROWRQ


Information

SROWRQ ;B'HAM ISC/MAM - REQUESTS BY WARD ; 07/08/88 08:11

Source Information

Source file <SROWRQ.m>

Entry Points

Name Comments DBIA/ICR reference
BEG
DEVICE
HELP
END
HDR
CON ; print concurrent case
LOOP ; break procedure if greater than 60 characters

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Do you wish to print the requests for all wards ? NO// "
  • Variable: SRALL
  • Timeout: DTIME
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !!,"Answer 'YES' if you want to print the requests for all wards, or RETURN",!,"if you want a specific ward."
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?28,"Requests for Operations",!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?33,"Ward: "_SRWARD,!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !," Procedure: ",?15,SROPS(1)
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !,?15,SROPS(2)
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !,?15,SROPS(2)
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !,?15,SROPS(2)
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !," "_^SRF(SRSCC,5,COMMENT,0)
  • Line Location: CON+3
Info |  Source |  Entry Points |  Interaction Calls