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

Package: Surgery

Routine: SROCAN0


Information

SROCAN0 ;BIR/MAM - REPORT OF CANCELLATIONS (CONT.) ;08/08/2011

Source Information

Source file <SROCAN0.m>

Entry Points

Name Comments DBIA/ICR reference
SRSP
SET ; set up ^TMP
CASE ; print individual case
OPS
PRINT ;
END
OTHER ; other operations
LOOP ; break procedure if greater than 55 characters
HDR ; print heading
SUB ; print specialty sub-heading
SUB1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No data for selected date range."
  • Line Location: SROCAN0+8
Function Call: WRITE
  • Prompt: !!,"No data for selected date range."
  • Line Location: SROCAN0+9
Function Call: WRITE
  • Prompt: !!,SROD,?15,$E(SRNM,1,28),?44,SROPS(1),?95,SRCD,!,SRTN,?15,VA("PID")
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?44,SROPS(2)
  • Condition for execution: $D(SROPS(2))
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?95,SRCR
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,?44,SROPS(3)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,?44,SROPS(4)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,?44,SROPS(4)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,?44,SROPS(4)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,?115,"PAGE: "_PAGE,!,?55,"REPORT OF CANCELLATIONS",?100,"REVIEWED BY:"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"PRINTED: ",SRPRINT,?53,"FROM ",$E(SRSD,4,5),"/",$E(SRSD,6,7),"/",$E(SRSD,2,3)," TO ",$E(SRED,4,5),"/",$E(SRED,6,7),"/",$E(SRED,2,3),?100,"DATE REVIEWED:"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,"DATE",?15,"PATIENT",?44,"OPERATION(S)",?95,"CANCEL DATE",!,"CASE #",?15,"ID#",?95,"PRIMARY REASON",!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: SUB+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUB+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRSPEC)\2),SRSPEC
  • Line Location: SUB1+0
Info |  Source |  Entry Points |  Interaction Calls