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