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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BLRHLTBL

Package: IHS Changes To Lab

Routine: BLRHLTBL


Information

BLRHLTBL ; cmi/anch/maw - BHL Import HL7 Tables ; 22-Oct-2013 09:22 ; MKK

Source Information

Source file <BLRHLTBL.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 ^%ZISC  $$OPEN^%ZISH  
VA Fileman 2 UPDATE^DIE  ^DIR  
IHS Changes To Lab 1 (HEADERPG,LINEWRAP,PRESSKEY)^BLRGMENU  

Entry Points

Name Comments DBIA/ICR reference
DISP ; EP -- display the values in an HL7 table
LOAD(DIR,FL) ;-- load from the file and bhl hl7 tables File
ASKOTAB() ;-- get the table number
DSPHLTBL(TABLE) ; EP - Display HL7 Table
DISPO ;-- display the values in an HL7 table
ADDO(TAB,VAL,DSC)
LOADO(DIR,FL) ;-- load from the file and bhl other tables File
BHLTBLL(DIR,FILE) ; EP
DSPOTTBL(TABLE) ; EP - Display OTHER Table
ASKTAB() ;-- get the table number
ADD(TAB,VAL,DSC)
ASKHTAB() ;-- get the table number

External References

Name Field # of Occurrence
^%ZISC LOAD+16, LOADO+16
$$OPEN^%ZISH LOAD+2, LOADO+2
HEADERPG^BLRGMENU DSPHLTBL+14, DSPOTTBL+14
LINEWRAP^BLRGMENU DSPHLTBL+18, DSPOTTBL+18
PRESSKEY^BLRGMENU DISP+5, DISPO+3, DSPHLTBL+22, DSPOTTBL+22
UPDATE^DIE ADD+6, ADDO+6
^DIR ASKTAB+3, ASKHTAB+3, ASKOTAB+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Trouble Opening File, please fix and try again"
  • Line Location: LOAD+5
Function Call: READ
  • Timeout: DTIME
  • Variable: BLRX
  • Line Location: LOAD+6
Function Call: WRITE
  • Prompt: !,"Trouble Opening File, please fix and try again"
  • Line Location: LOADO+5
Function Call: READ
  • Timeout: DTIME
  • Variable: BLRX
  • Line Location: LOADO+6
Function Call: WRITE
  • Prompt: !!,?4,"HL7 table not on system"
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: "HL7 Table "_HTAB
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !,"Value",?17,"Description"
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !,$P(DATA,U,2),?17,$P(DATA,U,3)
  • Line Location: DISP+14
Function Call: WRITE
  • Prompt: !!,?4,"Other table not on system"
  • Line Location: DISPO+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPO+6
Function Call: WRITE
  • Prompt: "Other Table "_OTAB
  • Line Location: DISPO+7
Function Call: WRITE
  • Prompt: !,"Value",?17,"Description"
  • Line Location: DISPO+8
Function Call: WRITE
  • Prompt: !,$P(DATA,U,2),?27,$P(DATA,U,3)
  • Line Location: DISPO+12
Function Call: WRITE
  • Prompt: ?4,$P(DATA,U,2)
  • Line Location: DSPHLTBL+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPHLTBL+19
Function Call: WRITE
  • Prompt: ?4,$P(DATA,U,2)
  • Line Location: DSPOTTBL+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPOTTBL+19
Routine Call
  • DIE
  • Line Location:
    • ADD+6
    • ADDO+6
Routine Call
  • DIR
  • Line Location:
    • ASKTAB+3
    • ASKHTAB+3
    • ASKOTAB+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BHLOTBL( DSPOTTBL+13
^BHLOTBL("AVAL" ADDO+1, DSPOTTBL+11, DSPOTTBL+12
^BHLOTBL("B" ASKOTAB+6
^BHLTBL( DSPHLTBL+13
^BHLTBL("AVAL" ADD+1, DSPHLTBL+11, DSPHLTBL+12
^BHLTBL("B" ASKHTAB+6

Label References

Name Line Occurrences
$$ADD LOAD+12
$$ADDO LOADO+12
$$ASKHTAB DISP+4
$$ASKOTAB DISPO+2
$$ASKTAB DISP+2
DISPO DISP+3
DSPHLTBL DISP+7
DSPOTTBL DISPO+5
LOAD BHLTBLL+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BHLFLG BHLTBLL+7
>> BLRFLG LOAD+4*, LOADO+4*
>> BLRI LOAD+6*, LOADO+6*
>> BLRTI LOAD+12*, LOAD+13, LOADO+12*, LOADO+13
>> BLRX LOAD+6*, LOAD+7, LOAD+8, LOAD+9, LOAD+11, LOADO+6*, LOADO+7, LOADO+8, LOADO+9, LOADO+11
>> BLRY LOAD+2*, LOAD+3, LOADO+2*, LOADO+3
>> C BHLTBLL+5*, LOAD+8, LOAD+9, LOAD+11, LOADO+8, LOADO+9, LOADO+11
DATA DISP+1~, DISPO+1~, DSPHLTBL+13*, DSPHLTBL+15, DSPHLTBL+16, DSPOTTBL+13*, DSPOTTBL+15, DSPOTTBL+16
DESC LOAD+1~, LOAD+9*, LOAD+10*, LOAD+12, LOADO+1~, LOADO+9*, LOADO+10*, LOADO+12, DSPHLTBL+1~, DSPHLTBL+15*
, DSPHLTBL+17, DSPHLTBL+18, DSPOTTBL+1~, DSPOTTBL+15*, DSPOTTBL+17, DSPOTTBL+18
DIR BHLTBLL~, BHLTBLL+6, LOAD~, LOAD+2, LOADO~, LOADO+2
DIR("A" ASKTAB+2*, ASKHTAB+2*, ASKOTAB+2*
DIR(0 ASKTAB+2*, ASKHTAB+2*, ASKOTAB+2*
>> DIRUT ASKTAB+4, ASKHTAB+4, ASKOTAB+4
DSC ADD~, ADD+5, ADDO~, ADDO+5
DTIME LOAD+6, LOADO+6
FDA ADD+2~, ADDO+2~
FDA( ADD+3*, ADD+4*, ADD+5*, ADDO+3*, ADDO+4*, ADDO+5*
FERR ADD+2~, ADDO+2~
FIENS ADD+2~, ADDO+2~
FILE BHLTBLL~, BHLTBLL+6
FL LOAD~, LOAD+2, LOADO~, LOADO+2
HEADER DSPHLTBL+1~, DSPOTTBL+1~
HEADER(1 DSPHLTBL+3*, DSPOTTBL+3*
HEADER(2 DSPHLTBL+4*, DSPOTTBL+4*
HEADER(3 DSPHLTBL+5*, DSPOTTBL+5*
HEADER(4 DSPHLTBL+6*, DSPHLTBL+7*, DSPOTTBL+6*, DSPOTTBL+7*
HTAB DISP+1~, DISP+4*, DISP+5, DISP+7
IO LOAD+6, LOADO+6
IOSL DSPHLTBL+9, DSPOTTBL+9
LINES DSPHLTBL+1~, DSPHLTBL+9*, DSPHLTBL+14, DSPHLTBL+20*, DSPOTTBL+1~, DSPOTTBL+9*, DSPOTTBL+14, DSPOTTBL+20*
MAXLINES DSPHLTBL+1~, DSPHLTBL+9*, DSPHLTBL+14, DSPOTTBL+1~, DSPOTTBL+9*, DSPOTTBL+14
OTAB DISPO+1~, DISPO+2*, DISPO+3, DISPO+5
PG DSPHLTBL+1~, DSPHLTBL+9*, DSPHLTBL+14, DSPOTTBL+1~, DSPOTTBL+9*, DSPOTTBL+14
QFLG DSPHLTBL+1~, DSPHLTBL+9*, DSPHLTBL+11, DSPHLTBL+12, DSPHLTBL+14, DSPHLTBL+22, DSPOTTBL+1~, DSPOTTBL+9*, DSPOTTBL+11, DSPOTTBL+12
, DSPOTTBL+14, DSPOTTBL+22
TAB ADD~, ADD+1, ADD+3, ADDO~, ADDO+1, ADDO+3, ASKTAB+1~, ASKTAB+5*, ASKTAB+6, ASKHTAB+1~
, ASKHTAB+5*, ASKHTAB+6, ASKHTAB+7, ASKOTAB+1~, ASKOTAB+5*, ASKOTAB+6, ASKOTAB+7
TABL DISP+1~, DISP+2*, DISP+3, DISPO+1~
TABLE DSPHLTBL~, DSPHLTBL+4, DSPHLTBL+11, DSPHLTBL+12, DSPOTTBL~, DSPOTTBL+4, DSPOTTBL+11, DSPOTTBL+12
TB LOAD+1~, LOAD+11*, LOAD+12, LOADO+1~, LOADO+11*, LOADO+12
TDA DISP+1~, DISPO+1~, DSPHLTBL+11*, DSPHLTBL+12, DSPOTTBL+11*, DSPOTTBL+12
TIEN DISP+1~, DISPO+1~, DSPHLTBL+12*, DSPHLTBL+13, DSPOTTBL+12*, DSPOTTBL+13
U DSPHLTBL+15, DSPHLTBL+16, DSPOTTBL+15, DSPOTTBL+16
VAL ADD~, ADD+1, ADD+4, ADDO~, ADDO+1, ADDO+4
VALUE LOAD+1~, LOAD+8*, LOAD+12, LOADO+1~, LOADO+8*, LOADO+12
>> Y ASKTAB+5, ASKHTAB+5, ASKOTAB+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All