BLRAG09D ; IHS/MSC/SAT - SUPPORT FOR LABORATORY ACCESSION GUI RPCS ; 17-Oct-2014 09:22 ; MKK
Source file <BLRAG09D.m>
Package | Total | Call Graph |
---|---|---|
Automated Lab Instruments | 5 | (BUILDRI,CHKREQI)^LA7SM2 (KILL,PTID)^LA7SMP0 ($$CHKTST,$$SMED)^LA7SMU $$RETFACID^LA7VHLU2 (GAR,MCD,MCR,PI)^LA7VQINS |
IHS Changes To Lab | 3 | $$DIAGICD^BLRAG07 (CMT,HED,INIT,OCMT,SH,WARN)^BLRAG09E ($$FILL,$$TESTNAME)^BLRAGUT |
VA Fileman | 3 | $$EXTERNAL^DILFD $$GET1^DIQ ^DIWP |
Kernel | 2 | $$HTE^XLFDT ($$CJ,$$REPEAT)^XLFSTR |
Lab Service | 1 | $$PRAC^LRX |
Package | Total | Caller Graph |
---|---|---|
IHS Changes To Lab | 2 | BLRAG09B BLRAG09G |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETSITE(LA7X,LA7Y,LA7FS,LA7TS) | ; Setup variables for ordering and host sites
|
|
AO(UID) | ;-- print ask at order questions/responses
|
|
DGP(ORI) | ;
|
|
DEVT(BLRTXT,LA7SCFG,LA7SM,BLRIOM,BLRIOSL) | ; collect manifest text for terminal display
|
|
PRT(UID) | ;EP -- print out insurance information on manifest
|
|
WR(CAP,VAL,TAB,NL) | ;-- write out the line
|
Name | Field # of Occurrence |
---|---|
$$DIAGICD^BLRAG07 | DGP+8 |
CMT^BLRAG09E | DEVT+134 |
HED^BLRAG09E | DEVT+66, DEVT+80, DEVT+110, DEVT+116, DEVT+165, DEVT+176, DEVT+179, DEVT+185 |
INIT^BLRAG09E | DEVT+20 |
OCMT^BLRAG09E | DEVT+136 |
SH^BLRAG09E | DEVT+111, DEVT+117 |
WARN^BLRAG09E | DEVT+78, DEVT+109, DEVT+115, DEVT+159 |
$$FILL^BLRAGUT | DEVT+120, DEVT+121, DEVT+122, DEVT+127, DEVT+140, DEVT+149, DEVT+187, PRT+11, PRT+49, WR+2 |
$$TESTNAME^BLRAGUT | DEVT+187 |
$$EXTERNAL^DILFD | DEVT+48 |
$$GET1^DIQ | DEVT+24, DEVT+50, DEVT+125, PRT+6, PRT+9, PRT+12, GETSITE+8, GETSITE+14 |
^DIWP | DEVT+131 |
BUILDRI^LA7SM2 | DEVT+61 |
CHKREQI^LA7SM2 | DEVT+57 |
KILL^LA7SMP0 | DEVT+191 |
PTID^LA7SMP0 | DEVT+87 |
$$CHKTST^LA7SMU | DEVT+55, DEVT+94 |
$$SMED^LA7SMU | DEVT+41 |
$$RETFACID^LA7VHLU2 | GETSITE+10, GETSITE+16 |
GAR^LA7VQINS | PRT+10 |
MCD^LA7VQINS | PRT+25 |
MCR^LA7VQINS | PRT+28, PRT+31 |
PI^LA7VQINS | PRT+35 |
$$PRAC^LRX | DEVT+98 |
$$HTE^XLFDT | DEVT+36 |
$$CJ^XLFSTR | DEVT+68 |
$$REPEAT^XLFSTR | DEVT+169, DEVT+171 |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
^LAB(60 - [#60] | GET1^DIQ |
^LAHM(62.8 - [#62.8] | EXTERNAL^DILFD |
^LAHM(62.9 - [#62.9] | GET1^DIQ |
^LAHM(62.92 - [#62.92] | GET1^DIQ |
^BLRRLO - [#9009026.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BLRRLO - [#9009026.3] | PRT+14, PRT+19, PRT+21, AO+5, AO+6, DGP+3, DGP+5 |
^BLRRLO("ACC" | PRT+4, AO+2 |
^BLRSITE - [#9009029] | PRT+2 |
^DIC(4 - [#4] | DEVT+139 |
^ICD9 - [#80] | DGP+6 |
^LAB(60 - [#60] | DEVT+121 |
^LAB(61 - [#61] | DEVT+101 |
^LAB(62 - [#62] | DEVT+104 |
^LAHM(62.8 - [#62.8] | DEVT+12, DEVT+26, DEVT+52, DEVT+53, DEVT+82 |
^LAHM(62.9 - [#62.9] | DEVT+17 |
^LRO(68 - [#68] | DEVT+89, DEVT+90, DEVT+91, DEVT+96, DEVT+97, DEVT+99, DEVT+100 |
^TMP("BLRSM" | DEVT+15!, DEVT+59*, DEVT+65, DEVT+70, DEVT+71, DEVT+72, DEVT+73, DEVT+192! |
^TMP("LA7ERR" | DEVT+183, DEVT+184 |
^TMP($J | PRT+7, PRT+8* |
^UTILITY($J | DEVT+129!, DEVT+132 |
Name | Line Occurrences |
---|---|
AO | DEVT+144, DEVT+147 |
DGP | PRT+50 |
GETSITE | DEVT+29 |
PRT | DEVT+119 |
WR | PRT+12, PRT+13, PRT+15, PRT+16, PRT+17, PRT+36, PRT+38, PRT+39, PRT+40, PRT+41 , PRT+42, PRT+43, PRT+44, PRT+45, PRT+46, PRT+47, PRT+48, AO+16, AO+18, DGP+9 , DGP+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACC | AO+4~, AO+7*, AO+8 |
ANS | AO+4~, AO+14*, AO+18 |
BDA | PRT+19*, PRT+21, DGP+1~, DGP+3*, DGP+5 |
>> BLRC3 | DEVT+88*, DEVT+89, DEVT+90, DEVT+91, DEVT+92 |
>> BLRC4 | DEVT+89*, DEVT+90, DEVT+91, DEVT+93 |
>> BLRC5 | DEVT+90*, DEVT+91, DEVT+93 |
>> BLRC6 | DEVT+91*, DEVT+93 |
BLRI | DEVT+9~, DEVT+10*, DEVT+67*, DEVT+68*, DEVT+75*, DEVT+77*, DEVT+78*, DEVT+108*, DEVT+114*, DEVT+115* , DEVT+120*, DEVT+122*, DEVT+126*, DEVT+127*, DEVT+133*, DEVT+134*, DEVT+135*, DEVT+136*, DEVT+143*, DEVT+145* , DEVT+149*, DEVT+153*, DEVT+154*, DEVT+155*, DEVT+158*, DEVT+166*, DEVT+167*, DEVT+168*, DEVT+169*, DEVT+170* , DEVT+171*, DEVT+180*, DEVT+185*, DEVT+187*, DEVT+188*, DEVT+189*, PRT+11*, PRT+49*, AO+11*, AO+12* , WR+1*, WR+2* |
BLRIOM | DEVT~, DEVT+21*, DEVT+68, DEVT+127, DEVT+130, DEVT+142, DEVT+145, DEVT+148, DEVT+158 |
BLRIOSL | DEVT~, DEVT+22*, DEVT+107, DEVT+113, DEVT+179, DEVT+185 |
>> BLRS3 | DEVT+70*, DEVT+71, DEVT+72, DEVT+73, DEVT+76, DEVT+79, DEVT+181*, DEVT+183, DEVT+184 |
>> BLRS4 | DEVT+71*, DEVT+72, DEVT+73, DEVT+76, DEVT+79, DEVT+182*, DEVT+183, DEVT+184 |
>> BLRS5 | DEVT+72*, DEVT+73, DEVT+75, DEVT+77, DEVT+84, DEVT+85, DEVT+183*, DEVT+184, DEVT+187 |
>> BLRS6 | DEVT+73*, DEVT+81, DEVT+184*, DEVT+187 |
BLRTXT | DEVT~, DEVT+121*, DEVT+122, DEVT+140*, DEVT+142, DEVT+143, DEVT+145 |
BLRTXT( | DEVT+67*, DEVT+68*, DEVT+75*, DEVT+77*, DEVT+78*, DEVT+108*, DEVT+114*, DEVT+115*, DEVT+120*, DEVT+122* , DEVT+126*, DEVT+127*, DEVT+133*, DEVT+134*, DEVT+135*, DEVT+136*, DEVT+143*, DEVT+145*, DEVT+149*, DEVT+153* , DEVT+154*, DEVT+155*, DEVT+158*, DEVT+166*, DEVT+167*, DEVT+168*, DEVT+169*, DEVT+170*, DEVT+171*, DEVT+180* , DEVT+185*, DEVT+187*, DEVT+188*, DEVT+189*, PRT+11*, PRT+49*, AO+11*, AO+12*, WR+1*, WR+2* |
BLRY | DEVT+9~, DEVT+11*, DEVT+67*, DEVT+68*, DEVT+75*, DEVT+77*, DEVT+78*, DEVT+107, DEVT+108*, DEVT+113 , DEVT+114*, DEVT+115*, DEVT+120*, DEVT+122*, DEVT+126*, DEVT+127*, DEVT+133*, DEVT+134*, DEVT+135*, DEVT+136* , DEVT+143*, DEVT+145*, DEVT+149*, DEVT+153*, DEVT+154*, DEVT+155*, DEVT+158*, DEVT+166*, DEVT+167*, DEVT+168* , DEVT+169*, DEVT+170*, DEVT+171*, DEVT+179, DEVT+180*, DEVT+185*, DEVT+187*, DEVT+188*, DEVT+189*, PRT+11* , PRT+49*, AO+11*, AO+12*, WR+1*, WR+2* |
BTP | PRT+1~, PRT+9*, PRT+13 |
CAP | WR~, WR+2 |
CNT | PRT+1~, PRT+18*, PRT+20, PRT+51*, DGP+1~, DGP+2*, DGP+4* |
DATA | AO+4~, AO+6*, AO+7, AO+13, AO+14, AO+15 |
>> DFN | PRT+10 |
>> DIWF | DEVT+130* |
>> DIWL | DEVT+130*, DEVT+132 |
>> DIWR | DEVT+130* |
DUZ(2 | PRT+2 |
DX | DGP+1~, DGP+5*, DGP+6, DGP+8 |
DXE | DGP+1~, DGP+6*, DGP+9 |
DXEE | DGP+1~, DGP+8*, DGP+10 |
>> GT1(4 | PRT+15, PRT+45 |
>> GT1(6 | PRT+17, PRT+47 |
>> GT1(7 | PRT+16, PRT+46 |
HEAD | AO+1~, AO+9, AO+10*, AO+19! |
>> I | DEVT+53*, DEVT+82* |
IEIEN | PRT+1~, PRT+24*, PRT+27*, PRT+28, PRT+30*, PRT+31, PRT+34*, PRT+35 |
IIEN | PRT+1~, PRT+22*, PRT+25, PRT+28, PRT+31 |
>> IN1("18E" | PRT+43 |
>> IN1(17 | PRT+42 |
>> IN1(20 | PRT+44 |
>> IN1(37 | PRT+48 |
>> IN1(4 | PRT+36 |
>> IN1(5 | PRT+39 |
>> IN1(6 | PRT+41 |
>> IN1(7 | PRT+40 |
>> IN1(9 | PRT+38 |
IPIEN | PRT+1~, PRT+33*, PRT+35 |
>> LA760 | DEVT+18*, DEVT+83*, DEVT+121, DEVT+125 |
>> LA762 | DEVT+103*, DEVT+104 |
>> LA762(0 | DEVT+104*, DEVT+105* |
>> LA762801 | DEVT+18*, DEVT+52*, DEVT+53, DEVT+55, DEVT+57, DEVT+59, DEVT+81*, DEVT+82, DEVT+94 |
>> LA762801( | DEVT+53*, DEVT+82*, DEVT+128, DEVT+131 |
>> LA762801(0 | DEVT+54, DEVT+59, DEVT+83, DEVT+86, DEVT+87 |
>> LA762801(5 | DEVT+140, DEVT+141 |
>> LA7AA | DEVT+93*, DEVT+96, DEVT+97, DEVT+99, DEVT+100 |
>> LA7ACC | DEVT+96* |
>> LA7AD | DEVT+93*, DEVT+96, DEVT+97, DEVT+99, DEVT+100 |
>> LA7AN | DEVT+93*, DEVT+96, DEVT+97, DEVT+99, DEVT+100 |
>> LA7CDT | DEVT+99* |
>> LA7CHK | DEVT+34*, DEVT+57 |
LA7CMT | DEVT+129!, DEVT+132* |
>> LA7DC | DEVT+18*, DEVT+117* |
>> LA7ECH | PRT+3* |
>> LA7END | DEVT+18* |
>> LA7ERR( | DEVT+178, DEVT+180, DEVT+185 |
>> LA7ERR("" | DEVT+174 |
>> LA7EXIT | DEVT+18*, DEVT+70, DEVT+71, DEVT+72, DEVT+73, DEVT+74, DEVT+76, DEVT+84, DEVT+107, DEVT+113 , DEVT+116, DEVT+151, DEVT+178, DEVT+179, DEVT+183, DEVT+184, DEVT+185 |
LA7FS | GETSITE~, GETSITE+8*, GETSITE+9* |
LA7FS(99 | GETSITE+10*, GETSITE+11* |
>> LA7FSITE | DEVT+19*, DEVT+29 |
>> LA7I | DEVT+177*, DEVT+178*, DEVT+180, DEVT+181, DEVT+185 |
>> LA7ITEM | DEVT+18*, DEVT+106*, DEVT+167 |
>> LA7LINE | DEVT+49*, DEVT+75, DEVT+77, DEVT+114, DEVT+120, DEVT+153, PRT+11, PRT+49 |
>> LA7NOW | DEVT+36* |
LA7OBX | AO+4~ |
>> LA7PAGE | DEVT+18*, DEVT+78 |
>> LA7PROV | DEVT+63*, DEVT+98* |
>> LA7SBC | DEVT+24*, DEVT+26* |
LA7SCFG | DEVT~, DEVT+17*, DEVT+24 |
LA7SCFG(0 | DEVT+17*, DEVT+29, DEVT+139 |
>> LA7SCOND | DEVT+63*, DEVT+76, DEVT+79* |
>> LA7SCONT | DEVT+63*, DEVT+76, DEVT+79* |
>> LA7SDT | DEVT+41* |
>> LA7SKIP | DEVT+32*, DEVT+55*, DEVT+56, DEVT+92*, DEVT+94*, DEVT+95, DEVT+112 |
LA7SM | DEVT~, DEVT+12, DEVT+13*, DEVT+16*, DEVT+26, DEVT+41, DEVT+52, DEVT+53, DEVT+55, DEVT+57 , DEVT+82, DEVT+94, DEVT+182 |
LA7SM(0 | DEVT+12*, DEVT+13, DEVT+14, DEVT+16, DEVT+17, DEVT+38, DEVT+50, DEVT+137 |
>> LA7SMR | DEVT+18*, DEVT+162, DEVT+164*, DEVT+175* |
>> LA7SMST | DEVT+38*, DEVT+39, DEVT+48*, DEVT+78, DEVT+109, DEVT+115, DEVT+123, DEVT+157 |
>> LA7SPEC | DEVT+100*, DEVT+101, DEVT+103 |
>> LA7SPEC(0 | DEVT+101*, DEVT+102*, DEVT+122 |
>> LA7SVIA | DEVT+50* |
LA7TCOST | DEVT+124~, DEVT+125*, DEVT+127 |
LA7TS | GETSITE~, GETSITE+14*, GETSITE+15* |
LA7TS(99 | GETSITE+16*, GETSITE+17* |
>> LA7TSITE | DEVT+19*, DEVT+29 |
>> LA7UID | DEVT+63*, DEVT+75, DEVT+77, DEVT+80*, DEVT+84, DEVT+85*, DEVT+88, DEVT+92, DEVT+119, DEVT+136 , DEVT+144, DEVT+147 |
LA7X | DEVT+138~, DEVT+139*, DEVT+140, DEVT+145*, DEVT+148, DEVT+149*, GETSITE~, GETSITE+8, GETSITE+9, GETSITE+10 , GETSITE+11, GETSITE+16 |
LA7Y | DEVT+138~, DEVT+141*, DEVT+142, DEVT+143, DEVT+145, DEVT+148*, DEVT+149*, GETSITE~, GETSITE+14, GETSITE+15 , GETSITE+17 |
LA7Z | DEVT+138~, DEVT+148*, DEVT+149 |
>> LRDFN | DEVT+87* |
NINS | PRT+1~, PRT+2*, PRT+20 |
NL | WR~, WR+1 |
ODA | AO+4~, AO+5*, AO+6 |
ORD | PRT+1~, PRT+6*, PRT+7, PRT+8 |
ORI | PRT+1~, PRT+4*, PRT+5, PRT+6, PRT+9, PRT+12, PRT+14, PRT+19, PRT+21, PRT+50 , AO+1~, AO+2*, AO+3, AO+5, AO+6, DGP~, DGP+3, DGP+5 |
QUES | AO+4~, AO+13*, AO+16, AO+17 |
RSC | AO+4~, AO+15* |
STR | PRT+1~, PRT+21*, PRT+22, PRT+23, PRT+24, PRT+26, PRT+27, PRT+29, PRT+30, PRT+32 , PRT+33, PRT+34, PRT+37 |
TAB | WR~, WR+2 |
TB | AO+1~, AO+17*, AO+18 |
U | DEVT+13, DEVT+16, DEVT+97, DEVT+99, PRT+2, PRT+14, AO+7, AO+13, AO+14, AO+15 , DGP+5, DGP+6 |
UID | PRT~, PRT+4, PRT+8, AO~, AO+2, AO+8 |
VAL | WR~, WR+2 |
>> X | DEVT+97*, DEVT+98, DEVT+131* |