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

Package: Lab Service

Routine: LRBLDAL


Information

LRBLDAL ;AVAMC/REG - BLOOD DONOR LETTERS ;7/18/91 08:52 ;

Source Information

Source file <LRBLDAL.m>

Entry Points

Name Comments DBIA/ICR reference
W
SGL
EN1 ;from LRBLDAA
AA
HDR
TOP
SET
EN ;single donor
M
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Blood bank letter ",$P(LRL,U,2)," has been deleted."
  • Line Location: LRBLDAL+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: ?LRS(1),LRT(1),!!
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !!?DIWL-1,$P(LRP,",",2)," ",$P(LRP,",")
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !?DIWL-1,$P(LRD,"^",X)
  • Line Location: EN1+9
Function Call: WRITE
  • Prompt: !?DIWL-1,$P(LRD,"^",4)
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: ", ",$P(^(0),"^",2)," ",$P(LRD,"^",6)
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: !!?DIWL-1,"Dear ",Y,","
  • Line Location: EN1+12
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+14
Function Call: WRITE
  • Prompt: @IOF,$P(LRP,",",2)," ",$P(LRP,","),?(IOM-10),"pg:",LRQ
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+1
Info |  Source |  Entry Points |  Interaction Calls