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

Package: Surgery

Routine: SROREST


Information

SROREST ;B'HAM ISC/MAM - STUFF RESTRAINTS; [ 01/30/01 1:13 AM ]

Source Information

Source file <SROREST.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
LIST ;
END
PAGE
SEL
STUFF ; stuff restraints in Surgery file
RET

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"A surgical case has not been entered. "
  • Line Location: SROREST+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!,"Type '1' to enter irrigation solutions, or '2' to enter restraints",!,"or positioning aids.",!!,"Press RETURN to continue "
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF,!,?20,"Restraints and Positioning Aids",?(79-$L(SRNUM)),SRNUM,!
  • Line Location: PAGE+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: PAGE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PAGE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !!,SRI_" is an invalid entry. Please try again."
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !!,"Entering "_SREST1_" ..."
  • Line Location: STUFF+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RET+0
Info |  Source |  Entry Points |  Interaction Calls