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

FHINI03K.m

Go to the documentation of this file.
FHINI03K	; ; 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,1126,2)
	;;=1.5^17.6^.393^1.8^353^5.3^^^0^^^^1324^2^^^2.8
	;;^UTILITY(U,$J,112,1126,3)
	;;=.048^.201^.237^.73^.152^.124^.133^.301^.232^.307^.264^.148^.432^.396^1.286^.216^.503^.279
	;;^UTILITY(U,$J,112,1126,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1127,0)
	;;=CEREALS, KIX, (CORN W/OTHER GRNS)^8-048^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1127,1)
	;;=9^2.3^82.6^389^3.2^^^125^28.6^43^138^157^1023^.87^.165^1.148^^4409^53^1.3
	;;^UTILITY(U,$J,112,1127,2)
	;;=1.5^17.6^.674^1.8^353^5.3^.83^.03^0^.63^.56^.87^1324^3^^^1.8
	;;^UTILITY(U,$J,112,1127,3)
	;;=.072^.31^.363^1.145^.228^.193^.205^.463^.36^.473^.396^.229^.676^.604^1.982^.327^.789^.431
	;;^UTILITY(U,$J,112,1127,4)
	;;=^^^.3^^.32^.56
	;;^UTILITY(U,$J,112,1127,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1128,0)
	;;=CEREALS, LIFE, PLAIN & CINN PRODUCTS, (OAT W/OTHER GRNS)^8-049^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1128,1)
	;;=18.4^1.9^71.6^369^4.5^^^350^26.42^32^540^447^521^3.3^.537^3.44^^67^^2.17
	;;^UTILITY(U,$J,112,1128,2)
	;;=2.27^26.44^1.11^.191^84^0^^^0^^^^^3.6^^^6
	;;^UTILITY(U,$J,112,1128,3)
	;;=.264^.74^.977^1.573^1.047^.34^.378^1.001^.728^1.103^1.298^.468^.926^1.817^4.053^.864^1.212^.971
	;;^UTILITY(U,$J,112,1128,4)
	;;=^^^^^^^^^23.6
	;;^UTILITY(U,$J,112,1128,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1129,0)
	;;=CEREALS, MOST, (WHEAT BRAN,WHEAT)^8-051^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1129,1)
	;;=14.2^1.1^76.2^337^4.6^^^152^63.5^198^695^653^530^5.3^.56^6.978^^17637^212^5.3
	;;^UTILITY(U,$J,112,1129,2)
	;;=6^70.5^1.348^7.1^1411^21.2^^^0^^^^5296^3.9^^^14.1
	;;^UTILITY(U,$J,112,1129,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1130,0)
	;;=CEREALS, NATURE VALLEY GRANOLA, TSTD OAT MIX, (OATS,SOY)^8-052^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1130,1)
	;;=10.2^17.4^66.8^445^4^^^63^3.34^102^313^344^206^1.94^.325^^^66^0^.35
	;;^UTILITY(U,$J,112,1130,2)
	;;=.17^.73^.824^.083^75^0^2.32^.12^0^11.53^2.59^2.43^^1.6^^^5.3
	;;^UTILITY(U,$J,112,1130,3)
	;;=.138^.358^.471^.783^.417^.172^.254^.558^.365^.6^.77^.232^.551^.9^2.34^.556^.575^.481
	;;^UTILITY(U,$J,112,1130,4)
	;;=.72^5.35^2.02^1.85^.06^.45^2.53
	;;^UTILITY(U,$J,112,1130,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1131,0)
	;;=CEREALS, 100% BRAN, (WHEAT BRAN,BARLEY)^8-053^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1131,1)
	;;=12.5^5^72.9^269^3^^^70^12.3^473^1214^1248^693^8.69^1.577^9.03^^0^95^2.4
	;;^UTILITY(U,$J,112,1131,2)
	;;=2.7^31.7^1.93^3.2^71^9.5^2.65^.19^0^.89^.87^2.84^0^6.6^^^29.6
	;;^UTILITY(U,$J,112,1131,3)
	;;=.193^.406^.399^.742^.485^.177^.243^.481^.355^.586^.876^.342^.611^.914^2.429^.725^.771^.561
	;;^UTILITY(U,$J,112,1131,4)
	;;=^^.01^.83^.02^.05^.85^^^8
	;;^UTILITY(U,$J,112,1131,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1132,0)
	;;=CEREALS, 100% NATURAL CEREAL, PLAIN, (OATS,WHEAT)^8-054^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1132,1)
	;;=11.7^21.5^62.7^470^2.2^^^174^2.95^120^368^494^43^2.26^.442^1.72^^58^0^.3
	;;^UTILITY(U,$J,112,1132,2)
	;;=.54^2.28^.799^.18^30^.128^1.86^.07^.63^14.47^4.11^1.93^^2^^^8.5
	;;^UTILITY(U,$J,112,1132,3)
	;;=.162^.435^.588^.963^.565^.217^.221^.615^.44^.694^.8^.29^.546^.988^2.848^.531^.876^.589
	;;^UTILITY(U,$J,112,1132,4)
	;;=.94^6.95^2.62^1.92^.09^.57^4.02^^^17.3
	;;^UTILITY(U,$J,112,1132,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1133,0)
	;;=CEREALS, 100% NATURAL CEREAL, W/APPLE & CINN, (OATS,WHEAT)^8-055^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1133,1)
	;;=10.3^18.8^67.1^459^1.9^^^151^2.78^69^337^494^50^1.92^.407^1.81^^55^1^.32
	;;^UTILITY(U,$J,112,1133,2)
	;;=.55^1.8^1.05^.103^16^.287^1.23^.06^1.06^14.87^1.76^1.28^^2^^^6.6
	;;^UTILITY(U,$J,112,1133,3)
	;;=.149^.392^.529^.861^.526^.203^.202^.544^.398^.624^.641^.254^.48^.846^2.497^.45^.786^.533
	;;^UTILITY(U,$J,112,1133,4)
	;;=.98^7.29^2.75^1.77^.07^.53^1.68
	;;^UTILITY(U,$J,112,1133,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1134,0)
	;;=CEREALS, 100% NATURAL CEREAL, W/RAISINS & DATES^8-056^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,1134,1)
	;;=10.2^18.5^65.8^451^3.5^^^145^2.84^113^316^489^43^1.92^.44^1.67^^55^0^.28
	;;^UTILITY(U,$J,112,1134,2)
	;;=.59^1.9^.854^.15^41^.134^1.49^.06^.67^12.44^3.38^1.55^^2^^^6.6
	;;^UTILITY(U,$J,112,1134,3)
	;;=.14^.375^.503^.825^.488^.188^.188^.524^.375^.595^.678^.249^.47^.851^2.42^.455^.752^.504
	;;^UTILITY(U,$J,112,1134,4)
	;;=.81^5.99^2.26^1.62^.08^.49^3.3
	;;^UTILITY(U,$J,112,1134,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,1135,0)
	;;=CEREALS, PRODUCT 19, (CORN W/OTHER GRNS)^8-058^oz.^28.3^100^N