BJPNUTIL ;GDIT/HS/BEE-Prenatal Care Module Utility Calls ; 08 May 2012 12:00 PM
Source file <BJPNUTIL.m>
Package | Total | Call Graph |
---|---|---|
GUI Objects | 6 | CHKASM^BGOASLK GET^BGOPROB GETONE^BGOPROB1 GETSET^BGOUTL3 GET^BGOVPOV INJURY^BGOVPOV2 |
DRG Grouper | 3 | $$ICDDX^ICDCODE $$ICDDX^ICDEX $$IMP^ICDEXA |
Kernel | 3 | ^%ZTER ($$DT,$$NOW)^XLFDT $$VERSION^XPDUTL |
Lexicon Utility | 3 | LOOK^LEXA CONFIG^LEXSET ($$ICDONE,$$ONE)^LEXU |
IHS Patient | 2 | $$CHK^AUPNSICD $$ICDDX^AUPNVUTL |
IHS Prenatal Care Module | 2 | $$PTED^BJPNPUTL $$CHK^BJPNUTIL |
VA Fileman | 2 | DT^DICRW $$GET1^DIQ |
IHS User Security Audit | 1 | $$LOG^BUSAAPI |
Name | Comments | DBIA/ICR reference |
---|---|---|
XGETCOI | ||
ERR | ;
|
|
ASTHMA(DATA,CODE,SNOMED) | ;EP - BJPN CHECK FOR ASTHMA
|
|
LEX(SEARCH,COUNT,FILTER,DATE,GENDER,RET) | ;EP - Perform Lexicon Lookup
|
|
CHKDX1 | ||
GETCOI(DATA,TEXT,VIEN,COUNT) | ;BJPN SELECT INJURY CAUSE
|
|
XASTHMA | ||
XINJPLC | ||
INJPLC(DATA,FAKE) | ;EP - BJPN GET INJURY PLACE LIST
|
|
COMP(DFN,UID,VIEN,PRBIEN) | ;EP - Call EHR API and format results into usable data
|
|
LOG(BJPNCAT,BJPNACT,BJPNCALL,BJPNDESC,BJPNVDFN) | ;EP - Log Prenatal Audit entry
|
|
XINJURY | ||
FILTER(ALEX,ALEXVDT,ICD10,FILTER) | ;Filtering for Lexicon lookup
|
|
CHKDX30 | ||
ISINJ(DATA,SNOMED,VIEN) | ;EP - BJPN CHECK FOR INJURY
|
|
ASTCON(DATA,FAKE) | ;EP - BJPN GET ASTHMA CONTROL
|
|
XASTCLS | ||
CHK(Y,ICD10,ALEXVDT) | ||
INJURY(DATA,CODE,SNOMED) | ;EP - BJPN INJURY CHECK
|
|
AICD() | ;EP - Return 1 if AICD 4.0
|
|
XDXCAUSE | ||
DXCAUSE(DATA,FAKE) | ;EP - BJPN GET DX CAUSE
|
|
XISINJ | ||
XASTCON | ||
ASTCLS(DATA,FAKE) | ;EP - BJPN GET ASTHMA CLASSES
|
Name | Field # of Occurrence |
---|---|
^%ZTER | ERR+1 |
$$CHK^AUPNSICD | FILTER+24, FILTER+33 |
$$ICDDX^AUPNVUTL | FILTER+21, FILTER+30, FILTER+39, CHK+5 |
CHKASM^BGOASLK | ASTHMA+18, INJURY+19 |
GET^BGOPROB | COMP+5 |
GETONE^BGOPROB1 | COMP+8 |
GETSET^BGOUTL3 | DXCAUSE+15 |
GET^BGOVPOV | COMP+36 |
INJURY^BGOVPOV2 | ISINJ+19 |
$$PTED^BJPNPUTL | COMP+25 |
$$CHK^BJPNUTIL | FILTER+41 |
$$LOG^BUSAAPI | LOG+23 |
DT^DICRW | GETCOI+15, ASTHMA+7, ISINJ+7, ASTCLS+7, ASTCON+7, INJPLC+7, DXCAUSE+7, INJURY+7 |
$$GET1^DIQ | GETCOI+28, GETCOI+29, GETCOI+30 |
$$ICDDX^ICDCODE | LEX+49, LEX+55 |
$$ICDDX^ICDEX | LEX+48, LEX+54 |
$$IMP^ICDEXA | LEX+26 |
LOOK^LEXA | LEX+35 |
CONFIG^LEXSET | LEX+29 |
$$ICDONE^LEXU | FILTER+20 |
$$ONE^LEXU | FILTER+29, FILTER+38 |
$$DT^XLFDT | FILTER+19 |
$$NOW^XLFDT | ERR+3 |
$$VERSION^XPDUTL | LEX+26, AICD+1 |
RPC Name | Call Tags |
---|---|
BJPN CHECK FOR ASTHMA | ASTHMA |
BJPN GET ASTHMA CLASSES | ASTCLS |
BJPN GET ASTHMA CONTROL | ASTCON |
BJPN GET DX CAUSE | DXCAUSE |
BJPN GET INJURY PLACE LIST | INJPLC |
BJPN CHECK FOR INJURY | ISINJ |
BJPN SELECT INJURY CAUSE | GETCOI |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^AUPNVSIT - [#9000010] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | LOG+5 |
^BSTS(9002318.6 - [#9002318.6] | COMP+63 |
^DD("DD" | ERR+3 |
^TMP("BJPNIPL" | COMP+11!, COMP+14 |
^TMP("BJPNUTIL" | GETCOI+13, ASTHMA+5, ISINJ+5, ASTCLS+5, ASTCON+5, INJPLC+5, DXCAUSE+5, INJURY+5 |
^TMP("LEXFND" | LEX+20! |
^TMP("LEXSCH" | LEX+20! |
Name | Line Occurrences |
---|---|
$$AICD | LEX+48, LEX+54 |
@( | CHK+8 |
LEX | GETCOI+33 |
XASTHMA | ASTHMA+15 |
XGETCOI | GETCOI+23, GETCOI+24 |
XINJURY | INJURY+15, INJURY+16 |
XISINJ | ISINJ+15, ISINJ+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | FILTER+37~, CHK+1~, CHK+5*, CHK+6, CHKDX1+3, CHKDX1+6, CHKDX1+10, CHKDX30+3, CHKDX30+4, CHKDX30+5 , CHKDX30+6, CHKDX30+8, CHKDX30+14, CHKDX30+18 |
A | CHK+1~ |
AF | COMP+53~, COMP+62*, COMP+63*, COMP+64, COMP+68 |
ALEVXDT | FILTER+37~ |
ALEX | FILTER~, FILTER+20*, FILTER+21, FILTER+29*, FILTER+30, FILTER+38*, FILTER+39 |
ALEXICD | FILTER+18~, FILTER+21*, FILTER+22, FILTER+24, FILTER+28~, FILTER+30*, FILTER+31, FILTER+33, FILTER+37~, FILTER+39* , FILTER+40, FILTER+41 |
ALEXVDT | FILTER~, FILTER+19*, FILTER+20, FILTER+21, FILTER+23, FILTER+29, FILTER+30, FILTER+32, FILTER+38, FILTER+39 , FILTER+41, CHK~, CHK+3*, CHK+5 |
APCDDATE | FILTER+8~, FILTER+23*, FILTER+32* |
ARR | DXCAUSE+2~, DXCAUSE+17* |
AUPNSEX | LEX+18~, LEX+23*, CHKDX1+9, CHKDX1+10, CHKDX30+17, CHKDX30+18 |
B | COMP+19*, COMP+20*, COMP+21*, COMP+22*, COMP+23*, COMP+24*, COMP+25*, COMP+26*, COMP+27*, COMP+30 , COMP+38~, COMP+44*, COMP+81 |
BGO | COMP+2~, COMP+15*, COMP+17, COMP+19, COMP+20, COMP+21, COMP+22, COMP+23, COMP+24, COMP+25 , COMP+26, COMP+27, COMP+37*, COMP+39 |
BJPNACT | LOG~, LOG+9, LOG+23 |
BJPNCALL | LOG~, LOG+11*, LOG+23 |
BJPNCAT | LOG~, LOG+8, LOG+9, LOG+23 |
BJPNDESC | LOG~, LOG+10, LOG+23 |
BJPNDFN | LOG+2~ |
BJPNDFN( | LOG+20* |
BJPNDFN(1 | LOG+15* |
BJPNVDFN | LOG~, LOG+14, LOG+15, LOG+18 |
BJPNVDFN( | LOG+20 |
>> BMXSEC | GETCOI+23*, GETCOI+24*, ASTHMA+15*, ISINJ+15*, ISINJ+16*, INJURY+15*, INJURY+16* |
CNT | LOG+19~, LOG+20* |
CODE | LEX+42~, LEX+45*, LEX+48, LEX+49, LEX+52, LEX+53*, LEX+54, LEX+55, LEX+58, LEX+65* , LEX+67, LEX+68, ASTHMA~, ASTHMA+15, ASTHMA+18, INJURY~, INJURY+15, INJURY+19 |
COUNT | GETCOI~, GETCOI+25*, GETCOI+33, LEX~, LEX+13*, LEX+35 |
CSET | LEX+18~, LEX+27*, LEX+29, LEX+35 |
DATA | GETCOI~, GETCOI+13*, GETCOI+14, GETCOI+21, GETCOI+34, XGETCOI, ASTHMA~, ASTHMA+5*, ASTHMA+6, ASTHMA+13 , ASTHMA+19, XASTHMA, ISINJ~, ISINJ+5*, ISINJ+6, ISINJ+13, ISINJ+20, XISINJ, ASTCLS~, ASTCLS+5* , ASTCLS+6, ASTCLS+13, ASTCLS+16, ASTCLS+17, ASTCLS+18, ASTCLS+19, XASTCLS, ASTCON~, ASTCON+5*, ASTCON+6 , ASTCON+13, ASTCON+16, ASTCON+17, ASTCON+18, XASTCON, INJPLC~, INJPLC+5*, INJPLC+6, INJPLC+13, INJPLC+16 , INJPLC+17, INJPLC+18, INJPLC+19, INJPLC+20, INJPLC+21, INJPLC+22, INJPLC+23, INJPLC+24, INJPLC+25, INJPLC+26 , INJPLC+27, XINJPLC, DXCAUSE~, DXCAUSE+5*, DXCAUSE+6, DXCAUSE+13, DXCAUSE+17, XDXCAUSE, INJURY~, INJURY+5* , INJURY+6, INJURY+13, INJURY+20, XINJURY |
DATE | LEX~, LEX+15*, LEX+26, LEX+29, LEX+35 |
DELIMITER | LEX+18~, LEX+38*, LEX+45 |
DESC | LEX+42~, LEX+66*, LEX+67 |
DFN | GETCOI+10~, GETCOI+29*, GETCOI+30, COMP~, COMP+5 |
DIC | LEX+18~ |
DIC("S" | LEX+32* |
DIEN | LEX+42~, LEX+64*, LEX+67 |
DPLIST | LEX+18~ |
DPLIST( | LEX+58, LEX+68* |
DT | GETCOI+15, GETCOI+28, LEX+15, CHK+3, ASTHMA+7, ISINJ+7, ASTCLS+7, ASTCON+7, INJPLC+7, DXCAUSE+7 , INJURY+7 |
DUZ("AG" | CHK+2 |
EP | COMP+53~, COMP+54*, COMP+69 |
ERRDTM | ERR+2~, ERR+3* |
EXC | CHKDX30+7~, CHKDX30+8*, CHKDX30+11 |
FAKE | ASTCLS~, ASTCON~, INJPLC~, DXCAUSE~ |
FILTER | LEX~, LEX+14*, FILTER~, FILTER+14, FILTER+17, FILTER+27, FILTER+36 |
FINFO | COMP+34~ |
FINFO( | COMP+52, COMP+54*, COMP+55*, COMP+56*, COMP+57*, COMP+58*, COMP+59*, COMP+60*, COMP+64*, COMP+67* , COMP+68*, COMP+69*, COMP+70*, COMP+71*, COMP+72*, COMP+73*, COMP+74*, COMP+75*, COMP+79, COMP+80 |
FNDPS | COMP+34~ |
FNDPS( | COMP+47*, COMP+79 |
FRACT | COMP+53~, COMP+66*, COMP+67 |
GENDER | LEX~, LEX+16*, LEX+23 |
I | CHK+1~, CHK+4*, CHK+6, CHK+7*, CHK+8 |
ICD | LEX+18~, LEX+48*, LEX+49*, LEX+52, LEX+54*, LEX+55*, LEX+61, LEX+64, LEX+65, LEX+66 |
ICD10 | LEX+18~, LEX+26*, LEX+27, LEX+38, FILTER~, FILTER+17, FILTER+27, FILTER+38, FILTER+41, CHK~ , CHK+4 |
II | GETCOI+10~, GETCOI+17*, GETCOI+34*, XGETCOI*, LOG+19~, LOG+20*, ASTHMA+2~, ASTHMA+9*, ASTHMA+19*, XASTHMA* , ISINJ+2~, ISINJ+9*, ISINJ+20*, XISINJ*, ASTCLS+2~, ASTCLS+9*, ASTCLS+16*, ASTCLS+17*, ASTCLS+18*, ASTCLS+19* , XASTCLS*, ASTCON+2~, ASTCON+9*, ASTCON+16*, ASTCON+17*, ASTCON+18*, XASTCON*, INJPLC+2~, INJPLC+9*, INJPLC+16* , INJPLC+17*, INJPLC+18*, INJPLC+19*, INJPLC+20*, INJPLC+21*, INJPLC+22*, INJPLC+23*, INJPLC+24*, INJPLC+25*, INJPLC+26* , INJPLC+27*, XINJPLC*, DXCAUSE+2~, DXCAUSE+9*, DXCAUSE+17*, XDXCAUSE*, INJURY+2~, INJURY+9*, INJURY+20*, XINJURY* |
INJCASS | COMP+53~, COMP+56*, COMP+71 |
INJCEXT | COMP+53~, COMP+59*, COMP+74 |
INJCINT | COMP+53~, COMP+60*, COMP+75 |
INJDT | COMP+53~, COMP+58*, COMP+73 |
LAT | COMP+2~ |
LEX | LEX+18~, LEX+40*, LEX+41, LEX+45 |
LEX("LIST" | LEX+20!, LEX+40, LEX+45 |
LIEN | LEX+42~ |
N | COMP+16~, COMP+17*, COMP+19, COMP+20, COMP+21, COMP+22, COMP+23, COMP+24, COMP+25, COMP+26 , COMP+27, COMP+30, COMP+38~, COMP+39*, COMP+40, COMP+46, COMP+48, COMP+54, COMP+55, COMP+56 , COMP+57, COMP+58, COMP+59, COMP+60, COMP+62, COMP+66 |
P | COMP+18*, COMP+19*, COMP+20*, COMP+21*, COMP+22*, COMP+23*, COMP+24*, COMP+25, COMP+26, COMP+27 , COMP+30, COMP+38~, COMP+40*, COMP+42, COMP+43, COMP+44, COMP+47, COMP+52, COMP+54, COMP+55 , COMP+56, COMP+57, COMP+58, COMP+59, COMP+60, COMP+64, COMP+67, COMP+68, COMP+69, COMP+70 , COMP+71, COMP+72, COMP+73, COMP+74, COMP+75, COMP+79, COMP+80, COMP+81 |
PENT | COMP+38~ |
PLC | COMP+53~, COMP+57*, COMP+72 |
PRBIEN | COMP~, COMP+5, COMP+8 |
PS | COMP+38~, COMP+46*, COMP+47 |
PVIEN | COMP+38~, COMP+48*, COMP+49 |
PVLST | COMP+34~, COMP+35*, COMP+49*, COMP+79 |
RES | LOG+2~, LOG+23*, LOG+24 |
RET | GETCOI+10~, GETCOI+33, GETCOI+34*, LEX~, CHKDX30+1~, CHKDX30+2*, CHKDX30+3*, CHKDX30+4*, CHKDX30+5*, CHKDX30+6 , CHKDX30+11*, CHKDX30+12*, CHKDX30+14*, CHKDX30+17, CHKDX30+18*, CHKDX30+19, ASTHMA+2~, ASTHMA+18, ASTHMA+19, ISINJ+2~ , ISINJ+19, ISINJ+20, DXCAUSE+2~, DXCAUSE+15, COMP+2~, COMP+5, COMP+8, COMP+15, COMP+17, COMP+36 , COMP+37, COMP+39, INJURY+2~, INJURY+19, INJURY+20 |
RET( | GETCOI+34, LEX+67*, DXCAUSE+17 |
RETDATA | COMP+38~, COMP+79*, COMP+80*, COMP+81 |
RETURN | FILTER+8~, FILTER+11*, FILTER+14, FILTER+17, FILTER+20*, FILTER+22*, FILTER+24*, FILTER+27, FILTER+29*, FILTER+31* , FILTER+33*, FILTER+36, FILTER+38*, FILTER+40*, FILTER+41* |
REV | COMP+53~, COMP+55*, COMP+70 |
SEARCH | LEX~, LEX+12, LEX+35 |
SEX | GETCOI+10~, GETCOI+30*, GETCOI+33 |
SNOMED | ASTHMA~, ASTHMA+15, ASTHMA+18, ISINJ~, ISINJ+15, ISINJ+19, INJURY~, INJURY+16, INJURY+19 |
T | COMP+2~, COMP+15*, COMP+19*, COMP+20*, COMP+21*, COMP+22*, COMP+23*, COMP+24*, COMP+30 |
TEXT | GETCOI~, GETCOI+23, GETCOI+33 |
TMP | COMP+2~, COMP+14*, COMP+19, COMP+20, COMP+21, COMP+22, COMP+23, COMP+24, COMP+25, COMP+26 , COMP+27, COMP+30, COMP+43, COMP+44, COMP+81* |
TOTREC | LEX+18~, LEX+40*, LEX+67* |
U | GETCOI+15, LEX+52, LEX+61, LEX+64, LEX+65, LEX+66, LEX+67, FILTER+24, FILTER+33, FILTER+41 , CHK+6, CHKDX1+3, CHKDX1+6, CHKDX1+10, CHKDX30+3, CHKDX30+4, CHKDX30+5, CHKDX30+6, CHKDX30+8, CHKDX30+14 , CHKDX30+18, ASTHMA+7, ISINJ+7, ASTCLS+7, ASTCON+7, INJPLC+7, DXCAUSE+7, DXCAUSE+17, COMP+19, COMP+20 , COMP+21, COMP+22, COMP+23, COMP+24, COMP+25, COMP+26, COMP+27, COMP+40, COMP+46, COMP+48 , COMP+54, COMP+55, COMP+56, COMP+57, COMP+58, COMP+59, COMP+60, COMP+62, COMP+66, COMP+79 , COMP+80, COMP+81, INJURY+7 |
UID | GETCOI+10~, GETCOI+12*, GETCOI+13, ASTHMA+2~, ASTHMA+4*, ASTHMA+5, ISINJ+2~, ISINJ+4*, ISINJ+5, ASTCLS+2~ , ASTCLS+4*, ASTCLS+5, ASTCON+2~, ASTCON+4*, ASTCON+5, INJPLC+2~, INJPLC+4*, INJPLC+5, DXCAUSE+2~, DXCAUSE+4* , DXCAUSE+5, COMP~, COMP+11, COMP+14, INJURY+2~, INJURY+4*, INJURY+5 |
VDT | GETCOI+10~, GETCOI+28*, GETCOI+33 |
VIEN | GETCOI~, GETCOI+24, GETCOI+28, GETCOI+29, ISINJ~, ISINJ+16, ISINJ+19, COMP~, COMP+33, COMP+36 |
X | LOG+2~, LOG+5* |
Y | CHK~, CHK+5, ERR+2~, ERR+3* |
>> ZTSK | GETCOI+12, ASTHMA+4, ISINJ+4, ASTCLS+4, ASTCON+4, INJPLC+4, DXCAUSE+4, INJURY+4 |