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

Package: Surgery

Routine: SRONOR7


Information

SRONOR7 ;B'HAM ISC/MAM - REPORT OF NON-O.R. PROCEDURES ; Apr 07, 2025@10:00

Source Information

Source file <SRONOR7.m>

Entry Points

Name Comments DBIA/ICR reference
SROP
SET ; set and print info
UTIL ; set ^TMP
HDR
OTHER ; other operations
LOOP ; break procedure if greater than 50 characters

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No procedures for the selected date range.",!
  • Line Location: SRONOR7+7
Function Call: WRITE
  • Prompt: !!,SRSDATE,?15,SRNM_" ("_VA("PID")_")",?64,SRSUR,?116,SRST,!,SROP,?15,SRSS_" ("_SRINOUT_")",?64,SRANEST,?116,SRET
  • Line Location: SET+14
Function Call: WRITE
  • Prompt: !,?62,SRANESUP,!,?62,SROPS(1)
  • Line Location: SET+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SRABORT=""
  • Line Location: SET+16
Function Call: WRITE
  • Prompt: ?62,SROPS(2)
  • Line Location: SET+16
Function Call: WRITE
  • Prompt: !,?62,SROPS(3)
  • Line Location: SET+16
Function Call: WRITE
  • Prompt: !,?62,SROPS(3)
  • Line Location: SET+16
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+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:",!,?51,"REPORT OF NON-O.R. PROCEDURES",?100,"DATE REVIEWED:",!,?(132-$L(SRFRTO)\2),SRFRTO
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"DATE",?15,"PATIENT (ID#)",?64,"PROVIDER",?116,"START TIME",!,"CASE #",?15,"SPECIALTY (IN/OUT-PAT STATUS)",?64,"PRINCIPAL ANESTHETIST",?116,"FINISH TIME"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?62,"ANESTHESIOLOGIST SUPERVISOR",!,?62,"PROCEDURE(S)",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Info |  Source |  Entry Points |  Interaction Calls