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

FHINI05G.m

Go to the documentation of this file.
FHINI05G	; ; 11-OCT-1995
	;;5.0;Dietetics;;Oct 11, 1995
	Q:'DIFQR(112)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,99) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q	Q
	;;^UTILITY(U,$J,112,1858,0)
	;;=SPAGHETTI, IN TOMATO SAUCE W/CHEESE, HOME RECIPE^2163-0^cups^250^100^N
	;;^UTILITY(U,$J,112,1858,1)
	;;=3.5^3.5^14.8^104^77^^^32^.9^^54^163^382^^^^^430^5^.1
	;;^UTILITY(U,$J,112,1858,2)
	;;=.07^.9^^^^^.28^^3^.8^^^^1.2
	;;^UTILITY(U,$J,112,1858,4)
	;;=^^^^^^2.16
	;;^UTILITY(U,$J,112,1858,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1859,0)
	;;=SPAGHETTI, IN TOMATO SAUCE W/CHEESE, CND^2164-0^cups^250^100^N
	;;^UTILITY(U,$J,112,1859,1)
	;;=2.2^.6^15.4^76^80.1^^^16^1.1^^35^121^382^^^^^370^4^.14
	;;^UTILITY(U,$J,112,1859,2)
	;;=.11^1.8^^^^^0^^3^0^^^^1.7
	;;^UTILITY(U,$J,112,1859,4)
	;;=^^^^^^0
	;;^UTILITY(U,$J,112,1859,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1860,0)
	;;=SPAGHETTI AND MEAT BALLS, IN TOMATO SAUCE, HOME RECIPE^2165-0^servings^537^100^N
	;;^UTILITY(U,$J,112,1860,1)
	;;=7.5^4.7^15.6^134^70^^^50^1.5^^95^268^407^^^^^640^9^.1
	;;^UTILITY(U,$J,112,1860,2)
	;;=.12^1.6^^^^^.36^^30^1.34^^^^2.2
	;;^UTILITY(U,$J,112,1860,4)
	;;=^^^^^^2.55
	;;^UTILITY(U,$J,112,1860,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1861,0)
	;;=SPAGHETTI AND MEAT BALLS, IN TOMATO SAUCE, CND^2166-0^cups^250^100^N
	;;^UTILITY(U,$J,112,1861,1)
	;;=4.9^4.1^11.4^103^78^^^21^1.3^^45^98^488^^^^^400^2^.06
	;;^UTILITY(U,$J,112,1861,2)
	;;=.07^.9^^^^^1.57^^9^.86^^^^1.6
	;;^UTILITY(U,$J,112,1861,4)
	;;=^^^^^^1.3
	;;^UTILITY(U,$J,112,1861,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1862,0)
	;;=RICE, SPANISH STYLE, HOME RECIPE^2168-0^cups^245^465^N
	;;^UTILITY(U,$J,112,1862,1)
	;;=1.8^1.7^16.6^87^78.5^^^14^.6^^39^231^316^^^^^660^15^.04
	;;^UTILITY(U,$J,112,1862,2)
	;;=.03^.7^^^^^0^^0^0^^^^1.4
	;;^UTILITY(U,$J,112,1862,4)
	;;=^^^^^^0
	;;^UTILITY(U,$J,112,1862,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1863,0)
	;;=SPINACH, RAW^11-457^cups^55^72^N
	;;^UTILITY(U,$J,112,1863,1)
	;;=2.86^.35^3.5^22^91.58^^^99^2.71^79^49^558^79^.53^.13^.897^^6715^28.1^.078
	;;^UTILITY(U,$J,112,1863,2)
	;;=.189^.724^.065^.195^194.4^0^.022^.115^0^.056^.01^.146^672^1.72^^^2.7
	;;^UTILITY(U,$J,112,1863,3)
	;;=.039^.122^.147^.223^.174^.053^.035^.129^.108^.161^.162^.064^.142^.24^.343^.134^.112^.104
	;;^UTILITY(U,$J,112,1863,4)
	;;=^^.008^.041^.004^.003^.004^^400^1
	;;^UTILITY(U,$J,112,1863,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1864,0)
	;;=SPINACH, CKD WO/SALT^11-458^cups^180^100^N
	;;^UTILITY(U,$J,112,1864,1)
	;;=2.97^.26^3.75^23^91.21^^^136^3.57^87^56^466^70^.76^.174^.935^^8190^9.8^.095
	;;^UTILITY(U,$J,112,1864,2)
	;;=.236^.49^.145^.242^145.8^0^.016^.085^0^.042^.007^.108^819^1.81^^^1.8
	;;^UTILITY(U,$J,112,1864,3)
	;;=.04^.127^.152^.231^.182^.055^.035^.134^.113^.168^.168^.066^.147^.25^.357^.14^.116^.107
	;;^UTILITY(U,$J,112,1864,4)
	;;=^^.006^.031^.003^.003^.003^^^1.5
	;;^UTILITY(U,$J,112,1864,20)
	;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
	;;^UTILITY(U,$J,112,1865,0)
	;;=SPINACH, CKD W/SALT^11-854^cups^180^100^N
	;;^UTILITY(U,$J,112,1865,1)
	;;=2.97^.26^3.75^23^91.21^^^136^3.57^87^56^466^306^.76^.174^.935^^8190^9.8^.095
	;;^UTILITY(U,$J,112,1865,2)
	;;=.236^.49^.145^.242^145.8^0^.016^.085^0^.042^.007^.108^819^1.81
	;;^UTILITY(U,$J,112,1865,3)
	;;=.04^.127^.152^.231^.182^.055^.035^.134^.113^.168^.168^.066^.147^.25^.357^.14^.116^.107
	;;^UTILITY(U,$J,112,1865,4)
	;;=^^.006^.031^.003^.003^.003
	;;^UTILITY(U,$J,112,1865,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1867,0)
	;;=SPINACH, CND, REG PK, DRAINED SOLIDS^11-461^cups^205^100^N
	;;^UTILITY(U,$J,112,1867,1)
	;;=2.81^.5^3.4^23^91.78^^^127^2.3^76^44^346^27^.46^.18^.597^^8776^14.3^.016
	;;^UTILITY(U,$J,112,1867,2)
	;;=.138^.388^.047^.1^97.8^0^.031^.165^0^.081^.014^.209^878^1.51
	;;^UTILITY(U,$J,112,1867,3)
	;;=.038^.12^.144^.219^.172^.052^.034^.127^.106^.158^.159^.062^.139^.236^.338^.132^.11^.102
	;;^UTILITY(U,$J,112,1867,4)
	;;=^^.011^.059^.006^.005^.006
	;;^UTILITY(U,$J,112,1867,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1868,0)
	;;=SPINACH, CND, DIET PK, LO NA^11-855^cups^232^100^N
	;;^UTILITY(U,$J,112,1868,1)
	;;=2.11^.37^2.92^19^93.22^^^83^1.58^56^32^230^75^.42^.116^.493^^6432^13.5^.018
	;;^UTILITY(U,$J,112,1868,2)
	;;=.106^.271^.038^.08^58^0^.023^.122^0^.06^.01^.155^643^1.38^^^2.2
	;;^UTILITY(U,$J,112,1868,3)
	;;=.028^.09^.108^.164^.129^.039^.025^.095^.08^.119^.119^.047^.104^.177^.253^.099^.082^.076
	;;^UTILITY(U,$J,112,1868,4)
	;;=^^.008^.044^.005^.004^.005
	;;^UTILITY(U,$J,112,1868,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1870,0)
	;;=SPINACH, FRZ, CHOPPED, CKD WO/SALT^11-464^cups^205^100^N