©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
BQICASUI ;PRXM/HC/ALA-Find Community Suicides ; 11 Oct 2007 2:10 PM
Source file <BQICASUI.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COMM() | ;EP - Get UNKNOWN community
|
|
| SCD(TAX,ADT) | ;EP - Find appropriate code
|
|
| SNS(BQCID) | ;EP - Look by concept ID
|
|
| STOR(TIEN,VSDTM) | ;
|
|
| FND | ; EP - Find Suicides
|
|
| NFILE(COMM,DCAT,DXC,DATE,VISIT,PT,FILE) | ;
; Input ; COMM - Community ; DCAT - Diagnosis Category ; DXC - Diagnosis Code ; DATE - Event Date ; VISIT - Visit to make it unique ; PT - DFN ; Assumed that the Alert Type is Suicidal Behavior |
| Name | Field # of Occurrence |
|---|---|
| $$SPM^BQIGPUTL | FND+12 |
| BLD^BQITUTL | FND+76, FND+100, SCD+3 |
| $$DATE^BQIUL1 | FND+17, FND+42 |
| $$PROB^BQIUL1 | SNS+6 |
| $$SUBLST^BSTSAPI | FND+62 |
| ^DIC | NFILE+12, NFILE+18, NFILE+24 |
| $$FIND1^DIC | COMM+1 |
| IX^DIC | NFILE+32, NFILE+36 |
| FILE^DICN | NFILE+14, NFILE+52 |
| FILE^DIE | NFILE+40 |
| ENALL^DIK | NFILE+43 |
| $$IENS^DILF | FND+14 |
| $$GET1^DIQ | FND+15, FND+36, FND+47, FND+55, FND+83, FND+84, FND+86, FND+87, FND+88, STOR+2 , STOR+3, SNS+10, SNS+24 |
| $$IMP^ICDEXA | SCD+10 |
| $$FMADD^XLFDT | FND+123, FND+127 |
| $$VERSION^XPDUTL | SCD+7, SCD+9 |
| FileNo | Call Tags |
|---|---|
| ^AUPNPAT - [#9000001] | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| ^AUPNVPOV - [#9000010.07] | GET1^DIQ |
| ^AMHPSUIC - [#9002011.65] | GET1^DIQ |
| ^BQI(90507.6 - [#90507.6] | Classic Fileman Calls |
| 90508.015 | GET1^DIQ |
| ^AUTTCOM - [#9999999.05] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AMHPROB - [#9002012.2] | FND+21 |
| ^AMHPROB("B" | FND+20 |
| ^AMHPSUIC - [#9002011.65] | FND+47 |
| ^AMHPSUIC("AD" | FND+43, FND+45 |
| ^AMHREC("B" | FND+27, FND+29 |
| ^AMHRPRO - [#9002011.01] | FND+32, FND+34 |
| ^AMHRPRO("AD" | FND+31 |
| ^AUPNPROB - [#9000011] | SNS+3, SNS+4, SNS+8 |
| ^AUPNPROB("ASCT" | SNS+2 |
| ^AUPNVPOV - [#9000010.07] | FND+81, FND+108, FND+109, FND+110, SNS+19, SNS+20 |
| ^AUPNVPOV("AD" | FND+107 |
| ^AUPNVPOV("ASCI" | SNS+16 |
| ^AUPNVPOV("B" | FND+79 |
| ^AUPNVSIT - [#9000010] | SNS+22 |
| ^AUPNVSIT("B" | FND+103, FND+105 |
| ^BQI(90507.6 - [#90507.6] | NFILE+17*, NFILE+23*, NFILE+31*, NFILE+38*, NFILE+39*, NFILE+51* |
| ^BQI(90508 - [#90508] | FND+13 |
| ^BQICARE - [#90505] | NFILE+48 |
| ^TMP("BQISNOM" | FND+61 |
| ^TMP("BQISUICTMP" | FND+7 |
| ^TMP("BQITAX" | FND+74 |
| Name | Line Occurrences |
|---|---|
| $$COMM | FND+37, FND+56, FND+89, STOR+4, SNS+11, SNS+25 |
| $$SCD | FND+51, FND+52 |
| NFILE | FND+141 |
| SNS | FND+67 |
| STOR | FND+112, FND+113, FND+114 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SNS+20 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADT | SCD~, SCD+10 |
| AIEN | NFILE+9~, NFILE+19*, NFILE+21, NFILE+29, NFILE+49 |
| BQCID | SNS~, SNS+2, SNS+9, SNS+13, SNS+16, SNS+27, SNS+29 |
| BQCODE | SCD+1~, SCD+8*, SCD+11*, SCD+12*, SCD+13 |
| BQI | FND+10~, FND+13*, FND+14 |
| BQIH | FND+10~, FND+12*, FND+13, FND+14 |
| >> BQIOK | FND+62*, FND+63 |
| >> BQISUB | FND+60*, FND+62, SNS+7, SNS+26 |
| >> BQIUPD | NFILE+40 |
| BQN | SCD+1~, SCD+5*, SCD+6*, SCD+8, SCD+11, SCD+12 |
| CIEN | FND+1~, NFILE+9~, NFILE+13*, NFILE+14*, NFILE+16, NFILE+21, NFILE+29, NFILE+49 |
| CM | FND+1~, FND+11~, FND+118*, FND+119*, FND+120, FND+121, FND+122, FND+124, FND+126, FND+129* , FND+130*, FND+132, FND+134, FND+136, FND+138, FND+139, FND+140, FND+141 |
| COMM | FND+1~, FND+11~, FND+36*, FND+37*, FND+38, FND+41~, FND+55*, FND+56*, FND+57, FND+88* , FND+89*, FND+95, NFILE~, NFILE+11, NFILE+14, STOR+1~, STOR+3*, STOR+4*, STOR+6, SNS+10* , SNS+11*, SNS+12, SNS+13, SNS+24*, SNS+25*, SNS+28, SNS+29, COMM+1*, COMM+2*, COMM+3 |
| D | NFILE+29*, NFILE+34!, NFILE+35* |
| DA | FND+10~, FND+14*, NFILE+9~ |
| DA(1 | FND+14*, NFILE+16*, NFILE+17, NFILE+21*, NFILE+22, NFILE+23, NFILE+29*, NFILE+30, NFILE+31, NFILE+38 , NFILE+39, NFILE+49*, NFILE+50, NFILE+51 |
| DA(2 | NFILE+21*, NFILE+22, NFILE+23, NFILE+29*, NFILE+30, NFILE+31, NFILE+38, NFILE+39, NFILE+49*, NFILE+50 , NFILE+51 |
| DA(3 | NFILE+29*, NFILE+30, NFILE+31, NFILE+38, NFILE+39, NFILE+49*, NFILE+50, NFILE+51 |
| DATA | FND+1~, FND+7*, FND+8, FND+38, FND+57, FND+95, FND+119, FND+120, FND+121, FND+122 , FND+124, FND+126, FND+130, FND+132, FND+134, FND+136, FND+138, FND+139, FND+140, FND+143 , STOR+6, SNS+12, SNS+13, SNS+28, SNS+29 |
| DATE | FND+1~, FND+10~, FND+17*, FND+27*, FND+29, FND+38, FND+102*, FND+103*, FND+105, FND+112 , FND+113, FND+114, NFILE~, NFILE+29, NFILE+35 |
| DCAT | NFILE~, NFILE+21 |
| DD | NFILE+14!, NFILE+52! |
| DFN | FND+1~, FND+11~, FND+34*, FND+36, FND+38, FND+41~, FND+47*, FND+55, FND+57, FND+83* , FND+88, FND+95, STOR+1~, STOR+2*, STOR+3, STOR+6, SNS+8*, SNS+10, SNS+12, SNS+13 , SNS+20*, SNS+24, SNS+28, SNS+29 |
| DIAC | FND+71~, FND+78*, FND+95, SNS+9*, SNS+12, SNS+27*, SNS+28 |
| DIAG | STOR+1~, STOR+5*, STOR+6 |
| DIC | NFILE+9~, NFILE+11*, NFILE+16*, NFILE+22*, NFILE+30*, NFILE+42, NFILE+50* |
| DIC(0 | NFILE+11*, NFILE+16*, NFILE+21*, NFILE+29*, NFILE+49* |
| DIEN | FND+1~, NFILE+9~, NFILE+25*, NFILE+29, NFILE+49 |
| DIK | NFILE+41~, NFILE+42* |
| DIK(1 | NFILE+42* |
| >> DINUM | NFILE+14*, NFILE+49* |
| DO | NFILE+14!, NFILE+52! |
| DT | FND+17 |
| DTACT | FND+41~, FND+42*, FND+43*, FND+45, FND+51, FND+52, FND+57 |
| DTC | FND+2~, FND+137*, FND+138*, FND+139, FND+140, FND+141 |
| DTE | FND+2~, FND+122*, FND+123, FND+124*, FND+126, FND+127, FND+135*, FND+136*, FND+138, FND+139 , FND+140, FND+141 |
| DTY | FND+2~, FND+11~, FND+93*, FND+95, FND+118*, FND+121*, FND+122, FND+124, FND+126, FND+133* , FND+134*, FND+136, FND+138, FND+139, FND+140, FND+141, SNS+7*, SNS+12, SNS+13, SNS+26* , SNS+28, SNS+29 |
| DXC | NFILE~, NFILE+35 |
| E1 | FND+2~, FND+11~, FND+108*, FND+111, FND+112 |
| E2 | FND+2~, FND+11~, FND+109*, FND+111, FND+113 |
| E3 | FND+2~, FND+11~, FND+110*, FND+111, FND+114 |
| ENDT | FND+1~, FND+10~, FND+17*, FND+27, FND+103 |
| FILE | FND+3~, FND+35*, FND+38, FND+41~, FND+46*, FND+57, FND+90*, FND+95, FND+140*, FND+141 , NFILE~, NFILE+39, STOR+1~, STOR+5*, STOR+6, SNS+24*, SNS+28, SNS+29 |
| ICD | FND+41~, FND+51*, FND+52*, FND+54*, FND+57 |
| IEN | FND+1~, FND+10~, FND+30*, FND+31*, FND+32, FND+34, FND+38, FND+78*, FND+79*, FND+81 , FND+83, FND+84, FND+106*, FND+107*, FND+108, FND+109, FND+110, STOR+2, SNS+13, SNS+15* , SNS+16*, SNS+19, SNS+20, SNS+29 |
| IENS | FND+10~, FND+14*, FND+15 |
| LDTE | FND+117~, FND+123*, FND+126, FND+127* |
| NFLG | NFILE+9~, NFILE+37* |
| >> PIEN | SNS+1*, SNS+2*, SNS+3, SNS+4, SNS+6, SNS+8, SNS+12, SNS+13 |
| PT | FND+2~, FND+11~, FND+118*, FND+120*, FND+121, FND+122, FND+124, FND+126, FND+131*, FND+132* , FND+134, FND+136, FND+138, FND+139, FND+140, FND+141, NFILE~, NFILE+29, NFILE+38 |
| RIEN | FND+1~, FND+10~, FND+28*, FND+29*, FND+31, FND+38, FND+41~, FND+44*, FND+45*, FND+47 , FND+57, NFILE+9~, NFILE+37*, NFILE+38, NFILE+39 |
| >> SCID | FND+66*, FND+67 |
| SIEN | FND+2~ |
| >> SNIEN | FND+64*, FND+65*, FND+66 |
| >> STAT | SNS+4*, SNS+5 |
| STDT | FND+1~, FND+10~, FND+17*, FND+91, FND+102, SNS+6, SNS+23 |
| STY | FND+41~, FND+49*, FND+51, FND+52, FND+57 |
| TAX | FND+2~, FND+70*, FND+76, FND+93, FND+98*, FND+100, SCD~, SCD+3 |
| TIEN | FND+2~, FND+77*, FND+78, FND+79, STOR~, STOR+5 |
| TMFRAME | FND+10~, FND+15*, FND+16*, FND+17, FND+91 |
| TREF | FND+2~, FND+11~, FND+61*, FND+62, FND+65, FND+66, FND+74*, FND+75, FND+76, FND+77 , FND+78, FND+97, FND+100, FND+112, FND+113, FND+114, FND+143, STOR+5, SCD+1~, SCD+2* , SCD+3, SCD+4, SCD+6, SCD+8, SCD+11, SCD+12 |
| TYPE | FND+41~, FND+47*, FND+48, FND+49 |
| U | FND+21, FND+22, FND+23, FND+24, FND+32, FND+34, FND+38, FND+47, FND+57, FND+66 , FND+78, FND+95, FND+108, FND+109, FND+110, FND+139, FND+140, NFILE+37, NFILE+38, NFILE+39 , STOR+5, STOR+6, SCD+8, SCD+11, SCD+12, SNS+12, SNS+13, SNS+28, SNS+29 |
| >> UID | FND+5*, FND+7, FND+74 |
| USR | NFILE+9~, NFILE+47*, NFILE+48*, NFILE+49 |
| VC | FND+1~, FND+10~, FND+20*, FND+22, FND+23, FND+24 |
| VCIEN | FND+1~, FND+10~, FND+20*, FND+21, FND+22, FND+23, FND+24, FND+32*, FND+33, FND+38 |
| VCODE | FND+1~, FND+10~ |
| VCODE( | FND+21*, FND+22*, FND+23*, FND+24*, FND+33, FND+38 |
| VISIT | FND+2~, FND+11~, FND+84*, FND+86, FND+87, FND+95, FND+104*, FND+105*, FND+107, FND+139* , FND+141, NFILE~, NFILE+29, NFILE+35, STOR+6, SNS+20*, SNS+21, SNS+22, SNS+28, SNS+29 |
| VSDTM | FND+2~, FND+11~, FND+87*, FND+91, FND+95, STOR~, STOR+6, SNS+6*, SNS+12, SNS+13 , SNS+22*, SNS+23, SNS+28, SNS+29 |
| X | FND+2~, NFILE+11*, NFILE+14*, NFILE+16*, NFILE+21*, NFILE+27!, NFILE+34!, NFILE+49* |
| X(1 | NFILE+29*, NFILE+35* |
| X(2 | NFILE+29*, NFILE+35* |
| X(3 | NFILE+29*, NFILE+35* |
| XIEN | FND+2~ |
| Y | FND+2~, NFILE+13, NFILE+14, NFILE+19, NFILE+25, NFILE+33, NFILE+37 |
| >> ZTSK | FND+5 |