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

FHINI07S.m

Go to the documentation of this file.
FHINI07S	; ; 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,2702,4)
	;;=^^.146^.842^.84^.237^1.474^.195
	;;^UTILITY(U,$J,112,2702,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2703,0)
	;;=CATFISH, CHANNEL, BREADED AND FRIED^15-011^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2703,1)
	;;=18.09^13.33^8.04^229^58.81^^^44^1.43^27^216^340^280^.86^.101^.04^^28^0^.073
	;;^UTILITY(U,$J,112,2703,2)
	;;=.133^2.282^.73^.19^16.5^1.9^2.616^.178^81^3.288^5.611^3.325^8^1.26
	;;^UTILITY(U,$J,112,2703,3)
	;;=.2^.79^.836^1.508^1.597^.527^.205^.726^.622^.943^1.077^.53^1.103^1.817^2.72^.851^.686^.764
	;;^UTILITY(U,$J,112,2703,4)
	;;=^^.091^2.008^.171^1.169^5.347^.098
	;;^UTILITY(U,$J,112,2703,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2704,0)
	;;=CAVIAR, BLACK AND RED, GRANULAR^15-012^tbsp.^16^100^N
	;;^UTILITY(U,$J,112,2704,1)
	;;=24.6^17.9^4^252^47.5^^^275^11.88^300^356^181^1500^.95^.11^.05^^1868^0^.19
	;;^UTILITY(U,$J,112,2704,2)
	;;=.62^.12^3.5^.32^50^20^^^588^4.06^4.64^7.41^560^6.5^^^0
	;;^UTILITY(U,$J,112,2704,3)
	;;=.323^1.263^1.035^2.133^1.834^.646^.449^1.071^.968^1.263^1.59^.649^1.653^2.385^3.633^.74^1.2^1.897
	;;^UTILITY(U,$J,112,2704,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2705,0)
	;;=CELERIAC, BOILED, DRAINED, W/SALT^11-763^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2705,1)
	;;=.96^.19^5.9^25^92.3^^^26^.43^12^66^173^297^.2^.043^.096^^0^3.6^.027
	;;^UTILITY(U,$J,112,2705,2)
	;;=.037^.427^.203^.101^3.4^0^^^0^^^^0^.64
	;;^UTILITY(U,$J,112,2705,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2706,0)
	;;=CELERIAC, BOILED, DRAINED, WO/SALT^11-142^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2706,1)
	;;=.96^.19^5.9^25^92.3^^^26^.43^12^66^173^61^.2^.043^.096^^0^3.6^.027
	;;^UTILITY(U,$J,112,2706,2)
	;;=.037^.427^.203^.101^3.4^0^^^0^^^^0^.64
	;;^UTILITY(U,$J,112,2706,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2707,0)
	;;=CELERIAC, RAW^11-141^cups^156^86^N
	;;^UTILITY(U,$J,112,2707,1)
	;;=1.5^.3^9.2^39^88^^^43^.7^20^115^300^100^.33^.07^.158^^0^8^.05
	;;^UTILITY(U,$J,112,2707,2)
	;;=.06^.7^.352^.165^7.6^0^^^0^^^^0^1^^^4
	;;^UTILITY(U,$J,112,2707,20)
	;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
	;;^UTILITY(U,$J,112,2708,0)
	;;=CEREALS, 40% BRAN FLAKES, POST, (WHEAT BRAN)^8-029^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2708,1)
	;;=11.3^1.6^79.3^324^3^^^44^15.9^216^630^533^917^5.3^.684^4.843^^4409^0^1.3
	;;^UTILITY(U,$J,112,2708,2)
	;;=1.5^17.6^1.384^1.8^353^5.3^^^0^^^^1324^4.8^^^19.5
	;;^UTILITY(U,$J,112,2708,3)
	;;=.197^.363^.424^.754^.376^.177^.229^.52^.338^.551^.669^.289^.48^.699^3.106^.562^1.007^.58
	;;^UTILITY(U,$J,112,2708,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2709,0)
	;;=CEREALS, ALPHA-BITS, (OAT W/OTHER GRNS)^8-002^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2709,1)
	;;=7.6^2.3^86.6^392^1.3^^^29^9.5^59^181^388^635^5.3^.248^1.88^^4409^0^1.3
	;;^UTILITY(U,$J,112,2709,2)
	;;=1.5^17.6^.514^1.8^353^5.3^^^0^^^^1324^2.1^^^4.3
	;;^UTILITY(U,$J,112,2709,3)
	;;=.091^.267^.341^.706^.279^.139^.187^.413^.285^.438^.505^.181^.464^.629^1.743^.376^.506^.364
	;;^UTILITY(U,$J,112,2709,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2710,0)
	;;=CEREALS, APPLE JACKS, (CORN W/OTHER GRNS)^8-003^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2710,1)
	;;=5.3^.5^90.7^387^2.3^^^11^15.9^22^106^81^440^13.2^.35^.7^^4409^53^1.3
	;;^UTILITY(U,$J,112,2710,2)
	;;=1.5^17.6^.352^1.8^353^0^^^0^^^^1324^1.2^^^1.9
	;;^UTILITY(U,$J,112,2710,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2711,0)
	;;=CEREALS, CAP'N CRUNCH'S CRUNCHBERRIES, (CORN,OAT)^8-011^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2711,1)
	;;=5.2^8.4^81.5^417^2.6^^^31^25.82^39^133^140^696^10.17^.12^.693^^127^0^1.7
	;;^UTILITY(U,$J,112,2711,2)
	;;=1.92^23.24^8.548^2.648^365^7.157^1.3^.03^.21^5.52^1.1^1.34^13^2.3^^^1.9
	;;^UTILITY(U,$J,112,2711,3)
	;;=.045^.183^.221^.647^.149^.112^.117^.27^.21^.28^.237^.133^.379^.359^1.153^.191^.452^.252
	;;^UTILITY(U,$J,112,2711,4)
	;;=.35^2.6^.98^.81^.03^.22^1.07
	;;^UTILITY(U,$J,112,2711,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2712,0)
	;;=CEREALS, CAP'N CRUNCH'S PEANUT BUTTER, (CORN W/OTHER GRNS)^8-012^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2712,1)
	;;=7.2^12.9^75.7^439^1.8^^^20^26.03^53^139^162^765^10.82^.16^.72^^156^0^1.72
	;;^UTILITY(U,$J,112,2712,2)
	;;=2^25.64^13.633^2.978^696^6.574^2.87^.02^0^5.44^3.92^2.89^16^2.4^^^1.3
	;;^UTILITY(U,$J,112,2712,3)
	;;=.07^.239^.299^.74^.231^.125^.137^.38^.303^.372^.578^.19^.437^.678^1.527^.35^.504^.365
	;;^UTILITY(U,$J,112,2712,4)
	;;=.26^1.92^.72^1.34^.02^.5^3.84
	;;^UTILITY(U,$J,112,2712,20)
	;;=USDA Std. Reference, Release 10