FHINI07T ; ; 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,2713,0)
;;=CEREALS, CAP'N CRUNCH, (CORN W/OTHER GRNS)^8-010^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2713,1)
;;=5.1^9.2^80.9^421^2.5^^^17^26.57^41^126^129^751^10.84^.12^.53^^143^0^1.78
;;^UTILITY(U,$J,112,2713,2)
;;=1.93^23.34^13.611^2.708^643^6.321^1.42^.04^0^6.04^1.19^1.45^14^2.3^^^1.8
;;^UTILITY(U,$J,112,2713,3)
;;=.043^.179^.215^.648^.136^.11^.119^.269^.207^.275^.238^.131^.385^.355^1.147^.194^.447^.249
;;^UTILITY(U,$J,112,2713,4)
;;=.38^2.86^1.08^.87^.03^.24^1.16
;;^UTILITY(U,$J,112,2713,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2714,0)
;;=CEREALS, CHEERIOS, (OAT,WHEAT)^8-013^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2714,1)
;;=15.1^6.4^69.1^391^5^^^171^15.9^138^472^357^1083^2.77^.506^2.7^^4409^53^1.3
;;^UTILITY(U,$J,112,2714,2)
;;=1.5^17.6^1.008^1.8^22^5.3^2.49^.14^0^1.19^2.27^2.63^1324^4.4^^^9.1
;;^UTILITY(U,$J,112,2714,3)
;;=.205^.525^.693^1.155^.616^.251^.376^.823^.538^.886^1.129^.342^.813^1.328^3.458^.818^.849^.71
;;^UTILITY(U,$J,112,2714,4)
;;=^^.02^1.05^.02^.09^2.25^^^37.5
;;^UTILITY(U,$J,112,2714,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,2715,0)
;;=CEREALS, COCOA KRISPIES, (RICE)^8-014^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2715,1)
;;=5.3^1.4^88.8^387^2.5^^^18^6.3^33^130^148^765^5.3^.233^2.203^^4409^53^1.3
;;^UTILITY(U,$J,112,2715,2)
;;=1.5^17.6^.368^1.8^353^.042^^^.11^^^^1324^2^^^.6
;;^UTILITY(U,$J,112,2715,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2716,0)
;;=CEREALS, COCOA PEBBLES, (RICE)^8-015^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2716,1)
;;=4.7^5.4^85.9^408^2.1^^^17^6.3^41^77^165^478^5.3^.219^.943^^4409^0^1.3
;;^UTILITY(U,$J,112,2716,2)
;;=1.5^17.6^.295^1.8^353^5.3^^^0^^^^1324^2^^^1.6
;;^UTILITY(U,$J,112,2716,3)
;;=.064^.231^.242^.381^.199^.133^.078^.203^.257^.302^.375^.137^.195^.433^.746^.266^.196^.209
;;^UTILITY(U,$J,112,2716,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2717,0)
;;=CEREALS, COOKIE-CRISP, CHOC CHIP & VAN, (CORN W/OTHER GRNS)^8-017^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2717,1)
;;=5.1^3.6^87.5^400^1.9^^^19^15.9^28^80^98^689^.96^.3^.786^^4409^53^1.3
;;^UTILITY(U,$J,112,2717,2)
;;=1.5^17.6^.212^1.8^11^5.3^^^0^^^^1324^1.9^^^1.4
;;^UTILITY(U,$J,112,2717,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2718,0)
;;=CEREALS, CORN FLAKES, RALSTON PURINA, (CORN)^8-021^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2718,1)
;;=7.8^.4^86.6^390^2.7^^^7^2.5^11^39^88^956^.25^.088^.082^^381^0^.5
;;^UTILITY(U,$J,112,2718,2)
;;=.1^4.2^.07^.063^7^0^^^0^^^^38^2.6^^^1.9
;;^UTILITY(U,$J,112,2718,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2719,0)
;;=CEREALS, FORTIFIED OAT FLAKES, (OAT W/OTHER GRNS)^8-027^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2719,1)
;;=18.7^1.5^72.4^369^3.1^^^142^28.6^120^367^715^894^3.13^.532^2.91^^4409^0^1.3
;;^UTILITY(U,$J,112,2719,2)
;;=1.5^17.6^1.034^1.8^353^5.3^^^0^^^^1324^4.4^^^3
;;^UTILITY(U,$J,112,2719,3)
;;=.326^.889^1.041^1.73^1.215^.349^.461^.979^.705^1.12^1.206^.457^.982^2.005^4.09^.829^1.155^.994
;;^UTILITY(U,$J,112,2719,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2720,0)
;;=CEREALS, FROOT LOOPS, (CORN W/OTHER GRNS)^8-030^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2720,1)
;;=5.9^1.9^88.3^392^2.5^^^10^15.9^25^85^92^510^13.2^.21^.717^^4409^53^1.3
;;^UTILITY(U,$J,112,2720,2)
;;=1.5^17.6^.365^1.8^353^0^^^0^^^^1324^1.4^^^2.1
;;^UTILITY(U,$J,112,2720,4)
;;=^^^^^^^^^7.3
;;^UTILITY(U,$J,112,2720,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2721,0)
;;=CEREALS, FROSTED RICE KRINKLES, (RICE)^8-033^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2721,1)
;;=4.8^.2^91.1^385^1.9^^^14^6.3^27^70^51^630^5.3^.167^1.087^^4409^0^1.3
;;^UTILITY(U,$J,112,2721,2)
;;=1.5^17.6^.452^1.8^353^5.3^^^0^^^^1324^1.9^^^.6
;;^UTILITY(U,$J,112,2721,3)
;;=.072^.243^.257^.403^.205^.145^.083^.207^.272^.315^.397^.146^.2^.446^.777^.28^.204^.22
;;^UTILITY(U,$J,112,2721,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2722,0)
;;=CEREALS, FRUITY PEBBLES, (RICE)^8-034^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2722,1)
;;=4^5.2^86.1^405^2.9^^^12^6.3^29^59^76^555^5.3^.127^.82^^4409^0^1.3
;;^UTILITY(U,$J,112,2722,2)
;;=1.5^17.6^.301^1.8^353^5.3^^^0^^^^1324^1.8^^^1.3
;;^UTILITY(U,$J,112,2722,3)
;;=.059^.202^.213^.334^.17^.12^.069^.171^.225^.261^.329^.121^.166^.369^.644^.232^.168^.182
;;^UTILITY(U,$J,112,2722,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2723,0)
;;=CEREALS, GOLDEN GRAHAMS, (CORN,WHEAT)^8-035^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2723,1)
;;=5.6^3.8^85.1^385^2^^^61^15.9^41^143^221^988^.88^.798^.837^^4409^53^1.3
FHINI07T ; ; 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,2713,0)
+2 ;;=CEREALS, CAP'N CRUNCH, (CORN W/OTHER GRNS)^8-010^oz.^28.3^100^N
+3 ;;^UTILITY(U,$J,112,2713,1)
+4 ;;=5.1^9.2^80.9^421^2.5^^^17^26.57^41^126^129^751^10.84^.12^.53^^143^0^1.78
+5 ;;^UTILITY(U,$J,112,2713,2)
+6 ;;=1.93^23.34^13.611^2.708^643^6.321^1.42^.04^0^6.04^1.19^1.45^14^2.3^^^1.8
+7 ;;^UTILITY(U,$J,112,2713,3)
+8 ;;=.043^.179^.215^.648^.136^.11^.119^.269^.207^.275^.238^.131^.385^.355^1.147^.194^.447^.249
+9 ;;^UTILITY(U,$J,112,2713,4)
+10 ;;=.38^2.86^1.08^.87^.03^.24^1.16
+11 ;;^UTILITY(U,$J,112,2713,20)
+12 ;;=USDA Std. Reference, Release 10
+13 ;;^UTILITY(U,$J,112,2714,0)
+14 ;;=CEREALS, CHEERIOS, (OAT,WHEAT)^8-013^oz.^28.3^100^N
+15 ;;^UTILITY(U,$J,112,2714,1)
+16 ;;=15.1^6.4^69.1^391^5^^^171^15.9^138^472^357^1083^2.77^.506^2.7^^4409^53^1.3
+17 ;;^UTILITY(U,$J,112,2714,2)
+18 ;;=1.5^17.6^1.008^1.8^22^5.3^2.49^.14^0^1.19^2.27^2.63^1324^4.4^^^9.1
+19 ;;^UTILITY(U,$J,112,2714,3)
+20 ;;=.205^.525^.693^1.155^.616^.251^.376^.823^.538^.886^1.129^.342^.813^1.328^3.458^.818^.849^.71
+21 ;;^UTILITY(U,$J,112,2714,4)
+22 ;;=^^.02^1.05^.02^.09^2.25^^^37.5
+23 ;;^UTILITY(U,$J,112,2714,20)
+24 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+25 ;;^UTILITY(U,$J,112,2715,0)
+26 ;;=CEREALS, COCOA KRISPIES, (RICE)^8-014^oz.^28.3^100^N
+27 ;;^UTILITY(U,$J,112,2715,1)
+28 ;;=5.3^1.4^88.8^387^2.5^^^18^6.3^33^130^148^765^5.3^.233^2.203^^4409^53^1.3
+29 ;;^UTILITY(U,$J,112,2715,2)
+30 ;;=1.5^17.6^.368^1.8^353^.042^^^.11^^^^1324^2^^^.6
+31 ;;^UTILITY(U,$J,112,2715,20)
+32 ;;=USDA Std. Reference, Release 10
+33 ;;^UTILITY(U,$J,112,2716,0)
+34 ;;=CEREALS, COCOA PEBBLES, (RICE)^8-015^oz.^28.3^100^N
+35 ;;^UTILITY(U,$J,112,2716,1)
+36 ;;=4.7^5.4^85.9^408^2.1^^^17^6.3^41^77^165^478^5.3^.219^.943^^4409^0^1.3
+37 ;;^UTILITY(U,$J,112,2716,2)
+38 ;;=1.5^17.6^.295^1.8^353^5.3^^^0^^^^1324^2^^^1.6
+39 ;;^UTILITY(U,$J,112,2716,3)
+40 ;;=.064^.231^.242^.381^.199^.133^.078^.203^.257^.302^.375^.137^.195^.433^.746^.266^.196^.209
+41 ;;^UTILITY(U,$J,112,2716,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,2717,0)
+44 ;;=CEREALS, COOKIE-CRISP, CHOC CHIP & VAN, (CORN W/OTHER GRNS)^8-017^oz.^28.3^100^N
+45 ;;^UTILITY(U,$J,112,2717,1)
+46 ;;=5.1^3.6^87.5^400^1.9^^^19^15.9^28^80^98^689^.96^.3^.786^^4409^53^1.3
+47 ;;^UTILITY(U,$J,112,2717,2)
+48 ;;=1.5^17.6^.212^1.8^11^5.3^^^0^^^^1324^1.9^^^1.4
+49 ;;^UTILITY(U,$J,112,2717,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2718,0)
+52 ;;=CEREALS, CORN FLAKES, RALSTON PURINA, (CORN)^8-021^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,2718,1)
+54 ;;=7.8^.4^86.6^390^2.7^^^7^2.5^11^39^88^956^.25^.088^.082^^381^0^.5
+55 ;;^UTILITY(U,$J,112,2718,2)
+56 ;;=.1^4.2^.07^.063^7^0^^^0^^^^38^2.6^^^1.9
+57 ;;^UTILITY(U,$J,112,2718,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,2719,0)
+60 ;;=CEREALS, FORTIFIED OAT FLAKES, (OAT W/OTHER GRNS)^8-027^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,2719,1)
+62 ;;=18.7^1.5^72.4^369^3.1^^^142^28.6^120^367^715^894^3.13^.532^2.91^^4409^0^1.3
+63 ;;^UTILITY(U,$J,112,2719,2)
+64 ;;=1.5^17.6^1.034^1.8^353^5.3^^^0^^^^1324^4.4^^^3
+65 ;;^UTILITY(U,$J,112,2719,3)
+66 ;;=.326^.889^1.041^1.73^1.215^.349^.461^.979^.705^1.12^1.206^.457^.982^2.005^4.09^.829^1.155^.994
+67 ;;^UTILITY(U,$J,112,2719,20)
+68 ;;=USDA Std. Reference, Release 10
+69 ;;^UTILITY(U,$J,112,2720,0)
+70 ;;=CEREALS, FROOT LOOPS, (CORN W/OTHER GRNS)^8-030^oz.^28.3^100^N
+71 ;;^UTILITY(U,$J,112,2720,1)
+72 ;;=5.9^1.9^88.3^392^2.5^^^10^15.9^25^85^92^510^13.2^.21^.717^^4409^53^1.3
+73 ;;^UTILITY(U,$J,112,2720,2)
+74 ;;=1.5^17.6^.365^1.8^353^0^^^0^^^^1324^1.4^^^2.1
+75 ;;^UTILITY(U,$J,112,2720,4)
+76 ;;=^^^^^^^^^7.3
+77 ;;^UTILITY(U,$J,112,2720,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,2721,0)
+80 ;;=CEREALS, FROSTED RICE KRINKLES, (RICE)^8-033^oz.^28.3^100^N
+81 ;;^UTILITY(U,$J,112,2721,1)
+82 ;;=4.8^.2^91.1^385^1.9^^^14^6.3^27^70^51^630^5.3^.167^1.087^^4409^0^1.3
+83 ;;^UTILITY(U,$J,112,2721,2)
+84 ;;=1.5^17.6^.452^1.8^353^5.3^^^0^^^^1324^1.9^^^.6
+85 ;;^UTILITY(U,$J,112,2721,3)
+86 ;;=.072^.243^.257^.403^.205^.145^.083^.207^.272^.315^.397^.146^.2^.446^.777^.28^.204^.22
+87 ;;^UTILITY(U,$J,112,2721,20)
+88 ;;=USDA Std. Reference, Release 10
+89 ;;^UTILITY(U,$J,112,2722,0)
+90 ;;=CEREALS, FRUITY PEBBLES, (RICE)^8-034^oz.^28.3^100^N
+91 ;;^UTILITY(U,$J,112,2722,1)
+92 ;;=4^5.2^86.1^405^2.9^^^12^6.3^29^59^76^555^5.3^.127^.82^^4409^0^1.3
+93 ;;^UTILITY(U,$J,112,2722,2)
+94 ;;=1.5^17.6^.301^1.8^353^5.3^^^0^^^^1324^1.8^^^1.3
+95 ;;^UTILITY(U,$J,112,2722,3)
+96 ;;=.059^.202^.213^.334^.17^.12^.069^.171^.225^.261^.329^.121^.166^.369^.644^.232^.168^.182
+97 ;;^UTILITY(U,$J,112,2722,20)
+98 ;;=USDA Std. Reference, Release 10
+99 ;;^UTILITY(U,$J,112,2723,0)
+100 ;;=CEREALS, GOLDEN GRAHAMS, (CORN,WHEAT)^8-035^oz.^28.3^100^N
+101 ;;^UTILITY(U,$J,112,2723,1)
+102 ;;=5.6^3.8^85.1^385^2^^^61^15.9^41^143^221^988^.88^.798^.837^^4409^53^1.3
