AMHRSR31 ; IHS/CMI/LAB - list SUICIDE RISK ASSESSMENT screenings ;
Source file <AMHRSR31.m>
Package | Total | Call Graph |
---|---|---|
Mental Health Social Services | 2 | ($$ALLOWP,$$ALLOWPCC,$$ALLOWVI,XTMP)^AMHUTIL $$DEMO^AMHUTIL1 |
IHS Patient | 1 | $$AGE^AUPNPAT |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
Kernel | 1 | $$FMADD^XLFDT |
Patient Care Component Reports | 1 | $$PRIMPROV^APCLV |
VA Fileman | 1 | ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
PPV(V) | ;
|
|
CTR(X,Y) | ;EP - Center X in a field Y wide.
|
|
LOC() | ;EP - Return location name from file 4 based on DUZ(2).
|
|
REF | ;now go through refusals in pcc
|
|
GATHER | ;gather up all exams, refusals and bh in time period for patient in DFN
|
|
BH | ;now go through BH
|
|
GETSCR | ;
|
|
USR() | ;EP - Return name of current user from ^VA(200.
|
|
EOP | ;EP - End of page.
|
|
GETSCR1 | ;
|
|
SPRV(E) | ;
|
|
BHPPNAME(R) | ;EP primary provider internal # from 200
|
|
PCC | ;
|
|
PROC | ;
|
|
PRVREF(R) | ;
|
|
BHPPIN(R) | ;
|
Name | Field # of Occurrence |
---|---|
$$ALLOWP^AMHUTIL | PROC+9 |
$$ALLOWPCC^AMHUTIL | PCC+7 |
$$ALLOWVI^AMHUTIL | BH+7 |
XTMP^AMHUTIL | PROC+4 |
$$DEMO^AMHUTIL1 | PROC+10 |
$$PRIMPROV^APCLV | PCC+25, PPV+2 |
$$AGE^AUPNPAT | BH+10, PCC+12, REF+10, GETSCR1+18, GETSCR1+43, GETSCR1+63 |
^DIR | EOP+7 |
$$VAL^XBDIQ1 | BH+16, PCC+18, REF+13, GETSCR1+10, GETSCR1+18, GETSCR1+19, GETSCR1+21, GETSCR1+22, GETSCR1+36, GETSCR1+43 , GETSCR1+44, GETSCR1+47, GETSCR1+61, GETSCR1+63, GETSCR1+65, SPRV+1, PRVREF+1 |
$$FMADD^XLFDT | BH+1, GETSCR1+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AMHPATR - [#9002011.55] | PROC+12, PROC+13, PROC+14 |
^AMHREC - [#9002011] | BH+5, BH+6, BH+14, BH+29, GETSCR1+5, GETSCR1+6 |
^AMHREC("AF" | BH+2, BH+3, GETSCR1+2, GETSCR1+3 |
^AMHRPROV - [#9002011.02] | BHPPIN+2, BHPPNAME+2 |
^AMHRPROV("AD" | BHPPIN+2, BHPPNAME+2 |
^AUPNPAT - [#9000001] | PROC+6 |
^AUPNPREF - [#9000022] | REF+3, REF+4, REF+5, REF+6, REF+16, GETSCR1+51, GETSCR1+52, GETSCR1+53, GETSCR1+54, GETSCR1+58 , GETSCR1+59, PRVREF+1 |
^AUPNPREF("AC" | REF+2, GETSCR1+50 |
^AUPNVSIT - [#9000010] | PCC+8, PCC+16, GETSCR1+30 |
^AUPNVXAM - [#9000010.13] | PCC+3, PCC+4, PCC+5, PCC+29, GETSCR1+26, GETSCR1+27, GETSCR1+28, SPRV+1 |
^AUPNVXAM("AC" | PCC+2, GETSCR1+25 |
^DIC(4 - [#4] | LOC+1 |
^DPT - [#2] | PROC+7, PROC+8, PROC+11 |
^VA(200 - [#200] | BHPPNAME+2, USR+1 |
^XTMP("AMHRSR3" | PROC+3!, BH+33*, BH+34, PCC+33*, REF+1, REF+20*, GETSCR+1!, GETSCR+2, GETSCR1+18*, GETSCR1+19* , GETSCR1+20*, GETSCR1+21*, GETSCR1+22*, GETSCR1+34, GETSCR1+43*, GETSCR1+44*, GETSCR1+45*, GETSCR1+46*, GETSCR1+47*, GETSCR1+48* , GETSCR1+60, GETSCR1+63*, GETSCR1+64*, GETSCR1+65*, GETSCR1+66* |
Name | Line Occurrences |
---|---|
$$BHPPIN | BH+25 |
$$BHPPNAME | GETSCR1+18 |
$$PPV | GETSCR1+43 |
$$PRVREF | GETSCR1+64 |
$$SPRV | GETSCR1+46 |
GATHER | PROC+15 |
GETSCR | PROC+17 |
GETSCR1 | GETSCR+2 |
Name | Field # of Occurrence |
---|---|
^(0 | USR+1, LOC+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | BHPPIN+1~, BHPPIN+2*, BHPPNAME+1~, BHPPNAME+2*, PPV+1~, PPV+2*, PPV+3 |
%1 | BHPPIN+1~, BHPPIN+2*, BHPPIN+3, BHPPNAME+1~, BHPPNAME+2*, BHPPNAME+3 |
>> AMHDEMO | PROC+10 |
>> AMHRAGET | BH+11, BH+12, PCC+13, PCC+14, REF+11, REF+12 |
>> AMHRBD | BH+1, BH+9, PCC+11, REF+9, GETSCR1+1, GETSCR1+8, GETSCR1+33, GETSCR1+57 |
>> AMHRBIEN | BH+3*, BH+5, BH+6, BH+7, BH+14, BH+16, BH+25, BH+29, GETSCR1+3*, GETSCR1+5 , GETSCR1+6, GETSCR1+10, GETSCR1+18, GETSCR1+19, GETSCR1+20, GETSCR1+21 |
>> AMHRCDP | PROC+14 |
>> AMHRCLNT | BH+14, PCC+16 |
>> AMHRCLNT( | BH+14, PCC+16 |
>> AMHRCNT | PROC+1*, GETSCR1+9*, GETSCR1+18, GETSCR1+19, GETSCR1+20, GETSCR1+21, GETSCR1+22, GETSCR1+35*, GETSCR1+43, GETSCR1+44 , GETSCR1+45, GETSCR1+46, GETSCR1+47, GETSCR1+48, GETSCR1+62*, GETSCR1+63, GETSCR1+64, GETSCR1+65, GETSCR1+66 |
>> AMHRDATE | BH+4*, BH+8, BH+9, BH+10, PCC+8*, PCC+9, PCC+10, PCC+11, PCC+12, REF+6* , REF+7, REF+8, REF+9, REF+10, GETSCR1+4*, GETSCR1+7, GETSCR1+8, GETSCR1+18, GETSCR1+30*, GETSCR1+31 , GETSCR1+32, GETSCR1+33, GETSCR1+34, GETSCR1+43, GETSCR1+48, GETSCR1+54*, GETSCR1+55, GETSCR1+56, GETSCR1+57, GETSCR1+60 , GETSCR1+63, GETSCR1+66 |
>> AMHRDESP | PROC+12 |
>> AMHRED | BH+2, BH+8, PCC+10, REF+8, GETSCR1+2, GETSCR1+7, GETSCR1+32, GETSCR1+56 |
>> AMHREIEN | PCC+2*, PCC+3, PCC+4, PCC+5, PCC+18, PCC+29, GETSCR1+25*, GETSCR1+26, GETSCR1+27, GETSCR1+28 , GETSCR1+36, GETSCR1+43, GETSCR1+46 |
>> AMHREXC | PCC+4, REF+5, GETSCR1+27, GETSCR1+53 |
>> AMHREXPC | PCC+1, GETSCR1+23 |
>> AMHRH | PROC+2*, PROC+3, BH+33, BH+34, PCC+33, REF+1, REF+20, GETSCR+1, GETSCR+2, GETSCR1+18 , GETSCR1+19, GETSCR1+20, GETSCR1+21, GETSCR1+22, GETSCR1+34, GETSCR1+43, GETSCR1+44, GETSCR1+45, GETSCR1+46, GETSCR1+47 , GETSCR1+48, GETSCR1+60, GETSCR1+63, GETSCR1+64, GETSCR1+65, GETSCR1+66 |
>> AMHRJ | PROC+2*, PROC+3, BH+33, BH+34, PCC+33, REF+1, REF+20, GETSCR+1, GETSCR+2, GETSCR1+18 , GETSCR1+19, GETSCR1+20, GETSCR1+21, GETSCR1+22, GETSCR1+34, GETSCR1+43, GETSCR1+44, GETSCR1+45, GETSCR1+46, GETSCR1+47 , GETSCR1+48, GETSCR1+60, GETSCR1+63, GETSCR1+64, GETSCR1+65, GETSCR1+66 |
>> AMHRPPUN | BH+28, PCC+28 |
>> AMHRPROV | BH+26, BH+27, PCC+26, PCC+27 |
>> AMHRPROV( | BH+27, PCC+27 |
>> AMHRRES | BH+16*, BH+17, BH+18, BH+19, BH+20, BH+21, BH+22, BH+23, PCC+18*, PCC+19 , PCC+20, PCC+21, PCC+22, PCC+23, REF+13*, REF+14, REF+15, GETSCR1+10*, GETSCR1+11, GETSCR1+12 , GETSCR1+13, GETSCR1+14, GETSCR1+15, GETSCR1+16, GETSCR1+17, GETSCR1+18, GETSCR1+36*, GETSCR1+37, GETSCR1+38, GETSCR1+39 , GETSCR1+40, GETSCR1+41, GETSCR1+42, GETSCR1+43, GETSCR1+61*, GETSCR1+63 |
>> AMHRREST(1 | BH+17, PCC+19, GETSCR1+11, GETSCR1+38 |
>> AMHRREST(2 | BH+18, PCC+20, GETSCR1+12, GETSCR1+39 |
>> AMHRREST(3 | BH+19, PCC+21, GETSCR1+13, GETSCR1+40 |
>> AMHRREST(4 | BH+20, REF+14, GETSCR1+14, GETSCR1+58 |
>> AMHRREST(5 | BH+21, REF+15, GETSCR1+15, GETSCR1+59 |
>> AMHRREST(6 | BH+22, PCC+22, GETSCR1+16, GETSCR1+41 |
>> AMHRREST(7 | BH+23, PCC+23, GETSCR1+17, GETSCR1+37, GETSCR1+42 |
>> AMHRRIEN | REF+2*, REF+3, REF+4, REF+5, REF+6, REF+13, REF+16, GETSCR1+50*, GETSCR1+51, GETSCR1+52 , GETSCR1+53, GETSCR1+54, GETSCR1+58, GETSCR1+59, GETSCR1+61, GETSCR1+63, GETSCR1+64 |
>> AMHRSD | BH+1*, BH+2*, BH+3, BH+4, GETSCR1+1*, GETSCR1+2*, GETSCR1+3, GETSCR1+4 |
>> AMHRSEX | PROC+11 |
>> AMHRSPRV | BH+30, BH+31, PCC+30, PCC+31, REF+17, REF+18 |
>> AMHRSPRV( | BH+31, PCC+31, REF+18 |
>> AMHRSPUN | BH+32, PCC+32, REF+19 |
>> AMHRSSP | PROC+13 |
>> AMHRVIEN | PCC+5*, PCC+6, PCC+7, PCC+8, PCC+16, PCC+25, GETSCR1+28*, GETSCR1+29, GETSCR1+30, GETSCR1+43 , GETSCR1+44, GETSCR1+45 |
>> DFN | PROC+6*, PROC+7, PROC+8, PROC+9, PROC+10, PROC+11, PROC+12, PROC+13, PROC+14, BH+2 , BH+3, BH+10, BH+33, BH+34, PCC+2, PCC+12, PCC+33, REF+1, REF+2, REF+10 , REF+20, GETSCR+2*, GETSCR1+2, GETSCR1+3, GETSCR1+18, GETSCR1+22, GETSCR1+25, GETSCR1+34, GETSCR1+43, GETSCR1+47 , GETSCR1+48, GETSCR1+50, GETSCR1+60, GETSCR1+63, GETSCR1+65, GETSCR1+66 |
DFOUT | EOP+5! |
DIR | EOP+4~ |
DIR("A" | EOP+7* |
DIR(0 | EOP+7* |
DIRUT | EOP+5! |
DLOUT | EOP+5! |
DTOUT | EOP+5! |
DUOUT | EOP+5! |
DUZ | PROC+9, BH+7, PCC+7, USR+1 |
DUZ(2 | LOC+1 |
E | SPRV~, SPRV+1 |
IO | EOP+2 |
IO("S" | EOP+3 |
IO(0 | EOP+2 |
IOM | CTR+1 |
IOST | EOP+1 |
>> IOT | EOP+3 |
R | BHPPIN~, BHPPIN+2, BHPPNAME~, BHPPNAME+2, PRVREF~, PRVREF+1 |
U | PROC+8, PROC+11, PROC+12, PROC+13, PROC+14, BH+6, BH+14, BH+29, PCC+4, PCC+5 , PCC+8, PCC+16, PCC+29, REF+4, REF+5, REF+6, REF+16, GETSCR1+6, GETSCR1+18, GETSCR1+19 , GETSCR1+20, GETSCR1+21, GETSCR1+22, GETSCR1+27, GETSCR1+28, GETSCR1+30, GETSCR1+43, GETSCR1+44, GETSCR1+45, GETSCR1+46 , GETSCR1+47, GETSCR1+52, GETSCR1+53, GETSCR1+54, GETSCR1+58, GETSCR1+59, GETSCR1+63, GETSCR1+64, GETSCR1+65, BHPPIN+2 , BHPPNAME+2, SPRV+1, PRVREF+1, USR+1, LOC+1 |
V | PPV~, PPV+2 |
X | BH+10*, BH+11, BH+12, BH+14*, BH+25*, BH+26, BH+27, BH+28, BH+29*, BH+30 , BH+31, BH+32, PCC+12*, PCC+13, PCC+14, PCC+16*, PCC+25*, PCC+26, PCC+27, PCC+28 , PCC+29*, PCC+30, PCC+31, PCC+32, REF+10*, REF+11, REF+12, REF+16*, REF+17, REF+18 , REF+19, CTR~, CTR+1 |
Y | CTR~, CTR+1 |
>> ZTQUEUED | EOP+3 |