DGWPT ; SLC/KCM/REV - Patient Lookup Functions ;3/20/02
Source file <DGWPT.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Registration | 8 | DGWPT BYWARD DGWPT CLINRNG DGWPT DFLTSRC DGWPT DIEDON DGWPT SAVDFLT DGWPT SELCHK DGWPT SELECT DGWPT TOP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SELCHK(REC,DFN) | ; Check for sensitive pt
; SENSITIVE |
|
| DIEDON(VAL,DFN) | ; Check for a date of death
|
|
| BYWARD(LST,WARD) | ||
| TOP(LST) | ; Return top for all patients list (last selected for now)
|
|
| CLINRNG(LST) | ; return date ranges for clinic appointments
|
|
| DFLTSRC(VAL) | ; return default patient list source (T, W, C, P, S)
|
|
| SAVDFLT(OK,X) | ; save new default patient list settings (X=type^ien^sdt;edt)
|
|
| SELECT(REC,DFN) | ; Selects patient & returns key information
; 1 2 3 4 5 6 7 8 9 10 11 12 ; NAME^SEX^DOB^SSN^LOCIEN^LOCNM^RMBD^CWAD^SENSITIVE^ADMITTED^CONV^SC^ ; 13 14 15 16 ; SC%^ICN^AGE^TS |
|
| AGE(DFN,BEG) |
| RPC Name | Call Tags |
|---|---|
| DGWPT DFLTSRC | DFLTSRC |
| DGWPT TOP | TOP |
| DGWPT SELCHK | SELCHK |
| DGWPT SAVDFLT | SAVDFLT |
| DGWPT CLINRNG | CLINRNG |
| DGWPT BYWARD | BYWARD |
| DGWPT DIEDON | DIEDON |
| DGWPT SELECT | SELECT |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | SELECT+11 |
| ^DIC(42 - [#42] | BYWARD+4, SELECT+8 |
| ^DISV( | TOP+2, SELECT+19* |
| ^DPT - [#2] | DIEDON+1, BYWARD+6, TOP+3, SELECT+7, SELECT+11, SELECT+17, AGE+2 |
| ^DPT("CN" | BYWARD+5 |
| ^TMP("DGWPCE" | SELECT+6! |
| ^VA(200 - [#200] | DFLTSRC+1 |
| Name | Line Occurrences |
|---|---|
| $$AGE | SELECT+16 |
| Name | Field # of Occurrence |
|---|---|
| ^( | SELECT+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CLINRNG+9~ |
| %H | CLINRNG+9~ |
| BEG | AGE~, AGE+3 |
| DFN | SELCHK~, SELCHK+2, DIEDON~, DIEDON+1, BYWARD+1~, BYWARD+3*, BYWARD+5*, BYWARD+6, SELECT~, SELECT+7 , SELECT+9, SELECT+11, SELECT+15, SELECT+16, SELECT+17, SELECT+19, AGE~, AGE+2 |
| DT | CLINRNG+10, CLINRNG+15, CLINRNG+16, AGE+2 |
| DUZ | TOP+2, DFLTSRC+1, SELECT+19 |
| END | AGE+1~, AGE+2*, AGE+3 |
| IEN | TOP+1~, TOP+2*, TOP+3 |
| ILST | BYWARD+1~, BYWARD+3*, BYWARD+6*, BYWARD+7 |
| IOST | SELECT+12* |
| LST | BYWARD~, TOP~, CLINRNG~ |
| LST( | BYWARD+6* |
| LST(1 | BYWARD+2*, BYWARD+7*, TOP+3*, CLINRNG+1*, CLINRNG+10* |
| LST(2 | CLINRNG+2*, CLINRNG+11* |
| LST(3 | CLINRNG+3*, CLINRNG+13* |
| LST(4 | CLINRNG+4*, CLINRNG+14* |
| LST(5 | CLINRNG+5*, CLINRNG+15* |
| LST(6 | CLINRNG+6*, CLINRNG+17* |
| LST(7 | CLINRNG+18* |
| OK | SAVDFLT~ |
| REC | SELCHK~, SELCHK+2*, SELECT~, SELECT+7*, SELECT+8*, SELECT+9*, SELECT+11*, SELECT+13*, SELECT+14*, SELECT+15* , SELECT+16*, SELECT+17* |
| SRV | DFLTSRC+1~*, DFLTSRC+2 |
| START | CLINRNG+9~ |
| SUNDAY | CLINRNG+9~ |
| U | BYWARD+6, TOP+3, SELECT+7, SELECT+8, SELECT+9, SELECT+11, SELECT+13, SELECT+14, SELECT+15, SELECT+16 , SELECT+17 |
| VAEL | SELECT+18! |
| VAEL(3 | SELECT+14 |
| VAERR | SELECT+18! |
| VAL | DIEDON~, DIEDON+1*, DFLTSRC~, DFLTSRC+2* |
| WARD | BYWARD~, BYWARD+2, BYWARD+4*, BYWARD+5 |
| X | CLINRNG+9~, CLINRNG+10*, CLINRNG+11, CLINRNG+12*, CLINRNG+13, CLINRNG+14, CLINRNG+16*, CLINRNG+17, SAVDFLT~, SELECT+5~ , SELECT+7*, SELECT+8*, SELECT+11*, SELECT+15*, AGE+1~, AGE+3*, AGE+4 |
| Name | Field # of Occurrence |
|---|---|
| $T(GETICN^MPIF001 | SELECT+15 |
