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

FHINI048.m

Go to the documentation of this file.
FHINI048	; ; 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,1392,1)
	;;=5.2^6.4^4.5^97^82^^^114^1.9^^111^133^339^^^^^340^0^.06
	;;^UTILITY(U,$J,112,1392,2)
	;;=.18^.9^^^^^0^^36^3^^^^1.8
	;;^UTILITY(U,$J,112,1392,4)
	;;=^^^^^^2
	;;^UTILITY(U,$J,112,1392,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1393,0)
	;;=SOUP, OYSTER STEW, HOME PREP, 1 PART OYSTER TO 3 PARTS MILK^1452-0^cups^240^100^N
	;;^UTILITY(U,$J,112,1393,1)
	;;=4.9^5.3^4.7^86^83.7^^^117^1.4^^109^138^203^^^^^280^0^.06
	;;^UTILITY(U,$J,112,1393,2)
	;;=.18^.7^^^^^0^^29^3^^^^1.4
	;;^UTILITY(U,$J,112,1393,4)
	;;=^^^^^^1
	;;^UTILITY(U,$J,112,1393,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1394,0)
	;;=PANCAKES, MADE FR HOME RECIPE, ENR^18-293^cakes^27^100^N
	;;^UTILITY(U,$J,112,1394,1)
	;;=6.4^9.7^28.3^227^52.9^^^219^1.8^16^159^132^439^.56^.049^.2^^196^.3^.201
	;;^UTILITY(U,$J,112,1394,2)
	;;=.281^1.567^.405^.046^12^.22^3.913^.51^59^2.122^2.474^4.447^54^2.6
	;;^UTILITY(U,$J,112,1394,3)
	;;=.08^.237^.297^.513^.321^.147^.116^.319^.24^.335^.28^.152^.245^.42^1.57^.198^.576^.363
	;;^UTILITY(U,$J,112,1394,4)
	;;=.028^.031^.122^1.354^.078^.508^2.375^.018
	;;^UTILITY(U,$J,112,1394,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1395,0)
	;;=PANCAKES FROM MIX, PLAIN AND BUTTERMILK, MADE W/MILK^1456-0^cakes^27^100^N
	;;^UTILITY(U,$J,112,1395,1)
	;;=6.1^5.6^31.9^202^53.9^^^221^.9^^242^156^451^^^^^120^0^.14
	;;^UTILITY(U,$J,112,1395,2)
	;;=.23^.8^^^^^0^^11^2^^^^2.5
	;;^UTILITY(U,$J,112,1395,4)
	;;=^^^^^^3
	;;^UTILITY(U,$J,112,1395,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1396,0)
	;;=PANCAKES FROM MIX, PLAIN AND BUTTERMILK, MADE W/EGG&MILK^1457-0^cakes^27^100^N
	;;^UTILITY(U,$J,112,1396,1)
	;;=7.2^7.3^32.4^225^50.6^^^215^1.2^^260^154^564^^^^^250^.5^.15
	;;^UTILITY(U,$J,112,1396,2)
	;;=.24^.8^^^^^1.03^^74^2.58^^^^2.5
	;;^UTILITY(U,$J,112,1396,4)
	;;=^^^^^^3.09
	;;^UTILITY(U,$J,112,1396,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1397,0)
	;;=PANCAKES, MADE FR BUCKWHEAT MIX, W/EGG AND MILK^18-296^cakes^27^100^N
	;;^UTILITY(U,$J,112,1397,1)
	;;=7.9^7.6^28.2^208^53.7^^^256^1.88^56^407^233^533^1.17^.114^.651^^232^.6^.181
	;;^UTILITY(U,$J,112,1397,2)
	;;=.26^1.345^.507^.143^17^.32^2.498^.307^66^1.973^2.021^2.832^67^2.7^^^2.3
	;;^UTILITY(U,$J,112,1397,3)
	;;=.107^.306^.371^.628^.434^.168^.14^.369^.277^.433^.395^.191^.342^.583^1.664^.304^.593^.435
	;;^UTILITY(U,$J,112,1397,4)
	;;=.037^.041^.15^1.203^.086^.436^1.918^.021
	;;^UTILITY(U,$J,112,1397,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1398,0)
	;;=PARSNIPS, RAW^11-298^cups^133^85^N
	;;^UTILITY(U,$J,112,1398,1)
	;;=1.2^.3^17.99^75^79.53^^^36^.59^29^71^375^10^.59^.12^.56^^0^17^.09
	;;^UTILITY(U,$J,112,1398,2)
	;;=.05^.7^.6^.09^66.8^0^.041^.003^0^.05^.112^.047^0^.98^^^4.9
	;;^UTILITY(U,$J,112,1398,4)
	;;=^^.003^.03^.003^.014^.102^^1
	;;^UTILITY(U,$J,112,1398,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1399,0)
	;;=PARSNIPS, CKD, WO/SALT^11-299^cups^156^100^N
	;;^UTILITY(U,$J,112,1399,1)
	;;=1.32^.3^19.53^81^77.72^^^37^.58^29^69^367^10^.26^.138^.294^^0^13^.083
	;;^UTILITY(U,$J,112,1399,2)
	;;=.051^.724^.588^.093^58.2^0^.041^.003^0^.05^.112^.047^0^1.13^^^4.2
	;;^UTILITY(U,$J,112,1399,4)
	;;=^^.003^.03^.003^.014^.102
	;;^UTILITY(U,$J,112,1399,20)
	;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
	;;^UTILITY(U,$J,112,1400,0)
	;;=PARSNIPS, CKD, W/SALT^11-808^cups^156^100^N
	;;^UTILITY(U,$J,112,1400,1)
	;;=1.32^.3^19.53^81^77.72^^^37^.58^29^69^367^246^.26^.138^.294^^0^13^.083
	;;^UTILITY(U,$J,112,1400,2)
	;;=.051^.724^.588^.093^58.2^0^.041^.003^0^.05^.112^.047^0^1.13
	;;^UTILITY(U,$J,112,1400,4)
	;;=^^.003^.03^.003^.014^.102
	;;^UTILITY(U,$J,112,1400,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1401,0)
	;;=PASTINAS, ENR, DRY, W/EGG^1475-0^cups^170^^N
	;;^UTILITY(U,$J,112,1401,1)
	;;=12.9^4.1^71.8^383^10.4^^^35^2.9^^194^136^5^^^^^220^0^.88
	;;^UTILITY(U,$J,112,1401,2)
	;;=.38^6^^^^^.29^^94^1.31
	;;^UTILITY(U,$J,112,1401,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1402,0)
	;;=PASTINAS, ENR, DRY, VEGETABLE(CARROT)^1476-0^oz.^28.3^^N
	;;^UTILITY(U,$J,112,1402,1)
	;;=11.9^1.6^75.7^371^10^^^38^2.9^^160^136^5^^^^^730^0^.88
	;;^UTILITY(U,$J,112,1402,2)
	;;=.38^6^^^^^0^^0^0
	;;^UTILITY(U,$J,112,1402,20)
	;;=USDA  Std. Reference, Release 8
	;;^UTILITY(U,$J,112,1403,0)
	;;=PASTINAS, ENR, DRY, VEGETABLE(SPINACH)^1477-0^oz.^28.3^^N
	;;^UTILITY(U,$J,112,1403,1)
	;;=12.4^1.6^74.8^368^10.1^^^63^2.9^^173^136^5^^^^^640^0^.88
	;;^UTILITY(U,$J,112,1403,2)
	;;=.38^6^^^^^0^^0^0