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

Package: Lab Service

Routine: LRMISEZ3


Information

LRMISEZ3 ;AVAMC/REG/SLC/BA - MICRO INF CTRL SURVEY CONT'D ; 10/1/87 17:15 ;

Source Information

Source file <LRMISEZ3.m>

Entry Points

Name Comments DBIA/ICR reference
A
M
LLOC
SIT
AC
OR
LIST
NOD
HDR1
LD
LIN
LC
SITE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,LRBUG,?34," ",LRMY
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !,LRLLOC
  • Line Location: LLOC+0
Function Call: WRITE
  • Prompt: !,?5,$S(LRSIT="Unknown":"Unknown",LRSIT(1)="S":$P(^LAB(61,$P(LRSIT,U,2),0),U),1:$P(^LAB(62,$P(LRSIT,U,2),0),U))
  • Line Location: SIT+0
Function Call: WRITE
  • Prompt: !,?11,$J(LRSUM,4),")"
  • Line Location: OR+0
Function Call: WRITE
  • Prompt: ?17,$J(LRAC,5),?23,$E($P(LRNAME,U),1,13),?38
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: Y,?43
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: LRLIN,!
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: @IOF,!,Y,?21,"INFECTION CONTROL SURVEY REPORT BY ORGANISM",?70,"PAGE ",$J(LRPG,5)
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: !,?2,"** Reports only those specimens collected > ",LRLOS,$S(LRLOS>1:" days",1:" day")," from admission date **"
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: !,LRAAN,?6,"From: ",LRST," To: ",LRLST,?43
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: "|",$E($P(B(I),U,2),1)
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: "|",!,"Organism",?32,"Month/Year",?43
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: "|",$E($P(B(I),U,2),2)
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: "|",!,"Loc",?5,$S(LRSIT(1)="S":"Spec",1:"Sample"),?12,"Num",?17,"AC#",?23,"Patient",?38,"Date",?43
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: "|",$E($P(B(I),U,2),3)
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: "|",!,?10,"** ANTIBIOTIC PATTERN **",?43
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: "|",$S($L($P(B(I),U,3)):$P(B(I),U,3),1:" ")
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: "|",!
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: !!,LRBUG,?34," ",LRMY
  • Line Location: LD+0
Function Call: WRITE
  • Prompt: !
  • Line Location: LD+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: LIN+0
Function Call: WRITE
  • Prompt: !,LRLLOC
  • Line Location: LC+0
Function Call: WRITE
  • Prompt: !,?5,$S(LRSIT="Unknown":"Unknown",LRSIT(1)="S":$P(^LAB(61,$P(LRSIT,U,2),0),U),1:$P(^LAB(62,$P(LRSIT,U,2),0),U))
  • Line Location: SITE+0
Info |  Source |  Entry Points |  Interaction Calls