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

Package: Lab Service

Routine: LRBLPAB


Information

LRBLPAB ;AVAMC/REG - ANTIBODIES IDENTIFIED ;2/18/93 09:37 ;

Source Information

Source file <LRBLPAB.m>

Entry Points

Name Comments DBIA/ICR reference
QUE
W
H
H1
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"PATIENT ANTIBODIES IDENTIFIED"
  • Line Location: LRBLPAB+3
Function Call: WRITE
  • Prompt: $C(7),!,"You do not have the proper access to proceed."
  • Line Location: LRBLPAB+4
Function Call: WRITE
  • Prompt: !,"Patients in lab data file: ",$J(LRC,6),!,"Patients with antibodies: ",$J(LRW,6)
  • Line Location: QUE+7
Function Call: WRITE
  • Prompt: !,$P(^LAB(61.3,LRA,0),"^")," = ",LRA(1)
  • Line Location: QUE+11
Function Call: WRITE
  • Prompt: !!,LRP,?35,"ID:",SSN
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !?3,$P(^LAB(61.3,LRA,0),"^")
  • Line Location: W+7
Function Call: WRITE
  • Prompt: @IOF,Y," BLOOD BANK ",LRQ(1),?(IOM-10),"Pg: ",LRQ,!,LR("%")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LRP,?35,"ID:",SSN,?50,"(continued from pg:",LRQ-1,")"
  • Line Location: H1+1
Info |  Source |  Entry Points |  Interaction Calls