NUPAOBJ ;PHOENIX/KLD; 6/23/09; PULL PATIENT INFO; 1/11/12 8:38 AM
Source file <NUPAOBJ.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 4 | DD^%DT (,C)^%DTC ^DIC ($$GET1,GETS)^DIQ |
| Outpatient Pharmacy | 1 | OCL^PSOORRL |
| Patient Assessment Documentation | 1 | AGO^NUPAOBJ1 |
| 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 |
|---|---|---|
| Patient Assessment Documentation | 2 | NUPABCL1 NUPABCL2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ST | ||
| MAR() | ;Marital status
|
|
| RELIG() | ;Patient's Religious preference
|
|
| FLD(Z) | ||
| NVA(T) | ;Active Non-VA Meds T=Time period^Condensed Version (0 for No or 1 for Yes)
|
|
| TO() | ;Today's orders. Yesterday's also if desired (S NUPAYEST=""), or
|
|
| TEXTORD | ||
| SIG(N) | ||
| LADM(Z) | ;Z=0 - |LAST ADMISSION DATE| Z=1 - |LAST ADMISSION|
|
|
| EC() | ;Emergency Contact
|
|
| LN(N,T) | ;Last note. N=Note Title (or ANY), T=Time period
|
|
| LNQ | ||
| K | ||
| NONE(X) | ||
| SET(X) | ||
| D(Y) | ||
| D1(Y) |
| Name | Field # of Occurrence |
|---|---|
| DD^%DT | D |
| ^%DTC | LADM+11 |
| C^%DTC | NVA+2 |
| ^DIC | LN+4 |
| $$GET1^DIQ | FLD, NVA+12, NVA+13, NVA+14, TO+10, TO+11, TO+12, TO+13, TO+18, TO+19 , TO+20, TO+21, TO+23, TO+24, TEXTORD+2, SIG+1, SIG+4, SIG+7, LADM+9, LADM+11 , EC+8, LN+7, LN+8, LN+9, LN+13 |
| GETS^DIQ | EC+2 |
| AGO^NUPAOBJ1 | NVA+1, LN+3 |
| OCL^PSOORRL | NVA+6 |
| FileNo | Call Tags |
|---|---|
| ^OR(100 - [#100] | GET1^DIQ |
| 100.008 | GET1^DIQ |
| 100.045 | GET1^DIQ |
| ^ORD(100.98 - [#100.98] | GET1^DIQ |
| ^ORD(101.43 - [#101.43] | GET1^DIQ |
| ^DPT - [#2] | GET1^DIQ, GETS^DIQ |
| ^DGPM - [#405] | GET1^DIQ |
| ^PSRX - [#52] | GET1^DIQ |
| ^TIU(8925 - [#8925] | GET1^DIQ |
| ^TIU(8925.1 - [#8925.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM("ATID1" | LADM+4, LADM+5, LADM+6 |
| ^DGPM("ATID3" | LADM+5 |
| ^OR(100 - [#100] | NVA+24, NVA+26, NVA+27, TO+8, TO+9, TO+16, TO+17, TO+18, TEXTORD+1, SIG , SIG+3 |
| ^PSRX("APL" | SIG+6 |
| ^TIU(8925 - [#8925] | LN+6 |
| ^TMP("NUPA" | NVA+16*, NVA+18, NVA+19, NVA+20, NVA+22, NVA+23, NVA+29!, K!, NONE*, SET* |
| ^TMP("PS" | NVA+7, NVA+8, NVA+9, NVA+10, NVA+11, NVA+16, NVA+29! |
| Name | Line Occurrences |
|---|---|
| $$D | TO+19, TO+20, LADM+8, LN+10 |
| $$FLD | MAR+1, RELIG+1 |
| K | NVA+1, TO+3, EC+1, LN+3 |
| LNQ | LN+3, LN+5 |
| NONE | NVA+1, TO+3, LADM+4, LN+3 |
| SET | NVA+18, NVA+21, NVA+22, NVA+27, NVA+28, TO+21, TO+25, TO+28, TEXTORD+5, TEXTORD+7 , TEXTORD+9, EC+3, EC+4, EC+5, EC+6, EC+7, EC+9, EC+10, EC+11, LN+5 , LN+11, LN+12, LN+14 |
| SIG | TO+25 |
| TEXTORD | TO+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | TO+2~, TO+4*, TO+8, TO+9 |
| APGKAUTH | NVA+13, NVA+29! |
| APGKTODY | NVA+14, NVA+29! |
| C | TO+2~, TO+4*, TO+26, TO+27*, EC+1~*, LN+2~*, SET |
| DA | LADM+3~, LADM+5*, LADM+6*, LADM+9, LADM+11 |
| >> DFN | FLD, NVA+6, TO+4, LADM+3, LADM+4, LADM+5, LADM+6, EC+2, EC+3, EC+4 , EC+5, EC+6, EC+7, EC+8, EC+9, EC+10, EC+11, LN+3, LN+6 |
| DIC | LN+2~, LN+4* |
| DIC(0 | LN+4* |
| DT | NVA+6, NVA+14, TO+5, LADM+11 |
| DUZ | NVA+13, TO+11 |
| ED | TO+2~, TO+6*, TO+7*, TO+8, LN+2~, LN+8 |
| I | TO+2~, TO+8*, TO+9, TEXTORD~, TEXTORD+1*, TEXTORD+2 |
| II | TO+2~, TO+17*, TO+18, TEXTORD~, TEXTORD+3*, TEXTORD+4, TEXTORD+5, TEXTORD+6, TEXTORD+7 |
| III | TEXTORD~, TEXTORD+6*, TEXTORD+7 |
| N | SIG~, SIG+1, SIG+3, SIG+4, SIG+6, LN~, LN+3, LN+4, LN+5, LN+9* , LN+11 |
| NUPA | NVA+1~, LADM+3~, LADM+11*, LN+2~ |
| NUPA("ADM" | LADM+4*, LADM+5, LADM+6*, LADM+7*, LADM+8, LADM+9 |
| NUPA("C" | NVA+3*, NVA+15*, NVA+16, NVA+17*, NVA+21*, LN+2*, SET* |
| NUPA("DIS" | LADM+5*, LADM+7*, LADM+9 |
| NUPA("ED" | NVA+2*, NVA+6, NVA+12 |
| NUPA("I" | NVA+7*, NVA+8, NVA+9, NVA+10, NVA+11, NVA+16, NVA+20*, NVA+22, NVA+23, LN+2* , LN+6*, LN+7, LN+8, LN+9*, LN+11, LN+12, LN+13 |
| NUPA("II" | NVA+26*, NVA+27, LN+14* |
| NUPA("NOTEDATE" | LN+2*, LN+6, LN+8*, LN+10*, LN+11 |
| NUPA("ORD" | NVA+11*, NVA+12, NVA+13, NVA+14, NVA+16, NVA+23*, NVA+24, NVA+26, NVA+27 |
| NUPA("RX" | NVA+17*, NVA+19*, NVA+20, NVA+21, NVA+22, NVA+23 |
| NUPA("SIG" | SIG*, SIG+1, SIG+2*, SIG+3*, SIG+4, SIG+5*, SIG+6*, SIG+7 |
| NUPA("SP" | NVA+3* |
| NUPA("STATE" | NVA+24*, NVA+25, NVA+26, NVA+27 |
| NUPA("TITLE" | LN+4*, LN+5, LN+7 |
| NUPA("TYPE" | NVA+8*, NVA+9 |
| NUPAALL | TO+5, TO+6, TO+29! |
| NUPAAUTH | TO+11, TO+29! |
| NUPANOTX | LN+12, LNQ! |
| NUPASIG | TO+22, TO+29! |
| NUPAWP | SIG~, SIG+1*, SIG+4*, LN+2~, LN+13* |
| NUPAWP( | LN+14 |
| NUPAWP(1 | SIG+2, SIG+5 |
| NUPAWP(2 | SIG+2, SIG+5 |
| NUPAYEST | TO+3, TO+7, TO+29! |
| ORD | TO+2~, TO+9*, TO+10, TO+11, TO+12, TO+13, TO+16, TO+17, TO+18, TO+19 , TO+20, TO+21, TO+23, TO+25, TEXTORD+1, TEXTORD+2 |
| PKG | TO+12, TO+29! |
| SD | TO+2~, TO+5*, TO+6, TO+7, TO+8 |
| SIG | TO+2~, TO+25, SIG+7* |
| SP | TO+2~, TO+4*, TO+18, TO+19, TO+21, TO+26, TO+27, TO+28 |
| STAT | TO+13, TO+29! |
| T | NVA~, NVA+24, LN~ |
| U | FLD, NVA+8, NVA+9, NVA+10, NVA+11, NVA+16, NVA+22, NVA+24, LADM+11 |
| WP | TEXTORD~, TEXTORD+2* |
| WP( | TEXTORD+3, TEXTORD+5, TEXTORD+6, TEXTORD+7 |
| X | FLD~*, NVA+1~, NVA+2, TO+2~*, TO+3*, TO+18*, TO+19*, TO+20*, TO+21*, TO+26* , TO+27*, TO+28*, TEXTORD~, TEXTORD+4*, TEXTORD+5*, TEXTORD+6, TEXTORD+7*, TEXTORD+8*, TEXTORD+9, LADM+3~* , LADM+4, LADM+8*, LADM+9*, LADM+11*, LADM+12*, EC+1~, EC+6*, EC+7*, EC+8*, EC+9 , LN+2~, LN+4*, NONE~, SET~ |
| X(1 | TO+23*, TO+24 |
| X(2 | EC+3, EC+4, EC+5, EC+6, EC+7, EC+9, EC+10, EC+11 |
| X1 | NVA+1~, NVA+2*, LADM+10~, LADM+11* |
| X2 | NVA+1~, NVA+2*, LADM+10~, LADM+11* |
| Y | NVA+1~, LN+4, D~, D1~ |
| Z | FLD~, LADM~, LADM+4, LADM+6, LADM+8, LADM+9, LADM+11, LADM+12 |