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

Package: Surgery

Routine: SROAMIS1


Information

SROAMIS1 ;B'HAM ISC/MAM - ANESTHESIA AMIS REPORT ; 05/27/88 10:11

Source Information

Source file <SROAMIS1.m>

Entry Points

Name Comments DBIA/ICR reference
TECH ; set variables G, M, S,...
TECH2 ;
PRINT ; print from ^TMP("SROAMIS",$J

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?7,TOTANES,?24,"| "_+G,?38,"| "_+M,?52,"| "_+S,?66,"| "_+E,?80,"| "_+O,?94,"| "_+L,!
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: "="
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,?11,"ANESTHETICS FOR PROCEDURES ADMINISTERED BY:",?65,"** ANESTHETICS FOR DIAG. & THERA. PROCEDURES ADMINISTERED BY:"
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !,"ANESTHESIOLOGIST | NURSE ANESTHETIST | OTHER",?65,"** ANESTHESIOLOGIST | NURSE ANESTHETIST | OTHER",!
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !," NUMBER OF | NO. OF | NUMBER OF | NO. OF | NUMBER OF | NO. OF",?65,"** NUMBER OF | NO. OF | NUMBER OF | NO. OF | NUMBER OF | NO. OF"
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,"ANESTHETICS| DEATHS | ANESTHETICS | DEATHS | ANESTHETICS| DEATHS",?65,"** ANESTHETICS| DEATHS | ANESTHETICS | DEATHS | ANESTHETICS| DEATHS",!
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,?3,+PRINS("A"),?11,"| "_+$P(PRINS("A"),"^",2),?20,"| "_+PRINS("N"),?34,"| "_+$P(PRINS("N"),"^",2),?43,"| "_+PRINS("O"),?56,"| "_+$P(PRINS("O"),"^",2)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: ?65,"** "_+PRIND("A"),?80,"| "_+$P(PRIND("A"),"^",2),?88,"| "_+PRIND("N"),?102,"| "_+$P(PRIND("N"),"^",2),?111,"| "_+PRIND("O"),?124,"| "_+$P(PRIND("O"),"^",2),!
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: "="
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !!!
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: "="
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !,?40,"DEATHS WITHIN 24 HOURS OF INDUCTION OF ANESTHETIC",!
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !,"TOTAL NUMBER",?24,"| | | | | |"
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !," OF DEATHS",?24,"| GENERAL | MAC | SPINAL | EPIDURAL | OTHER | LOCAL",!
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !,?7,TOTDED,?24,"| "_+$P(G,"^",2),?38,"| "_+$P(M,"^",2),?52,"| "_+$P(S,"^",2),?66,"| "_+$P(E,"^",2),?80,"| "_+$P(O,"^",2),?94,"| "_+$P(L,"^",2),!
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: "="
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+16
Info |  Source |  Entry Points |  Interaction Calls