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

Package: Lab Service

Routine: LRBLPE


Information

LRBLPE ; IHS/HQT/MJL - BB DATA ENTRY BY ACC # ;

Source Information

Source file <LRBLPE.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Lab Service 7 NEW^LR7OB1  $$VER^LR7OU1  (,EN,K)^LRBLPE1  ^LRBLPEW  ^LRDPA2  (SSN,V)^LRU  EN^LRUD  
IHS Changes To Lab 2 ^BLREVTQ  RETURN^BLRORX  
VA Fileman 1 ^DIE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRBLPET  

Entry Points

Name Comments DBIA/ICR reference
SET
END
L
REST
TEST
PH
OR ;Call to OE/RR 2.5 status update

External References

Name Field # of Occurrence
^BLREVTQ TEST+7
RETURN^BLRORX OR+7
^DIE TEST+7
NEW^LR7OB1 TEST+10
$$VER^LR7OU1 OR+1
^LRBLPE1 TEST+7
EN^LRBLPE1 LRBLPE+3
K^LRBLPE1 TEST
^LRBLPEW TEST+7
^LRDPA2 REST+4
SSN^LRU REST+2
V^LRU END
EN^LRUD SET+4

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Select Accession Number: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: LRAN
  • Line Location: L+0
Function Call: WRITE
  • Prompt: $C(7)," Enter numbers only."
  • Line Location: L+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Accession # ",LRAN," for ",LRH(0)," not in ACCESSION file",!!
  • Line Location: REST+0
Function Call: WRITE
  • Prompt: !,LRP," ID: ",SSN," ABO: ",LRABO," Rh: ",LRRH,!,"Specimen: ",S
  • Line Location: REST+4
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+4
Function Call: WRITE
  • Prompt: $C(7),!!,$P(^(0),"^")," does not belong in ",LRAA(1)," accession area !",!,"Test deleted",!!
  • Line Location: TEST+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Cannot continue without execute code for ",$P(LRT(LRT),U)
  • Line Location: TEST+2
Function Call: WRITE
  • Prompt: !,$C(7),"ANOTHER TERMINAL IS EDITING THIS ENTRY!"
  • Line Location: TEST+3
Function Call: WRITE
  • Prompt: !?40,"Antigen(s) present",?60,"| Antigen(s) absent",!,LR("%"),!,"Patient's Phenotype Record:"
  • Line Location: PH+1
Routine Call
  • DIE
  • Line Location:
    • TEST+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LR - [#63] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] REST+2
^LAB(60 - [#60] REST+6, TEST, TEST+1
^LAB(61 - [#61] REST+3
^LAB(61.3 - [#61.3] PH+2, PH+3
^LAB(62.07 - [#62.07] TEST+1
^LR - [#63] REST+1, TEST+3, TEST+7, TEST+9, PH, PH+2, PH+3, SET, SET+1, SET+2
, SET+3, SET+4
^LRO(68 - [#68] REST, REST+1, REST+3, REST+5, REST+6, OR+4
^LRO(69 - [#69] OR+5

Label References

Name Line Occurrences
END LRBLPE+3, L
L L, L+1
OR TEST+7
PH TEST+4
REST L+1
SET TEST+7
TEST REST+6

Naked Globals

Name Field # of Occurrence
^( TEST+1, SET*, SET+2*
^(0 REST+1, REST+3, TEST, SET+1*, SET+3*, OR+4
^(2 OR+5
^(4 OR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A SET*, SET+2*
>> B PH+2*, PH+3*
>> BLRLOG TEST+7
>> BLRODT OR+4*
>> BLRSEQ OR+4*
>> C SET*, SET+1, SET+2*, SET+3
CORRECT TEST+9~*
DA TEST+3*, TEST+11!
DA(1 SET+4*
DA(2 SET+4*
>> DFN REST+2*
DIE TEST+3*, TEST+11!
DR TEST+4, TEST+7, TEST+11!
DTIME L
>> E PH+2*, PH+3*, PH+4*
>> F( PH+2*, PH+4
>> F(1 PH+2*
>> G PH+2*, PH+3*
>> I PH+2*, PH+3*
>> J( PH+3*, PH+4
>> J(1 PH+3*
>> K PH+3*, PH+4*
L TEST+3!
>> LR("%" PH+1
>> LR(1 L+1*
>> LR(2 L+1*
>> LRAA LRBLPE+3, REST, REST+1, REST+3, REST+5, REST+6, TEST+7, OR+4
>> LRAA(1 TEST
>> LRABO REST+2*, REST+4
>> LRAD REST, REST+1, REST+3, REST+5, REST+6, TEST+7, OR+4
>> LRAN L*, REST, REST+1, REST+3, REST+5, REST+6, TEST+7, OR+4
>> LRDFN REST+1*, TEST+3, TEST+7, TEST+9, PH, PH+2, PH+3, SET, SET+1, SET+2
, SET+3, SET+4
>> LRDPF REST+2*
>> LRH(0 REST
>> LRI REST+5*, TEST+9, SET, SET+2, SET+4
LRIEN OR+2~, OR+5*
>> LRLLOC REST+1*
LRM SET+4*, SET+5!
LRM( SET+4
LRMED TEST+7, TEST+11!
LRODT REST+1~*, TEST+7, TEST+10, OR+2~, OR+4*, OR+5
>> LRP REST+2*, REST+4
>> LRRH REST+2*, REST+4
LRSN REST+1~*, TEST+7, TEST+10, OR+2~, OR+4*, OR+5
>> LRSS TEST
>> LRSVC REST+1*
>> LRT REST+6*, TEST, TEST+1, TEST+2, TEST+3
>> LRT( TEST+1*, TEST+2, TEST+3
LRTST OR+2~, OR+4*, OR+5
>> LRW TEST*
>> LRW( TEST*
M SET+4*, SET+5!
O SET+4*, SET+5!
>> ORETURN("ORSTS" OR+7*
>> ORIFN OR+5*
>> S REST+3*, REST+4
>> SSN REST+2*, REST+4
U L, TEST+2
>> X REST+1*, REST+2*, TEST+1*, SET+1*, SET+3*, SET+4*
>> X(1 SET+1*, SET+3*
>> Y TEST+1*, TEST+7
>> Z SET+4*
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