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

Package: Surgery

Routine: SROPRI


Information

SROPRI ;B'HAM ISC/MAM - LIST OF OPERATIONS BY PRIORITY ; [ 09/22/98 11:42 AM ]

Source Information

Source file <SROPRI.m>

Entry Points

Name Comments DBIA/ICR reference
END
UTIL ; set ^TMP("SRLIST",$J
SPEC
NONE
ALL
CASE ; print individual case
OPS
PRINT ;
LOOP ; break procedure if greater than 50 characters
OTHER ; other operations

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$NODATA^SROUTL0()
  • Line Location: SROPRI+9
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue or '^' to quit. "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!!,"TOTAL ",SRSPEC,": ",TOTAL
  • Line Location: SPEC+3
Function Call: WRITE
  • Prompt: !!,"TOTAL ",SRSPEC,": 0"
  • Line Location: NONE+1
Function Call: WRITE
  • Prompt: !!!,"TOTAL ",SRCODE(SRP),": ",TOTAL
  • Line Location: ALL+2
Function Call: WRITE
  • Prompt: !!,?1,$E(SROD,4,5)_"/"_$E(SROD,6,7)_"/"_$E(SROD,2,3),?13,$E(SRNM,1,26),?38,SROPS(1)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?90,$E(SRSUR,1,23),?114,$E(SRANES,1,14),!,?1,SRTN,?13,VA("PID")
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?38,SROPS(2)
  • Condition for execution: $D(SROPS(2))
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?90,$E(SRFST,1,23),?114,"OP TIME: ",SROT," MIN.",!,SRABORT
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?38,SROPS(3)
  • Condition for execution: $D(SROPS(3))
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: ?90,$E(SRTWO,1,23)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,?38,SROPS(4)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?38,SROPS(5)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?38,SROPS(5)
  • Line Location: PRINT+4
Info |  Source |  Entry Points |  Interaction Calls