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

Package: Surgery

Routine: SRSCHCA


Information

SRSCHCA ;B'HAM ISC/ADM - ADD CONCURRENT CASE TO ALREADY SCHEDULED CASE ; 26 MAY 1992 4:20 PM

Source Information

Source file <SRSCHCA.m>

Entry Points

Name Comments DBIA/ICR reference
DISP
REQ
END
LIST ; list stub info
LOOP ; break procedure if greater than 60 characters

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No concurrent case has been added.",!
  • Line Location: SRSCHCA+2
Function Call: WRITE
  • Prompt: !!,"No concurrent case has been added.",!
  • Line Location: SRSCHCA+6
Function Call: WRITE
  • Prompt: @IOF,!,"The following cases have been entered."
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !!!!,"1. Enter Information for Case #"_SRSCON(1),!,"2. Enter Information for Case #"_SRSCON(2),!
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !!,CON_". ",?4,"Case # "_SRSCON(CON),?40,SRSDT,!,?4,"Surgeon: "_SRSCON(CON,"DOC"),?40,SRSCON(CON,"SS"),!,?4,"Procedure: ",?16,SROPS(1)
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !,?16,SROPS(2)
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !,?16,SROPS(2)
  • Line Location: LIST+2
Info |  Source |  Entry Points |  Interaction Calls