FHINI03P ; ; 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,1179,1)
;;=2.7^.4^13.7^61^82.7^^^12^.88^45^89^125^1^.74^.133^^^0^0^.1
;;^UTILITY(U,$J,112,1179,2)
;;=.05^1.28^.154^.047^10^0^^^0^^^^0^.5
;;^UTILITY(U,$J,112,1179,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1180,0)
;;=CEREALS, WHEATENA, (WHEAT)^8-143^cups^243^100^N
;;^UTILITY(U,$J,112,1180,1)
;;=2^.5^11.8^56^85.4^^^4^.56^20^60^77^2^.69^.052^.822^^0^0^.01
;;^UTILITY(U,$J,112,1180,2)
;;=.02^.55^.042^.019^7^0^^^0^^^^0^.3^^^2.7
;;^UTILITY(U,$J,112,1180,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1181,0)
;;=CEREALS, WHOLE WHEAT HOT NATURAL CEREAL, WO/SALT, (WHEAT)^8-145^cups^242^100^N
;;^UTILITY(U,$J,112,1181,1)
;;=2^.4^13.7^62^83.6^^^7^.62^22^69^71^0^.48^.083^.583^^0^0^.07
;;^UTILITY(U,$J,112,1181,2)
;;=.05^.89^.167^.073^11^0^^^0^^^^0^.3^^^1.6
;;^UTILITY(U,$J,112,1181,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1182,0)
;;=CEREALS, WHEAT, PUFFED, LOWER FORT (<2% RDA), (WHEAT)^8-146^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1182,1)
;;=14.7^1.2^79.6^364^3^^^28^4.73^145^355^348^4^2.36^.409^1.755^^0^0^.2
;;^UTILITY(U,$J,112,1182,2)
;;=.23^10.8^.518^.17^32^0^^^0^^^^0^1.5^^^7.2
;;^UTILITY(U,$J,112,1182,3)
;;=.226^.45^.626^1.064^.405^.257^.289^.762^.445^.702^.712^.38^.548^.823^4.972^.576^1.537^.808
;;^UTILITY(U,$J,112,1182,4)
;;=^^^^^^^^2^123.1
;;^UTILITY(U,$J,112,1182,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1183,0)
;;=CEREALS, WHEAT, SHREDDED, LARGE BISCUIT, (WHEAT)^8-147^biscuits^23.6^100^N
;;^UTILITY(U,$J,112,1183,1)
;;=10.9^1.3^79.8^352^6.4^^^41^3.15^170^363^327^2^2.51^.502^3.07^^0^0^.28
;;^UTILITY(U,$J,112,1183,2)
;;=.28^4.57^.814^.253^50^0^^^0^^^^0^1.5^^^12.5
;;^UTILITY(U,$J,112,1183,3)
;;=.208^.363^.429^.751^.335^.189^.208^.524^.318^.537^.565^.253^.423^.61^3.18^.466^1.08^.603
;;^UTILITY(U,$J,112,1183,4)
;;=^^^^^^^^.7^5.9
;;^UTILITY(U,$J,112,1183,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1184,0)
;;=CEREALS, WHEAT, SHREDDED, SMALL BISCUIT, (WHEAT)^8-148^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1184,1)
;;=11^2.2^79.8^359^5.3^^^38^4.22^132^353^361^10^3.3^.664^3.07^^0^0^.26
;;^UTILITY(U,$J,112,1184,2)
;;=.28^5.25^.828^.253^50^0^^^0^^^^0^1.7^^^9.8
;;^UTILITY(U,$J,112,1184,3)
;;=.21^.366^.433^.757^.338^.191^.21^.529^.321^.542^.57^.255^.427^.616^3.209^.47^1.09^.608
;;^UTILITY(U,$J,112,1184,4)
;;=^^^^^^^^^5.9
;;^UTILITY(U,$J,112,1184,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1185,0)
;;=CEREALS, NUTRI-GRAIN, BARLEY, (BARLEY)^8-149^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1185,1)
;;=10.9^.8^82.8^372^2.9^^^27^3.53^79^308^263^676^13.2^.6^^^4409^53^1.3
;;^UTILITY(U,$J,112,1185,2)
;;=1.5^17.6^.503^1.8^353^5.3^^^0^^^^1324^2.6^^^5.8
;;^UTILITY(U,$J,112,1185,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1186,0)
;;=CEREALS, NUTRI-GRAIN, CORN, (CORN)^8-150^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1186,1)
;;=8^2.3^84.4^381^2.9^^^3^2.12^64^287^233^658^13.2^.29^^^4409^53^1.3
;;^UTILITY(U,$J,112,1186,2)
;;=1.5^17.6^.58^1.8^353^5.3^^^0^^^^1324^2.4^^^6.2
;;^UTILITY(U,$J,112,1186,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1187,0)
;;=CEREALS, NUTRI-GRAIN, RYE, (RYE)^8-151^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1187,1)
;;=8.7^.7^84.7^359^3.3^^^21^2.82^76^260^179^680^13.2^.342^^^4409^53^1.3
;;^UTILITY(U,$J,112,1187,2)
;;=1.5^17.6^1.34^1.8^353^5.3^^^0^^^^1324^2.6^^^6.4
;;^UTILITY(U,$J,112,1187,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1188,0)
;;=CEREALS, NUTRI-GRAIN, WHEAT, (WHEAT)^8-152^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1188,1)
;;=8.7^1^84.6^360^3^^^28^2.82^78^374^272^680^13.2^.54^^^4409^53^1.3
;;^UTILITY(U,$J,112,1188,2)
;;=1.5^17.6^1.1^1.8^353^5.3^^^0^^^^1324^2.6^^^9.5
;;^UTILITY(U,$J,112,1188,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1189,0)
;;=CEREALS, 40% BRAN FLAKES, RALSTON PURINA, (WHEAT BRAN)^8-153^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1189,1)
;;=11.5^1.4^79.8^324^2.5^^^46^15.9^240^557^584^931^4.16^.73^4.592^^4409^53^1.3
;;^UTILITY(U,$J,112,1189,2)
;;=1.5^17.6^1.384^1.8^353^5.3^^^0^^^^1324^4.8^^^14.1
;;^UTILITY(U,$J,112,1189,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1190,0)
;;=CEREALS, ROMAN MEAL W/OATS, WO/SALT, (WHEAT W/OTHER GRNS)^8-155^cups^240^100^N
;;^UTILITY(U,$J,112,1190,1)
;;=3^.8^14.2^71^81.5^^^11^.58^31^98^107^4^.81^.062^^^9^0^.13
;;^UTILITY(U,$J,112,1190,2)
;;=.09^1.36^.104^.158^10^0^^^0^^^^^.4
FHINI03P ; ; 11-OCT-1995
+1 ;;5.0;Dietetics;;Oct 11, 1995
+2 IF 'DIFQR(112)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
IF X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
IF $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,99)
IF $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,112,1179,1)
+2 ;;=2.7^.4^13.7^61^82.7^^^12^.88^45^89^125^1^.74^.133^^^0^0^.1
+3 ;;^UTILITY(U,$J,112,1179,2)
+4 ;;=.05^1.28^.154^.047^10^0^^^0^^^^0^.5
+5 ;;^UTILITY(U,$J,112,1179,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,1180,0)
+8 ;;=CEREALS, WHEATENA, (WHEAT)^8-143^cups^243^100^N
+9 ;;^UTILITY(U,$J,112,1180,1)
+10 ;;=2^.5^11.8^56^85.4^^^4^.56^20^60^77^2^.69^.052^.822^^0^0^.01
+11 ;;^UTILITY(U,$J,112,1180,2)
+12 ;;=.02^.55^.042^.019^7^0^^^0^^^^0^.3^^^2.7
+13 ;;^UTILITY(U,$J,112,1180,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,1181,0)
+16 ;;=CEREALS, WHOLE WHEAT HOT NATURAL CEREAL, WO/SALT, (WHEAT)^8-145^cups^242^100^N
+17 ;;^UTILITY(U,$J,112,1181,1)
+18 ;;=2^.4^13.7^62^83.6^^^7^.62^22^69^71^0^.48^.083^.583^^0^0^.07
+19 ;;^UTILITY(U,$J,112,1181,2)
+20 ;;=.05^.89^.167^.073^11^0^^^0^^^^0^.3^^^1.6
+21 ;;^UTILITY(U,$J,112,1181,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,1182,0)
+24 ;;=CEREALS, WHEAT, PUFFED, LOWER FORT (<2% RDA), (WHEAT)^8-146^oz.^28.3^100^N
+25 ;;^UTILITY(U,$J,112,1182,1)
+26 ;;=14.7^1.2^79.6^364^3^^^28^4.73^145^355^348^4^2.36^.409^1.755^^0^0^.2
+27 ;;^UTILITY(U,$J,112,1182,2)
+28 ;;=.23^10.8^.518^.17^32^0^^^0^^^^0^1.5^^^7.2
+29 ;;^UTILITY(U,$J,112,1182,3)
+30 ;;=.226^.45^.626^1.064^.405^.257^.289^.762^.445^.702^.712^.38^.548^.823^4.972^.576^1.537^.808
+31 ;;^UTILITY(U,$J,112,1182,4)
+32 ;;=^^^^^^^^2^123.1
+33 ;;^UTILITY(U,$J,112,1182,20)
+34 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+35 ;;^UTILITY(U,$J,112,1183,0)
+36 ;;=CEREALS, WHEAT, SHREDDED, LARGE BISCUIT, (WHEAT)^8-147^biscuits^23.6^100^N
+37 ;;^UTILITY(U,$J,112,1183,1)
+38 ;;=10.9^1.3^79.8^352^6.4^^^41^3.15^170^363^327^2^2.51^.502^3.07^^0^0^.28
+39 ;;^UTILITY(U,$J,112,1183,2)
+40 ;;=.28^4.57^.814^.253^50^0^^^0^^^^0^1.5^^^12.5
+41 ;;^UTILITY(U,$J,112,1183,3)
+42 ;;=.208^.363^.429^.751^.335^.189^.208^.524^.318^.537^.565^.253^.423^.61^3.18^.466^1.08^.603
+43 ;;^UTILITY(U,$J,112,1183,4)
+44 ;;=^^^^^^^^.7^5.9
+45 ;;^UTILITY(U,$J,112,1183,20)
+46 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+47 ;;^UTILITY(U,$J,112,1184,0)
+48 ;;=CEREALS, WHEAT, SHREDDED, SMALL BISCUIT, (WHEAT)^8-148^oz.^28.3^100^N
+49 ;;^UTILITY(U,$J,112,1184,1)
+50 ;;=11^2.2^79.8^359^5.3^^^38^4.22^132^353^361^10^3.3^.664^3.07^^0^0^.26
+51 ;;^UTILITY(U,$J,112,1184,2)
+52 ;;=.28^5.25^.828^.253^50^0^^^0^^^^0^1.7^^^9.8
+53 ;;^UTILITY(U,$J,112,1184,3)
+54 ;;=.21^.366^.433^.757^.338^.191^.21^.529^.321^.542^.57^.255^.427^.616^3.209^.47^1.09^.608
+55 ;;^UTILITY(U,$J,112,1184,4)
+56 ;;=^^^^^^^^^5.9
+57 ;;^UTILITY(U,$J,112,1184,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,1185,0)
+60 ;;=CEREALS, NUTRI-GRAIN, BARLEY, (BARLEY)^8-149^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,1185,1)
+62 ;;=10.9^.8^82.8^372^2.9^^^27^3.53^79^308^263^676^13.2^.6^^^4409^53^1.3
+63 ;;^UTILITY(U,$J,112,1185,2)
+64 ;;=1.5^17.6^.503^1.8^353^5.3^^^0^^^^1324^2.6^^^5.8
+65 ;;^UTILITY(U,$J,112,1185,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,1186,0)
+68 ;;=CEREALS, NUTRI-GRAIN, CORN, (CORN)^8-150^oz.^28.3^100^N
+69 ;;^UTILITY(U,$J,112,1186,1)
+70 ;;=8^2.3^84.4^381^2.9^^^3^2.12^64^287^233^658^13.2^.29^^^4409^53^1.3
+71 ;;^UTILITY(U,$J,112,1186,2)
+72 ;;=1.5^17.6^.58^1.8^353^5.3^^^0^^^^1324^2.4^^^6.2
+73 ;;^UTILITY(U,$J,112,1186,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,1187,0)
+76 ;;=CEREALS, NUTRI-GRAIN, RYE, (RYE)^8-151^oz.^28.3^100^N
+77 ;;^UTILITY(U,$J,112,1187,1)
+78 ;;=8.7^.7^84.7^359^3.3^^^21^2.82^76^260^179^680^13.2^.342^^^4409^53^1.3
+79 ;;^UTILITY(U,$J,112,1187,2)
+80 ;;=1.5^17.6^1.34^1.8^353^5.3^^^0^^^^1324^2.6^^^6.4
+81 ;;^UTILITY(U,$J,112,1187,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,1188,0)
+84 ;;=CEREALS, NUTRI-GRAIN, WHEAT, (WHEAT)^8-152^oz.^28.3^100^N
+85 ;;^UTILITY(U,$J,112,1188,1)
+86 ;;=8.7^1^84.6^360^3^^^28^2.82^78^374^272^680^13.2^.54^^^4409^53^1.3
+87 ;;^UTILITY(U,$J,112,1188,2)
+88 ;;=1.5^17.6^1.1^1.8^353^5.3^^^0^^^^1324^2.6^^^9.5
+89 ;;^UTILITY(U,$J,112,1188,20)
+90 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+91 ;;^UTILITY(U,$J,112,1189,0)
+92 ;;=CEREALS, 40% BRAN FLAKES, RALSTON PURINA, (WHEAT BRAN)^8-153^oz.^28.3^100^N
+93 ;;^UTILITY(U,$J,112,1189,1)
+94 ;;=11.5^1.4^79.8^324^2.5^^^46^15.9^240^557^584^931^4.16^.73^4.592^^4409^53^1.3
+95 ;;^UTILITY(U,$J,112,1189,2)
+96 ;;=1.5^17.6^1.384^1.8^353^5.3^^^0^^^^1324^4.8^^^14.1
+97 ;;^UTILITY(U,$J,112,1189,20)
+98 ;;=USDA Std. Reference, Release 10
+99 ;;^UTILITY(U,$J,112,1190,0)
+100 ;;=CEREALS, ROMAN MEAL W/OATS, WO/SALT, (WHEAT W/OTHER GRNS)^8-155^cups^240^100^N
+101 ;;^UTILITY(U,$J,112,1190,1)
+102 ;;=3^.8^14.2^71^81.5^^^11^.58^31^98^107^4^.81^.062^^^9^0^.13
+103 ;;^UTILITY(U,$J,112,1190,2)
+104 ;;=.09^1.36^.104^.158^10^0^^^0^^^^^.4
