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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: SROERR

Package: Surgery

Routine: SROERR


Information

SROERR ;B'HAM ISC/MAM,ADM - ORDER ENTRY ROUTINE ;01/22/99 9:47 AM

Source Information

Source file <SROERR.m>

Entry Points

Name Comments DBIA/ICR reference
CREATE ; create order in ORDER file (100)
REQ
LOC
EN ; entry for OE/RR, process order actions
8
EDIT ; edit requested case
END
DISPLAY
LOOP ; break case information if longer than 70 characters
PRESS
DETAIL
ADD ; add new requests to ORDER file (100)
PURGE ; purge order from ORDER file
DEL ; delete from ORDER file (100) and call CoreFLS API

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Not allowed on Surgical Requests !"
  • Line Location: 8+1
Function Call: WRITE
  • Prompt: !!,"Cannot update/delete case not in 'REQUESTED' status !"
  • Line Location: 8+2
Function Call: WRITE
  • Prompt: !!,"You must hold the 'SROREQ' key to perform this function !"
  • Line Location: 8+3
Function Call: READ
  • Variable: Z
  • Timeout: DTIME
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: !!,"If you want to delete this request, enter '1'. Enter '2' if you only want",!,"to update the general information about this case, or '3' to change the date",!,"for which this case is requested."
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: " ** DIED: "_Y_" **"
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: !!,SRSDT,?11,SROPS(1)
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: !,?11,SROPS(2)
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: !,?11,SROPS(2)
  • Line Location: DISPLAY+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PRESS+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: DETAIL+0
Function Call: WRITE
  • Prompt: " ** DIED: "_Y_" **"
  • Line Location: ADD+1
Function Call: WRITE
  • Prompt: !!,"Add New Surgery Requests",!!!,"1. Make Operation Requests",!,"2. Make a Request from the Waiting List",!,"3. Make a Request for Concurrent Cases"
  • Line Location: ADD+2
Function Call: READ
  • Variable: Z
  • Timeout: DTIME
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !!,"If you want to make a new operation request, enter '1'. Enter '2' if you want",!,"to make a request from the surgery waiting list, or '3' to make a request for",!,"concurrent cases."
  • Line Location: ADD+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] Classic Fileman Calls
^DIC(42 - [#42] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call