Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | All

Print Page as PDF

Global: ^FH(118.2

Package: Dietetics

Global: ^FH(118.2

Information

FileMan FileNo	FileMan Filename	Package
118.2	TUBEFEEDING	Dietetics

Description

This file contains the products commonly used for tube-feedings as well as their characteristics such as Kcals/ml, cost, and synonyms.

Accessed By FileMan Db Calls, Total: 3

Pointed To By FileMan Files, Total: 2

Pointer To FileMan Files, Total: 1

Fields, Total: 8

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` LAST EDITED: `JAN 16, 1992` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `This is the name of the tubefeeding product as it will appear on all lists and displays.` DELETE TEST: `1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")` CROSS-REFERENCE: `118.2^B` `1)= S ^FH(118.2,"B",$E(X,1,30),DA)=""` `2)= K ^FH(118.2,"B",$E(X,1,30),DA)` `This is the normal B cross-reference of the NAME field.`
1	DISPENSING UNIT	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-10 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains a title for the dispensing unit such as bottle, can or package.`
2	AMT/UNIT	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S:X[" " X=+X_$P(X," ",2) S:"MG"[$E(X,$L(+X)+1) X=+X_$E(X,$L(+X)+1) S:X["M" X=+X_"ML" K:($L(+X)>10)!($L(X)<1)!(+X>9999)!(+X<0)!("MLG"'[$E(X,$L(X))) X` LAST EDITED: `JUL 27, 2006` HELP-PROMPT: `Enter amount in ML's or in Grams. Amount cannot exceed 9999. The following are examples of valid entries 22ML, 40GRAMS, 20 G, or 100 M.` DESCRIPTION: `This is the number of ml's or grams of product contained in the dispensing unit. For products which require reconstitution with water, it is the number of ml's after reconstitution.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
3	KCAL/ML	0;4	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>1000)!(X<.1)!(X?.E1"."3N.N) X` LAST EDITED: `APR 22, 2005` HELP-PROMPT: `Type a Number between .1 and 1000, 2 Decimal Digits` DESCRIPTION: `This field contains the number of KiloCalories per ml of product.`
5	COST		COMPUTED	MUMPS CODE: `X ^DD(118.2,5,9.2) S X=$P(Y(118.2,5,101),U,13) S D0=Y(118.2,5,80) S X=$J(X,0,2)` `9.2 = S Y(118.2,5,80)=$S($D(D0):D0,1:""),Y(118.2,5,1)=$S($D(^FH(118.2,D0,0)):^(0),1:""),D0=$P(Y(118.2,5,1),U,7) S:'$D(^FH(114,+D0,0)) D0=-1 S Y(118.2,5,101)=$S($D(^FH(114,D0,0)):^(0),1:"")` ALGORITHM: `CORRESPONDING RECIPE:COST/PORTION (ALWAYS 2 DECIMAL DIGITS)` LAST EDITED: `SEP 28, 1985` HELP-PROMPT: `TYPE A NUMBER BETWEEN 0 AND 100` DESCRIPTION: `This is the portion cost of the tubefeeding and is a computed field which obtains the value from the recipe file based upon the 'Corresponding Recipe' pointer.`
10	SYNONYM	1;0	Multiple #118.21	118.21 DESCRIPTION: `This multiple contains alternate names or synonyms for the product. These names should include any names commonly known or used by ward/medical personnel.`
11	CORRESPONDING RECIPE	0;7	POINTER TO RECIPE FILE (#114)	RECIPE(#114) LAST EDITED: `SEP 29, 1990` DESCRIPTION: `This field is a pointer to the recipe in file 114 (the Recipe file) which contains the ingredients for this feeding. Cost and other data for this feeding will be retrieved from the recipe file.`
99	INACTIVE?	I;1	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `AUG 13, 1986` DESCRIPTION: `This field, if answered YES, prohibits further selection of this item by ward or dietetic personnel.` CROSS-REFERENCE: `118.2^AC^MUMPS` `1)= K:X'="Y" ^FH(118.2,DA,"I")` `2)= K ^FH(118.2,DA,"I")` `This cross-reference is used to create an 'I' node for inactive entries.`

Found Entries, Total: 8

ICR, Total: 1

Info | Desc | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | All