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

Package: Surgery

Routine: SRSCAN0


Information

SRSCAN0 ;BIR/MAM - CANCEL SCHEDULED OPERATIONS (CONT);[AUG 10,2011@14:19]

Source Information

Source file <SRSCAN0.m>

Entry Points

Name Comments DBIA/ICR reference
CUT
REQ
PRESS
ASK
NOCC ; no longer concurrent cases
SWAP ; move data into a new entry and set up the cancel date in the old
SWAP2
CON
END
CON1
OERR ; update ORDER file (100)
ABORT ; abort surgery case

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Case schedule type is STANDBY. "
  • Line Location: CUT+1
Function Call: WRITE
  • Prompt: !!,"Case #"_SRTN_" has been removed from the schedule and changed to a request."
  • Line Location: REQ+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"If you want to remove both cases from the schedule, enter 'YES'. If you",!,"answer 'NO', the cases will no longer be associated with each other."
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SWAP+1
Function Call: WRITE
  • Prompt: !!,"Case NOT cancelled."
  • Line Location: SWAP+1
Function Call: WRITE
  • Prompt: !!,"Case NOT cancelled."
  • Line Location: SWAP+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF,!," "_VADM(1)_" ("_VA("PID")_") Case #"_SRTN_" - "_SRDT
  • Line Location: ABORT+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: ABORT+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: ABORT+4
Function Call: WRITE
  • Prompt: !!,"Case has been cancelled/Aborted. No action taken."
  • Line Location: ABORT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ABORT+7
Function Call: WRITE
  • Prompt: !!,"Case NOT cancelled/aborted."
  • Line Location: ABORT+7
Function Call: WRITE
  • Prompt: !!," TIME PAT OUT OR and TIME PAT OUT OR must be entered to ABORT the case. Please enter these times first"
  • Line Location: ABORT+8
Function Call: WRITE
  • Prompt: !!,"Case NOT cancelled/aborted."
  • Line Location: ABORT+11
Function Call: WRITE
  • Prompt: !!!,$S(SRTF=1:"Cancelling",1:"Aborting")_" Surgery case #",SRTN
  • Line Location: ABORT+14
Info |  Source |  Entry Points |  Interaction Calls