©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
ADEKNT1 ; IHS/HQT/MJL - COMPILE DENTAL REPORTS ; [ 04/03/2001 6:56 PM ]
Source file <ADEKNT1.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Dental System | 2 | ($$INDIAN,ADEOBJ)^ADEKNT INCREM^ADEKNT2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ARRAY1 | ||
| VSTUFF(ADEDATE,ADEVDATA) | ;EP - do VISIT objectives
|
|
| DSTUFF(ADEDATE,ADEDDATA,ADELOE) | ;EP - do DAILY objectives
|
|
| ARRAY(ADESELOB) | ;EP -Initialize counter arrays for each objective in ADESELOB
|
|
| EMVIS(ADEVD,ADEVDATA,ADELIM) | ||
| DATE | ;EP
|
|
| DENDAY(ADEVD,ADEDDATA,ADELOE) | ;EP
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ADEKOB - [#9002009.6] | ARRAY+7, ARRAY1, ARRAY1+3 |
| ^ADEKOB("AD" | ARRAY+11, ARRAY+12, DSTUFF+6, VSTUFF+6 |
| ^ADEPCD - [#9002007] | DATE+47, DATE+48, DATE+76, DATE+77 |
| ^ADEPCD("AC" | DATE+14, DATE+43 |
| ^AUTTADA("B" | DATE+8, DATE+10 |
| ^DPT - [#2] | DATE+72 |
| ^TMP($J | ARRAY1+2*, ARRAY1+3*, ARRAY1+4*, ARRAY1+17*, ARRAY1+19*, DSTUFF+9, VSTUFF+8 |
| Name | Line Occurrences |
|---|---|
| ARRAY1 | ARRAY+7, ARRAY+8, ARRAY+9, ARRAY+11, ARRAY+12 |
| DSTUFF | DATE+18, DATE+21, DATE+87, DATE+90 |
| VSTUFF | DATE+82 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADE | DATE+3~, DATE+27! |
| ADE( | DATE+56, DATE+58* |
| ADE0130 | DATE+3~, DATE+8*, DATE+9*, DATE+76 |
| >> ADE3BD | DATE+5 |
| ADE9170 | DATE+3~, DATE+10*, DATE+11*, DATE+77 |
| ADEB | DATE+3~, DATE+5*, DATE+6, DATE+14*, DATE+17, DATE+23, DATE+43 |
| >> ADEC | DATE+41*, DATE+43*, DATE+47, DATE+48, DATE+76, DATE+77 |
| ADECNT | DATE+3~, DATE+7*, DATE+18, DATE+25!*, DATE+57*, DATE+87 |
| ADECNT( | DATE+19, DATE+20, DATE+21, DATE+60*, DATE+61*, DATE+88, DATE+89, DATE+90 |
| ADEDATE | DATE+3~, DATE+6*, DATE+17, DATE+18, DATE+21, DATE+23*, DATE+82, DATE+87, DATE+90, DSTUFF~ , VSTUFF~ |
| ADEDDATA | DSTUFF~, DENDAY~, DENDAY+5 |
| ADEDDS | DATE+4~, DATE+50*, DATE+51, DATE+56, DATE+58, DATE+59, DATE+62 |
| >> ADEDOB | DATE+72*, DATE+73, DATE+74 |
| ADEDOB1 | ARRAY+5~, ARRAY1+13*, ARRAY1+15*, ARRAY1+17, ARRAY1+19 |
| ADEDOB2 | ARRAY+5~, ARRAY1+14*, ARRAY1+16*, ARRAY1+17, ARRAY1+19 |
| >> ADEED | ARRAY1+15, ARRAY1+16, DATE+14 |
| >> ADEFAC | ARRAY1+18, ARRAY1+19 |
| ADEGRP | ARRAY+5~, ARRAY1+5*, ARRAY1+6*, ARRAY1+7, ARRAY1+9*, ARRAY1+10*, ARRAY1+11*, ARRAY1+12, ARRAY1+13, ARRAY1+14 , ARRAY1+17, ARRAY1+19 |
| ADEIEN | DSTUFF+4~, DSTUFF+5*, DSTUFF+6*, DSTUFF+8, DSTUFF+9, VSTUFF+4~, VSTUFF+5*, VSTUFF+6*, VSTUFF+7, VSTUFF+8 , DENDAY+5, EMVIS+8, EMVIS+9 |
| ADEL | DATE+4~, DATE+19*, DATE+20, DATE+21, DATE+88*, DATE+89, DATE+90 |
| ADELIM | EMVIS~, EMVIS+6 |
| ADELOE | DATE+4~, DATE+27!, DATE+49*, DATE+60, DATE+61, DATE+81, DSTUFF~, DENDAY~, DENDAY+5 |
| ADELOE( | DATE+59, DATE+62* |
| ADENOD | ARRAY+5~, ARRAY1*, ARRAY1+5, DATE+4~, DATE+48*, DATE+49, DATE+50, DATE+70, DATE+72 |
| ADEOBJ | ARRAY+5~, ARRAY+6*, ARRAY+7*, ARRAY+8*, ARRAY+9*, ARRAY+11*, ARRAY+12*, ARRAY1, ARRAY1+1, ARRAY1+3 , ARRAY1+4, DSTUFF+4~ |
| ADEOBJ( | DSTUFF+8*, VSTUFF+7, DENDAY+5, EMVIS+8, EMVIS+9 |
| ADEOBN | ARRAY+5~, ARRAY1+1*, ARRAY1+2, ARRAY1+17, ARRAY1+19 |
| ADESELOB | ARRAY~, ARRAY+7, ARRAY+8, ARRAY+9, ARRAY+10 |
| ADEVD | DENDAY~, DENDAY+5, EMVIS~, EMVIS+8, EMVIS+9 |
| ADEVDATA | DATE+4~, DATE+70*, DATE+75*, DATE+76*, DATE+77*, DATE+80, DATE+81*, DATE+82, VSTUFF~, EMVIS~ , EMVIS+6, EMVIS+7, EMVIS+9 |
| I | ARRAY+5~, ARRAY1+12*, ARRAY1+13, ARRAY1+14, ARRAY1+17, ARRAY1+19 |
| J | ARRAY+5~, ARRAY+8*, ARRAY+9*, ARRAY1+8~, ARRAY1+10* |
| K | ARRAY+5~, ARRAY1+18*, ARRAY1+19 |
| U | ARRAY1+3, ARRAY1+5, ARRAY1+17, ARRAY1+19, DATE+49, DATE+50, DATE+70, DATE+72, DATE+75, DATE+76 , DATE+77, DATE+80, DATE+81, EMVIS+7, EMVIS+9 |