Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRBLDLG

Package: Lab Service

Routine: LRBLDLG


Information

LRBLDLG ;AVAMC/REG/CYM - BB DONOR LOG-IN ;1/29/97 12:48 ;

Source Information

Source file <LRBLDLG.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
VA FileMan 9 ^%DT  (,C,DW)^%DTC  ^DIC  MIX^DIC1  ^DIE  ^DIK  EN^DIQ  ^DIWP  
^DIWW  
Lab Service 6 ^LRBLD  D^LRBLU  (N,Z)^LRBLWD  (EN,EN1)^LRBLY  (CK,D,FRE,V,YN)^LRU  ^LRUTL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRBLDLG  

Entry Points

Name Comments DBIA/ICR reference
DNR
OK
A
MORE
ADD
RES
END

External References

Name Field # of Occurrence
^%DT LRBLDLG+5
^%DTC OK, A+6
C^%DTC A+4, A+6
DW^%DTC LRBLDLG+6
^DIC LRBLDLG+8, LRBLDLG+9
MIX^DIC1 DNR+1
^DIE OK+5, OK+6, A+1, MORE+1, ADD
^DIK A+1, A+2
EN^DIQ OK+3
^DIWP DNR+3
^DIWW DNR+4
^LRBLD DNR+2
D^LRBLU LRBLDLG+3
N^LRBLWD A+3, A+6
Z^LRBLWD LRBLDLG+4
EN^LRBLY A+3, A+8
EN1^LRBLY LRBLDLG+3
CK^LRU OK+6
D^LRU OK+7, A+5, A+6
FRE^LRU OK+6
V^LRU LRBLDLG+3, END
YN^LRU DNR+4, OK+1, OK+2, OK+4, OK+6, A+1, A+2, A+8, MORE
^LRUTL LRBLDLG+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?30,"Log-in donor visits",!
  • Line Location: LRBLDLG+4
Function Call: WRITE
  • Prompt: LRH(0)
  • Line Location: LRBLDLG+5
Function Call: WRITE
  • Prompt: !!,"For a group of donors COLLECTION SITE & DONATION GROUP need be entered once.",!,"If not desired just press 'RETURN' key after the following two prompts.",!!
  • Line Location: LRBLDLG+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: DNR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: OK+3
Function Call: WRITE
  • Prompt: !,"EDIT above information: "
  • Line Location: OK+6
Function Call: WRITE
  • Prompt: " Last visit: ",Y
  • Line Location: OK+7
Function Call: WRITE
  • Prompt: !!,"LAST WHOLE BLOOD DONATION "
  • Line Location: A+5
Function Call: WRITE
  • Prompt: Y
  • Line Location: A+5
Function Call: WRITE
  • Prompt: $C(7),!!,"SORRY NOT 8 WEEKS SINCE LAST DONATION OF WHOLE BLOOD"
  • Line Location: A+6
Function Call: WRITE
  • Prompt: !,"COME BACK ON OR AFTER ",Y
  • Line Location: A+6
Routine Call
  • DIC
  • Line Location:
    • LRBLDLG+8
    • LRBLDLG+9
Routine Call
  • DIE
  • Line Location:
    • OK+5
    • OK+6
    • A+1
    • MORE+1
    • ADD

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRE - [#65.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(69.9 - [#69.9] LRBLDLG+3
^LRE - [#65.5] DNR+3, OK, OK+4, OK+5, OK+7, OK+8, A+1, A+2, A+5, RES
^LRE("AD" OK+8*
^LRO(69.2 - [#69.2] LRBLDLG+6, A+9*

Label References

Name Line Occurrences
@( A+7
A A+1, A+2
ADD DNR+2
DNR DNR+2, DNR+4, OK, OK+1, OK+2, OK+4, OK+6, A+1, A+2, A+3
, A+6, A+9, MORE, MORE+1
END LRBLDLG+3, LRBLDLG+4, LRBLDLG+6, LRBLDLG+8, LRBLDLG+9, DNR+1
MORE A+8
OK DNR+2, OK+6
RES A+6

Naked Globals

Name Field # of Occurrence
^( DNR+3, OK+7, OK+8*, A+5
^(0 LRBLDLG+6*, OK, OK+4, OK+8*, A+5, RES*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DNR+4*, OK+1*, OK+2*, OK+4*, OK+6*, A+1*, A+2*, A+8*, MORE*
%DT LRBLDLG+5*!
%DT("A" LRBLDLG+5*
%DT(0 LRBLDLG+5*
>> A DNR+3*
>> B DNR+3*, DNR+4
>> D DNR+1*
DA DNR!, DNR+2*, DNR+3, OK+3*, OK+5*, OK+9*, A+1*, A+2*, MORE+1!*
DA(1 OK+9*
DIC LRBLDLG+8*!, LRBLDLG+9*!, DNR!, DNR+1*!, OK+3*, MORE+1!*
DIC("A" LRBLDLG+8*, LRBLDLG+9*
DIC("S" LRBLDLG+8*, LRBLDLG+9*
DIC(0 LRBLDLG+8*, LRBLDLG+9*, DNR+1*
DIE DNR!, DNR+1*, OK+3*, OK+5*, OK+9*, MORE+1!*
DIK A+1*!, A+2*!
>> DIWF DNR+3*
>> DIWL DNR+3*
>> DIWR DNR+3*
DLAYGO DNR+1*!
DQ MORE+1!
DR DNR!, OK+3*, OK+5*, OK+6!*, A*, MORE+1!*, ADD*
DT LRBLDLG+5, OK
DUZ("AG" DNR+1
IOF LRBLDLG+4, OK+3
IOM DNR+3
>> LR LRBLDLG+8*, OK+8
>> LR( OK+9*, A+2, A+3, A+4*, A+5, A+7
>> LR("CK" DNR!, OK+6
>> LR("LRBLDLG" LRBLDLG+3*
>> LR("SSN" LRBLDLG+3*, OK+5
>> LR(1 LRBLDLG+9*, OK+8
>> LRA OK+9*
>> LRAA LRBLDLG+6, A+9
>> LRAD LRBLDLG+6*, OK+8, A+6
>> LRB OK*
LRC DNR!, A+5*, A+6
>> LRCAPA LRBLDLG+4, A+3, A+6, A+7
>> LRD OK*
>> LRH(0 LRBLDLG+5
>> LRH(2 ADD
>> LRI LRBLDLG+6*, OK+8, OK+9, A+1, A+2, A+4, A+5, RES
>> LRP DNR+2*, A+9
>> LRP(0 DNR+2*
>> LRQ DNR+2*, OK, OK+3, OK+4, OK+5, OK+7, OK+8, OK+9, A+1, A+2
, A+5, A+9, MORE+1, RES
>> LRS(2 OK*
>> LRX LRBLDLG+4
U LRBLDLG+3, LRBLDLG+8, LRBLDLG+9, DNR+2, OK+4, OK+5, A+1, A+2
>> X LRBLDLG+3*, LRBLDLG+5, LRBLDLG+6*, LRBLDLG+8, LRBLDLG+9, DNR+3*, OK*, OK+1, OK+2, OK+7*
, OK+8*, A+4, A+5*, A+6, RES*
>> X1 OK*, A+4*, A+6*
>> X2 OK*, A+4*, A+6*
>> Y LRBLDLG+3, LRBLDLG+5*, LRBLDLG+6, LRBLDLG+8, LRBLDLG+9, DNR+1, DNR+2, OK+7*, A+1, A+5*
, A+6*
>> Z A+5*, A+6
>> Z(1 A+4*, A+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All