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

Package: Lab Service

Routine: LRBLDMV


Information

LRBLDMV ; IHS/DIR/FJE - MOVE BLOOD DONATION 12/19/94 11:53 ;

Source Information

Source file <LRBLDMV.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 %XY^%RCR  ^DIC  ^DIWP  ^DIWW  
Lab Service 3 (CK,D,FRE,V,YN)^LRU  EN^LRUD  ^LRUTL  

Entry Points

Name Comments DBIA/ICR reference
A
E
F
REST
ASK
END

External References

Name Field # of Occurrence
%XY^%RCR REST+8
^DIC REST, REST+2, REST+5
^DIWP F
^DIWW F+1
CK^LRU REST+4
D^LRU REST+2, A+2
FRE^LRU REST+4, REST+6, REST+12
V^LRU END
YN^LRU REST+3, REST+6
EN^LRUD REST+11
^LRUTL ASK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?17,"Move a donation from one donor to another",!
  • Line Location: LRBLDMV+5
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+0
Function Call: WRITE
  • Prompt: $C(7),!!,"No donation date."
  • Line Location: REST+1
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+2
Function Call: WRITE
  • Prompt: " UNIT ID: ",LRU
  • Line Location: REST+4
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+5
Function Call: WRITE
  • Prompt: $C(7),!!,"Donation date ",LRD(1)," exists for ",LRT(1)
  • Line Location: REST+5
Function Call: WRITE
  • Prompt: !,"ABO GROUP: ",LRABO," Rh TYPE: ",LRRH
  • Line Location: A+0
Function Call: WRITE
  • Prompt: ?30,"File Number: ",LR,?50,"SSN: ",$P(Y(0),U,13),!,$P(X,U)," ",$P(X,U,2)," ",$P(X,U,3),!,$P(X,U,4)," ",$P($G(^DIC(5,+$P(X,U,5),0)),U)," ",$P(X,U,6)
  • Line Location: A+1
Function Call: WRITE
  • Prompt: $C(7),!!," PERMANENT DEFERRAL "
  • Line Location: A+2
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: A+2
Routine Call
  • DIC
  • Line Location:
    • REST
    • REST+2
    • REST+5

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)
^DD(65.54 REST+10
^DIC(5 - [#5] A+1
^LRE - [#65.5] REST+1, REST+5, REST+7, REST+8, REST+9!, F, A+1
^LRE("AD" REST+9!, REST+10*
^LRE("AT" REST+9!
^LRE("C" REST+9!, REST+10*
^UTILITY($J E!

Label References

Name Line Occurrences
A REST, REST+5
ASK ASK
E F
END ASK
F A+2
REST ASK

Naked Globals

Name Field # of Occurrence
^(0 REST+7*, REST+8*, REST+9*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % REST+3*, REST+6*
>> %X REST+8*
>> %Y REST+8*
>> A F*
>> DA REST+4*, REST+10*
>> DA(1 REST+10*, REST+11*
DIC REST*, REST+2*!, REST+5*!
DIC("A" REST*, REST+2*, REST+5*
DIC(0 REST*, REST+5*
>> DIE REST+4*
>> DIWF E*
>> DIWL E*
>> DIWR E*
IOM E
>> LR F, A+1*
>> LR("CK" REST+4
>> LRABO A*
>> LRD REST+2*, REST+9, REST+10, REST+11
>> LRD(1 REST+2*, REST+5
>> LRF REST*, REST+1, REST+4, REST+9, REST+11
>> LRI REST+2*, REST+5, REST+8, REST+9, REST+10
>> LRRH A*
>> LRT REST+5*, REST+7, REST+8, REST+10, REST+11
>> LRT(1 REST+5*
>> LRU REST+2*, REST+3*, REST+4, REST+9, REST+10
>> LRZ F*, F+1
>> O REST+11*
U REST+2, REST+5, A, A+1, A+2
>> X ASK*, REST+8*, REST+9*, REST+10*, REST+11*, F*, A+1*
>> X(1 REST+9*
>> Y ASK, REST, REST+2*, REST+5, REST+12*, A+1, A+2*
>> Y(0 REST+2, A, A+1, A+2
>> Z REST+11*
Info |  Source |  Call 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