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

Package: Lab Service

Routine: LRBLDPL


Information

LRBLDPL ;AVAMC/REG - BLOOD DONOR LIST BY DATE ;2/18/93 09:00 ;

Source Information

Source file <LRBLDPL.m>

Entry Points

Name Comments DBIA/ICR reference
QUE
S
O
W
D
H
H1
HL
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?20,"BLOOD DONOR LIST BY LAST ATTEMPT DATE",!!
  • Line Location: LRBLDPL+4
Function Call: WRITE
  • Prompt: !,W(1),?31,$P(W,"^"),?46,$P(W,"^",2),?61,$P(W,"^",3),?64,$J($P(W,"^",4),7)
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !,"BLOOD DONORS (from: ",LRSTR," to ",LRLST,")"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"DONOR NAME",?31,"WORK PHONE",?46,"LAST ATTEMPT",?59,"CODE",?64,"CUM DONATIONS"
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !!,"Donation Group: ",Q(7),!,"------------------"
  • Line Location: HL+0
Info |  Source |  Entry Points |  Interaction Calls