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

Package: Lab Service

Routine: LRBLPIT


Information

LRBLPIT ;AVAMC/REG - PROLONGED TRANSFUSION TIMES ;2/18/93 09:45 ;

Source Information

Source file <LRBLPIT.m>

Entry Points

Name Comments DBIA/ICR reference
QUE
W
P
CK
H
H1
H2
D
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?20,"Prolonged transfusion times"
  • Line Location: LRBLPIT+3
Function Call: WRITE
  • Prompt: !!,"Patient: ",LRP,?41,"SSN: ",SSN
  • Line Location: W+1
Function Call: WRITE
  • Prompt: D
  • Line Location: W+1
Function Call: WRITE
  • Prompt: !,$P(W,"^"),?15,C(1),?46,$P(W,"^",2),?58,$P(W,"^",3),?70,$P(W,"^",5),?74,$J($P(W,"^",4),5)
  • Line Location: P+0
Function Call: WRITE
  • Prompt: !,"LABORATORY SERVICE",!?9,"PROLONGED TRANSFUSION TIMES FROM ",LRSTR," TO ",LRLST
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"Unit ID",?15,"Blood Component",?45,"Relocated",?57,"Transfused",?68,"DspBy",?74,"Minutes"
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !!!,"LOCATION: ",L
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !!,"Patient: ",LRP,?41,"SSN: ",SSN
  • Line Location: H2+0
Info |  Source |  Entry Points |  Interaction Calls