AGGPTLKP ;VNGT/HS/ALA-Patient Lookup ; 14 Apr 2010 6:58 AM
Source file <AGGPTLKP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FULL(NAME,VALUE) | ; Full Name
|
|
FND(DATA,TEXT,TYPE,ALL,INAC) | ; EP -- AGG LOOKUP PATIENTS
|
|
D | ; if the type is 'D', lookup only in the date of birth cross-reference
|
|
ERR | ;
|
|
LST2 | ; For each patient found in the search, get the list data
|
|
H | ; if the type is 'H', lookup only in the health record number cross-reference
|
|
LST | ; For each patient found in the search, get the list data
|
|
N | ; if the type is 'N', lookup only in the patient name cross-reference
|
|
HDR | ;
|
|
S | ; if the type is 'S', lookup only in the social security cross-reference
|
|
DONE | ;
|
|
ALLST(PTIEN) | ;EP - List of Aliases
|
|
LKUP | ;
|
|
ALIAS(PTIEN,TEXT) | ;EP
; Does this patient's alias match the TEXT? |
Name | Field # of Occurrence |
---|---|
^%ZTER | ERR+1 |
$$DATE^AGGUL1 | FND+36, FND+45 |
$$FMTE^AGGUL1 | LST+9, LST+10, LST2+9, LST2+10 |
$$HRN^AGGUL1 | LST+4, LST2+4 |
$$SENS^AGGUL1 | LST+13, LST2+13 |
$$TKO^AGGUL1 | ALLST+7 |
$$HRNL^AGGUL2 | LST+6, LST2+6 |
FIND^DIC | LKUP+1 |
$$GET1^DIQ | H+9, LST+3, LST+9, LST+10, LST+14, ALIAS+5, ALLST+5, LST2+3, LST2+9, LST2+10 , LST2+14 |
$$NOW^XLFDT | ERR+3 |
$$F^XLFNAME1 | FND+33 |
$$REMDBL^XLFNAME1 | FND+47 |
$$UP^XLFSTR | FND+56 |
RPC Name | Call Tags |
---|---|
AGG LOOKUP PATIENTS | FND |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
2.01 | GET1^DIQ |
^AUPNPAT - [#9000001] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AGFAC - [#9009061] | FND+25, LST+14, LST+23, HDR+2, LST2+14, LST2+21 |
^AUPNPAT - [#9000001] | H+5, H+6, H+7 |
^AUPNPAT("D" | H+3 |
^DD("DD" | ERR+3 |
^DPT - [#2] | LST+7, ALIAS+4, ALLST+4, LST2+7 |
^TMP("AGGPTLK" | FND+14 |
^TMP("DILIST" | FND+16!, DONE+2!, H+8*, H+9*, LST+1, LST+2, LST2+1, LST2+2 |
^XUSEC("AGZVIEWSSN" | LST+8, LST2+8 |
Name | Line Occurrences |
---|---|
$$ALLST | LST+21, LST2+15 |
@( | FND+34, FND+35, FND+36, FND+51 |
DONE | FND+26, FND+51 |
FULL | FND+31 |
HDR | FND+22 |
LKUP | FND+62, N+6, S+6, D+6 |
LST | FND+51, FND+63 |
LST2 | FND+34, FND+35, FND+36 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AGGPTDOB | FND+36*, FND+37! |
AGGPTFNM | FND+37! |
AGGPTLNM | FND+37! |
AGGPTMNM | FND+37! |
AGGPTSFX | FND+37! |
AGGPTSSN | FND+35, FND+37! |
AL | FND+12~ |
ALFLG | FND+12~ |
ALFND | ALIAS+2~, ALIAS+3*, ALIAS+4, ALIAS+6*, ALIAS+7 |
ALIAS | FND+12~, LST+15*, LST+21*, LST+23, LST+24, ALIAS+2~, ALIAS+5*, ALIAS+6, ALLST+1~, ALLST+2* , ALLST+6*, ALLST+7, LST2+15*, LST2+21, LST2+22 |
ALL | FND~, FND+59, FND+60, N+4, N+5, S+4, S+5, D+4, D+5, LST+6 , LST+8, LST+23, HDR+2, LST2+6, LST2+8, LST2+21 |
ANAM | ALLST+1~, ALLST+5*, ALLST+6 |
AQ | FND+11~, FND+28*, FND+29, FND+38* |
>> BMXSEC | ERR+4* |
BN | FND+11~, H+2*, H+8*, H+9, LST+1*, LST+2, LST2+1*, LST2+2 |
COMM | FND+11~, LST+14*, LST+23, LST2+14*, LST2+21 |
DATA | FND~, FND+14*, FND+16, FND+23, FND+38, DONE+1, LST+23, LST+24, ERR+5 |
DEC | FND+12~, FND+25*, LST+12, LST2+12 |
DFN | FND+11~, H+2*, H+3*, H+5, H+6, H+7, H+8, H+9, LST+2*, LST+3 , LST+4, LST+6, LST+7, LST+9, LST+10, LST+13, LST+14, LST+21, LST+23, LST+24 , LST2+2*, LST2+3, LST2+4, LST2+6, LST2+7, LST2+9, LST2+10, LST2+13, LST2+14, LST2+15 , LST2+20, LST2+21, LST2+22 |
DOB | FND+12~, LST+9*, LST+23, LST+24, LST2+9*, LST2+21, LST2+22 |
DOD | FND+12~, LST+10*, LST+12, LST+23, LST+24, LST2+10*, LST2+12, LST2+21, LST2+22 |
DUZ | LST+8, LST2+8 |
DUZ(2 | FND+25, FND+59, FND+61, N+4, S+4, D+4, LST+14, LST+23, HDR+2, LST2+14 , LST2+21 |
ERRDTM | ERR+2~, ERR+3*, ERR+4 |
FIELD | FND+11~, FND+57*, N+2*, S+2*, D+2*, LKUP+1 |
FILE | FND+11~, FND+57*, N+2*, S+2*, D+2*, LKUP+1 |
FLAGS | FND+11~, FND+57*, N+2*, N+5*, S+2*, D+2*, LKUP+1 |
HDR | FND+12~, FND+23, HDR+1*, HDR+2* |
HRN | FND+11~, LST+4*, LST+5, LST+6*, LST+23, LST+24, LST2+4*, LST2+5, LST2+6*, LST2+21 , LST2+22 |
IEN | ALIAS+2~, ALIAS+3*, ALIAS+4*, ALIAS+5, ALLST+1~, ALLST+3*, ALLST+4*, ALLST+5 |
II | FND+11~, FND+18*, FND+23, FND+38*, DONE+1*, LST+22*, LST+23, LST+24, ERR+5* |
INAC | FND~, FND+61, LST+5, LST2+5 |
>> INACTIVE | LST+4*, LST+5*, LST+23, LST+24, LST2+4*, LST2+5*, LST2+21, LST2+22 |
>> LOC | H+4*, H+5*, H+6, H+7 |
MOMDN | FND+12~, LST+14*, LST+23, LST2+14*, LST2+21 |
NAME | FND+11~, FND+30*, FND+31, FND+32, LST+3*, LST+23, LST+24, FULL~, FULL+1, FULL+2 , FULL+3, FULL+4, LST2+3*, LST2+21, LST2+22 |
NARRAY | FND+33, FND+37! |
NARRAY( | FULL+5* |
NARRAY("FAMILY" | FULL+1* |
NARRAY("GIVEN" | FULL+2* |
NARRAY("MIDDLE" | FULL+3* |
NARRAY("SUFFIX" | FULL+4* |
NODE | FND+12~ |
NUMB | FND+11~, FND+57*, N+2*, S+2*, D+2* |
PDATA | FND+12~, FND+29*, FND+30 |
PTIEN | ALIAS~, ALIAS+4, ALIAS+5, ALLST~, ALLST+4, ALLST+5 |
PTNAME | FND+33*, FND+34, FND+37! |
SCREEN | FND+11~, FND+59*, FND+60*, FND+61*, N+4*, N+5*, S+4*, S+5*, D+4*, D+5* , LKUP+1 |
SENS | FND+12~, LST+13*, LST+23, LST+24, LST2+13*, LST2+21, LST2+22 |
SSN | FND+12~, LST+7*, LST+8*, LST+23, LST+24, LST2+7*, LST2+8*, LST2+21, LST2+22 |
TEXT | FND~, FND+26, FND+28, FND+29, FND+34*, FND+35*, FND+36*, FND+43, FND+44, FND+45* , FND+47*, FND+48, FND+49*, FND+56*, H+3, H+7, LKUP+1, ALIAS~, ALIAS+6 |
TXT | FND+12~, FULL+5* |
TYPE | FND~, FND+21*, FND+34*, FND+35*, FND+36*, FND+43*, FND+44*, FND+45*, FND+51, FND+54 , N+1, S+1, D+1, H+1 |
U | FND+25, H+6, H+7, LST+7, LST+14, LST+23, LST+24, HDR+2, LST2+7, LST2+14 , LST2+21 |
UID | FND+11~, FND+13*, FND+14 |
VALUE | FND+30*, FND+31, FND+32, FULL~, FULL+1, FULL+2, FULL+3, FULL+4 |
X | FND+12~ |
XREF | FND+11~, FND+57*, N+2*, S+2*, D+2*, LKUP+1 |
Y | ERR+2~, ERR+3* |
>> ZTSK | FND+13 |
ZZ | FND+12~, FND+27!, FND+39! |
ZZ( | FND+38, LST2+20*, LST2+21*, LST2+22* |