ECXNUT1 ;ALB/JRC Nutrition DSS Extract ; 9/4/09 8:59am
Source file <ECXNUT1.m>
Package | Total | Call Graph |
---|---|---|
DSS Extracts | 2 | GET^ECXNUT ($$NUTKEY,$$NUTLOC)^ECXUTL6 |
VA FileMan | 1 | $$GET1^DIQ |
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 |
---|---|---|
DSS Extracts | 1 | ECXNUT |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETMEALS | ;get patient meals
; variable names: ordate - regular diet order date ; sdate - diet order npo/withhold date ; norder - "sf" or "so" order date ; note: there is a relationship ; between "sf", "so" and regular diets ; adate - admission date ; ddate - discharge date |
|
INPPD | ||
INPSF | ;create supplemental feeding meals if they exist
|
|
INPSO | ;create standing order meals if they exist
|
|
INPTF | ;Get inpatient tube feedings
|
|
OPRM | ;Get outpatient recurring meals
|
|
OPSO | ;Get outpatient standing orders
|
|
OPSF | ;Get outpatient supplemental feedings
|
|
OPTF | ;Get outpatient tube feedings
|
|
OPSM | ;Get outpatient special meals
|
|
OPGM | ;Get outpatient guest meals
|
|
GETDATES() | ;Get admit, discharge, npo/withhold dates,for "inp", "sf" and "so"
; return in string i.e. stop date^admission date^discharge date ; input: ecxadm - movement file ien ; fhdfn - nutrition patient file (#115) |
|
NEWORDER(TYPE,DATE) | ;Look for new order for inpatient meal type if exist
; Input ecxadm - movement # ; fhdfn - nutrition file (#115) fhdfn ; date - starting order date to begin lookup ; type - meal type "sf", "so", or "pd" ; Output: new order date and time for specific meal type |
|
MEALCHK | ;CHECK IF MEAL IS ON HOLD
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | INPPD+12, INPTF+25, OPRM+7, OPRM+8, OPSM+6, GETDATES+14 |
GET^ECXNUT | INPPD+16, INPSF+29, INPSO+31, INPTF+29, OPRM+13, OPSO+25, OPSF+25, OPTF+13, OPSM+11, OPGM+10 |
$$NUTKEY^ECXUTL6 | INPPD+7, INPSF+18, INPSO+17, INPTF+18, OPRM+10, OPSO+12, OPSF+17, OPTF+10 |
$$NUTLOC^ECXUTL6 | INPPD+8, INPSF+19, INPSO+18, INPTF+19, OPRM+11, OPSO+13, OPSF+18, OPTF+11, OPSM+9, OPGM+8 |
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | GET1^DIQ |
^FH(111 - [#111] | GET1^DIQ |
115.01 | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP($J | GETMEALS+18, INPPD+4, INPTF+6, INPTF+7, INPTF+8, INPTF+9, INPTF+10, INPTF+11, OPRM+2, OPRM+3 , OPRM+4, OPRM+5, OPSO+2, OPSO+3, OPSO+4, OPSO+5, OPSO+8, OPSF+2, OPSF+3, OPSF+4 , OPSF+5, OPSF+9, OPTF+2, OPTF+3, OPTF+4, OPTF+5, OPTF+6, OPTF+7, OPSM+2, OPSM+3 , OPSM+4, OPGM+2, OPGM+3, OPGM+4, NEWORDER+11, NEWORDER+15, NEWORDER+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADATE | GETMEALS+16*, INPSF+3*, INPSO+5*, GETDATES+10~, GETDATES+14*, GETDATES+18 |
>> ARRAY | GETMEALS+14, GETMEALS+15, GETMEALS+17, INPSF+1, INPSF+2, INPSF+4, INPSF+8, INPSO+3, INPSO+4, INPSO+6 , INPSO+9, INPSO+10, GETDATES+16, GETDATES+17, NEWORDER+10, NEWORDER+14, MEALCHK+5 |
CDATE | INPSF+7*, INPSF+12*, INPSF+25, INPSO+15*, INPSO+25, INPTF+1~, INPTF+5*, INPTF+12*, INPTF+23, OPSF+8* , OPSF+12* |
D | GETMEALS+8~, INPPD+1*, INPPD+7, INPPD+8, INPSF+10*, INPSF+12, INPSF+19, INPSO+13*, INPSO+17, INPSO+18 , INPTF+6*, INPTF+18, INPTF+19, OPRM+2*, OPRM+11, OPSO+2*, OPSO+6*, OPSO+12, OPSO+13, OPSF+2* , OPSF+6*, OPSF+18, OPTF+2*, OPTF+11, OPSM+2*, OPSM+9, OPGM+2*, OPGM+8 |
DATE | INPPD+14*, INPPD+16, INPSF+23*, INPSF+24, INPSF+25, INPSF+26, INPSF+27, INPSF+29, INPSO+28, INPSO+29* , INPSO+32*, INPTF+5*, INPTF+8*, INPTF+9, INPTF+10, INPTF+11, INPTF+12, INPTF+27*, INPTF+29*, OPRM+1* , OPRM+2*, OPRM+3, OPRM+4, OPRM+5, OPSO+1*, OPSO+2*, OPSO+3, OPSO+4, OPSO+5, OPSO+8 , OPSO+9, OPSO+24, OPSO+25*, OPSO+26*, OPSF+1*, OPSF+2*, OPSF+3, OPSF+4, OPSF+5, OPSF+9 , OPSF+12, OPSF+20, OPSF+23, OPSF+24*, OPSF+26*, OPTF+1*, OPTF+2*, OPTF+3, OPTF+4, OPTF+5 , OPTF+6, OPTF+7, OPSM+1*, OPSM+2*, OPSM+3, OPSM+4, OPGM+1*, OPGM+2*, OPGM+3, OPGM+4 , GETDATES+10~, GETDATES+14*, GETDATES+16*, GETDATES+17, NEWORDER~, NEWORDER+9, NEWORDER+10*, NEWORDER+11, NEWORDER+12, NEWORDER+14* , NEWORDER+15, NEWORDER+16, NEWORDER+17, MEALCHK+7 |
DATES | GETMEALS+8~, GETMEALS+19*, INPPD+11, INPPD+15, INPSF+5*, INPSF+27, INPSF+28, INPSO+7*, INPSO+26, INPSO+30 , INPTF+12*, INPTF+22, INPTF+24, INPTF+28, OPSO+20, OPSO+22, OPSF+21, MEALCHK+2, MEALCHK+3 |
DDATE | GETMEALS+16*, INPSF+3*, INPSO+5*, GETDATES+10~, GETDATES+14*, GETDATES+18 |
>> ECED | GETMEALS+12, GETMEALS+17, INPPD+16, INPSF+21, INPSF+29, INPSO+2, INPTF+4, MEALCHK+6 |
>> ECSD | GETMEALS+10*, GETMEALS+12, GETMEALS+19, INPSF+5, INPSF+13, INPSO+1, INPSO+7, INPTF+3*, INPTF+4, INPTF+13 |
>> ECSD1 | INPTF+3 |
ECSDX | GETMEALS+8~, GETMEALS+10*, INPSO+1*, INPSO+2 |
ECXADM | GETMEALS+8~, GETMEALS+14*, GETMEALS+15, GETMEALS+17, GETMEALS+18, INPPD+4, INPSF+1*, INPSF+2, INPSF+4, INPSF+8 , INPSO+3*, INPSO+4, INPSO+6, INPSO+9, INPSO+10, INPTF+5*, INPTF+6*, INPTF+7, INPTF+8, INPTF+9 , INPTF+10, INPTF+11, OPRM+1*, OPSO+1*, OPSF+1*, OPTF+1*, OPSM+1*, OPGM+1*, GETDATES+12, GETDATES+14 , GETDATES+16, GETDATES+17, NEWORDER+10, NEWORDER+11, NEWORDER+14, NEWORDER+15, NEWORDER+16, MEALCHK+5 |
ECXDFL | GETMEALS+8~, INPPD+8, INPSF+19, INPSO+18, INPTF+19, OPRM+11, OPSO+13, OPSF+18, OPTF+11, OPSM+9 , OPGM+8 |
ECXDLT | GETMEALS+8~, INPPD+8, INPSF+19, INPSO+18, INPTF+19, OPRM+11, OPSO+13, OPSF+18, OPTF+11, OPSM+9 , OPGM+8 |
ECXFDD | GETMEALS+8~, INPPD+8, INPSF+19, INPSO+18, INPTF+19, OPRM+11, OPSO+13, OPSF+18, OPTF+11, OPSM+9 , OPGM+8 |
ECXFPD | GETMEALS+8~, INPPD+8, INPSF+19, INPSO+18, INPTF+19, OPRM+11, OPSO+13, OPSF+18, OPTF+11, OPSM+9 , OPGM+8 |
ECXFPF | GETMEALS+8~, INPPD+8, INPSF+19, INPSO+18, INPTF+19, OPRM+11, OPSO+13, OPSF+18, OPTF+11, OPSM+9 , OPGM+8 |
ECXKEY | GETMEALS+8~, INPPD+7*, INPSF+18*, INPSO+17*, INPTF+18*, OPRM+10*, OPSO+12*, OPSF+17*, OPTF+10*, OPSM+8* , OPGM+7* |
ECXORDPH | GETMEALS+8~, INPPD+12*, INPSF+7*, INPSO+8*, INPTF+5*, INPTF+25*, OPRM+1*, OPRM+8*, OPSO+1*, OPSF+1* , OPSF+8*, OPTF+1*, OPSM+1*, OPSM+5*, OPGM+1* |
ECXQTY | GETMEALS+8~, INPPD+5*, INPSF+15*, INPSO+15*, INPTF+15*, OPRM+6*, OPSO+10*, OPSF+14*, OPTF+8*, OPSM+5* , OPGM+5* |
ECXTFU | GETMEALS+8~, GETMEALS+10*, INPTF+1~, INPTF+16*, OPRM+1* |
FHDFN | GETMEALS+8~, GETMEALS+15*, GETMEALS+17, GETMEALS+18, INPPD+4, INPSF+2*, INPSF+4, INPSF+8, INPSO+4*, INPSO+6 , INPSO+9, INPSO+10, INPTF+5*, INPTF+7*, INPTF+8, INPTF+9, INPTF+10, INPTF+11, OPRM+3*, OPRM+4 , OPRM+5, OPSO+3*, OPSO+4, OPSO+5, OPSO+8, OPSF+3*, OPSF+4, OPSF+5, OPSF+9, OPTF+3* , OPTF+4, OPTF+5, OPTF+6, OPTF+7, OPSM+1*, OPSM+3*, OPSM+4, OPGM+1*, OPGM+3*, OPGM+4 , GETDATES+12, GETDATES+14, GETDATES+16, GETDATES+17, NEWORDER+10, NEWORDER+11, NEWORDER+14, NEWORDER+15, NEWORDER+16, MEALCHK+5 |
>> FHNUM | OPSO+5*, OPSO+8 |
H | MEALCHK+1*, MEALCHK+2*, MEALCHK+5, MEALCHK+7, MEALCHK+8! |
I | GETMEALS+8~, GETMEALS+12*, INPSO+2*, INPTF+4* |
IENS | GETDATES+10~, GETDATES+14* |
J | GETMEALS+8~, GETMEALS+12*, INPSO+2* |
MEAL | GETMEALS+8~, INPPD+9*, INPPD+10, INPPD+11, INPPD+14, INPSF+21*, INPSF+23, INPSO+20*, INPSO+21, INPSO+25 , INPSO+26, INPSO+29, INPTF+21*, INPTF+22, INPTF+23, INPTF+24, INPTF+27, OPSO+15*, OPSO+16, OPSO+20 , OPSO+21, OPSO+22, OPSO+25, OPSF+20*, OPSF+21, OPSF+24 |
>> MEALCHK | INPPD+15, INPSF+28, INPSO+30, INPTF+28, MEALCHK+1*, MEALCHK+7* |
MEALS | GETMEALS+8~, INPSO+2!, INPSO+34!, INPTF+1~ |
MEALS( | GETMEALS+12*, INPPD+9, INPSO+2*, INPSO+20, INPSO+21, INPTF+4*, INPTF+21, OPSO+15, OPSO+16 |
NODE | GETMEALS+8~, INPPD+4*, INPPD+5, INPTF+5*, INPTF+9*, INPTF+12, INPTF+14, OPRM+1*, OPRM+5*, OPRM+6 , OPSO+1*, OPSF+1*, OPTF+1*, OPTF+5*, OPSM+1*, OPSM+4*, OPSM+5, OPGM+1*, OPGM+4*, OPGM+5 , NEWORDER+11*, NEWORDER+16* |
NORDATE | GETDATES+10~, GETDATES+14* |
>> NORDER | INPPD+3*, INPPD+10, INPSF+12*, INPSF+26, OPSO+9*, OPSO+21, OPSF+12*, NEWORDER+8*, NEWORDER+9, NEWORDER+10 , NEWORDER+12*, NEWORDER+14, NEWORDER+17*, NEWORDER+18 |
NUM | INPSO+8~*, INPSO+9*, INPSO+10 |
NUMBER | GETMEALS+8~, OPRM+4*, OPRM+5, OPSO+4*, OPSO+5, OPSO+8, OPSO+15, OPSF+4*, OPSF+5, OPSF+9 , OPTF+4*, OPTF+5, OPTF+6, OPTF+7 |
NUMT | NEWORDER+7~, NEWORDER+8*, NEWORDER+15*, NEWORDER+16 |
OFF | MEALCHK+1*, MEALCHK+3*, MEALCHK+5*, MEALCHK+6*, MEALCHK+7, MEALCHK+8! |
ORDATE | GETMEALS+8~, GETMEALS+16*, GETMEALS+17*, GETMEALS+18, GETMEALS+19, INPPD+3, INPPD+4, INPSF+3*, INPSF+4*, INPSF+5 , INPSF+8, INPSF+12, INPSF+24, INPSO+5*, INPSO+6*, INPSO+7, INPSO+9, INPSO+10, INPTF+12*, INPTF+13 , INPTF+29, GETDATES+16 |
ORDER | GETMEALS+8~, INPPD+5*, INPPD+12, INPTF+14*, INPTF+25, OPRM+6*, OPRM+8 |
P | GETMEALS+8~, INPPD+1*, INPPD+3, INPPD+8, INPSF+10*, INPSF+19, INPSO+13*, INPSO+18, INPTF+6*, INPTF+19 , OPRM+2*, OPRM+11, OPSO+2*, OPSO+6*, OPSO+13, OPSF+2*, OPSF+6*, OPSF+18, OPTF+2*, OPTF+11 , OPSM+2*, OPSM+9, OPGM+2*, OPGM+8 |
P1 | INPTF+1~, INPTF+5*, INPTF+10*, INPTF+11 |
PNODE | INPTF+1~, INPTF+5*, INPTF+11*, INPTF+14, INPTF+15, INPTF+16 |
PRODUCT | GETMEALS+8~, INPPD+5*, INPPD+7, INPSF+15*, INPSF+16, INPSF+18, INPSO+15*, INPSO+17, INPTF+14*, INPTF+18 , OPRM+6*, OPRM+7*, OPRM+10, OPSO+10*, OPSO+12, OPSF+14*, OPSF+15, OPSF+17, OPTF+8*, OPTF+10 , OPSM+5*, OPSM+6*, OPGM+5* |
RDATE | GETDATES+10~, GETDATES+14*, GETDATES+17*, GETDATES+18 |
SDATE | GETMEALS+8~, GETMEALS+16*, GETMEALS+19*, INPPD+9, INPSF+3*, INPSF+5*, INPSO+5*, INPSO+7*, INPSO+20, INPTF+5* , INPTF+13*, INPTF+21, GETDATES+14* |
SF | GETMEALS+8~, INPSF+15*, INPSF+23, OPSF+14*, OPSF+24 |
SFNODE | INPSF+7~*, INPSF+8*, INPSF+9, INPSF+12, INPSF+13, INPSF+15, OPSF+8~*, OPSF+9*, OPSF+10, OPSF+12 , OPSF+14 |
SMEAL | INPSO+13~, INPSO+15*, INPSO+22, INPSO+23, INPSO+24, OPSO+6~, OPSO+9*, OPSO+17, OPSO+18, OPSO+19 , OPSF+6~ |
SONODE | INPSO+8~*, INPSO+10*, INPSO+11, INPSO+15, OPSO+8*, OPSO+9, OPSO+10 |
SORDATE | GETMEALS+8~ |
START | GETMEALS+8~, INPSF+13*, INPSF+21 |
STDATE | GETDATES+10~, GETDATES+14*, GETDATES+17*, GETDATES+18 |
TF | GETMEALS+8~, OPTF+6*, OPTF+7 |
TFNODE | GETMEALS+8~, OPTF+7*, OPTF+8 |
TIME | INPSO+21~*, INPSO+22, INPSO+23, INPSO+24, OPSO+16~*, OPSO+17, OPSO+18, OPSO+19 |
TYPE | NEWORDER~, NEWORDER+9, NEWORDER+10, NEWORDER+11, NEWORDER+13, NEWORDER+15, NEWORDER+16 |
U | GETMEALS+18, INPPD+5, INPPD+11, INPPD+15, INPSF+12, INPSF+13, INPSF+15, INPSF+27, INPSF+28, INPSO+15 , INPSO+26, INPSO+30, INPTF+12, INPTF+14, INPTF+15, INPTF+16, INPTF+22, INPTF+24, INPTF+28, OPRM+6 , OPSO+9, OPSO+10, OPSO+20, OPSO+22, OPSF+12, OPSF+14, OPSF+21, OPTF+8, OPSM+5, OPGM+5 , GETDATES+17, GETDATES+18, MEALCHK+2, MEALCHK+3 |
ZDATE | INPSO+28~*, INPSO+32, OPSO+24~*, OPSO+26, OPSF+23~*, OPSF+26 |