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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: LRBLJPP

Package: Lab Service

Routine: LRBLJPP


Information

LRBLJPP ;AVAMC/REG - PLATLET TX ;2/18/93 09:28 ;

Source Information

Source file <LRBLJPP.m>

Entry Points

Name Comments DBIA/ICR reference
QUE
A
B
WRT
W
P
S
T
H
H1
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Platelet transfusions from one date received to another."
  • Line Location: LRBLJPP+3
Function Call: WRITE
  • Prompt: $C(7),!,"BLOOD must be an entry in TOPOGRAPHY file (#61)",!
  • Line Location: LRBLJPP+4
Function Call: WRITE
  • Prompt: $C(7),!!,"Must have tests to print entered in the",!,"'Tests for inclusion in transfusion report option' in",!,"Blood bank supervisor menu",!
  • Line Location: LRBLJPP+5
Function Call: WRITE
  • Prompt: $C(7),!,"No tests selected."
  • Line Location: LRBLJPP+7
Function Call: WRITE
  • Prompt:
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,T
  • Line Location: P+0
Function Call: WRITE
  • Prompt: ?15,$E($P(^LAB(66,+Q,0),"^"),1,25),$S($P(Q,"^",6):"("_$P(Q,"^",6)_")",1:"")
  • Condition for execution: Q
  • Line Location: P+0
Function Call: WRITE
  • Prompt: !?32
  • Condition for execution: $X>(IOM-9)
  • Line Location: P+2
Function Call: WRITE
  • Prompt: ?32+(8*X(1))
  • Line Location: P+2
Function Call: WRITE
  • Prompt: $J(^(B),5)
  • Line Location: P+2
Function Call: WRITE
  • Prompt: !,"Mo/Da TIME",?12,"Blood component"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?32
  • Condition for execution: $X>(IOM-8)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: ?32+(8*X(1)),$P(LRT(X),"^",7)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !!,LRP,?31,SSN,?45,"DOB: ",DOB
  • Line Location: H1+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRO(69.2 - [#69.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call