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 |