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

Package: Surgery

Routine: SRORET


Information

SRORET ;B'HAM ISC/MAM - RETURN TO SURGERY REPORT ; [ 09/22/98 11:36 AM ]

Source Information

Source file <SRORET.m>

Entry Points

Name Comments DBIA/ICR reference
DATE
BEG ; entry when queued
END
HDR ; print heading
PRET ; print procedures
PRINT ; print returns
PAGE
LOOP ; break procedure if greater than 65 characters
CHECK ; check for related returns

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Report of Returns to Surgery",!
  • Line Location: SRORET+2
Function Call: WRITE
  • Prompt: !!,"This report will list cases completed during the date range entered that",!,"have had return cases associated with them. It is designed to use a 132",!,"column format.",!!
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,!,?57,"SURGICAL SERVICE",?100,"REVIEWED BY: ",!,?52,"REPORT OF RETURNS TO SURGERY",?100,"DATE REVIEWED: "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!!,"OPERATION DATE",?17,"PATIENT (ID#)",?65,"PRINCIPAL OPERATIVE PROCEDURE",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,?20,SRETDT,?35,SROPS(1)
  • Line Location: PRET+2
Function Call: WRITE
  • Prompt: !,?35,SROPS(2)
  • Line Location: PRET+2
Function Call: WRITE
  • Prompt: !,?35,SROPS(2)
  • Line Location: PRET+2
Function Call: WRITE
  • Prompt: !,?35,SROPS(2)
  • Line Location: PRET+2
Function Call: WRITE
  • Prompt: !!!,SRSDT,?17,SRNAME_" ("_VA("PID")_")",?65,SROPS(1)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?65,SROPS(2)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?65,SROPS(2)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?65,SROPS(2)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !!," RETURNS TO SURGERY: "
  • Line Location: PRINT+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAGE+0
Info |  Source |  Entry Points |  Interaction Calls