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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BLRLINK3

Package: IHS Changes To Lab

Routine: BLRLINK3


Information

BLRLINK3 ; IHS/HQT/MJL - CONT. OF BLR - IHS LABORATORY VISIT CREATION ; 13-Oct-2017 14:04 ; MKK

Source Information

Source file <BLRLINK3.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS Changes To Lab 7 (CHKPCCRU,CHKREFA,CHSETCOD,HL7REFLR,LOTZERO,MSNOMED,RESETPOV)^BLRLINK4  ^BLRLINKP  RESETLOI^BLRLNKU1  ($$RDINF63,ADDORDL)^BLRLNKU2  CALLDIK^BLRNLINK  RESETDUZ^BLRPCCVC  $$GETACCCP^BLRUTIL3  
VA Fileman 3 FIND^DIC  ^DIE  $$GET1^DIQ  
DRG Grouper 1 $$ICDDX^ICDEX  
Patient Care Component 1 (,$$LABC)^APCDALVR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Changes To Lab 3 BLRLINK  BLRNLINK  BLRQINST  

Entry Points

Name Comments DBIA/ICR reference
GETCOMPD(BLRLOGDA,LRAS,F60IEN,COMPDATE) ; EP
GETGREF(BLRX) ; EP
VBUILD ; EP create APCDALVR array which is the array containing the elements to be passed to PCC
EP ; EP
RESETABN ; EP - For "CH" tests only, make sure "Abnormal" Flag is the same as the one in the LAB DATA file
VEDIT ; EP update V file entries
; ----- BEGIN IHS/MSC/MKK - LR*5.2*1031

External References

Name Field # of Occurrence
^APCDALVR VEDIT+79
$$LABC^APCDALVR VEDIT+99
CHKPCCRU^BLRLINK4 VEDIT+60
CHKREFA^BLRLINK4 VEDIT+61
CHSETCOD^BLRLINK4 VBUILD+64
HL7REFLR^BLRLINK4 VEDIT+54
LOTZERO^BLRLINK4 VEDIT+62
MSNOMED^BLRLINK4 VEDIT+83
RESETPOV^BLRLINK4 VEDIT+68
^BLRLINKP VEDIT+109
RESETLOI^BLRLNKU1 VEDIT+66
$$RDINF63^BLRLNKU2 GETCOMPD+13
ADDORDL^BLRLNKU2 VBUILD+79
CALLDIK^BLRNLINK VEDIT+7
RESETDUZ^BLRPCCVC VEDIT+47
$$GETACCCP^BLRUTIL3 GETCOMPD+16, RESETABN+6
FIND^DIC VBUILD+10
^DIE VEDIT+96
$$GET1^DIQ VBUILD+17, VEDIT+73, GETCOMPD+10, RESETABN+9, RESETABN+13, RESETABN+17, RESETABN+20
$$ICDDX^ICDEX VEDIT+32

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(40.7 - [#40.7] FIND^DIC
^LAB(60 - [#60] GET1^DIQ
^LRO(68 - [#68] GET1^DIQ
68.02 GET1^DIQ
^ICD9 - [#80] GET1^DIQ
^BLRTXLOG - [#9009022] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCCCTRL - [#9001000] VEDIT+23
^BLRCPT - [#9009021] VBUILD+87
^BLRTXLOG - [#9009022] VBUILD+30, GETCOMPD+28*
^BLRTXLOG("BVER" VBUILD+2
^DIC - [#1] GETGREF+1
^LAB(60 - [#60] VBUILD+39, VBUILD+75
^LR - [#63] RESETABN+23
^LRO(68 - [#68] GETCOMPD+19, GETCOMPD+22

Label References

Name Line Occurrences
$$GETGREF EP+4
GETCOMPD VBUILD+44
RESETABN VEDIT+77
VBUILD EP+5
VEDIT EP+6

Naked Globals

Name Field # of Occurrence
^(0 VEDIT+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCDALVR VBUILD+79, VEDIT+62, VEDIT+111!, RESETABN+1
APCDALVR("APCDADFN" VEDIT+92
APCDALVR("APCDAFLG" VEDIT+91, VEDIT+107, VEDIT+109
APCDALVR("APCDATMP" VEDIT+18*
APCDALVR("APCDCAT" VEDIT+22*
APCDALVR("APCDDATE" VEDIT+19*
APCDALVR("APCDLOC" VEDIT+20*
APCDALVR("APCDLOOK" VBUILD+88*
APCDALVR("APCDPAT" VEDIT+21*
APCDALVR("APCDTABN" VEDIT+12*, RESETABN+24*
APCDALVR("APCDTACC" VBUILD+27*
APCDALVR("APCDTANT" VBUILD+74*, VBUILD+81*
APCDALVR("APCDTBIL" VBUILD+53*
APCDALVR("APCDTBTN" VBUILD+81*
APCDALVR("APCDTCDT" VBUILD+25*
APCDALVR("APCDTCLN" VBUILD+13, VBUILD+18*
APCDALVR("APCDTCLS" VBUILD+47*, VBUILD+49*
APCDALVR("APCDTCMD" VBUILD+77*
APCDALVR("APCDTCOL" VBUILD+77*
APCDALVR("APCDTCOS" VBUILD+52*
APCDALVR("APCDTCPS" VBUILD+54*
APCDALVR("APCDTCPT" VBUILD+87*
APCDALVR("APCDTCSF" VBUILD+22*
APCDALVR("APCDTEPR" VBUILD+83*
APCDALVR("APCDTICD" VEDIT+73, VEDIT+74!
APCDALVR("APCDTLAB" VBUILD+23*
APCDALVR("APCDTLNC" VBUILD+33*, VBUILD+39*, VBUILD+48*
APCDALVR("APCDTLPV" VEDIT+26, VEDIT+33*
APCDALVR("APCDTODT" VBUILD+26*
APCDALVR("APCDTOPR" VBUILD+85*
APCDALVR("APCDTORD" VBUILD+24*
APCDALVR("APCDTORG" VBUILD+74*
APCDALVR("APCDTPNT" VBUILD+30*, VBUILD+32*
APCDALVR("APCDTPRV" VBUILD+84*
APCDALVR("APCDTRDT" VBUILD+46*
APCDALVR("APCDTRES" VBUILD+65*
APCDALVR("APCDTRFH" VBUILD+61*
APCDALVR("APCDTRFL" VBUILD+60*
APCDALVR("APCDTSDI" VBUILD+55*
APCDALVR("APCDTSTE" VBUILD+86*
APCDALVR("APCDTUNI" VBUILD+58*
APCDALVR("APCDTYPE" VEDIT+23*
APCDALVR("BLRLINK" VEDIT+51*
>> BLCOLSP VBUILD+77
>> BLR("SITE" VEDIT+20, VEDIT+23
>> BLRABNL VEDIT+12
>> BLRACC VBUILD+27, VBUILD+44
>> BLRACCN RESETABN+1, RESETABN+4, RESETABN+6
>> BLRANT VBUILD+74, VBUILD+81
>> BLRANTN VBUILD+74, VBUILD+81
>> BLRBILL VBUILD+53
>> BLRBTN VBUILD+81
>> BLRBUL EP+2*, VBUILD+3*, VEDIT+101*, VEDIT+104*, VEDIT+107*
>> BLRCD VEDIT+19
>> BLRCDT VBUILD+25
BLRCMSG VEDIT+97!, VEDIT+99*, VEDIT+101, VEDIT+102!
>> BLRCOLSA VBUILD+47
>> BLRCOLSP VBUILD+75*, VBUILD+77
BLRCOM VEDIT+99, VEDIT+100!
BLRCOM("" VEDIT+98
>> BLRCOMDT VBUILD+44, VBUILD+46
>> BLRCOMPD VBUILD+77
>> BLRCOST VBUILD+52
>> BLRCPT VBUILD+87
>> BLRCPTST VBUILD+54
>> BLRDATAN RESETABN+17*, RESETABN+18, RESETABN+23
>> BLREPNM VBUILD+85
>> BLREPRV VBUILD+83
>> BLRERR EP+2*, EP+5, VBUILD+3*, VEDIT+101*, VEDIT+104*, VEDIT+105*
>> BLRIEN VBUILD+2, VEDIT+95, VEDIT+104, VEDIT+105
BLRLOGDA VBUILD+17, VBUILD+44, VBUILD+79, GETCOMPD~, GETCOMPD+4, GETCOMPD+10, GETCOMPD+13, GETCOMPD+28
>> BLRLOINC VBUILD+33
>> BLRLPOV VEDIT+26, VEDIT+28, VEDIT+29
>> BLRMOD VBUILD+88*, VEDIT+12, VEDIT+18
>> BLRODT VBUILD+26
>> BLROPNM VBUILD+85
>> BLROPRV VBUILD+84, VBUILD+85
>> BLRORD VBUILD+24
>> BLRORG VBUILD+74
>> BLRORGN VBUILD+74
>> BLRPAREN VBUILD+30
>> BLRPCC EP+2*, VBUILD+4*, VEDIT+101*, VEDIT+104*, VEDIT+107*
>> BLRQUIET VEDIT+105, VEDIT+107
>> BLRRES VBUILD+64, VBUILD+65
>> BLRRFH VBUILD+61
>> BLRRFL VBUILD+60
>> BLRSDI VBUILD+55
>> BLRSITE VBUILD+86
>> BLRSS EP+1, VBUILD+73, VBUILD+79, VBUILD+81
>> BLRSTAT VBUILD+22, VEDIT+7, GETCOMPD+7
>> BLRTEST VBUILD+75, RESETABN+1
>> BLRTLAB VBUILD+23, VBUILD+44, RESETABN+1, RESETABN+3, RESETABN+16
>> BLRTNAM VBUILD+23, VBUILD+44
>> BLRTRAN VEDIT+8*
>> BLRUNIT VBUILD+58
>> BLRVADFN VEDIT+21
>> BLRVAL(0 VBUILD+38
>> BLRVCAT VEDIT+22
>> BLRVFILE EP+1*, EP+2, EP+4, VEDIT+18, VEDIT+95
>> BLRVGL EP+4*, VEDIT+7, VEDIT+12, VEDIT+93
>> BLRVIEN VBUILD+88, VEDIT+7, VEDIT+12, VEDIT+92*, VEDIT+93*, VEDIT+99
BLRX GETGREF~, GETGREF+1
COMPDATE GETCOMPD~, GETCOMPD+11*, GETCOMPD+13, GETCOMPD+25*
DA VEDIT+7*, VEDIT+94!, VEDIT+95*
DIE VEDIT+94!, VEDIT+95*
>> DIK VEDIT+7*
>> DILOCKTM RESETABN+1
>> DISYS RESETABN+1
DR VEDIT+94!, VEDIT+95*
DT RESETABN+1
DTIME RESETABN+1
DUZ VEDIT+41, RESETABN+1
F60IEN GETCOMPD~, GETCOMPD+6, GETCOMPD+13, GETCOMPD+19
ICDNAME VEDIT+72~, VEDIT+73*, VEDIT+74
IHSLPOV VEDIT+27~, VEDIT+28*, VEDIT+29*, VEDIT+32*, VEDIT+33
IO RESETABN+1
>> IOBS RESETABN+1
IOF RESETABN+1
IOM RESETABN+1
ION RESETABN+1
>> IOS RESETABN+1
IOSL RESETABN+1
IOST RESETABN+1
>> IOT RESETABN+1
>> IOXY RESETABN+1
LABCLIN VBUILD+9~, VBUILD+11*, VBUILD+12, VBUILD+18
LOGCOMPD GETCOMPD+1~
LOGSTOP VBUILD+16~, VBUILD+17*, VBUILD+18
LRAA GETCOMPD+1~, GETCOMPD+16, GETCOMPD+19, GETCOMPD+22, RESETABN+6, RESETABN+7, RESETABN+9, RESETABN+12
>> LRAAIEN RESETABN+12*, RESETABN+13, RESETABN+20
LRAD GETCOMPD+1~, GETCOMPD+16, GETCOMPD+19, GETCOMPD+22, RESETABN+6, RESETABN+7, RESETABN+12
LRAN GETCOMPD+1~, GETCOMPD+16, GETCOMPD+19, GETCOMPD+22, RESETABN+6, RESETABN+7, RESETABN+12
LRAS GETCOMPD~, GETCOMPD+5, GETCOMPD+13, GETCOMPD+16
>> LRAT RESETABN+16*, RESETABN+17
>> LRDATABN RESETABN+23*, RESETABN+24
>> LRDFN RESETABN+13*, RESETABN+14, RESETABN+23
>> LRIDT RESETABN+20*, RESETABN+21, RESETABN+23
LRIEN VBUILD+37~, VBUILD+38*, VBUILD+39, VBUILD+41!
>> LRSS RESETABN+9*, RESETABN+10, RESETABN+23
OLDDUZ VEDIT+40~, VEDIT+41*
OUT VBUILD+9~
OUT("DILIST" VBUILD+11
PTR GETCOMPD+1~, GETCOMPD+19*, GETCOMPD+20, GETCOMPD+22
REFLABF VEDIT+2~, VEDIT+4*, VEDIT+54, VEDIT+59
RESULTDT GETCOMPD+1~, GETCOMPD+10*, GETCOMPD+11, GETCOMPD+22*, GETCOMPD+23, GETCOMPD+25, GETCOMPD+28
SIEN VBUILD+37~, VBUILD+41!
TSTR VEDIT+40~, VEDIT+86*, VEDIT+88
U VBUILD+30, VBUILD+38, VBUILD+39, VEDIT+12, VEDIT+23, VEDIT+101, RESETABN+1, RESETABN+23
USER VEDIT+40~
>> X RESETABN+6*
>> XPARSYS RESETABN+1
>> XQXFLG RESETABN+1
XXX VBUILD+37~, VBUILD+38*, VBUILD+41!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All