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

Package: Surgery

Routine: SROANP1


Information

SROANP1 ;B'HAM ISC/MAM - LIST OF ANESTHETIC PROCEDURES ; [ 09/22/98 11:28 AM ]

Source Information

Source file <SROANP1.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
ASK
EN1
END
HELP
HDR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"List of Anesthetic Procedures"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: @IOF,!,"Print List of Anesthetic Procedures for",!!,"1. O.R. Surgical Procedures.",!,"2. Non-O.R. Procedures.",!,"3. Both O.R. Surgical Procedures and Non-O.R. Procedures."
  • Line Location: ASK+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"This report is designed to use a 132 column format.",!
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!,"Enter '1' or press <RET> to print the List of Anesthetic Procedures",!,"performed in the OR with a surgical procedure. Enter '2' to print the"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"List of Anesthetic Procedures performed as or with a Non-OR Procedure.",!,"Enter '3' to print the List of Anesthetic Procedures including both of",!,"the above categories of procedures."
  • Line Location: HELP+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?(132-$L(SRINST)\2),SRINST,?120,"PAGE: "_PAGE,!,?58,"SURGICAL SERVICE",?100,"REVIEWED BY:",!,?51,"LIST OF ANESTHETIC PROCEDURES",?100,"DATE REVIEWED:"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,$S(SRFLG=1:"O.R. SURGICAL PROCEDURES",SRFLG=2:"NON-O.R. PROCEDURES",1:"O.R. SURGICAL AND NON-O.R. PROCEDURES"),?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,?2,"DATE",?18,"PATIENT",?45,"PRINCIPAL DIAGNOSIS",?97,"PRIN ANESTHETIST",?117,"START TIME",!,?2,"CASE #",?20,"ID#",?45,"PROCEDURE(S)",?97,"ANESTH TECHNIQUE",?118,"END TIME"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?17,"ASA CLASS",?97,"ANESTH AGENT",?118,"ELAPSED",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Info |  Source |  Entry Points |  Interaction Calls