BGOVPED2 ; IHS/BAO/TMD - Patient Education ;04-Apr-2016 08:54;du
Source file <BGOVPED2.m>
| Package | Total | Call Graph |
|---|---|---|
| GUI Objects | 3 | ($$FMTDATE,$$TMPGBL)^BGOUTL $$AICD^BGOUTL2 (SET,SETDXTOP,SETSNTOP)^BGOVPED |
| DRG Grouper | 2 | $$ICDDX^ICDCODE $$ICDDX^ICDEX |
| Kernel | 1 | $$NOW^XLFDT |
| Order Entry Results Reporting | 1 | CLININD^ORWDXIHS |
| Toolkit | 1 | GETLST^XPAR |
| VA Fileman | 1 | $$GET1^DIQ |
| VueCentric Framework | 1 | $$ENT^CIAVMRPC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TMPGBL(X) | ;EP
|
|
| FIND(RET,INP) | ;EP
|
|
| GETPVED(RET,VIEN) | ;Get visit education for problems
|
|
| PROBEDU(RET,PT,INP,EDU) | ;EP
|
|
| LOOK(NAME) | ;Check for the code
|
|
| GETPROBS(RET,INP) | ; EP
|
|
| CREATE(ICD,TOPIC) | ;Add this ICD9 related code to the database
|
|
| UPPER(X) | ; Convert lower case X to UPPER CASE
|
|
| TOPIC(RET) | ;Return list of education topics with mnenomics
|
| Name | Field # of Occurrence |
|---|---|
| $$FMTDATE^BGOUTL | GETPVED+11 |
| $$TMPGBL^BGOUTL | GETPROBS+5 |
| $$AICD^BGOUTL2 | CREATE+6 |
| SET^BGOVPED | PROBEDU+25 |
| SETDXTOP^BGOVPED | CREATE+20 |
| SETSNTOP^BGOVPED | CREATE+21, PROBEDU+21 |
| $$ENT^CIAVMRPC | TOPIC+5 |
| $$GET1^DIQ | GETPVED+5, GETPVED+7, GETPVED+8, GETPVED+9, GETPVED+10, GETPVED+12, GETPVED+13, GETPVED+16, GETPVED+17, GETPVED+18 , GETPVED+19, TOPIC+9 |
| $$ICDDX^ICDCODE | CREATE+10 |
| $$ICDDX^ICDEX | CREATE+7 |
| CLININD^ORWDXIHS | GETPROBS+4 |
| $$NOW^XLFDT | CREATE+7, CREATE+10 |
| GETLST^XPAR | TOPIC+5 |
| RPC Name | Call Tags |
|---|---|
| BGOVPED2 FIND | FIND |
| BGOVPED2 GETPROBS | GETPROBS |
| BGOVPED2 PROBEDU | PROBEDU |
| BGOVPED2 GETPVED | GETPVED |
| BGOVPED2 TOPIC | TOPIC |
| FileNo | Call Tags |
|---|---|
| ^AUPNVPED - [#9000010.16] | GET1^DIQ |
| ^APCDEDCV - [#9001002.5] | GET1^DIQ |
| ^AUTTEDT - [#9999999.09] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^APCDEDCV("B" | CREATE+17, PROBEDU+18 |
| ^APCDEDCV("C" | PROBEDU+19 |
| ^AUPNVPED("AD" | GETPVED+4 |
| ^AUPNVSIT - [#9000010] | PROBEDU+9 |
| ^AUTTEDMT - [#99999.91] | FIND+16 |
| ^AUTTEDMT("B" | FIND+15 |
| ^AUTTEDT - [#9999999.09] | LOOK+4, GETPVED+14 |
| ^AUTTEDT("B" | LOOK+3 |
| ^TMP("BGOVPED" | TMPGBL+1! |
| Name | Line Occurrences |
|---|---|
| $$CREATE | FIND+12 |
| $$LOOK | FIND+7, FIND+11, FIND+18, FIND+21 |
| $$TMPGBL | GETPVED+2, TOPIC+3 |
| $$UPPER | FIND+10, FIND+14, FIND+17, FIND+22, CREATE+16, PROBEDU+17 |
| CREATE | FIND+22 |
| Name | Field # of Occurrence |
|---|---|
| ^($J | TMPGBL+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABB | FIND+1~, FIND+16*, FIND+17, FIND+20 |
| CDATE | GETPVED+1~, GETPVED+10*, GETPVED+11*, GETPVED+21 |
| CNT | GETPROBS+1~, GETPROBS+6*, GETPROBS+7, GETPROBS+8*, GETPVED+1~, GETPVED+3*, GETPVED+20*, GETPVED+21, TOPIC+1~, TOPIC+2* , TOPIC+6*, TOPIC+7, TOPIC+8, TOPIC+10 |
| CODE | FIND+1~, FIND+4*, FIND+7*, FIND+9, FIND+11*, FIND+12*, FIND+18*, FIND+19, FIND+21*, FIND+22 , FIND+23, GETPVED+1~, GETPVED+14*, GETPVED+15*, GETPVED+21 |
| COMP | PROBEDU+1~, PROBEDU+10*, PROBEDU+23 |
| CR | GETPROBS+1~, GETPROBS+4 |
| CTYPE | FIND+1~, FIND+3*, FIND+6, CREATE+3, CREATE+20 |
| DATA | CREATE+1~, PROBEDU+1~, PROBEDU+24*, PROBEDU+25, PROBEDU+26, PROBEDU+27 |
| DFN | PROBEDU+1~, PROBEDU+2*, PROBEDU+4, PROBEDU+23, GETPROBS+1~, GETPROBS+3*, GETPROBS+4 |
| DUZ | PROBEDU+23 |
| ED | CREATE+1~, CREATE+2*, CREATE+22*, CREATE+23 |
| EDU | LOOK+1~, LOOK+3*, LOOK+4, PROBEDU~ |
| EDU( | PROBEDU+11, PROBEDU+12, PROBEDU+13, PROBEDU+14, PROBEDU+15 |
| EIEN | PROBEDU+1~, PROBEDU+2*, PROBEDU+15*, PROBEDU+23, GETPVED+1~, GETPVED+4*, GETPVED+5, GETPVED+7, GETPVED+8, GETPVED+9 , GETPVED+10, GETPVED+12, GETPVED+13, GETPVED+16, GETPVED+17, GETPVED+18, GETPVED+21 |
| ENT | TOPIC+1~, TOPIC+4*, TOPIC+5 |
| EPRV | GETPVED+1~, GETPVED+12*, GETPVED+21 |
| ERR | TOPIC+1~, TOPIC+5 |
| FMT | TOPIC+1~, TOPIC+4*, TOPIC+5 |
| GOOD | LOOK+1~, LOOK+2*, LOOK+3, LOOK+4* |
| ICD | CREATE~, CREATE+7, CREATE+10, CREATE+15 |
| ICHK | PROBEDU+1~, PROBEDU+11*, PROBEDU+12, PROBEDU+13, PROBEDU+14, PROBEDU+15 |
| IEN | FIND+1~, FIND+15*, FIND+16, LOOK+1~, LOOK+2*, LOOK+4*, LOOK+5, CREATE+1~, CREATE+2*, CREATE+8* , CREATE+11*, CREATE+15*, CREATE+18, CREATE+19, TOPIC+7*, TOPIC+9 |
| INP | FIND~, FIND+2, FIND+3, FIND+7, FIND+10*, FIND+11, CREATE+1~, CREATE+19*, CREATE+20, CREATE+21 , PROBEDU~, PROBEDU+5, PROBEDU+6, PROBEDU+10, GETPROBS~, GETPROBS+2*, GETPROBS+3 |
| INPST | PROBEDU+1~, PROBEDU+23*, PROBEDU+25 |
| LEN | PROBEDU+1~, PROBEDU+6*, PROBEDU+7*, PROBEDU+8*, PROBEDU+23 |
| LEVEL | GETPVED+1~, GETPVED+16*, GETPVED+21 |
| LOC | PROBEDU+1~, PROBEDU+9*, PROBEDU+23 |
| LOOKUP | FIND+1~, FIND+17*, FIND+18, FIND+20*, FIND+21 |
| MAJOR | FIND+1~, FIND+2*, FIND+6, FIND+12, FIND+14*, FIND+15, FIND+22 |
| MN | GETPVED+1~, GETPVED+19*, GETPVED+21, TOPIC+1~, TOPIC+9*, TOPIC+10 |
| NAME | LOOK~, LOOK+3 |
| NUM | PROBEDU+1~, PROBEDU+5*, PROBEDU+8 |
| OID | GETPROBS+1~, GETPROBS+3*, GETPROBS+4 |
| PARAM | TOPIC+1~, TOPIC+4*, TOPIC+5 |
| PIEN | GETPVED+1~, GETPVED+9*, GETPVED+14 |
| PROB | PROBEDU+12*, PROBEDU+23, GETPVED+1~, GETPVED+5*, GETPVED+6, GETPVED+21 |
| PRVNAME | GETPVED+1~, GETPVED+13*, GETPVED+21 |
| PT | PROBEDU~, PROBEDU+2 |
| READ | PROBEDU+1~ |
| READY | PROBEDU+10*, PROBEDU+23, GETPVED+1~, GETPVED+18*, GETPVED+21 |
| RET | FIND~, FIND+23*, CREATE+1~, CREATE+20, CREATE+21, CREATE+22, PROBEDU~, PROBEDU+3*, PROBEDU+4*, PROBEDU+16* , PROBEDU+20*, PROBEDU+22*, PROBEDU+26*, PROBEDU+27*, GETPROBS~, GETPROBS+5*, GETPROBS+7, GETPROBS+8, GETPVED~, GETPVED+2* , GETPVED+21, TOPIC~, TOPIC+3*, TOPIC+10 |
| SNO | PROBEDU+1~, PROBEDU+13*, PROBEDU+16, PROBEDU+21 |
| SNOMED | GETPROBS+1~, GETPROBS+3*, GETPROBS+4 |
| TIEN | CREATE+1~, CREATE+2*, CREATE+17*, CREATE+18, CREATE+19 |
| TIME | GETPVED+1~, GETPVED+17*, GETPVED+21 |
| TMP | TOPIC+1~, TOPIC+5 |
| TMP( | TOPIC+6, TOPIC+7, TOPIC+8 |
| TOPIC | CREATE~, CREATE+16*, CREATE+17, PROBEDU+1~, PROBEDU+14*, PROBEDU+16, PROBEDU+17*, PROBEDU+18, PROBEDU+19, GETPVED+1~ , GETPVED+7*, GETPVED+21 |
| TOPICIEN | GETPVED+1~, GETPVED+8*, GETPVED+19 |
| TOPID | PROBEDU+1~, PROBEDU+18*, PROBEDU+19*, PROBEDU+20, PROBEDU+21 |
| TOPIEN | PROBEDU+1~, PROBEDU+3*, PROBEDU+21, PROBEDU+22, PROBEDU+23 |
| TXT | GETPVED+1~, GETPVED+15*, GETPVED+21, TOPIC+1~, TOPIC+8*, TOPIC+10 |
| TYPE | FIND+1~, FIND+2*, FIND+12, FIND+17, FIND+20, FIND+22 |
| U | FIND+2, FIND+3, FIND+7, FIND+11, FIND+16, LOOK+4, CREATE+8, CREATE+11, CREATE+19, CREATE+22 , PROBEDU+2, PROBEDU+5, PROBEDU+6, PROBEDU+9, PROBEDU+10, PROBEDU+12, PROBEDU+13, PROBEDU+14, PROBEDU+15, PROBEDU+16 , PROBEDU+20, PROBEDU+21, PROBEDU+22, PROBEDU+23, PROBEDU+27, GETPROBS+3, GETPVED+14, GETPVED+21, TOPIC+7, TOPIC+8 , TOPIC+10 |
| USR | TOPIC+1~, TOPIC+5 |
| VAR | GETPROBS+1~, GETPROBS+6*, GETPROBS+7, GETPROBS+8* |
| VIEN | PROBEDU+1~, PROBEDU+2*, PROBEDU+4, PROBEDU+9, PROBEDU+23, GETPROBS+1~, GETPROBS+3*, GETPROBS+4, GETPVED~, GETPVED+4 |
| X | CREATE+7*, CREATE+8, CREATE+10*, CREATE+11, UPPER~, UPPER+1, TMPGBL~ |