LRPXSXRA ;VA/SLC/PKR - Build indexes for Lab Anatomic Path. ; 17-Oct-2014 09:22 ; MKK
Source file <LRPXSXRA.m>
Package | Total | Call Graph |
---|---|---|
Lab Service | 3 | SLAB^LRPX ($$DOD,$$LRDFN)^LRPXAPIU AANUMS^LRPXSXRB |
Clinical Reminders | 1 | (ADDERROR,COMMSG,DETIME,ERRMSG)^PXRMSXRM |
IHS Changes To Lab | 1 | $$PATCH^BLRUTIL4 |
Kernel | 1 | (BMES,MES)^XPDUTL |
VA Fileman | 1 | $$GET1^DID |
Name | Comments | DBIA/ICR reference |
---|---|---|
AP | ; from LRPXSXRL
; ----- BEGIN IHS/OIT/MKK - LR*5.2*1030 ; RPMS Lab does not use Clinical Reminders. ; None of the following code will be used. ; Q ; ----- END IHS/OIT/MKK - LR*5.2*1030 ; |
|
UP(X) | ||
APSET(DFN,ITEM,DATE,NODE) | ;
; ----- BEGIN IHS/OIT/MKK - LR*5.2*1030 ; RPMS Lab does not use Clinical Reminders. ; None of the following code will be used. ; Q ; ----- END IHS/OIT/MKK - LR*5.2*1030 ; |
|
SNOMED(LRDFN,DFN,LRIDT,DATE,APSUB,I) | ;
; ----- BEGIN IHS/OIT/MKK - LR*5.2*1030 ; RPMS Lab does not use Clinical Reminders. ; None of the following code will be used. ; Q ; ----- END IHS/OIT/MKK - LR*5.2*1030 ; |
|
CYEMSP(LRDFN,DFN,ANUMS) | ;
; ----- BEGIN IHS/OIT/MKK - LR*5.2*1030 ; RPMS Lab does not use Clinical Reminders. ; None of the following code will be used. ; Q ; ----- END IHS/OIT/MKK - LR*5.2*1030 ; |
Name | Field # of Occurrence |
---|---|
$$PATCH^BLRUTIL4 | AP+7, CYEMSP+7, SNOMED+7, APSET+7 |
$$GET1^DID | AP+15 |
SLAB^LRPX | APSET+15 |
$$DOD^LRPXAPIU | AP+37 |
$$LRDFN^LRPXAPIU | AP+31 |
AANUMS^LRPXSXRB | AP+25 |
ADDERROR^PXRMSXRM | APSET+13 |
COMMSG^PXRMSXRM | AP+87 |
DETIME^PXRMSXRM | AP+81 |
ERRMSG^PXRMSXRM | AP+84 |
BMES^XPDUTL | AP+20 |
MES^XPDUTL | AP+22, AP+35, AP+78 |
FileNo | Call Tags |
---|---|
^LR - [#63] | GET1^DID |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LR - [#63] | AP+27, AP+28, AP+38, AP+39, AP+41, AP+42, AP+43, AP+47, AP+48, AP+54 , AP+55, AP+63, AP+64, AP+71, AP+72, CYEMSP+13, CYEMSP+15, CYEMSP+16, CYEMSP+19, CYEMSP+21 , CYEMSP+22, CYEMSP+23, CYEMSP+27, CYEMSP+29, CYEMSP+30, CYEMSP+45, CYEMSP+46, CYEMSP+52, CYEMSP+53, SNOMED+13 , SNOMED+14, SNOMED+21, SNOMED+22 |
^LR(0 | AP+16 |
Name | Line Occurrences |
---|---|
$$UP | AP+43, CYEMSP+23 |
APSET | AP+45, AP+52, AP+59, AP+68, AP+76, CYEMSP+25, CYEMSP+34, CYEMSP+50, CYEMSP+57, SNOMED+18 , SNOMED+26 |
CYEMSP | AP+36 |
SNOMED | CYEMSP+58 |
Name | Field # of Occurrence |
---|---|
^("AU" | AP+39 |
^(0 | CYEMSP+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACC | CYEMSP+10~ |
ANUMS | AP+11~, AP+13!, AP+25, AP+36, CYEMSP~ |
APSUB | CYEMSP+10~, CYEMSP+12*, CYEMSP+13, CYEMSP+15, CYEMSP+16, CYEMSP+19, CYEMSP+21, CYEMSP+22, CYEMSP+23, CYEMSP+24 , CYEMSP+27, CYEMSP+29, CYEMSP+30, CYEMSP+33, CYEMSP+45, CYEMSP+46, CYEMSP+49, CYEMSP+52, CYEMSP+53, CYEMSP+56 , CYEMSP+58, SNOMED~, SNOMED+13, SNOMED+14, SNOMED+17, SNOMED+21, SNOMED+22, SNOMED+25 |
DATE | AP+11~, AP+37*, AP+45, AP+52, AP+59, AP+68, AP+76, CYEMSP+10~, CYEMSP+16*, CYEMSP+17 , CYEMSP+18*, CYEMSP+25, CYEMSP+34, CYEMSP+50, CYEMSP+57, CYEMSP+58, SNOMED~, SNOMED+18, SNOMED+26, APSET~ , APSET+15 |
DFN | AP+11~, AP+30*, AP+31, AP+36, AP+37, AP+45, AP+52, AP+59, AP+68, AP+76 , CYEMSP~, CYEMSP+25, CYEMSP+34, CYEMSP+50, CYEMSP+57, CYEMSP+58, SNOMED~, SNOMED+18, SNOMED+26, APSET~ , APSET+15 |
END | AP+11~, AP+79*, AP+81, AP+87 |
ENTRIES | AP+11~, AP+16*, AP+17, AP+21 |
ERR | CYEMSP+10~ |
ETEXT | APSET+10~, APSET+11*, APSET+13 |
ETIOL | AP+11~, AP+72*, AP+73, AP+74, SNOMED+9~, SNOMED+22*, SNOMED+23, SNOMED+24 |
GLOBAL | AP+11~, AP+15*, AP+84, AP+87 |
I | AP+11~, AP+53*, AP+54*, AP+55, AP+58, AP+63, AP+64, AP+67, AP+71, AP+72 , AP+75, CYEMSP+10~, CYEMSP+51*, CYEMSP+52*, CYEMSP+53, CYEMSP+56, CYEMSP+58, SNOMED~, SNOMED+13, SNOMED+14 , SNOMED+17, SNOMED+21, SNOMED+22, SNOMED+25 |
ICD | AP+11~, AP+46*, AP+47*, AP+48, AP+51, CYEMSP+10~, CYEMSP+44*, CYEMSP+45*, CYEMSP+46, CYEMSP+49 |
ICDX | AP+11~, AP+48*, AP+49, AP+50, CYEMSP+10~, CYEMSP+46*, CYEMSP+47, CYEMSP+48 |
II | AP+11~, AP+62*, AP+63*, AP+64, AP+67, AP+71, AP+72, AP+75, SNOMED+9~, SNOMED+12* , SNOMED+13*, SNOMED+14, SNOMED+17, SNOMED+21, SNOMED+22, SNOMED+25 |
III | AP+11~, AP+70*, AP+71*, AP+72, AP+75, SNOMED+9~, SNOMED+20*, SNOMED+21*, SNOMED+22, SNOMED+25 |
IND | AP+11~, AP+24*, AP+32*, AP+33, AP+34 |
ITEM | AP+11~, AP+43*, AP+45, AP+50*, AP+52, AP+57*, AP+59, AP+66*, AP+68, AP+74* , AP+76, CYEMSP+10~, CYEMSP+23*, CYEMSP+25, CYEMSP+32*, CYEMSP+34, CYEMSP+48*, CYEMSP+50, CYEMSP+55*, CYEMSP+57 , SNOMED+9~, SNOMED+16*, SNOMED+18, SNOMED+24*, SNOMED+26, APSET~, APSET+9, APSET+15 |
LRDFN | AP+12~, AP+26*, AP+27*, AP+28, AP+31, AP+36, AP+38, AP+39, AP+41, AP+42 , AP+43, AP+44, AP+47, AP+48, AP+51, AP+54, AP+55, AP+58, AP+63, AP+64 , AP+67, AP+71, AP+72, AP+75, CYEMSP~, CYEMSP+13, CYEMSP+15, CYEMSP+16, CYEMSP+19, CYEMSP+21 , CYEMSP+22, CYEMSP+23, CYEMSP+24, CYEMSP+27, CYEMSP+29, CYEMSP+30, CYEMSP+33, CYEMSP+45, CYEMSP+46, CYEMSP+49 , CYEMSP+52, CYEMSP+53, CYEMSP+56, CYEMSP+58, SNOMED~, SNOMED+13, SNOMED+14, SNOMED+17, SNOMED+21, SNOMED+22 , SNOMED+25 |
LRIDT | CYEMSP+10~, CYEMSP+14*, CYEMSP+15*, CYEMSP+16, CYEMSP+18, CYEMSP+19, CYEMSP+21, CYEMSP+22, CYEMSP+23, CYEMSP+24 , CYEMSP+27, CYEMSP+29, CYEMSP+30, CYEMSP+33, CYEMSP+45, CYEMSP+46, CYEMSP+49, CYEMSP+52, CYEMSP+53, CYEMSP+56 , CYEMSP+58, SNOMED~, SNOMED+13, SNOMED+14, SNOMED+17, SNOMED+21, SNOMED+22, SNOMED+25 |
NE | AP+12~, AP+24*, AP+77, AP+87, APSET+16* |
NERROR | AP+12~, AP+24*, AP+84, AP+87, APSET+13 |
NODE | AP+12~, AP+44*, AP+45, AP+51*, AP+52, AP+58*, AP+59, AP+67*, AP+68, AP+75* , AP+76, CYEMSP+10~, CYEMSP+24*, CYEMSP+25, CYEMSP+33*, CYEMSP+34, CYEMSP+49*, CYEMSP+50, CYEMSP+56*, CYEMSP+57 , SNOMED+9~, SNOMED+17*, SNOMED+18, SNOMED+25*, SNOMED+26, APSET~, APSET+11, APSET+15 |
ORGAN | AP+12~, AP+55*, AP+56, AP+57, CYEMSP+10~, CYEMSP+53*, CYEMSP+54, CYEMSP+55 |
PREP | CYEMSP+10~, CYEMSP+26*, CYEMSP+27*, CYEMSP+29, CYEMSP+30, CYEMSP+33 |
SNOMED | AP+12~, AP+64*, AP+65, AP+66, SNOMED+9~, SNOMED+14*, SNOMED+15, SNOMED+16 |
SPEC | AP+12~, AP+40*, AP+41*, AP+42, AP+43, AP+44, CYEMSP+10~, CYEMSP+20*, CYEMSP+21*, CYEMSP+22 , CYEMSP+23, CYEMSP+24, CYEMSP+27, CYEMSP+29, CYEMSP+30, CYEMSP+33 |
START | AP+12~, AP+23*, AP+81, AP+87 |
SUB | AP+12~, AP+61*, AP+63, AP+64, AP+67, AP+69, AP+71, AP+72, AP+75, SNOMED+9~ , SNOMED+11*, SNOMED+13, SNOMED+14, SNOMED+17, SNOMED+19, SNOMED+21, SNOMED+22, SNOMED+25 |
SUBS | AP+12~, AP+60*, AP+61, AP+66, SNOMED+9~, SNOMED+10*, SNOMED+11, SNOMED+16 |
TEMP | AP+12~, AP+28*, AP+29, AP+30 |
TENP | AP+12~, AP+17*, AP+18*, AP+19*, AP+33 |
TEST | CYEMSP+11~, CYEMSP+28*, CYEMSP+29*, CYEMSP+30*, CYEMSP+31, CYEMSP+32, CYEMSP+33 |
TESTS | CYEMSP+11~! |
TEXT | AP+12~, AP+21*, AP+22, AP+34*, AP+35, AP+77*, AP+78 |
U | AP+16, AP+29, AP+30, AP+39, AP+42, AP+43, CYEMSP+19, CYEMSP+22, CYEMSP+23 |
X | UP~ |