BEDDPLKP ;GDIT/HCSD/BEE-Patient Lookup ; 29 Oct 2005 6:51 PM
Source file <BEDDPLKP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HLK(ULOC) | ; EP - Get HRN data for a location
|
|
| HRNL(DFN) | ;EP -- List of HRNs for a patient
|
|
| ERR | ;
|
|
| TKO(STR,VAL) | ;EP - Take off ending character
|
|
| DATE(DATE) | ;EP - Convert standard date/time to a FileMan date/time
|
|
| DONE | ;
|
|
| FND(BEDD,TEXT,MAX) | ; EP -- LOOKUP PATIENTS
|
|
| SENS(DFN) | ;EP -- Is patient sensitive flag
|
|
| LKUP | ;
|
|
| ALIAS(PTIEN,TEXT) | ;EP
; Does this patient's alias match the TEXT? |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| 2.01 | GET1^DIQ |
| ^AUPNPAT - [#9000001] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNPAT - [#9000001] | FND+34, FND+35, FND+36, FND+61, HLK+2 |
| ^AUPNPAT("D" | FND+32 |
| ^DD("DD" | ERR+3 |
| ^DGSL(38.1 - [#38.1] | SENS+4 |
| ^DPT - [#2] | FND+69, ALIAS+4 |
| ^TMP("DILIST" | FND+13!, FND+28, FND+37*, FND+38*, FND+57, FND+58, DONE+1! |
| Name | Line Occurrences |
|---|---|
| $$ALIAS | FND+70 |
| $$DATE | FND+21, FND+23 |
| $$HLK | HRNL+3 |
| $$HRNL | FND+65 |
| $$TKO | HRNL+4 |
| LKUP | FND+25, FND+44, FND+54 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | DATE+6~, DATE+11* |
| ABR | HRNL+1~ |
| AL | FND+10~, FND+68*, FND+69* |
| ALFLG | FND+10~, FND+68*, FND+69* |
| ALFND | ALIAS+2~, ALIAS+3*, ALIAS+4, ALIAS+6*, ALIAS+7 |
| ALIAS | FND+10~, FND+70*, FND+71, ALIAS+2~, ALIAS+5*, ALIAS+6 |
| BEDD | FND~, FND+13! |
| BEDD( | FND+79* |
| BN | FND+9~, FND+29~, FND+31*, FND+37*, FND+38, FND+57*, FND+58 |
| DATE | DATE~, DATE+7, DATE+8*, DATE+9*, DATE+10*, DATE+11 |
| DFN | FND+9~, FND+29~, FND+31*, FND+32*, FND+34, FND+35, FND+36, FND+37, FND+38, FND+58* , FND+61, FND+63, FND+64, FND+65, FND+66, FND+67, FND+69, FND+70, FND+73, FND+76 , SENS~, SENS+4, HRNL~, HLK+2 |
| DIQUIET | LKUP+1~, LKUP+2* |
| DISP | FND+10~, FND+71*, FND+72*, FND+73, FND+74*, FND+75*, FND+76 |
| DOB | FND+10~, FND+66*, FND+74 |
| DOD | FND+10~, FND+67* |
| DUZ(2 | FND+61, HRNL+3 |
| ERRDTM | ERR+2~, ERR+3* |
| FIELD | FND+9~, FND+24*, FND+43*, FND+53*, LKUP+3*, LKUP+4 |
| FILE | FND+9~, FND+24*, FND+43*, FND+53*, LKUP+4 |
| FLAG | SENS+3~, SENS+4*, SENS+5*, SENS+6 |
| FLAGS | FND+9~, FND+24*, FND+43*, FND+53*, LKUP+4 |
| H | FND+9~, FND+75* |
| HDATA | HRNL+1~, HLK+1~, HLK+2*, HLK+3 |
| HRN | FND+9~, FND+65*, FND+74, FND+75, HRNL+1~, HLK+3*, HLK+4, HLK+5*, HLK+6 |
| I | FND+9~, FND+75* |
| IACT | HLK+1~, HLK+3*, HLK+5 |
| IEN | ALIAS+2~, ALIAS+3*, ALIAS+4*, ALIAS+5 |
| LOC | FND+29~, FND+33*, FND+34*, FND+35, FND+36, HRNL+1~, HRNL+2* |
| LV | TKO+14~, TKO+15*, TKO+16 |
| MAX | FND~, FND+18*, FND+79 |
| NAME | FND+9~, FND+63*, FND+70, FND+71, FND+72 |
| NODE | FND+10~, FND+73*, FND+76, FND+79* |
| NUMB | FND+9~, FND+24*, FND+43*, FND+53* |
| PTIEN | ALIAS~, ALIAS+4, ALIAS+5 |
| RCNT | FND+10~, FND+79* |
| SCREEN | FND+9~, LKUP+4 |
| SEX | FND+10~, FND+64*, FND+74 |
| STR | TKO~, TKO+11, TKO+16*, TKO+18 |
| TEXT | FND~, FND+21, FND+23*, FND+28, FND+32, FND+36, FND+41, FND+48*, FND+52*, FND+70 , LKUP+4, ALIAS~, ALIAS+6 |
| TMP | FND+10~ |
| TMP( | FND+76*, FND+79 |
| TYPE | FND+10~, FND+17*, FND+22*, FND+30*, FND+41, FND+42*, FND+47, FND+70 |
| U | FND+35, FND+36, FND+71, FND+76, HLK+3 |
| UID | FND+9~ |
| ULOC | HRNL+1~, HLK~, HLK+2 |
| VAL | HRNL+1~, HRNL+2*, HRNL+3*, HRNL+4, TKO~, TKO+12, TKO+15, TKO+16 |
| X | FND+10~, DATE+6~, DATE+11* |
| XREF | FND+9~, FND+24*, FND+43*, FND+53*, LKUP+4 |
| Y | DATE+6~, DATE+12*, DATE+14, ERR+2~, ERR+3* |