AUPNPAT2 ; IHS/CMI/LAB - PATIENT ELIGIBILITY EXTRINSICS ; [ 02/14/2005 11:00 AM ]
Source file <AUPNPAT2.m>
Package | Total | Caller Graph |
---|---|---|
Contract Health Management Information System | 1 | ACHS |
IHS Patient | 1 | AUPNPAT |
Name | Comments | DBIA/ICR reference |
---|---|---|
MCD(P,D) | ;EP - Is patient P medicaid eligible on date D.
; I = IEN. ; J = Node 11 IEN in ^AUPNMCD. |
|
RRE(P,D) | ;EP - Does pt have Railroad insurance on date? 1 = yes, 0 = no.
; I = IEN in ^AUPNRRE multiple. |
|
MCDX | ;
|
|
MCRX | ;
|
|
MCDPN(P,D,F) | ;EP - return medicaid plan name for patient P on date D in form F.
; I = IEN ; J = Node 11 IEN |
|
RREX | ;
|
|
PIX | ;
|
|
PINX | ;
|
|
PIN(P,D,F) | ;EP - return private insurer name for patient P on date D in form F
; I = IEN |
|
MCR(P,D) | ;EP - Is patient P medicare eligible on date D. 1 = yes, 0 = no.
; I = IEN in ^AUPNMCR multiple. |
|
MCDPNX | ;
|
|
PI(P,D) | ;EP - Is patient P private insurance eligible on date D. 1= yes, 0=no.
; I = IEN ; Y = 1:yes, 0:no ; X = Pointer to INSURER file. |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNMCD - [#9000004] | MCD+12, MCD+13, MCD+15, MCDPN+14, MCDPN+16, MCDPN+18, MCDPN+19 |
^AUPNMCD("B" | MCD+11, MCDPN+13 |
^AUPNMCR - [#9000003] | MCR+9, MCR+12, MCR+13, MCR+14 |
^AUPNPAT - [#9000001] | MCR+8, MCD+9, MCDPN+10, PI+10, PIN+9, RRE+8 |
^AUPNPRVT - [#9000006] | PI+11, PI+14, PI+15, PI+16, PI+18, PI+19, PIN+10, PIN+13, PIN+14, PIN+15 , PIN+17, PIN+18 |
^AUPNRRE - [#9000005] | RRE+9, RRE+12, RRE+13, RRE+14 |
^AUTNINS - [#9999999.18] | MCDPN+20, PI+17, PIN+16, PIN+20 |
^DPT - [#2] | MCR+6, MCR+7, MCR+10, MCD+7, MCD+8, MCD+10, MCDPN+8, MCDPN+9, MCDPN+11, PI+8 , PI+9, PI+12, PIN+7, PIN+8, PIN+11, RRE+6, RRE+7, RRE+10 |
Name | Line Occurrences |
---|---|
MCDPNX | MCDPN+8, MCDPN+9, MCDPN+10, MCDPN+11 |
MCDX | MCD+7, MCD+8, MCD+9, MCD+10 |
MCRX | MCR+6, MCR+7, MCR+8, MCR+9, MCR+10 |
PINX | PIN+7, PIN+8, PIN+9, PIN+10, PIN+11 |
PIX | PI+8, PI+9, PI+10, PI+11, PI+12 |
Name | Field # of Occurrence |
---|---|
^( | MCR+10, MCD+10, MCDPN+11, PI+12, PIN+11 |
^(0 | MCR+14, MCD+15, MCDPN+18, PI+19, PIN+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
D | MCR~, MCR+3, MCR+10, MCR+13, MCR+14, MCD~, MCD+4, MCD+10, MCD+14, MCD+15 , MCDPN~, MCDPN+4, MCDPN+11, MCDPN+17, MCDPN+18, PI~, PI+5, PI+12, PI+18, PI+19 , PIN~, PIN+3, PIN+11, PIN+17, PIN+18, RRE~, RRE+3, RRE+10, RRE+13, RRE+14 |
F | MCDPN~, MCDPN+5*, MCDPN+20, PIN~, PIN+5*, PIN+20 |
I | MCR+4~, MCR+11*, MCR+12*, MCR+13, MCR+14, MCD+5~, MCD+11*, MCD+12, MCD+13, MCD+15 , MCDPN+6~, MCDPN+12*, MCDPN+13*, MCDPN+14, MCDPN+16, MCDPN+18, MCDPN+19, PI+6~, PI+13*, PI+14* , PI+15, PI+16, PI+18, PI+19, PIN+4~, PIN+12*, PIN+13*, PIN+14, PIN+15, PIN+17 , PIN+18, RRE+4~, RRE+11*, RRE+12*, RRE+13, RRE+14 |
J | MCD+5~, MCD+13*, MCD+14, MCD+15, MCDPN+6~, MCDPN+15*, MCDPN+16*, MCDPN+17, MCDPN+18, PIN+4~ , PIN+6*, PIN+20*, PINX+1 |
P | MCR~, MCR+2, MCR+6, MCR+7, MCR+8, MCR+9, MCR+10, MCR+12, MCR+13, MCR+14 , MCD~, MCD+3, MCD+7, MCD+8, MCD+9, MCD+10, MCD+11, MCDPN~, MCDPN+3, MCDPN+8 , MCDPN+9, MCDPN+10, MCDPN+11, MCDPN+13, PI~, PI+4, PI+8, PI+9, PI+10, PI+11 , PI+12, PI+14, PI+15, PI+16, PI+18, PI+19, PIN~, PIN+2, PIN+7, PIN+8 , PIN+9, PIN+10, PIN+11, PIN+13, PIN+14, PIN+15, PIN+17, PIN+18, RRE~, RRE+2 , RRE+6, RRE+7, RRE+8, RRE+9, RRE+10, RRE+12, RRE+13, RRE+14 |
U | MCR+5*, MCR+7, MCR+10, MCR+13, MCR+14, MCD+6*, MCD+8, MCD+10, MCD+15, MCDPN+7* , MCDPN+9, MCDPN+11, MCDPN+18, MCDPN+19, MCDPN+20, PI+7*, PI+9, PI+12, PI+15, PI+16 , PI+17, PI+18, PI+19, PIN+6*, PIN+8, PIN+11, PIN+14, PIN+15, PIN+16, PIN+17 , PIN+18, PIN+20, RRE+5*, RRE+7, RRE+10, RRE+13, RRE+14 |
X | PI+6~, PI+16*, PI+17 |
Y | MCR+4~, MCR+5*, MCR+15*, MCRX+1, MCD+5~, MCD+6*, MCD+16*, MCDX+1, MCDPN+6~, MCDPN+7* , MCDPN+19*, MCDPN+20*, MCDPNX+1, PI+6~, PI+7*, PI+20*, PIX+1, PIN+4~, PIN+6*, PIN+15* , PIN+16, PIN+20, RRE+4~, RRE+5*, RRE+15*, RREX+1 |