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

Package: Surgery

Routine: SROWC3


Information

SROWC3 ;BIR/ADM - CLEAN WOUND INFECTION SUMMARY ;12/16/2010

Source Information

Source file <SROWC3.m>

Entry Points

Name Comments DBIA/ICR reference
ALL
SPEC
WC
SET
PRINT ; print info
TOTAL ; print total
END
HDR ; print heading

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$P(SRSPEC,"("),?27,$J(SRC(SRSS),5),?42,$J(SRSS(SRSS),5)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: ?59,$J((SRSS(SRSS)/SRC(SRSS)*100),5,1),"%"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !!,"TOTAL",?27,$J(SRCLEAN,5),?42,$J(SRCOMP,5)
  • Line Location: TOTAL+1
Function Call: WRITE
  • Prompt: ?59,$J((SRCOMP/SRCLEAN*100),5,1),"%"
  • Line Location: TOTAL+1
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: !,?25,"CLEAN WOUND INFECTION SUMMARY"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?(80-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,?(80-$L(SRPRINT)\2),SRPRINT,!,?19,"REVIEWED BY:",?45,"DATE REVIEWED:"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+7
Info |  Source |  Entry Points |  Interaction Calls