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 |