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

Package: Lab Service

Routine: LRBLAA1


Information

LRBLAA1 ;AVAMC/REG - XM:TX BY TREATING SPECIALTY REPORT ;4/12/92 08:41 ;

Source Information

Source file <LRBLAA1.m>

Entry Points

Name Comments DBIA/ICR reference
M
H1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,A,?34,"Units Xm'd:",?45,$J(LRJ,4),?54,"Tx'd:",?57,$J(LRT,4),?67,"C/T: "
  • Line Location: LRBLAA1+4
Function Call: WRITE
  • Prompt: $S(LRT:$J(LRJ/LRT,5,3),1:"NA")
  • Line Location: LRBLAA1+4
Function Call: WRITE
  • Prompt: !!,"ALL TREATING SPECIALTIES",?34,"Total Xm'd:",?45,$J(LRL,4),?54,"Tx'd:",?57,$J(LRM,4),?67,"C/T: "
  • Line Location: LRBLAA1+5
Function Call: WRITE
  • Prompt: $S(LRM:$J(LRL/LRM,5,3),1:"NA")
  • Line Location: LRBLAA1+5
Function Call: WRITE
  • Prompt: !?2,B,?34,"Units Xm'd:",?45,$J(LRK,4),?54,"Tx'd:",?57,$J(LRD,4),?67,"C/T: "
  • Line Location: M+0
Function Call: WRITE
  • Prompt: $S(LRD:$J(LRK/LRD,5,3),1:"NA")
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !,A," (cont'd from ",LRQ-1,")"
  • Line Location: H1+0
Info |  Source |  Entry Points |  Interaction Calls