FHINI07U ; ; 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,2723,2)
;;=1.5^17.6^.433^1.8^15^5.3^.52^.02^.21^2.63^.33^.54^1324^3.5^^^3.5
;;^UTILITY(U,$J,112,2723,3)
;;=.062^.198^.237^.681^.162^.123^.117^.29^.224^.298^.222^.148^.37^.338^1.461^.191^.591^.295
;;^UTILITY(U,$J,112,2723,4)
;;=.17^1.27^.48^.35^.01^.1^.31
;;^UTILITY(U,$J,112,2723,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2724,0)
;;=CEREALS, GRAHAM CRACKOS, (WHEAT)^8-036^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2724,1)
;;=7.5^.6^86.4^361^3^^^46^6.3^83^219^361^653^5.3^.26^2.66^^4409^53^1.3
;;^UTILITY(U,$J,112,2724,2)
;;=1.5^17.6^.659^1.8^353^0^^^0^^^^1324^2.5^^^6.1
;;^UTILITY(U,$J,112,2724,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2725,0)
;;=CEREALS, KING VITAMAN, (CORN W/OTHER GRNS)^8-047^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2725,1)
;;=5.2^5.5^84.9^406^1.8^^^8^60.66^34^128^123^769^.78^.133^.44^^11370^158^4.4
;;^UTILITY(U,$J,112,2725,2)
;;=5.05^61.48^.2^5.62^1362^19.645^.93^.02^0^3.51^.76^.95^3414^2.5^^^1.4
;;^UTILITY(U,$J,112,2725,3)
;;=.043^.184^.218^.673^.136^.115^.12^.273^.214^.279^.236^.135^.397^.357^1.164^.194^.462^.254
;;^UTILITY(U,$J,112,2725,4)
;;=.22^1.64^.62^.53^.02^.14^.74
;;^UTILITY(U,$J,112,2725,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2726,0)
;;=CEREALS, LUCKY CHARMS, (OAT W/OTHER GRNS)^8-050^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2726,1)
;;=9.1^3.8^81.7^390^2.8^^^113^15.9^84^277^207^710^1.76^.344^2.53^^4409^53^1.3
;;^UTILITY(U,$J,112,2726,2)
;;=1.5^17.6^.633^1.8^20^5.3^1.45^.08^0^.7^1.33^1.54^1324^2.6^^^4.3
;;^UTILITY(U,$J,112,2726,3)
;;=.124^.317^.418^.697^.372^.151^.226^.497^.325^.534^.681^.206^.49^.802^2.087^.494^.512^.428
;;^UTILITY(U,$J,112,2726,4)
;;=^^.01^.61^.01^.05^1.32^^^19.8
;;^UTILITY(U,$J,112,2726,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2727,0)
;;=CEREALS, QUISP, (CORN,OAT)^8-059^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2727,1)
;;=5^7.2^83.3^414^2^^^31^21.05^41^83^149^803^.61^.034^.48^^155^0^1.79
;;^UTILITY(U,$J,112,2727,2)
;;=2.53^19.34^.125^3.031^27^8.609^1^.03^0^4.94^.88^1.02^16^2.4^^^1.8
;;^UTILITY(U,$J,112,2727,3)
;;=.042^.175^.21^.632^.134^.108^.116^.263^.202^.269^.233^.128^.376^.347^1.122^.19^.437^.243
;;^UTILITY(U,$J,112,2727,4)
;;=.32^2.37^.89^.68^.02^.19^.85
;;^UTILITY(U,$J,112,2727,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2728,0)
;;=CEREALS, RAISIN BRAN, POST, (WHEAT)^8-061^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2728,1)
;;=9.3^1.9^75.6^307^9.2^^^47^15.9^170^419^616^652^5.3^.547^3.715^^4409^0^1.3
;;^UTILITY(U,$J,112,2728,2)
;;=1.5^17.6^.741^1.8^353^5.3^^^0^^^^1324^4^^^14.1
;;^UTILITY(U,$J,112,2728,3)
;;=.138^.26^.304^.538^.27^.129^.164^.37^.24^.394^.47^.205^.346^.504^2.207^.402^.714^.412
;;^UTILITY(U,$J,112,2728,4)
;;=^^^^^^^^^7
;;^UTILITY(U,$J,112,2728,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2729,0)
;;=CEREALS, RAISIN BRAN, RALSTON PURINA, (WHEAT)^8-062^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2729,1)
;;=7.8^.5^83^318^7.3^^^48^48.8^151^442^513^868^2.99^.545^3.789^^3307^3^1
;;^UTILITY(U,$J,112,2729,2)
;;=1.1^13.2^.741^1.3^265^4^^^0^^^^993^1.3^^^13.4
;;^UTILITY(U,$J,112,2729,4)
;;=^^^^^^^^^7
;;^UTILITY(U,$J,112,2729,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2730,0)
;;=CEREALS, SUGAR FROSTED FLAKES, RALSTON PURINA, (CORN)^8-070^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2730,1)
;;=5.3^1.4^90.1^391^1.5^^^11^2.5^7^25^63^649^2.15^.067^.06^^4409^53^1.3
;;^UTILITY(U,$J,112,2730,2)
;;=1.5^17.6^.035^1.8^7^5.3^^^0^^^^1324^1.7^^^2.2
;;^UTILITY(U,$J,112,2730,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2731,0)
;;=CEREALS, TRIX, (CORN W/OTHER GRNS)^8-078^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2731,1)
;;=5.4^1.4^88.8^385^2.5^^^20^15.9^22^67^94^638^.46^.157^.477^^4409^53^1.3
;;^UTILITY(U,$J,112,2731,2)
;;=1.5^17.6^.292^1.8^9^5.3^^^0^^^^1324^2^^^1.2
;;^UTILITY(U,$J,112,2731,3)
;;=.04^.194^.222^.754^.131^.124^.127^.288^.228^.29^.228^.145^.439^.362^1.231^.19^.517^.27
;;^UTILITY(U,$J,112,2731,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2732,0)
;;=CEREALS, WAFFELOS, (WHEAT W/OTHER GRNS)^8-079^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2732,1)
;;=5.6^4.2^86.3^405^2.5^^^28^15.9^21^815^88^416^.81^.113^^^4409^53^1.3
;;^UTILITY(U,$J,112,2732,2)
;;=1.5^17.6^.176^1.8^11^5.3^^^0^^^^1324^1.4
;;^UTILITY(U,$J,112,2732,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2733,0)
;;=CHAYOTE, FRUIT, BOILED, DRAINED, W/SALT^11-766^cups^160^100^N
;;^UTILITY(U,$J,112,2733,1)
;;=.62^.48^5.09^24^93.43^^^13^.22^12^29^173^237^.31^.11^.169^^47^8^.026
FHINI07U ; ; 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,2723,2)
+2 ;;=1.5^17.6^.433^1.8^15^5.3^.52^.02^.21^2.63^.33^.54^1324^3.5^^^3.5
+3 ;;^UTILITY(U,$J,112,2723,3)
+4 ;;=.062^.198^.237^.681^.162^.123^.117^.29^.224^.298^.222^.148^.37^.338^1.461^.191^.591^.295
+5 ;;^UTILITY(U,$J,112,2723,4)
+6 ;;=.17^1.27^.48^.35^.01^.1^.31
+7 ;;^UTILITY(U,$J,112,2723,20)
+8 ;;=USDA Std. Reference, Release 10
+9 ;;^UTILITY(U,$J,112,2724,0)
+10 ;;=CEREALS, GRAHAM CRACKOS, (WHEAT)^8-036^oz.^28.3^100^N
+11 ;;^UTILITY(U,$J,112,2724,1)
+12 ;;=7.5^.6^86.4^361^3^^^46^6.3^83^219^361^653^5.3^.26^2.66^^4409^53^1.3
+13 ;;^UTILITY(U,$J,112,2724,2)
+14 ;;=1.5^17.6^.659^1.8^353^0^^^0^^^^1324^2.5^^^6.1
+15 ;;^UTILITY(U,$J,112,2724,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2725,0)
+18 ;;=CEREALS, KING VITAMAN, (CORN W/OTHER GRNS)^8-047^oz.^28.3^100^N
+19 ;;^UTILITY(U,$J,112,2725,1)
+20 ;;=5.2^5.5^84.9^406^1.8^^^8^60.66^34^128^123^769^.78^.133^.44^^11370^158^4.4
+21 ;;^UTILITY(U,$J,112,2725,2)
+22 ;;=5.05^61.48^.2^5.62^1362^19.645^.93^.02^0^3.51^.76^.95^3414^2.5^^^1.4
+23 ;;^UTILITY(U,$J,112,2725,3)
+24 ;;=.043^.184^.218^.673^.136^.115^.12^.273^.214^.279^.236^.135^.397^.357^1.164^.194^.462^.254
+25 ;;^UTILITY(U,$J,112,2725,4)
+26 ;;=.22^1.64^.62^.53^.02^.14^.74
+27 ;;^UTILITY(U,$J,112,2725,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,2726,0)
+30 ;;=CEREALS, LUCKY CHARMS, (OAT W/OTHER GRNS)^8-050^oz.^28.3^100^N
+31 ;;^UTILITY(U,$J,112,2726,1)
+32 ;;=9.1^3.8^81.7^390^2.8^^^113^15.9^84^277^207^710^1.76^.344^2.53^^4409^53^1.3
+33 ;;^UTILITY(U,$J,112,2726,2)
+34 ;;=1.5^17.6^.633^1.8^20^5.3^1.45^.08^0^.7^1.33^1.54^1324^2.6^^^4.3
+35 ;;^UTILITY(U,$J,112,2726,3)
+36 ;;=.124^.317^.418^.697^.372^.151^.226^.497^.325^.534^.681^.206^.49^.802^2.087^.494^.512^.428
+37 ;;^UTILITY(U,$J,112,2726,4)
+38 ;;=^^.01^.61^.01^.05^1.32^^^19.8
+39 ;;^UTILITY(U,$J,112,2726,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2727,0)
+42 ;;=CEREALS, QUISP, (CORN,OAT)^8-059^oz.^28.3^100^N
+43 ;;^UTILITY(U,$J,112,2727,1)
+44 ;;=5^7.2^83.3^414^2^^^31^21.05^41^83^149^803^.61^.034^.48^^155^0^1.79
+45 ;;^UTILITY(U,$J,112,2727,2)
+46 ;;=2.53^19.34^.125^3.031^27^8.609^1^.03^0^4.94^.88^1.02^16^2.4^^^1.8
+47 ;;^UTILITY(U,$J,112,2727,3)
+48 ;;=.042^.175^.21^.632^.134^.108^.116^.263^.202^.269^.233^.128^.376^.347^1.122^.19^.437^.243
+49 ;;^UTILITY(U,$J,112,2727,4)
+50 ;;=.32^2.37^.89^.68^.02^.19^.85
+51 ;;^UTILITY(U,$J,112,2727,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,2728,0)
+54 ;;=CEREALS, RAISIN BRAN, POST, (WHEAT)^8-061^oz.^28.3^100^N
+55 ;;^UTILITY(U,$J,112,2728,1)
+56 ;;=9.3^1.9^75.6^307^9.2^^^47^15.9^170^419^616^652^5.3^.547^3.715^^4409^0^1.3
+57 ;;^UTILITY(U,$J,112,2728,2)
+58 ;;=1.5^17.6^.741^1.8^353^5.3^^^0^^^^1324^4^^^14.1
+59 ;;^UTILITY(U,$J,112,2728,3)
+60 ;;=.138^.26^.304^.538^.27^.129^.164^.37^.24^.394^.47^.205^.346^.504^2.207^.402^.714^.412
+61 ;;^UTILITY(U,$J,112,2728,4)
+62 ;;=^^^^^^^^^7
+63 ;;^UTILITY(U,$J,112,2728,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,2729,0)
+66 ;;=CEREALS, RAISIN BRAN, RALSTON PURINA, (WHEAT)^8-062^oz.^28.3^100^N
+67 ;;^UTILITY(U,$J,112,2729,1)
+68 ;;=7.8^.5^83^318^7.3^^^48^48.8^151^442^513^868^2.99^.545^3.789^^3307^3^1
+69 ;;^UTILITY(U,$J,112,2729,2)
+70 ;;=1.1^13.2^.741^1.3^265^4^^^0^^^^993^1.3^^^13.4
+71 ;;^UTILITY(U,$J,112,2729,4)
+72 ;;=^^^^^^^^^7
+73 ;;^UTILITY(U,$J,112,2729,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,2730,0)
+76 ;;=CEREALS, SUGAR FROSTED FLAKES, RALSTON PURINA, (CORN)^8-070^oz.^28.3^100^N
+77 ;;^UTILITY(U,$J,112,2730,1)
+78 ;;=5.3^1.4^90.1^391^1.5^^^11^2.5^7^25^63^649^2.15^.067^.06^^4409^53^1.3
+79 ;;^UTILITY(U,$J,112,2730,2)
+80 ;;=1.5^17.6^.035^1.8^7^5.3^^^0^^^^1324^1.7^^^2.2
+81 ;;^UTILITY(U,$J,112,2730,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,2731,0)
+84 ;;=CEREALS, TRIX, (CORN W/OTHER GRNS)^8-078^oz.^28.3^100^N
+85 ;;^UTILITY(U,$J,112,2731,1)
+86 ;;=5.4^1.4^88.8^385^2.5^^^20^15.9^22^67^94^638^.46^.157^.477^^4409^53^1.3
+87 ;;^UTILITY(U,$J,112,2731,2)
+88 ;;=1.5^17.6^.292^1.8^9^5.3^^^0^^^^1324^2^^^1.2
+89 ;;^UTILITY(U,$J,112,2731,3)
+90 ;;=.04^.194^.222^.754^.131^.124^.127^.288^.228^.29^.228^.145^.439^.362^1.231^.19^.517^.27
+91 ;;^UTILITY(U,$J,112,2731,20)
+92 ;;=USDA Std. Reference, Release 10
+93 ;;^UTILITY(U,$J,112,2732,0)
+94 ;;=CEREALS, WAFFELOS, (WHEAT W/OTHER GRNS)^8-079^oz.^28.3^100^N
+95 ;;^UTILITY(U,$J,112,2732,1)
+96 ;;=5.6^4.2^86.3^405^2.5^^^28^15.9^21^815^88^416^.81^.113^^^4409^53^1.3
+97 ;;^UTILITY(U,$J,112,2732,2)
+98 ;;=1.5^17.6^.176^1.8^11^5.3^^^0^^^^1324^1.4
+99 ;;^UTILITY(U,$J,112,2732,20)
+100 ;;=USDA Std. Reference, Release 10
+101 ;;^UTILITY(U,$J,112,2733,0)
+102 ;;=CHAYOTE, FRUIT, BOILED, DRAINED, W/SALT^11-766^cups^160^100^N
+103 ;;^UTILITY(U,$J,112,2733,1)
+104 ;;=.62^.48^5.09^24^93.43^^^13^.22^12^29^173^237^.31^.11^.169^^47^8^.026
