BCHVD ; IHS/CMI/LAB - BROWSE VISITS ;
Source file <BCHVD.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 2 | $$FMTE^XLFDT DISP^XQORM1 | 
| Registration | 2 | EN^VALM (CLEAR,FULL)^VALM1 | 
| VA Fileman | 2 | ^DIC ^DIR | 
| IHS Patient | 1 | (,$$HRN)^AUPNPAT | 
| IHS RPMS CHR System | 1 | $$PPNAME^BCHUTIL | 
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS RPMS CHR System | 2 | BCH BROWSE PATIENT'S VISITS BCHUADD | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PAT | ; | |
| HELP | ; -- help code | |
| S1 | ; | |
| EP(DFN) | ;EP to list for one patient | |
| EXPND | ; -- expand code | |
| FF | ;EP | |
| ;EP - called from xbdbque | ||
| HDR | ; -- header code | |
| PRINT1 | ; | |
| BROWSE | ; | |
| CTR(X,Y) | ;EP - Center X in a field Y wide. | |
| INIT | ; -- init variables and list array | |
| A | ;all visits | |
| END | ; | |
| D | ;date range | |
| L | ;get patients last visit | |
| S(Y,F,C,T) | ;EP - set up array | |
| N | ;patients last N visits | |
| START | ; | |
| WHICH | ; | |
| GATHER | ; | |
| EXIT | ; -- exit code | 
| Name | Field # of Occurrence | 
|---|---|
| ^AUPNPAT | PAT+5, EP+8 | 
| $$HRN^AUPNPAT | GATHER+5 | 
| $$PPNAME^BCHUTIL | GATHER+10 | 
| ^DIC | PAT+2 | 
| ^DIR | WHICH+4, N+2, D+3, D+5, FF+1 | 
| EN^VALM | BROWSE+3 | 
| CLEAR^VALM1 | BROWSE+5 | 
| FULL^VALM1 | BROWSE+6, EP+2 | 
| $$VAL^XBDIQ1 | GATHER+11, GATHER+12, GATHER+21, GATHER+22, GATHER+23, GATHER+26, GATHER+27 | 
| $$FMTE^XLFDT | GATHER+4, GATHER+10, FF+4 | 
| DISP^XQORM1 | HELP+1 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^AUPNPAT - [#9000001] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNPAT - [#9000001] | FF+3 | 
| ^BCHR - [#90002] | GATHER+9, GATHER+16, GATHER+17, GATHER+22, GATHER+23, GATHER+31, GATHER+32, GATHER+35, GATHER+36, GATHER+39 , GATHER+40 | 
| ^BCHR("AE" | L+2, L+3, N+5, A+2, D+9 | 
| ^BCHRPROB("AD" | GATHER+25 | 
| ^BCHTREF - [#90002.52] | GATHER+16, GATHER+17 | 
| ^DD(90002 | GATHER+22, GATHER+23 | 
| ^DPT - [#2] | WHICH+4, GATHER+4, FF+2, FF+4 | 
| ^TMP("BCHVD" | BROWSE+1!, BROWSE+4!, PRINT+5!, PRINT1+3, PRINT1+5, GATHER+1!, S1+2*, INIT+1 | 
| Name | Line Occurrences | 
|---|---|
| $$CTR | START+5, EP+7 | 
| @( | WHICH+7 | 
| D | D+7 | 
| FF | PRINT1+4 | 
| GATHER | BROWSE+2, PRINT+3 | 
| PAT | EP+5 | 
| PRINT1 | PRINT+4 | 
| S | GATHER+4, GATHER+5, GATHER+6, GATHER+10, GATHER+11, GATHER+12, GATHER+18, GATHER+20, GATHER+21, GATHER+22 , GATHER+23, GATHER+24, GATHER+26, GATHER+27, GATHER+30, GATHER+32, GATHER+34, GATHER+36, GATHER+38, GATHER+40 , GATHER+42 | 
| S1 | S+5, S+7, S+10 | 
| WHICH | EP+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | S+8*, S+9* | 
| AUPNDAYS | START+1~, EP+1~ | 
| AUPNDOB | START+1~, EP+1~ | 
| AUPNDOD | START+1~, EP+1~ | 
| AUPNPAT | START+1~, EP+1~ | 
| AUPNSEX | START+1~, EP+1~ | 
| >> BCH1 | GATHER+22*, GATHER+23* | 
| BCHBD | START+1~, EP+1~, D+1!, D+3*, D+7, D+9 | 
| BCHC | GATHER+2~, GATHER+3*, S1+1*, S1+2 | 
| BCHD | GATHER+2~, GATHER+7*, GATHER+8* | 
| BCHED | START+1~, EP+1~, D+1!, D+5*, D+7, D+9 | 
| >> BCHF | GATHER+22*, GATHER+23* | 
| BCHI | GATHER+2~ | 
| BCHJ | GATHER+2~ | 
| BCHP | END+1!, GATHER+25*, GATHER+26, GATHER+27 | 
| BCHQUIT | WHICH+1*, WHICH+7, END+1!, L+2*, N+3*, D+3*, D+5*, PRINT+1*, PRINT1+3, PRINT1+4 , GATHER+31, GATHER+35, GATHER+39, FF+1* | 
| BCHR0 | START+1~, EP+1~, GATHER+9*, GATHER+10, GATHER+21, FF+2, FF+3, FF+4 | 
| BCHREFB | GATHER+15~ | 
| BCHREFB( | GATHER+16*, GATHER+19, GATHER+20 | 
| BCHREFT | GATHER+15~ | 
| BCHREFT( | GATHER+17*, GATHER+19, GATHER+20 | 
| BCHV | START+1~, START+3!, EP+1~, EP+4!, GATHER+7*, GATHER+8*, GATHER+9, GATHER+10, GATHER+11, GATHER+12 , GATHER+16, GATHER+17, GATHER+21, GATHER+22, GATHER+23, GATHER+25, GATHER+31, GATHER+32, GATHER+35, GATHER+36 , GATHER+39, GATHER+40 | 
| BCHV( | L+4*, N+5*, A+2*, D+9*, GATHER+8 | 
| BCHW | WHICH+2*, WHICH+6*, WHICH+7, END+1! | 
| BCHX | START+1~, EP+1~, PRINT1+2~, PRINT1+3*, PRINT1+5, GATHER+2~, GATHER+31*, GATHER+32, GATHER+35*, GATHER+36 , GATHER+39*, GATHER+40 | 
| BCHY | START+1~, EP+1~, GATHER+2~ | 
| BCHZ | GATHER+2~ | 
| C | N+5*, GATHER+15~, GATHER+16*, GATHER+17*, S~, S+7 | 
| D | START+2~, EP+3~, L+3*, L+4, N+5*, A+1*, A+2*, D+9* | 
| DA | PAT+2!, WHICH+4!, N+2! | 
| DFN | START+1~, PAT+1*, PAT+4*, PAT+5, WHICH+4, EP~, EP+5, EP+8, L+2, L+3 , N+5, A+2, D+9, GATHER+4, GATHER+5 | 
| DIADD | PAT+2! | 
| DIC | PAT+2*! | 
| DIC(0 | PAT+2* | 
| DIR | WHICH+4!, N+2!, D+2!, D+4!, FF+1! | 
| DIR("A" | WHICH+4*, N+2*, D+2*, D+4* | 
| DIR("B" | WHICH+4*, N+2* | 
| DIR(0 | WHICH+3*, N+2*, D+2*, D+4*, FF+1* | 
| >> DIRUT | WHICH+5, N+3 | 
| DLAYGO | PAT+2! | 
| DR | PAT+2! | 
| >> DTOUT | FF+1 | 
| DUZ(2 | GATHER+5, FF+3 | 
| >> E | D+9* | 
| F | S~, S+1*, S+5* | 
| >> H | FF+3*, FF+4 | 
| IO | FF+1 | 
| IO(0 | FF+1 | 
| IOF | START+4, EP+6, PRINT1+1, FF+5 | 
| IOM | CTR+1 | 
| IOSL | PRINT1+4 | 
| IOST | FF+1, FF+2 | 
| >> L | S+7* | 
| >> N | N+1*, N+4*, N+5 | 
| R | START+2~, EP+3~, L+3*, L+4 | 
| T | S~, S+2*, S+7*, S+8, S+9 | 
| U | WHICH+4, GATHER+4, GATHER+10, GATHER+16, GATHER+17, GATHER+21, GATHER+22, GATHER+23, FF+2, FF+3 , FF+4 | 
| >> V | N+5*, A+1*, A+2*, D+9* | 
| >> VALMCNT | INIT+1* | 
| X | GATHER+4*, GATHER+5*, GATHER+6*, GATHER+10*, GATHER+11*, GATHER+12*, GATHER+16*, GATHER+17*, GATHER+18*, GATHER+19* , GATHER+20, GATHER+21*, GATHER+22*, GATHER+23*, GATHER+24*, GATHER+26*, GATHER+27*, GATHER+30*, GATHER+32*, GATHER+34* , GATHER+36*, GATHER+38*, GATHER+40*, GATHER+42*, CTR~, CTR+1, S+3~, S+5*, S+6*, S+8* , S+9*, S1+2, HELP+1* | 
| Y | PAT+3, PAT+4, PAT+5*, WHICH+6, EP+8*, N+4, D+3, D+5, GATHER+20*, CTR~ , CTR+1, FF+1, S~, S+6, S+7, S+9 |