©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BLRAG01 ; IHS/MSC/SAT - LABORATORY ACCESSION GUI RPCS ;
Source file <BLRAG01.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | ^%DT FILE^DIE $$GET1^DIQ |
| IHS Changes To Lab | 2 | RETDTA^BLRAG10 ($$GACE69,$$TESTNAME,ERR)^BLRAGUT |
| Order Entry Results Reporting | 2 | DETAIL^ORWOR GET4V11^ORWORR |
| IHS Patient | 1 | ($$DOB,$$HRN,$$SEX,$$SSN)^AUPNPAT |
| IHS VA Utilities | 1 | ^XBKVAR |
| Kernel | 1 | ($$DT,$$FR,$$HTFM)^XLFDT |
| Toolkit | 1 | $$GET^XPAR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PTC(BLRY) | ; rpc to return the value of the BLR PT CONFIRM parameter
; RPC: BLR PT CONFIRM ENABLED ; Returns Patient Confirmation enabled; 0='no' (default); 1='yes' |
|
| ANA1(BLRDT,BLRSP,BLRTI) | ;
; BLRDT = date in FM format; pointer to LAB ORDER ENTRY file ^LRO(69,BLRDT ; BLRSP = Specimen pointer to LAB ORDER ENTRY file ^LRO(69,BLRDT,1,BLRSP ; BLRTI = counter for global array entries |
|
| ANA(BLRY,BLRDFN,BLRUSRDY) | ;return appointment data for given patient - RPC
; RPC Name is BLR ALL NON-ACCESSIONED |
|
| INST(BLRLRDFN,BLRCS,BLRRET) | ; get lab instructions for given lab test and collection sample
; BLRLRDFN = pointer to LABORATORY TEST file 60 ; BLRCS = pointer to COLLECTION SAMPLE file 62 ; BLRRET = returned lab instructions array ; BLRRET(COUNT)=TEXT |
|
| ANAHD | ;
; 0 1 2 3 |
|
| PTCS(BLRY,BLRDT,BLRSPN,BLRUSER,BLRDTCF,BLRMETH) | ;rpc to store Patient Confirmation data to the Specimen Multiple of the LAB ORDER ENTRY file
; RPC: BLR PT CONFIRM STORE ; BLRDT = (required) order date in external format - pointer to LAB ORDER ENTRY file 69 ; BLRSPN = (required) specimen number - pointer to specimen multiple in LAB ORDER ENTRY file 69 ; BLRUSER = (required) user that did confirmation - pointer to NEW PERSON file 200 ; BLRDTCF = (optional) Date/Time of user confirmation in external format - defaults to 'today' ; BLRMETH = (optional) method of confirmation - free text |
|
| UNL69 | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | PTCS+14, PTCS+30 |
| $$DOB^AUPNPAT | ANA1+28 |
| $$HRN^AUPNPAT | ANA1+27 |
| $$SEX^AUPNPAT | ANA1+29 |
| $$SSN^AUPNPAT | ANA1+31 |
| RETDTA^BLRAG10 | ANA+74 |
| $$GACE69^BLRAGUT | ANA1+33 |
| $$TESTNAME^BLRAGUT | ANA1+21 |
| ERR^BLRAGUT | PTCS+16, PTCS+17, PTCS+18, PTCS+20, PTCS+25, PTCS+39 |
| FILE^DIE | PTCS+38 |
| $$GET1^DIQ | ANA1+10, PTC+9 |
| DETAIL^ORWOR | ANA1+38 |
| GET4V11^ORWORR | ANA1+37 |
| ^XBKVAR | ANA+63, PTC+5, PTCS+9 |
| $$DT^XLFDT | ANA+82 |
| $$FR^XLFDT | PTCS+16, PTCS+32 |
| $$HTFM^XLFDT | ANA+78, ANA+82, PTCS+27, PTCS+32 |
| $$GET^XPAR | PTC+12 |
| RPC Name | Call Tags |
|---|---|
| BLR ALL NON-ACCESSIONED | ANA |
| FileNo | Call Tags |
|---|---|
| ^LAB(61 - [#61] | GET1^DIQ |
| ^XTV(8989.3 - [#8989.3] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TRAP" | ANA+63, PTC+5, PTCS+9 |
| ^DPT - [#2] | ANA+84, ANA1+26, ANA1+30 |
| ^LAB(60 - [#60] | INST+7, INST+9, INST+10 |
| ^LAB(62 - [#62] | ANA1+11 |
| ^LR - [#63] | ANA1+18 |
| ^LRO(69 - [#69] | ANA+81, ANA+88, ANA+89, ANA+94, ANA+95, ANA1+4, ANA1+8, ANA1+9, ANA1+12, ANA1+14 , ANA1+15, PTCS+19, PTCS+20, PTCS+23, PTCS+39, UNL69+1 |
| ^TMP("BLRAG" | ANA+67!, ANA+102*, ANAHD+17*, PTC+4!, PTC+8*, PTC+13*, PTCS+8!, PTCS+12*, PTCS+44* |
| ^TMP("BLRAG01" | ANA+61!, ANA+99, ANA+100, ANA+102, ANA+106!, ANA1+40*, ANA1+47*, ANA1+50*, ANA1+51*, ANA1+54* , ANA1+59*, ANA1+61*, ANA1+62* |
| ^TMP("ORTXT" | ANA1+52, ANA1+54 |
| ^VA(200 - [#200] | PTCS+18 |
| ^XTV(8989.51 - [#8989.51] | PTC+11 |
| Name | Line Occurrences |
|---|---|
| ANA1 | ANA+90, ANA+96 |
| ANAHD | ANA+98 |
| INST | ANA1+23 |
| UNL69 | PTCS+41 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %DT | PTCS+14*, PTCS+30* |
| BLR60NAM | ANA+53~, ANA1+21*, ANA1+57 |
| BLR62NAM | ANA+53~, ANA1+11*, ANA1+57 |
| BLRACCNO | ANA+54~, ANA+62*, ANA1+33*, ANA1+57 |
| BLRCS | INST~, INST+7 |
| BLRCSIEN | INST+5~, INST+7*, INST+8, INST+9, INST+10 |
| BLRD | ANA1+61*, INST+5~, INST+9*, INST+10 |
| BLRDFN | ANA~, ANA+66*, ANA+84, ANA1+25 |
| BLRDLST | ANA1+35!, ANA1+36*, ANA1+38 |
| BLRDOM | PTC+3~, PTC+9*, PTC+10 |
| BLRDT | ANA+55~, ANA+87*, ANA+88*, ANA+89, ANA+90, ANA+93*, ANA+94*, ANA+95, ANA+96, ANA1~ , ANA1+4, ANA1+8, ANA1+9, ANA1+12, ANA1+14, ANA1+15, ANA1+33, ANA1+57, PTCS~, PTCS+14* , PTCS+16, PTCS+19, PTCS+20, PTCS+35, PTCS+36, PTCS+37, PTCS+39 |
| BLRDTCF | PTCS~, PTCS+27*, PTCS+30*, PTCS+32*, PTCS+36 |
| BLRENT | PTC+3~, PTC+10*, PTC+12 |
| BLRFLST | ANA1+35!, ANA1+36*, ANA1+37 |
| BLRFLST( | ANA1+43, ANA1+45, ANA1+48, ANA1+50 |
| BLRFLST(0 | ANA1+42 |
| BLRI | ANA+55~, ANA+65*, ANA+101*, ANA+102, PTC+3~, PTC+6*, PTC+8, PTC+13*, PTCS+7~, PTCS+10* , PTCS+12, PTCS+44* |
| BLRIFNL | ANA+55~, ANA+64!, ANA1+37 |
| BLRIFNL(1 | ANA1+34* |
| BLRINST | ANA1+22!*, ANA1+23 |
| BLRINST( | ANA1+61 |
| BLRJ | ANA+55~, ANA+99*, ANA+100, ANA+102, ANA1+44*, ANA1+45 |
| BLRK | ANA+55~, ANA+100*, ANA+102, ANA1+8*, ANA1+9 |
| BLRLCNT | ANA+55~, ANA+65* |
| BLRLI | ANA+55~ |
| BLRLRDFN | ANA+55~, ANA1+17*, ANA1+18, INST~, INST+7, INST+9, INST+10 |
| >> BLRLRND | ANA1+18*, ANA1+19, ANA1+24 |
| BLRLST | ANA+55~ |
| BLRLSTI | ANA+55~, ANA1+42*, ANA1+43, ANA1+45, ANA1+48*, ANA1+50, ANA1+52*, ANA1+54 |
| BLRLTMP | ANA+56~, ANA+64! |
| BLRM | PTCS+7~, PTCS+33!, PTCS+34* |
| BLRM("DIERR" | PTCS+39 |
| BLRMETH | PTCS~, PTCS+37 |
| BLRNODS | ANA+56~, ANA1+4*, ANA1+5, ANA1+6, ANA1+11, ANA1+17, ANA1+23, ANA1+56 |
| BLRNODT | ANA+56~, ANA1+15*, ANA1+16, ANA1+21, ANA1+23, ANA1+32 |
| BLROERR | ANA+56~, ANA1+32*, ANA1+34, ANA1+38 |
| BLROI | ANA+55~, ANA+65* |
| BLROLOC | ANA+56~ |
| >> BLRORD | ANA1+12*, ANA1+13, ANA1+57, PTCS+19*, PTCS+20, PTCS+23 |
| >> BLRPAD1 | ANA+62* |
| >> BLRPAD2 | ANA+62* |
| >> BLRPAD3 | ANA+62* |
| >> BLRPADC | ANA+62* |
| BLRPADD | ANA+56~, ANA1+30*, ANA1+55, ANA1+56 |
| >> BLRPADS | ANA+62* |
| >> BLRPADZ | ANA+62* |
| BLRPAR | PTC+3~, PTC+11*, PTC+12 |
| >> BLRPDFN | ANA1+24*, ANA1+25, ANA1+26, ANA1+27, ANA1+28, ANA1+29, ANA1+30, ANA1+31, ANA1+40, ANA1+47 , ANA1+50, ANA1+51, ANA1+54, ANA1+59, ANA1+61, ANA1+62 |
| >> BLRPDOB | ANA1+28*, ANA1+40 |
| BLRPHRN | ANA+57~, ANA1+27*, ANA1+40 |
| BLRPNAM | ANA+57~, ANA1+26*, ANA1+40 |
| >> BLRPSEX | ANA1+29*, ANA1+56 |
| BLRRET | INST~, INST+6*, PTC+12*, PTC+13 |
| BLRRET( | INST+10* |
| BLRSDAYS | ANA+58~, ANA+74, ANA+75*, ANA+78, ANA+82 |
| BLRSEX | ANA+57~ |
| BLRSP | ANA+57~, ANA+89*, ANA+90, ANA+95*, ANA+96, ANA1~, ANA1+4, ANA1+8, ANA1+9, ANA1+12 , ANA1+14, ANA1+15, ANA1+33, ANA1+57 |
| BLRSPN | PTCS~, PTCS+17, PTCS+19, PTCS+20, PTCS+35, PTCS+36, PTCS+37, PTCS+39 |
| BLRSPNS | ANA+53~, ANA1+7*, ANA1+10*, ANA1+57 |
| BLRSSN | ANA+57~, ANA+62*, ANA1+31*, ANA1+57 |
| BLRT | ANA+57~, ANA1+14*, ANA1+15, ANA1+33, ANA1+57 |
| BLRTI | ANA+57~, ANA+65*, ANA+90, ANA+96, ANA1~, ANA1+39*, ANA1+40, ANA1+46*, ANA1+47, ANA1+49* , ANA1+50, ANA1+51*, ANA1+53*, ANA1+54, ANA1+58*, ANA1+59, ANA1+61*, ANA1+62* |
| BLRTMP | ANA+57~, ANA+62*, ANA1+41*, ANA1+43*, ANA1+45*, ANA1+47, ANAHD+2*, ANAHD+4*, ANAHD+6*, ANAHD+8* , ANAHD+10*, ANAHD+12*, ANAHD+14*, ANAHD+16*, ANAHD+17 |
| BLRTMP( | ANA+70* |
| >> BLRTMP1 | ANA1+55*, ANA1+56*, ANA1+57*, ANA1+59, ANA1+60* |
| BLRTOP | ANA+53~, ANA1+9*, ANA1+10 |
| BLRUSER | PTCS~, PTCS+18, PTCS+35 |
| BLRUSRDY | ANA~, ANA+75 |
| BLRY | ANA~, ANA+68*, PTC~, PTC+7*, PTCS~, PTCS+11* |
| DUZ(2 | ANA1+27 |
| >> FDA( | PTCS+35*, PTCS+36*, PTCS+37* |
| FUTUDAYS | ANA+58~, ANA+81*, ANA+82*, ANA+88, ANA+94 |
| LRDFN | ANA+58~, ANA+84*, ANA+86, ANA+88, ANA+89, ANA+92 |
| >> LRORD | UNL69+1 |
| PASTDAYS | ANA+58~, ANA+78*, ANA+87, ANA+93 |
| U | ANA1+6, ANA1+9, ANA1+11, ANA1+12, ANA1+16, ANA1+17, ANA1+19, ANA1+21, ANA1+23, ANA1+24 , ANA1+26, ANA1+32, ANA1+40, ANA1+43, ANA1+45, ANA1+47, ANA1+51, ANA1+55, ANA1+56, ANA1+57 , PTCS+19 |
| >> X | ANA+63*, PTC+5*, PTCS+9*, PTCS+14*, PTCS+30* |
| >> Y | PTCS+14, PTCS+30 |