BDMPL ; IHS/CMI/LAB - PROBLEM LIST UPDATE ;
Source file <BDMPL.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 3 | EN^VALM TERM^VALM0 ($$FTIME,CLEAR,FULL)^VALM1 | 
| IHS VA Utilities | 2 | DIQ^XBLM EN^XBVK | 
| Kernel | 1 | DISP^XQORM1 | 
| Patient Care Component | 1 | GATHER^APCDPL | 
| VA Fileman | 1 | ^DIR | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;EP  main entry point for BDM PL PROBLEM LIST | |
| GETNUM(P) | ;EP - get problem number given ien of problem entry | |
| HDR | ;EP -- header code | |
| EOJ | ;cleanup | |
| DD | ;EP - called from protocol to display (DIQ) a problem in detail | |
| EXPND | ; -- expand code | |
| GETPROB | ;get record | |
| EN1 | ;EP | |
| INIT | ; -- init variables and list array | |
| PAUSE | ;EP | |
| EXIT | ; -- exit code | |
| TEXT | ; | |
| XIT | ; | |
| HELP | ; -- help code | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNPAT - [#9000001] | HDR+2 | 
| ^AUPNPROB - [#9000011] | GETPROB+7, GETNUM+4, GETNUM+5, GETNUM+6 | 
| ^AUTTLOC - [#9999999.06] | GETNUM+6 | 
| ^DPT - [#2] | HDR+2 | 
| ^TMP($J | EOJ+2!, INIT+1!, INIT+6*, EXIT+1!, GETPROB+6 | 
| Name | Line Occurrences | 
|---|---|
| EXIT | GETPROB+4 | 
| GETPROB | DD+2 | 
| PAUSE | GETPROB+4, DD+3 | 
| XIT | DD+3, DD+5 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | GETNUM+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> APCDLINE | INIT+4 | 
| APCDLOOK | XIT+9! | 
| APCDOVRR | EOJ+5!, INIT+8*, EXIT+2!, XIT+1! | 
| APCDPIEN | XIT+3! | 
| APCDPLPT | EOJ+5!, INIT+2*, EXIT+2! | 
| >> APCDRCNT | INIT+5 | 
| >> AUPNDOB | HDR+2 | 
| BDMAF | EOJ+5!, EXIT+2!, XIT+9! | 
| BDMC | EXIT+2! | 
| BDMDATE | EOJ+5!, EXIT+2! | 
| BDMF | XIT+9! | 
| BDML | EXIT+2! | 
| BDMLINE | EXIT+2! | 
| BDMLOC | EOJ+5!, EXIT+2! | 
| BDMLOOK | EOJ+5!, EXIT+2! | 
| BDMLR | EXIT+2! | 
| BDMP | GETPROB+5*, GETPROB+6, GETPROB+7!, XIT+9! | 
| BDMP0 | EXIT+2!, XIT+9! | 
| BDMPAT | EOJ+5! | 
| BDMPDFN | EOJ+5!, EXIT+2! | 
| BDMPIEN | EOJ+5!, EXIT+2!, GETPROB+1*, GETPROB+6*, GETPROB+7*, DD+1~, DD+3, DD+4, XIT+9! | 
| BDMPL | EXIT+2! | 
| BDMPPTR | XIT+9! | 
| BDMPRB | EOJ+5!, EXIT+2!, XIT+9! | 
| BDMPRMT | XIT+9! | 
| BDMRCNT | INIT+5*, EXIT+2!, GETPROB+2, GETPROB+3 | 
| BDMTEMP | XIT+9! | 
| BDMX | EXIT+2! | 
| DA | GETPROB+3! | 
| DFN | EOJ+5!, HDR+2, INIT+2 | 
| DIR | GETPROB+3!, PAUSE+1! | 
| DIR("A" | GETPROB+3*, PAUSE+1* | 
| DIR(0 | GETPROB+3*, PAUSE+1* | 
| >> DIRUT | GETPROB+4, PAUSE+1* | 
| DLAYGO | XIT+2! | 
| >> DUOUT | PAUSE+1 | 
| DUZ(2 | HDR+2 | 
| F | GETNUM+1~, GETNUM+5*, GETNUM+6 | 
| >> IOINORM | HDR+2 | 
| >> IORVON | HDR+2 | 
| N | GETNUM+1~, GETNUM+2*, GETNUM+3, GETNUM+4, GETNUM+6*, GETNUM+7 | 
| P | GETNUM~, GETNUM+3, GETNUM+4, GETNUM+5, GETNUM+6 | 
| U | HDR+2, GETNUM+5, GETNUM+6 | 
| VALM | EOJ+4! | 
| VALMAR | EOJ+4! | 
| VALMBCK | EOJ+4!, XIT+5* | 
| VALMBG | EOJ+4! | 
| VALMCAP | EOJ+4! | 
| >> VALMCC | EN+1* | 
| VALMCNT | EOJ+4!, INIT+4* | 
| VALMDN | EOJ+4! | 
| VALMEVL | EOJ+4! | 
| VALMHDR | EXIT+4! | 
| VALMHDR(1 | HDR+1* | 
| VALMHDR(2 | HDR+2* | 
| VALMHDR(3 | HDR+3* | 
| VALMIOXY | EOJ+4! | 
| VALMKEY | EOJ+4! | 
| VALMLFT | EOJ+4! | 
| VALMLST | EOJ+4! | 
| VALMMCON | EOJ+4! | 
| VALMMENU | EOJ+4! | 
| VALMOFF | EOJ+4! | 
| VALMSGR | EOJ+4! | 
| VALMUP | EOJ+4! | 
| VALMWD | EOJ+1, EOJ+4! | 
| VALMY | EOJ+4! | 
| X | HELP+1*, EXIT+3!, GETPROB+6* | 
| XQORNEST | EOJ+4! | 
| XQORS | EOJ+4! | 
| XQORSPEW | EOJ+4! | 
| Y | EXIT+3!, GETPROB+5, GETPROB+6* |