©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
DGPTDDCR ;SLC/PKR - Routines for setting and killing Clinical Reminder index. ;08/12/2004
Source file <DGPTDDCR.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | $$NOW^XLFDT (BMES,MES)^XPDUTL |
| Clinical Reminders | 1 | (ADDERROR,COMMSG,DETIME,ERRMSG)^PXRMSXRM |
| VA Fileman | 1 | $$GET1^DID |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INDEX | ;Build the indexes for PTF.
|
|
| KDGPT9D(X,DA,NODE) | ;Delete index for PTF discharge ICD9 data.
|
|
| KDGPT9M(X,DA,NODE) | ;Delete index for PTF movement ICD9 data.
|
|
| KDGPT0(X,DA,NODE,NUM) | ;Delete index for PTF ICD0 data.
|
|
| SDGPT9M(X,DA,NODE) | ;Set index for PTF movement ICD9 data.
|
|
| SDGPT0(X,DA,NODE,NUM) | ;Set index for PTF ICD0 data.
|
|
| SDGPT9D(X,DA,NODE) | ;Set index for PTF discharge ICD9 data.
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DID | INDEX+7 |
| ADDERROR^PXRMSXRM | INDEX+29, INDEX+36, INDEX+50, INDEX+58, INDEX+72, INDEX+89, INDEX+99, INDEX+113, INDEX+127, INDEX+142 , INDEX+156 |
| COMMSG^PXRMSXRM | INDEX+167 |
| DETIME^PXRMSXRM | INDEX+163 |
| ERRMSG^PXRMSXRM | INDEX+165 |
| $$NOW^XLFDT | INDEX+170 |
| BMES^XPDUTL | INDEX+12 |
| MES^XPDUTL | INDEX+14, INDEX+21, INDEX+160, INDEX+162 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DGPT - [#45] | GET1^DID |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPT - [#45] | INDEX+17, INDEX+23, INDEX+31, INDEX+32, INDEX+53, INDEX+54, INDEX+75, INDEX+76, INDEX+77, INDEX+130 , INDEX+132, INDEX+133, KDGPT0+2, KDGPT0+4, KDGPT9M+2, KDGPT9M+4, SDGPT0+8, SDGPT0+10, SDGPT9M+6, SDGPT9M+8 |
| ^DGPT(0 | INDEX+8 |
| ^ICD0 - [#80.1] | INDEX+44, INDEX+66 |
| ^ICD9 - [#80] | INDEX+83, INDEX+93, INDEX+107, INDEX+121, INDEX+150 |
| ^PXRMINDX(45 | INDEX+6!, INDEX+46*, INDEX+47*, INDEX+68*, INDEX+69*, INDEX+85*, INDEX+86*, INDEX+95*, INDEX+96*, INDEX+109* , INDEX+110*, INDEX+123*, INDEX+124*, INDEX+152*, INDEX+153*, INDEX+168*, INDEX+169*, INDEX+170*, KDGPT0+8!, KDGPT0+9! , KDGPT9D+8!, KDGPT9D+9!, KDGPT9M+8!, KDGPT9M+9!, SDGPT0+14*, SDGPT0+15*, SDGPT9D+15*, SDGPT9D+16*, SDGPT9M+12*, SDGPT9M+13* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D1 | INDEX+1~, INDEX+30*, INDEX+31*, INDEX+32, INDEX+37, INDEX+52*, INDEX+53*, INDEX+54, INDEX+59, INDEX+131* , INDEX+132*, INDEX+133, INDEX+141, INDEX+143 |
| DA | INDEX+1~, INDEX+16*, INDEX+17*, INDEX+23, INDEX+28, INDEX+31, INDEX+32, INDEX+35, INDEX+37, INDEX+53 , INDEX+54, INDEX+57, INDEX+59, INDEX+75, INDEX+76, INDEX+77, INDEX+80, INDEX+130, INDEX+132, INDEX+133 , INDEX+141, INDEX+143, KDGPT0~, KDGPT0+6, KDGPT9D~, KDGPT9D+6, KDGPT9M~, KDGPT9M+6, SDGPT0~, SDGPT0+12 , SDGPT9D~, SDGPT9D+13, SDGPT9M~, SDGPT9M+10 |
| DA(1 | KDGPT0+2, KDGPT0+4, KDGPT0+6, KDGPT9M+2, KDGPT9M+4, KDGPT9M+6, SDGPT0+8, SDGPT0+10, SDGPT0+12, SDGPT9M+6 , SDGPT9M+8, SDGPT9M+10 |
| DAS | INDEX+1~, INDEX+37*, INDEX+46, INDEX+47, INDEX+49, INDEX+59*, INDEX+68, INDEX+69, INDEX+71, INDEX+80* , INDEX+85, INDEX+86, INDEX+88, INDEX+95, INDEX+96, INDEX+98, INDEX+109, INDEX+110, INDEX+112, INDEX+123 , INDEX+124, INDEX+126, INDEX+143*, INDEX+152, INDEX+153, INDEX+155, KDGPT0+3~, KDGPT0+6*, KDGPT0+8, KDGPT0+9 , KDGPT9D+1~, KDGPT9D+6*, KDGPT9D+8, KDGPT9D+9, KDGPT9M+3~, KDGPT9M+6*, KDGPT9M+8, KDGPT9M+9, SDGPT0+9~, SDGPT0+12* , SDGPT0+14, SDGPT0+15, SDGPT9D+10~, SDGPT9D+13*, SDGPT9D+15, SDGPT9D+16, SDGPT9M+7~, SDGPT9M+10*, SDGPT9M+12, SDGPT9M+13 |
| DATE | INDEX+1~, INDEX+33*, INDEX+34, INDEX+46, INDEX+47, INDEX+55*, INDEX+56, INDEX+68, INDEX+69, INDEX+78* , INDEX+79*, INDEX+85, INDEX+86, INDEX+95, INDEX+96, INDEX+109, INDEX+110, INDEX+123, INDEX+124, INDEX+134* , INDEX+135, INDEX+152, INDEX+153, KDGPT9D+1~, KDGPT9D+5*, KDGPT9D+8, KDGPT9D+9, SDGPT9D+10~, SDGPT9D+12*, SDGPT9D+15 , SDGPT9D+16 |
| DFN | INDEX+1~, INDEX+26*, INDEX+27, INDEX+46, INDEX+47, INDEX+68, INDEX+69, INDEX+85, INDEX+86, INDEX+95 , INDEX+96, INDEX+109, INDEX+110, INDEX+123, INDEX+124, INDEX+152, INDEX+153, KDGPT0+3~, KDGPT0+4*, KDGPT0+8 , KDGPT0+9, KDGPT9M+3~, KDGPT9M+5*, KDGPT9M+8, KDGPT9M+9, SDGPT0+9~, SDGPT0+10*, SDGPT0+14, SDGPT0+15, SDGPT9M+7~ , SDGPT9M+9*, SDGPT9M+12, SDGPT9M+13 |
| DIFF | INDEX+1~ |
| DUZ | INDEX+169 |
| END | INDEX+1~, INDEX+158*, INDEX+163, INDEX+167 |
| ENTRIES | INDEX+1~, INDEX+8*, INDEX+9, INDEX+13 |
| ETEXT | INDEX+1~, INDEX+28*, INDEX+29, INDEX+35*, INDEX+36, INDEX+49*, INDEX+50, INDEX+57*, INDEX+58, INDEX+71* , INDEX+72, INDEX+88*, INDEX+89, INDEX+98*, INDEX+99, INDEX+112*, INDEX+113, INDEX+126*, INDEX+127, INDEX+141* , INDEX+142, INDEX+155*, INDEX+156 |
| GLOBAL | INDEX+1~, INDEX+7*, INDEX+29, INDEX+36, INDEX+50, INDEX+58, INDEX+72, INDEX+89, INDEX+99, INDEX+113 , INDEX+127, INDEX+142, INDEX+156, INDEX+165, INDEX+167, INDEX+168 |
| HASCODES | INDEX+1~, INDEX+136*, INDEX+139*, INDEX+140 |
| ICD0 | INDEX+2~, INDEX+42*, INDEX+43, INDEX+44, INDEX+46, INDEX+47, INDEX+64*, INDEX+65, INDEX+66, INDEX+68 , INDEX+69 |
| ICD9 | INDEX+2~, INDEX+81*, INDEX+82, INDEX+83, INDEX+85, INDEX+86, INDEX+91*, INDEX+92, INDEX+93, INDEX+95 , INDEX+96, INDEX+105*, INDEX+106, INDEX+107, INDEX+109, INDEX+110, INDEX+119*, INDEX+120, INDEX+121, INDEX+123 , INDEX+124, INDEX+138*, INDEX+139, INDEX+148*, INDEX+149, INDEX+150, INDEX+152, INDEX+153 |
| IND | INDEX+2~, INDEX+16*, INDEX+18*, INDEX+19, INDEX+20, INDEX+22 |
| JND | INDEX+2~, INDEX+39*, INDEX+42, INDEX+61*, INDEX+64, INDEX+102*, INDEX+105, INDEX+116*, INDEX+119, INDEX+137* , INDEX+138, INDEX+145*, INDEX+148 |
| KND | INDEX+2~, INDEX+38*, INDEX+40*, INDEX+41, INDEX+60*, INDEX+62*, INDEX+63, INDEX+101*, INDEX+103*, INDEX+104 , INDEX+115*, INDEX+117*, INDEX+118, INDEX+144*, INDEX+146*, INDEX+147 |
| NE0 | INDEX+2~, INDEX+16*, INDEX+45*, INDEX+67*, INDEX+159, INDEX+167 |
| NE9 | INDEX+2~, INDEX+16*, INDEX+84*, INDEX+94*, INDEX+108*, INDEX+122*, INDEX+151*, INDEX+161, INDEX+167 |
| NERROR | INDEX+2~, INDEX+16*, INDEX+29, INDEX+36, INDEX+50, INDEX+58, INDEX+72, INDEX+89, INDEX+99, INDEX+113 , INDEX+127, INDEX+142, INDEX+156, INDEX+165, INDEX+167 |
| NNAME | KDGPT0+3~, KDGPT0+5*, KDGPT0+8, KDGPT0+9, SDGPT0+9~, SDGPT0+11*, SDGPT0+14, SDGPT0+15 |
| NODE | INDEX+2~, INDEX+41*, INDEX+46, INDEX+47, INDEX+49, INDEX+63*, INDEX+68, INDEX+69, INDEX+71, INDEX+104* , INDEX+109, INDEX+110, INDEX+112, INDEX+118*, INDEX+123, INDEX+124, INDEX+126, INDEX+147*, INDEX+152, INDEX+153 , KDGPT0~, KDGPT0+5, KDGPT0+6, KDGPT9D~, KDGPT9D+8, KDGPT9D+9, KDGPT9M~, KDGPT9M+8, KDGPT9M+9, SDGPT0~ , SDGPT0+11, SDGPT0+12, SDGPT9D~, SDGPT9D+15, SDGPT9D+16, SDGPT9M~, SDGPT9M+12, SDGPT9M+13 |
| NUM | KDGPT0~, KDGPT0+5, SDGPT0~, SDGPT0+11 |
| START | INDEX+2~, INDEX+15*, INDEX+163, INDEX+167 |
| TEMP | KDGPT9M+3~, KDGPT9M+4*, KDGPT9M+5, SDGPT9M+7~, SDGPT9M+8*, SDGPT9M+9 |
| TEMP0 | INDEX+3~, INDEX+23*, INDEX+25, INDEX+26, INDEX+79 |
| TEMP70 | INDEX+3~, INDEX+76*, INDEX+78, INDEX+81, INDEX+91, INDEX+105 |
| TEMP71 | INDEX+3~, INDEX+77*, INDEX+119 |
| TEMPP | INDEX+3~, INDEX+54*, INDEX+55, INDEX+64 |
| TEMPS | INDEX+3~, INDEX+32*, INDEX+33, INDEX+42, INDEX+133*, INDEX+134, INDEX+138, INDEX+148 |
| TENP | INDEX+3~, INDEX+9*, INDEX+10*, INDEX+11*, INDEX+19 |
| TEXT | INDEX+3~, INDEX+13*, INDEX+14, INDEX+20*, INDEX+21, INDEX+159*, INDEX+160, INDEX+161*, INDEX+162 |
| U | INDEX+8, INDEX+25, INDEX+26, INDEX+33, INDEX+42, INDEX+55, INDEX+64, INDEX+78, INDEX+79, INDEX+81 , INDEX+91, INDEX+105, INDEX+119, INDEX+134, INDEX+138, INDEX+148, KDGPT0+2, KDGPT0+4, KDGPT9M+2, KDGPT9M+5 , SDGPT0+8, SDGPT0+10, SDGPT9M+6, SDGPT9M+9 |
| VISIT | INDEX+3~ |
| X | KDGPT0~, KDGPT9D~, KDGPT9M~, SDGPT0~, SDGPT9D~, SDGPT9M~ |
| X(1 | KDGPT0+8, KDGPT0+9, KDGPT9D+8, KDGPT9D+9, KDGPT9M+8, KDGPT9M+9, SDGPT0+14, SDGPT0+15, SDGPT9D+15, SDGPT9D+16 , SDGPT9M+12, SDGPT9M+13 |
| X(2 | KDGPT0+8, KDGPT0+9, KDGPT9D+5, KDGPT9M+8, KDGPT9M+9, SDGPT0+14, SDGPT0+15, SDGPT9D+12, SDGPT9M+12, SDGPT9M+13 |
| X(3 | KDGPT9D+3, SDGPT9D+9 |
| X(4 | KDGPT9D+8, KDGPT9D+9, SDGPT9D+15, SDGPT9D+16 |
| X(5 | KDGPT9D+5, SDGPT9D+12 |