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* |