GMPLPXRM ; SLC/PKR - Build Clinical Reminder Index for AUPNPROB. ;04-Aug-2015 10:42;DU
Source file <GMPLPXRM.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 2 | $$NOW^XLFDT (BMES,MES)^XPDUTL | 
| VA Fileman | 2 | $$GET1^DID FILE^DIE | 
| Clinical Reminders | 1 | (ADDERROR,COMMSG,DETIME,ERRMSG)^PXRMSXRM | 
| DRG Grouper | 1 | ($$CODEC,$$CSI,$$SINFO)^ICDEX | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| KPROBSCT(X,DA) | ;Delete Index entry for Problem List SNOMED CT. | |
| INDEX | ;Build the indexes for PROBLEM LIST. | 
 
 | 
| SPROBMT(X,DA) | ;Set Index entry for Problem List Mapping Targets. | |
| KPROB01(X,DA) | ;Delete Index entry for Problem List .01. | |
| KPROBMT(X,DA) | ;Kill Index entry for Problem List Mapping Targets. | |
| SPROB01(X,DA) | ;Set Index entry for Problem List .01. | |
| SPROBSCT(X,DA) | ;Set Index entry for Problem List SNOMED CT. | |
| PROBDATA(DAS,DATA) | ;Return data for a Problem List entry. | 
 
 | 
| Name | Field # of Occurrence | 
|---|---|
| $$GET1^DID | INDEX+6 | 
| FILE^DIE | INDEX+58 | 
| $$CODEC^ICDEX | INDEX+64, KPROB01+4, SPROB01+6 | 
| $$CSI^ICDEX | INDEX+63, KPROB01+7, SPROB01+9 | 
| $$SINFO^ICDEX | INDEX+63, KPROB01+7, SPROB01+9 | 
| ADDERROR^PXRMSXRM | INDEX+22, INDEX+50, INDEX+67 | 
| COMMSG^PXRMSXRM | INDEX+92 | 
| DETIME^PXRMSXRM | INDEX+88 | 
| ERRMSG^PXRMSXRM | INDEX+90 | 
| $$NOW^XLFDT | INDEX+95 | 
| BMES^XPDUTL | INDEX+11 | 
| MES^XPDUTL | INDEX+13, INDEX+26, INDEX+87 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^AUPNPROB - [#9000011] | GET1^DID | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNPROB - [#9000011] | INDEX+16, INDEX+28, INDEX+35, INDEX+62, INDEX+72, INDEX+78, INDEX+79, KPROBMT+4, KPROBMT+7, PROBDATA+4 , PROBDATA+11, PROBDATA+19, PROBDATA+22, SPROBMT+3, SPROBMT+8 | 
| ^AUPNPROB(0 | INDEX+7 | 
| ^PXRMINDX(9000011 | INDEX+5!, INDEX+69*, INDEX+70*, INDEX+74*, INDEX+75*, INDEX+83*, INDEX+84*, INDEX+93*, INDEX+94*, INDEX+95* , KPROB01+9!, KPROB01+10!, KPROBMT+10!, KPROBMT+11!, KPROBSCT+4!, KPROBSCT+5!, SPROB01+11*, SPROB01+12*, SPROBMT+11*, SPROBMT+12* , SPROBSCT+6*, SPROBSCT+7* | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CODE | INDEX+1~, INDEX+64*, INDEX+65, INDEX+66, INDEX+69, INDEX+70, INDEX+72*, INDEX+73, INDEX+74, INDEX+75 , INDEX+80*, INDEX+83, INDEX+84, KPROB01+3~, KPROB01+4*, KPROB01+5, KPROB01+9, KPROB01+10, SPROB01+5~, SPROB01+6* , SPROB01+7, SPROB01+11, SPROB01+12 | 
| CODEP | INDEX+1~, INDEX+36*, INDEX+38, INDEX+63, INDEX+64 | 
| CODESYS | INDEX+1~, INDEX+62*, INDEX+63*, INDEX+69, INDEX+70, INDEX+81*, INDEX+83, INDEX+84, KPROB01+3~, KPROB01+6* , KPROB01+7*, KPROB01+9, KPROB01+10, SPROB01+5~, SPROB01+8*, SPROB01+9*, SPROB01+11, SPROB01+12 | 
| COND | INDEX+1~, INDEX+29*, INDEX+31 | 
| DA | KPROB01~, KPROB01+9, KPROB01+10, KPROBMT~, KPROBMT+9, KPROBSCT~, KPROBSCT+4, KPROBSCT+5, SPROB01~, SPROB01+11 , SPROB01+12, SPROBMT~, SPROBMT+10, SPROBSCT~, SPROBSCT+6, SPROBSCT+7 | 
| DA(1 | KPROBMT+4, KPROBMT+7, KPROBMT+9, SPROBMT+3, SPROBMT+8, SPROBMT+10 | 
| DAS | INDEX+1~, INDEX+15*, INDEX+16*, INDEX+18, INDEX+19, INDEX+21, INDEX+28, INDEX+35, INDEX+49, INDEX+57 , INDEX+62, INDEX+66, INDEX+69, INDEX+70, INDEX+72, INDEX+74, INDEX+75, INDEX+78, INDEX+79, INDEX+82 , KPROBMT+2~, KPROBMT+9*, KPROBMT+10, KPROBMT+11, PROBDATA~, PROBDATA+3, PROBDATA+20, PROBDATA+21, SPROBMT+2~, SPROBMT+10* , SPROBMT+11, SPROBMT+12 | 
| DAS803 | INDEX+1~, INDEX+82*, INDEX+83, INDEX+84 | 
| DATA | PROBDATA~ | 
| DATA("CLINIC" | PROBDATA+17* | 
| DATA("CONDITION" | PROBDATA+13* | 
| DATA("DATE EN | TERED" , PROBDATA+8* | 
| DATA("DATE LA | ST MODIFIED" , PROBDATA+6* | 
| DATA("DATE OF | INTEREST" , PROBDATA+19*, ONSET" , PROBDATA+10* | 
| DATA("DATE RE | SOLVED" , PROBDATA+16* | 
| DATA("ICD DIA | GNOSIS" , PROBDATA+5* | 
| DATA("MT CODE | DATE" , PROBDATA+25*, " , PROBDATA+23* | 
| DATA("MT CODI | NG SYSTEM" , PROBDATA+24* | 
| DATA("PRIORITY" | PROBDATA+18* | 
| DATA("PROBLEM" | PROBDATA+12* | 
| DATA("PROVIDE | R NARRATIVE" , PROBDATA+7* | 
| DATA("RECORDI | NG PROVIDER" , PROBDATA+14* | 
| DATA("RESPONS | IBLE PROVIDER" , PROBDATA+15* | 
| DATA("STATUS" | PROBDATA+9* | 
| DFN | INDEX+1~, INDEX+42*, INDEX+43, INDEX+69, INDEX+70, INDEX+74, INDEX+75, INDEX+83, INDEX+84, KPROBMT+2~ , KPROBMT+8*, KPROBMT+10, KPROBMT+11, SPROBMT+2~, SPROBMT+9*, SPROBMT+11, SPROBMT+12 | 
| DIFF | INDEX+1~ | 
| DLM | INDEX+1~, INDEX+47*, INDEX+48, INDEX+69, INDEX+70, INDEX+74, INDEX+75, INDEX+83, INDEX+84, KPROBMT+2~ , KPROBMT+8*, KPROBMT+10, KPROBMT+11, SPROBMT+2~, SPROBMT+9*, SPROBMT+11, SPROBMT+12 | 
| DONE | INDEX+1~, INDEX+15*, INDEX+16, INDEX+18*, INDEX+20* | 
| DUZ | INDEX+94 | 
| EM | PROBDATA+2~ | 
| END | INDEX+2~, INDEX+85*, INDEX+88, INDEX+92 | 
| ENTRIES | INDEX+2~, INDEX+7*, INDEX+8, INDEX+12 | 
| ETEXT | INDEX+2~, INDEX+21*, INDEX+22, INDEX+49*, INDEX+50, INDEX+66*, INDEX+67 | 
| FDA | INDEX+55~ | 
| FDA( | INDEX+57* | 
| >> FN | INDEX+56*, INDEX+57 | 
| GLOBAL | INDEX+2~, INDEX+6*, INDEX+22, INDEX+50, INDEX+67, INDEX+90, INDEX+92, INDEX+93 | 
| GMPCSYS | INDEX+17~ | 
| GMPDT | INDEX+17~ | 
| IEN | PROBDATA+2~, PROBDATA+3*, PROBDATA+4, PROBDATA+11, PROBDATA+19, PROBDATA+22 | 
| IND | INDEX+2~, INDEX+15*, INDEX+23*, INDEX+24, INDEX+25, INDEX+27, PROBDATA+2~, PROBDATA+21*, PROBDATA+22 | 
| JND | INDEX+2~, INDEX+77*, INDEX+78*, INDEX+79, INDEX+82 | 
| NE | INDEX+2~, INDEX+15*, INDEX+68*, INDEX+86, INDEX+92 | 
| NERROR | INDEX+2~, INDEX+15*, INDEX+22, INDEX+50, INDEX+67, INDEX+90, INDEX+92 | 
| NUMBR | INDEX+1~, INDEX+37*, INDEX+53 | 
| PRIO | INDEX+2~, INDEX+32*, INDEX+34*, INDEX+69, INDEX+70, INDEX+74, INDEX+75, INDEX+83, INDEX+84, KPROB01+3~ , KPROB01+8*, KPROB01+9, KPROB01+10, KPROBMT+2~, KPROBMT+5*, KPROBMT+6*, KPROBMT+10, KPROBMT+11, KPROBSCT+3*, KPROBSCT+4 , KPROBSCT+5, SPROB01+5~, SPROB01+10*, SPROB01+11, SPROB01+12, SPROBMT+2~, SPROBMT+6*, SPROBMT+7*, SPROBMT+11, SPROBMT+12 , SPROBSCT+5*, SPROBSCT+6, SPROBSCT+7 | 
| PROB | INDEX+2~ | 
| START | INDEX+3~, INDEX+14*, INDEX+88, INDEX+92 | 
| STATUS | INDEX+3~, INDEX+51*, INDEX+52, INDEX+54*, INDEX+57, INDEX+69, INDEX+70, INDEX+74, INDEX+75, INDEX+83 , INDEX+84, KPROBMT+2~, KPROBMT+8*, KPROBMT+10, KPROBMT+11, SPROBMT+2~, SPROBMT+9*, SPROBMT+11, SPROBMT+12 | 
| TEMP | INDEX+3~, INDEX+28*, INDEX+29, INDEX+32, INDEX+35*, INDEX+36, INDEX+37, INDEX+42, INDEX+47, INDEX+51 , INDEX+79*, INDEX+80, INDEX+81, KPROBMT+2~, KPROBMT+4*, KPROBMT+5, KPROBMT+7*, KPROBMT+8, PROBDATA+2~, PROBDATA+4* , PROBDATA+5, PROBDATA+6, PROBDATA+7, PROBDATA+8, PROBDATA+9, PROBDATA+10, PROBDATA+11*, PROBDATA+12, PROBDATA+13, PROBDATA+14 , PROBDATA+15, PROBDATA+16, PROBDATA+17, PROBDATA+18, PROBDATA+22*, PROBDATA+23, PROBDATA+24, PROBDATA+25, SPROBMT+2~, SPROBMT+3* , SPROBMT+5, SPROBMT+6, SPROBMT+8*, SPROBMT+9 | 
| TENP | INDEX+3~, INDEX+8*, INDEX+9*, INDEX+10*, INDEX+24 | 
| TEXT | INDEX+3~, INDEX+12*, INDEX+13, INDEX+25*, INDEX+26, INDEX+86*, INDEX+87 | 
| U | INDEX+7, INDEX+29, INDEX+32, INDEX+36, INDEX+37, INDEX+42, INDEX+47, INDEX+51, INDEX+62, INDEX+63 , INDEX+72, INDEX+80, INDEX+81, KPROB01+7, KPROBMT+5, KPROBMT+8, PROBDATA+5, PROBDATA+6, PROBDATA+7, PROBDATA+8 , PROBDATA+9, PROBDATA+10, PROBDATA+12, PROBDATA+13, PROBDATA+14, PROBDATA+15, PROBDATA+16, PROBDATA+17, PROBDATA+18, PROBDATA+19 , PROBDATA+23, PROBDATA+24, PROBDATA+25, SPROB01+9, SPROBMT+5, SPROBMT+6, SPROBMT+9 | 
| X | KPROB01~, KPROBMT~, KPROBSCT~, SPROB01~, SPROBMT~, SPROBSCT~ | 
| X(1 | KPROB01+4, KPROB01+7, KPROBMT+10, KPROBMT+11, KPROBSCT+4, KPROBSCT+5, SPROB01+6, SPROB01+9, SPROBMT+11, SPROBMT+12 , SPROBSCT+6, SPROBSCT+7 | 
| X(2 | KPROB01+9, KPROB01+10, KPROBMT+3, KPROBMT+10, KPROBMT+11, KPROBSCT+4, KPROBSCT+5, SPROB01+11, SPROB01+12, SPROBMT+11 , SPROBMT+12, SPROBSCT+6, SPROBSCT+7 | 
| X(3 | KPROB01+9, KPROB01+10, KPROBSCT+4, KPROBSCT+5, SPROB01+11, SPROB01+12, SPROBSCT+6, SPROBSCT+7 | 
| X(4 | KPROB01+9, KPROB01+10, KPROBSCT+4, KPROBSCT+5, SPROB01+11, SPROB01+12, SPROBSCT+6, SPROBSCT+7 | 
| X(5 | KPROB01+8, KPROBSCT+3, SPROB01+10, SPROBSCT+5 | 
| X(6 | SPROB01+4, SPROBSCT+4 | 
| X(7 | KPROB01+6, SPROB01+8 |