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

Package: Surgery

Routine: SRODLA1


Information

SRODLA1 ;B'HAM ISC/MAM - DELAYS, ONE SPECIALTY ; [ 04/04/00 11:23 AM ]

Source Information

Source file <SRODLA1.m>

Entry Points

Name Comments DBIA/ICR reference
MORE
PRINT ; print case information
OPS
UTIL
SETUT
CAUSE
OTHER ; other operations
LOOP ; break procedure if greater than 38 characters
COM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No data for selected date range."
  • Line Location: SRODLA1+6
Function Call: WRITE
  • Prompt: !!,$E(SRSDATE,4,5)_"/"_$E(SRSDATE,6,7)_"/"_$E(SRSDATE,2,3),?12,SRNM,?44,SRATT
  • Line Location: OPS+3
Function Call: WRITE
  • Prompt: ?84,SRCOM(1)
  • Condition for execution: $D(SRCOM(1))
  • Line Location: OPS+3
Function Call: WRITE
  • Prompt: !,SRDEL_" MINS.",?14,VA("PID"),?44,SROP(1)
  • Line Location: OPS+4
Function Call: WRITE
  • Prompt: ?84,SRCOM(2)
  • Line Location: OPS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: OPS+5
Function Call: WRITE
  • Prompt: ?44,SROP(J)
  • Condition for execution: $D(SROP(J))
  • Line Location: OPS+5
Function Call: WRITE
  • Prompt: ?84,SRCOM(J+1)
  • Condition for execution: $D(SRCOM(J+1))
  • Line Location: OPS+5
Function Call: WRITE
  • Prompt: !!,?SRCOL,SRCAUS,!,?SRCOL,SRUL
  • Line Location: CAUSE+2
Info |  Source |  Entry Points |  Interaction Calls