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

Package: Surgery

Routine: SRSAVL1


Information

SRSAVL1 ;B'HAM ISC/MAM - LIST REQUEST ON DISPLAY ; [ 07/27/98 2:33 PM ]

Source Information

Source file <SRSAVL1.m>

Entry Points

Name Comments DBIA/ICR reference
REQUEST ; list requests
ASK
UTIL ; set ^TMP("SR",$J)
PRINT ; print info
LOOP ; break procedure if greater than 60 characters
HDR ; print heading

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: SRX
  • Timeout: DTIME
  • Line Location: REQUEST+1
Function Call: WRITE
  • Prompt: SR10
  • Line Location: REQUEST+2
Function Call: READ
  • Variable: SRX
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: @IOF,!,"There are no requests entered for "_SRDT_"."
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !,CNT_".",?5,"Patient: "_SRPAT,?40,"Case Number: "_SRTN,!,?5,"Surgeon: "_SRSUR,?40,"Case Order: "_SRORD
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !,?5,SROPS(1)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,?19,SROPS(2)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !!,?8,"Concurrent Case Number: "_CON
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,?8,SROPS(1)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !,?19,SROPS(2)
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+13
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF,!,?17,"Requested Operative Procedures for "_SRDT,!,?(80-$L("Surgical Specialty: "_SERV)\2),"Surgical Specialty: "_SERV,!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+3
Info |  Source |  Entry Points |  Interaction Calls