AMHUTIL3 ; IHS/CMI/LAB - provider functions ;
Source file <AMHUTIL3.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 3 | PUT^DDSVAL LIST^DIC $$GET1^DIQ |
Kernel | 2 | $$FMTE^XLFDT $$UP^XLFSTR |
Mental Health Social Services | 2 | ($$DATE,A,D)^AMHUTIL C^AMHUTIL1 |
Data Warehouse Export System | 1 | ($$UID,UID)^BDWAID |
IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
Patient Care Component Reports | 1 | ($$PATIENT,$$VD)^APCLV |
Name | Comments | DBIA/ICR reference |
---|---|---|
6 | ||
DLMSF(V) | ;EP date last modified
|
|
SECPA(V,N,F) | ;EP
|
|
15 | ||
CODE10 | ;
|
|
PRIMPA(V,F) | ;EP - primary provider in many different formats
|
|
RACESF(PAT) | ;
|
|
20 | ||
TLM(V) | ;EP
|
|
1 | ;
|
|
I | ;
|
|
3 | ;
|
|
PA | ;EP
|
|
5 | ;
|
|
UID(P) | ;EP
|
|
7 | ||
ASUFACLD(R) | ;EP - get asufac of logged in facility suicide form
|
|
9 | ||
ADMDX | ;EP
|
|
PED(V,N) | ;EP - return nth v patient ed on this visit
|
|
TLMSF(V) | ;
|
|
4 | ;
|
|
A | ;
|
|
ETHN(P) | ;EP
|
|
OTHMETH | ;EP - called from screenman
|
|
E | ;
|
|
D | ;
|
|
MSR6(V) | ;EP - return first 6 measurements and values
|
|
J | ;
|
|
N | ;
|
|
HIGH | ||
P | ;
|
|
S | ;stage
|
|
8 | ||
UIDO | ;
|
|
2 | ;
|
|
DLM(V) | ;EP date last modified
|
|
11 | ||
10 | ||
13 | ||
12 | ||
VTIME(V) | ;
|
|
14 | ||
17 | ||
16 | ||
C | ;
|
|
18 | ||
HF(V,N) | ;EP
|
|
19 |
Name | Field # of Occurrence |
---|---|
$$DATE^AMHUTIL | DLM+5, DLMSF+5 |
A^AMHUTIL | PED+12, HF+12 |
D^AMHUTIL | PED+12, HF+12 |
C^AMHUTIL1 | PED+12, HF+12 |
$$PATIENT^APCLV | 4+1 |
$$VD^APCLV | 1+1, 2+1 |
$$UID^BDWAID | UID+3 |
UID^BDWAID | UID+2 |
PUT^DDSVAL | OTHMETH+3 |
LIST^DIC | RACESF+4 |
$$GET1^DIQ | UIDO+1 |
$$VAL^XBDIQ1 | ASUFACLD+6, MSR6+5, PED+13, 10, 13, 16, 17, 18, 20 |
$$VALI^XBDIQ1 | ASUFACLD+4, 19 |
$$FMTE^XLFDT | TLM+4, VTIME+4, TLMSF+4 |
$$UP^XLFSTR | TLM+5, VTIME+5, TLMSF+5 |
FileNo | Call Tags |
---|---|
2.02 | LIST^DIC |
^AUTTLOC - [#9999999.06] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AMHPSUIC - [#9002011.65] | ASUFACLD+2, DLMSF+2, DLMSF+5, TLMSF+2 |
^AMHREC - [#9002011] | DLM+2, DLM+5, TLM+2, VTIME+2, MSR6+2, PED+2, HF+2, PRIMPA+2, SECPA+2, ADMDX+2 |
^AMHREDU - [#9002011.05] | PED+6, PED+11, PED+13 |
^AMHREDU("AD" | PED+6 |
^AMHRHF - [#9002011.08] | HF+6, HF+11, HF+13 |
^AMHRHF("AD" | HF+6 |
^AMHRMSR - [#9002011.12] | MSR6+5 |
^AMHRMSR("AD" | MSR6+5 |
^AMHRPA - [#9002011.09] | PRIMPA+5, SECPA+6, PA+2, D+1, J+1, P+1, N+1, S+1, 1+1, 2+1 , 3+1, 4+1, 15 |
^AMHRPA("AD" | PRIMPA+5, SECPA+6, PA+2 |
^AMHTPA - [#9002014.8] | PRIMPA+7, SECPA+8, ADMDX+8, E+1, C+1, J+1, A+2 |
^AUPNPAT - [#9000001] | UID+1 |
^AUPNVINP - [#9000010.02] | ADMDX+6 |
^AUPNVINP("AD" | ADMDX+4 |
^AUTTEDT - [#9999999.09] | PED+8, PED+9 |
^AUTTHF - [#9999999.64] | HF+8, HF+9 |
^AUTTRCD - [#9999999.08] | HIGH+3, HIGH+5 |
^AUTTRCD("AH" | HIGH, HIGH+1, HIGH+2 |
^AUTTSITE(1 | UIDO+1 |
^DIC(10 - [#10] | RACESF+6, RACESF+8 |
^DIC(10.2 - [#10.2] | ETHN+9 |
^DPT - [#2] | ETHN+3, ETHN+6, ETHN+7 |
Name | Line Occurrences |
---|---|
@( | PRIMPA+9, SECPA+10, PA+4, PA+6, PA+7, ADMDX+10 |
A | 8 |
C | 7 |
CODE10 | A+4 |
D | 9 |
E | 6 |
HIGH | A+4, A+6 |
J | 11 |
N | 14 |
P | 12 |
UIDO | UID+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PED+4~, PED+10*, PED+11, PED+12*, HF+4~, HF+10*, HF+11, HF+12*, PRIMPA+3~, PRIMPA+9* , PRIMPA+10, SECPA+4~, SECPA+10*, SECPA+11, PA+1~, PA+4*, PA+6*, PA+7*, ADMDX+3~, ADMDX+4* , ADMDX+5, ADMDX+10*, ADMDX+11, I+1*, E+1*, C+1*, D+1*, J+1*, P+1*, N+1* , S+1*, A+3*, A+8*, HIGH*, HIGH+1*, HIGH+4*, HIGH+5*, 1+1*, 2+1*, 3+1* , 4+1*, 5+1*, 10*, 13*, 15*, 16*, 17*, 18*, 19*, 20* |
A | PED+12~*, HF+12~* |
>> APCLV( | PA+2*, PA+4*, PA+6*, PA+7* |
C | MSR6+3~, MSR6+4*, MSR6+5*, PED+4~, PED+5*, PED+6*, HF+4~, HF+5*, HF+6*, PRIMPA+3~ , PRIMPA+4*, SECPA+4~, SECPA+5*, SECPA+6*, PA+1~, PA+2*, PA+4, PA+6, PA+7 |
D | PED+12~*, HF+12~*, A+1~, HIGH+1*, HIGH+2, HIGH+3, HIGH+5 |
>> DA | OTHMETH+3 |
>> DDSOLD | OTHMETH+1 |
>> DIE | OTHMETH+3 |
E | ETHN+4~, ETHN+5*, ETHN+6, ETHN+9*, ETHN+11, A+1~, HIGH+2*, HIGH+3 |
F | ETHN+2*, MSR6+3~, MSR6+4*, MSR6+5*, PRIMPA~, PRIMPA+8*, PRIMPA+9, SECPA~, SECPA+9*, SECPA+10 , PA+3, PA+5, PA+6, PA+7, ADMDX+9*, ADMDX+10 |
H | A+1~, HIGH*, HIGH+1, HIGH+2 |
I | RACESF+1~, RACESF+6*, RACESF+7, ETHN+4~, ETHN+5*, ETHN+7*, ETHN+8, ETHN+9, PA+1~, PA+4* , PA+6*, PA+7*, A+1~, A+2*, A+3, A+4, A+5, A+6*, A+7*, A+8* , HIGH, CODE10+1, CODE10+2* |
J | PA+1~, PA+6* |
L | A+1~, HIGH+3*, HIGH+4 |
N | PED~, PED+3, PED+6, HF~, HF+3, HF+6, SECPA~, SECPA+3, SECPA+6 |
P | ETHN~, ETHN+1, ETHN+3, ETHN+6, ETHN+7, UID~, UID+1, UID+3, UIDO+1, PED+4~ , PED+5*, PED+6*, PED+7, PED+8, PED+9, PED+11*, HF+4~, HF+5*, HF+6*, HF+7 , HF+8, HF+9, HF+11*, PRIMPA+3~, PRIMPA+4*, PRIMPA+5*, PRIMPA+6, PRIMPA+7, SECPA+4~, SECPA+5* , SECPA+6*, SECPA+7, SECPA+8, PA+2*, ADMDX+6*, ADMDX+7, ADMDX+8, I+1, E+1, C+1 , A+2 |
PAT | RACESF~, RACESF+4 |
R | ASUFACLD~, ASUFACLD+1, ASUFACLD+2, ASUFACLD+4, DLM+3~, DLM+4*, DLM+5*, DLM+6, TLM+1~, TLM+2* , TLM+3, TLM+4*, TLM+5, VTIME+1~, VTIME+2*, VTIME+3, VTIME+4*, VTIME+5, DLMSF+3~, DLMSF+4* , DLMSF+5*, DLMSF+6, TLMSF+1~, TLMSF+2*, TLMSF+3, TLMSF+4*, TLMSF+5, MSR6+3~, MSR6+4*, MSR6+5* , MSR6+6, PED+9*, PED+10*, PED+13*, PED+14, HF+9*, HF+10*, HF+13*, HF+14, A+1~ , A+5*, HIGH+4, CODE10+1* |
S | MSR6+3~, MSR6+4*, MSR6+5*, PA+1~, PA+4* |
U | RACESF+6, RACESF+8, RACESF+11, ETHN+7, ETHN+9, DLM+5, TLM+2, UIDO+1, VTIME+2, DLMSF+5 , TLMSF+2, MSR6+5, PED+9, PED+10, PED+11, PED+13, HF+9, HF+10, HF+11, HF+13 , PRIMPA+5, SECPA+6, PA+2, PA+4, PA+6, PA+7, ADMDX+6, E+1, C+1, D+1 , J+1, P+1, N+1, S+1, A+2, HIGH+3, HIGH+5, 1+1, 2+1, 3+1 , 4+1, 15 |
V | DLM~, DLM+1, DLM+2, DLM+5, TLM~, TLM+2, VTIME~, VTIME+2, DLMSF~, DLMSF+1 , DLMSF+2, DLMSF+5, TLMSF~, TLMSF+2, MSR6~, MSR6+1, MSR6+2, MSR6+5, PED~, PED+1 , PED+2, PED+6, HF~, HF+1, HF+2, HF+6, PRIMPA~, PRIMPA+1, PRIMPA+2, PRIMPA+5 , SECPA~, SECPA+1, SECPA+2, SECPA+6, PA+2, ADMDX+1, ADMDX+2, ADMDX+4 |
X | RACESF+1~, RACESF+3*, RACESF+11*, RACESF+12, UID+3*, OTHMETH+1, OTHMETH+3 |
Y | RACESF+1~, RACESF+5*, RACESF+6, RACESF+8, MSR6+3~, MSR6+4*, MSR6+5*, PED+4~, PED+5*, PED+6* , HF+4~, HF+5*, HF+6*, PRIMPA+3~, PRIMPA+4*, PRIMPA+5*, SECPA+4~, SECPA+5*, SECPA+6*, PA+2* , ADMDX+3~, OTHMETH+2, 1+1, 2+1, 3+1, 4+1, 5+1, 10, 13, 15 , 16, 17, 18, 19, 20 |
Z | RACESF+1~, RACESF+2!, RACESF+8*, RACESF+10, RACESF+11, ETHN+4~, ETHN+6*, ETHN+7, ASUFACLD+3~, ASUFACLD+4* , ASUFACLD+5, ASUFACLD+6, PED+4~, PED+5*, PED+6*, PED+11, PED+13, HF+4~, HF+5*, HF+6* , HF+11, HF+13, PRIMPA+3~, PRIMPA+4*, PRIMPA+5*, SECPA+4~, SECPA+5*, SECPA+6*, PA+1~, PA+2* , ADMDX+3~, ADMDX+4*, ADMDX+5, ADMDX+6, D+1, J+1, P+1, N+1, S+1 |
Z("DILIST" | RACESF+5, RACESF+6, RACESF+8 |
Name | Field # of Occurrence |
---|---|
$T(@I | PA+4 |
$T(UID^BDWAID | UID+2 |