BGPMUUT7 ;IHS/MSC/MGH - Find if radiology procuedure is in taxonomy ;13-Apr-2011 16:27;DU
Source file <BGPMUUT7.m>
Package | Total | Call Graph |
---|---|---|
IHS GPRA Information System | 1 | $$NDC^BGPMUUT4 |
Taxonomy | 1 | $$ICD^ATXCHK |
Name | Comments | DBIA/ICR reference |
---|---|---|
LKP(IEN,TAX) | ||
PSFIND(DFN,TAX,BDATE,EDATE) | ;EP
|
|
FIND(DFN,TAX,BDATE,EDATE) | ; EP
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ATXAX("B" | FIND+15 |
^OR(100 - [#100] | FIND+7, FIND+8, FIND+9, FIND+10, FIND+17, PSFIND+8, PSFIND+9, PSFIND+10, LKP+3, LKP+4 , LKP+6 |
^ORD(100.98 - [#100.98] | PSFIND+12 |
^ORD(101.43 - [#101.43] | FIND+12, FIND+13 |
Name | Line Occurrences |
---|---|
$$LKP | PSFIND+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BDATE | FIND~, FIND+3, FIND+4, PSFIND~, PSFIND+4, PSFIND+5 |
BEGIN | FIND+1~, FIND+3*, PSFIND+2~, PSFIND+4* |
CODE | FIND+1~, FIND+12*, FIND+16 |
CODSYS | FIND+1~, FIND+13*, FIND+14 |
DFN | FIND~, FIND+6, PSFIND~, PSFIND+7 |
DGRP | PSFIND+2~, PSFIND+10*, PSFIND+11, PSFIND+12 |
DGTYP | PSFIND+2~, PSFIND+12*, PSFIND+13 |
DRUG | LKP+1~, LKP+6*, LKP+7 |
EDATE | FIND~, FIND+4, PSFIND~, PSFIND+5 |
END | FIND+1~, FIND+4*, FIND+5, PSFIND+2~, PSFIND+5*, PSFIND+6 |
FIRST | FIND+1~, FIND+5*, FIND+7*, FIND+8, PSFIND+2~, PSFIND+6*, PSFIND+8*, PSFIND+9 |
I | LKP+1~, LKP+3*, LKP+4, LKP+6 |
IEN | FIND+1~, FIND+8*, FIND+9, FIND+10, FIND+17, PSFIND+2~, PSFIND+9*, PSFIND+10, PSFIND+15, LKP~ , LKP+3, LKP+4, LKP+6 |
MED | PSFIND+2~, PSFIND+14*, PSFIND+15*, PSFIND+16 |
OI | FIND+1~, FIND+9*, FIND+10, LKP+1~ |
OIN | FIND+1~, FIND+10*, FIND+11, FIND+12, FIND+13 |
ORDER | FIND+1~, FIND+2*, FIND+7, FIND+8, FIND+15*, FIND+16*, FIND+18*, FIND+19, PSFIND+2~, PSFIND+3* , PSFIND+8, PSFIND+9, PSFIND+16*, PSFIND+17 |
ORDERTE | FIND+1~ |
ORDTE | FIND+1~, FIND+17*, FIND+18 |
PT | FIND+1~, FIND+6*, FIND+7, FIND+8, PSFIND+2~, PSFIND+7*, PSFIND+8, PSFIND+9 |
RESULT | LKP+1~, LKP+2*, LKP+3, LKP+7*, LKP+8 |
START | FIND+1~, FIND+4*, FIND+7, PSFIND+2~, PSFIND+5*, PSFIND+8 |
TAX | FIND~, FIND+15, PSFIND~, PSFIND+15, LKP~, LKP+7 |
TIEN | FIND+1~, FIND+15*, FIND+16 |
U | FIND+12, FIND+13, FIND+17, FIND+18, PSFIND+10, PSFIND+12, PSFIND+16, LKP+5, LKP+6 |
ZERO | LKP+1~, LKP+4*, LKP+5 |