FHINI02Y ; ; 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,897,1)
;;=.1^3.5^95.3^395^.8^^^3^.07^1^3^4^43^.03^.034^.036^^139^0^.004
;;^UTILITY(U,$J,112,897,2)
;;=.018^.009^.013^.003^0^.01^.04^.03^9^1.09^.5^.07^34^.2^^^0
;;^UTILITY(U,$J,112,897,3)
;;=.001^.002^.002^.004^.003^.001^0^.002^.002^.002^.001^.001^.001^.003^.008^.001^.004^.002
;;^UTILITY(U,$J,112,897,4)
;;=.04^.05^.18^.48^.04^.22^.46^0
;;^UTILITY(U,$J,112,897,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,898,0)
;;=CANDY, CARAMELS, PLAIN OR CHOCOLATE^19-074^oz.^28.3^100^N
;;^UTILITY(U,$J,112,898,1)
;;=4.6^8.1^77^382^8.5^^^138^.14^17^114^214^245^.44^.018^.011^^32^.5^.01
;;^UTILITY(U,$J,112,898,2)
;;=.181^.25^.592^.035^5^0^.15^.02^7^6.58^.84^.18^8^1.8^^^1.2
;;^UTILITY(U,$J,112,898,3)
;;=.06^.192^.258^.417^.338^.107^.039^.205^.205^.285^.155^.115^.147^.323^.892^.091^.412^.232
;;^UTILITY(U,$J,112,898,4)
;;=.43^2.92^1.25^.98^.04^.38^.81^^^1.8
;;^UTILITY(U,$J,112,898,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,899,0)
;;=CANDY, CARAMELS, PLAIN OR CHOCOLATE WITH NUTS^582-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,899,1)
;;=4.5^16.3^70.5^428^7.1^^^140^1.5^^139^233^203^^^^^20^0^.11
;;^UTILITY(U,$J,112,899,2)
;;=.17^.2^^^^^1.6^^2^5.64^^^^1.6
;;^UTILITY(U,$J,112,899,4)
;;=^^^^^^7.89
;;^UTILITY(U,$J,112,899,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,900,0)
;;=CANDY, CARAMELS, CHOCOLATE FLAVORED ROLL^19-076^oz.^28.3^100^N
;;^UTILITY(U,$J,112,900,1)
;;=1.9^2.5^87.3^360^7.3^^^24^.41^32^39^101^26^.53^.29^.106^^8^.1^.014
;;^UTILITY(U,$J,112,900,2)
;;=.065^.065^.135^.016^1^.06^.73^.06^0^.58^1.03^.79^2^.8^^^.8
;;^UTILITY(U,$J,112,900,3)
;;=.028^.09^.09^.145^.122^.03^.026^.08^.068^.111^.081^.036^.082^.176^.315^.061^.109^.088
;;^UTILITY(U,$J,112,900,4)
;;=.01^.01^.02^.32^.01^.21^1.01
;;^UTILITY(U,$J,112,900,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,901,0)
;;=CANDY, CHOCOLATE, BITTERSWEET^584-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,901,1)
;;=7.9^39.7^46.8^477^1.8^^^58^5^^284^615^3^^^^^40^0^.03
;;^UTILITY(U,$J,112,901,2)
;;=.17^1^^^^^.79^^0^22.23^^^^2.3
;;^UTILITY(U,$J,112,901,4)
;;=^^^^^^14.69
;;^UTILITY(U,$J,112,901,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,902,0)
;;=CANDY, CHOCOLATE, SEMISWEET^19-080^oz.^28.3^100^N
;;^UTILITY(U,$J,112,902,1)
;;=4.2^29.7^63.4^477^.6^^^32^3.13^115^132^365^11^1.62^.7^.8^^21^0^.055
;;^UTILITY(U,$J,112,902,2)
;;=.09^.427^.105^.05^3^0^.95^^0^17.53^9.93^.95^2^1.2^^62^5.9
;;^UTILITY(U,$J,112,902,3)
;;=.063^.168^.164^.257^.212^.044^.052^.204^.159^.254^.24^.073^.196^.422^.637^.19^.181^.183
;;^UTILITY(U,$J,112,902,4)
;;=^^.05^8.03^^9.23^9.93
;;^UTILITY(U,$J,112,902,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,903,0)
;;=CANDY, CHOCOLATE, SWEET^19-081^oz.^28.3^100^N
;;^UTILITY(U,$J,112,903,1)
;;=3.9^34.2^59.6^505^.5^^^24^2.76^113^147^290^16^1.5^.574^.494^^20^0^.02
;;^UTILITY(U,$J,112,903,2)
;;=.24^.67^.071^.043^3^0^.96^.03^0^20.08^11.22^.99^2^1^^66^5.5
;;^UTILITY(U,$J,112,903,3)
;;=.058^.154^.151^.236^.195^.04^.048^.187^.146^.234^.221^.067^.18^.388^.586^.175^.167^.168
;;^UTILITY(U,$J,112,903,4)
;;=^^.03^8.69^.07^11.35^11.15
;;^UTILITY(U,$J,112,903,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,904,0)
;;=CANDY, MILKCHOCOLATE, PLAIN^19-120^oz.^28.3^100^N
;;^UTILITY(U,$J,112,904,1)
;;=6.9^30.6^59.3^513^1.3^^^191^1.39^60^216^385^82^1.38^.385^.299^^185^.4^.079
;;^UTILITY(U,$J,112,904,2)
;;=.301^.324^.424^.042^7^.39^.91^^22^18.39^9.97^.91^48^1.5^^25^3.5
;;^UTILITY(U,$J,112,904,3)
;;=.083^.296^.369^.645^.412^.148^.042^.38^.317^.454^.201^.106^.243^.581^1.447^.169^.581^.317
;;^UTILITY(U,$J,112,904,4)
;;=^^.82^8.92^^8.54^9.97^^^3.9
;;^UTILITY(U,$J,112,904,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,905,0)
;;=CANDY, MILKCHOCOLATE, WITH ALMONDS^19-132^oz.^28.3^100^N
;;^UTILITY(U,$J,112,905,1)
;;=9^34.4^53.2^526^1.5^^^224^1.63^90^264^444^74^1.34^.422^.624^^74^.2^.06
;;^UTILITY(U,$J,112,905,2)
;;=.435^.742^.43^.048^11^.53^2.17^.11^19^16.98^13.49^2.28^14^1.7^^22^6.2
;;^UTILITY(U,$J,112,905,3)
;;=.116^.35^.432^.759^.446^.159^.079^.47^.366^.526^.468^.159^.327^.792^1.984^.294^.666^.388
;;^UTILITY(U,$J,112,905,4)
;;=.11^.11^.58^7.66^.31^8.27^13.17
;;^UTILITY(U,$J,112,905,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,906,0)
;;=CANDY, MILKCHOCOLATE, WITH PEANUTS^589-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,906,1)
;;=14.1^38.1^44.6^543^1^^^174^1.4^^294^487^66^^^^^180^0^.25
;;^UTILITY(U,$J,112,906,2)
;;=.26^5^^^^^5.22^^13^15.74^^^^2
;;^UTILITY(U,$J,112,906,4)
;;=^^^^^^14.98
FHINI02Y ; ; 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,897,1)
+2 ;;=.1^3.5^95.3^395^.8^^^3^.07^1^3^4^43^.03^.034^.036^^139^0^.004
+3 ;;^UTILITY(U,$J,112,897,2)
+4 ;;=.018^.009^.013^.003^0^.01^.04^.03^9^1.09^.5^.07^34^.2^^^0
+5 ;;^UTILITY(U,$J,112,897,3)
+6 ;;=.001^.002^.002^.004^.003^.001^0^.002^.002^.002^.001^.001^.001^.003^.008^.001^.004^.002
+7 ;;^UTILITY(U,$J,112,897,4)
+8 ;;=.04^.05^.18^.48^.04^.22^.46^0
+9 ;;^UTILITY(U,$J,112,897,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,898,0)
+12 ;;=CANDY, CARAMELS, PLAIN OR CHOCOLATE^19-074^oz.^28.3^100^N
+13 ;;^UTILITY(U,$J,112,898,1)
+14 ;;=4.6^8.1^77^382^8.5^^^138^.14^17^114^214^245^.44^.018^.011^^32^.5^.01
+15 ;;^UTILITY(U,$J,112,898,2)
+16 ;;=.181^.25^.592^.035^5^0^.15^.02^7^6.58^.84^.18^8^1.8^^^1.2
+17 ;;^UTILITY(U,$J,112,898,3)
+18 ;;=.06^.192^.258^.417^.338^.107^.039^.205^.205^.285^.155^.115^.147^.323^.892^.091^.412^.232
+19 ;;^UTILITY(U,$J,112,898,4)
+20 ;;=.43^2.92^1.25^.98^.04^.38^.81^^^1.8
+21 ;;^UTILITY(U,$J,112,898,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,899,0)
+24 ;;=CANDY, CARAMELS, PLAIN OR CHOCOLATE WITH NUTS^582-0^oz.^28.3^100^N
+25 ;;^UTILITY(U,$J,112,899,1)
+26 ;;=4.5^16.3^70.5^428^7.1^^^140^1.5^^139^233^203^^^^^20^0^.11
+27 ;;^UTILITY(U,$J,112,899,2)
+28 ;;=.17^.2^^^^^1.6^^2^5.64^^^^1.6
+29 ;;^UTILITY(U,$J,112,899,4)
+30 ;;=^^^^^^7.89
+31 ;;^UTILITY(U,$J,112,899,20)
+32 ;;=USDA Std. Reference, Release 8
+33 ;;^UTILITY(U,$J,112,900,0)
+34 ;;=CANDY, CARAMELS, CHOCOLATE FLAVORED ROLL^19-076^oz.^28.3^100^N
+35 ;;^UTILITY(U,$J,112,900,1)
+36 ;;=1.9^2.5^87.3^360^7.3^^^24^.41^32^39^101^26^.53^.29^.106^^8^.1^.014
+37 ;;^UTILITY(U,$J,112,900,2)
+38 ;;=.065^.065^.135^.016^1^.06^.73^.06^0^.58^1.03^.79^2^.8^^^.8
+39 ;;^UTILITY(U,$J,112,900,3)
+40 ;;=.028^.09^.09^.145^.122^.03^.026^.08^.068^.111^.081^.036^.082^.176^.315^.061^.109^.088
+41 ;;^UTILITY(U,$J,112,900,4)
+42 ;;=.01^.01^.02^.32^.01^.21^1.01
+43 ;;^UTILITY(U,$J,112,900,20)
+44 ;;=USDA Std. Reference, Release 10
+45 ;;^UTILITY(U,$J,112,901,0)
+46 ;;=CANDY, CHOCOLATE, BITTERSWEET^584-0^oz.^28.3^100^N
+47 ;;^UTILITY(U,$J,112,901,1)
+48 ;;=7.9^39.7^46.8^477^1.8^^^58^5^^284^615^3^^^^^40^0^.03
+49 ;;^UTILITY(U,$J,112,901,2)
+50 ;;=.17^1^^^^^.79^^0^22.23^^^^2.3
+51 ;;^UTILITY(U,$J,112,901,4)
+52 ;;=^^^^^^14.69
+53 ;;^UTILITY(U,$J,112,901,20)
+54 ;;=USDA Std. Reference, Release 8
+55 ;;^UTILITY(U,$J,112,902,0)
+56 ;;=CANDY, CHOCOLATE, SEMISWEET^19-080^oz.^28.3^100^N
+57 ;;^UTILITY(U,$J,112,902,1)
+58 ;;=4.2^29.7^63.4^477^.6^^^32^3.13^115^132^365^11^1.62^.7^.8^^21^0^.055
+59 ;;^UTILITY(U,$J,112,902,2)
+60 ;;=.09^.427^.105^.05^3^0^.95^^0^17.53^9.93^.95^2^1.2^^62^5.9
+61 ;;^UTILITY(U,$J,112,902,3)
+62 ;;=.063^.168^.164^.257^.212^.044^.052^.204^.159^.254^.24^.073^.196^.422^.637^.19^.181^.183
+63 ;;^UTILITY(U,$J,112,902,4)
+64 ;;=^^.05^8.03^^9.23^9.93
+65 ;;^UTILITY(U,$J,112,902,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,903,0)
+68 ;;=CANDY, CHOCOLATE, SWEET^19-081^oz.^28.3^100^N
+69 ;;^UTILITY(U,$J,112,903,1)
+70 ;;=3.9^34.2^59.6^505^.5^^^24^2.76^113^147^290^16^1.5^.574^.494^^20^0^.02
+71 ;;^UTILITY(U,$J,112,903,2)
+72 ;;=.24^.67^.071^.043^3^0^.96^.03^0^20.08^11.22^.99^2^1^^66^5.5
+73 ;;^UTILITY(U,$J,112,903,3)
+74 ;;=.058^.154^.151^.236^.195^.04^.048^.187^.146^.234^.221^.067^.18^.388^.586^.175^.167^.168
+75 ;;^UTILITY(U,$J,112,903,4)
+76 ;;=^^.03^8.69^.07^11.35^11.15
+77 ;;^UTILITY(U,$J,112,903,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,904,0)
+80 ;;=CANDY, MILKCHOCOLATE, PLAIN^19-120^oz.^28.3^100^N
+81 ;;^UTILITY(U,$J,112,904,1)
+82 ;;=6.9^30.6^59.3^513^1.3^^^191^1.39^60^216^385^82^1.38^.385^.299^^185^.4^.079
+83 ;;^UTILITY(U,$J,112,904,2)
+84 ;;=.301^.324^.424^.042^7^.39^.91^^22^18.39^9.97^.91^48^1.5^^25^3.5
+85 ;;^UTILITY(U,$J,112,904,3)
+86 ;;=.083^.296^.369^.645^.412^.148^.042^.38^.317^.454^.201^.106^.243^.581^1.447^.169^.581^.317
+87 ;;^UTILITY(U,$J,112,904,4)
+88 ;;=^^.82^8.92^^8.54^9.97^^^3.9
+89 ;;^UTILITY(U,$J,112,904,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,905,0)
+92 ;;=CANDY, MILKCHOCOLATE, WITH ALMONDS^19-132^oz.^28.3^100^N
+93 ;;^UTILITY(U,$J,112,905,1)
+94 ;;=9^34.4^53.2^526^1.5^^^224^1.63^90^264^444^74^1.34^.422^.624^^74^.2^.06
+95 ;;^UTILITY(U,$J,112,905,2)
+96 ;;=.435^.742^.43^.048^11^.53^2.17^.11^19^16.98^13.49^2.28^14^1.7^^22^6.2
+97 ;;^UTILITY(U,$J,112,905,3)
+98 ;;=.116^.35^.432^.759^.446^.159^.079^.47^.366^.526^.468^.159^.327^.792^1.984^.294^.666^.388
+99 ;;^UTILITY(U,$J,112,905,4)
+100 ;;=.11^.11^.58^7.66^.31^8.27^13.17
+101 ;;^UTILITY(U,$J,112,905,20)
+102 ;;=USDA Std. Reference, Release 10
+103 ;;^UTILITY(U,$J,112,906,0)
+104 ;;=CANDY, MILKCHOCOLATE, WITH PEANUTS^589-0^oz.^28.3^100^N
+105 ;;^UTILITY(U,$J,112,906,1)
+106 ;;=14.1^38.1^44.6^543^1^^^174^1.4^^294^487^66^^^^^180^0^.25
+107 ;;^UTILITY(U,$J,112,906,2)
+108 ;;=.26^5^^^^^5.22^^13^15.74^^^^2
+109 ;;^UTILITY(U,$J,112,906,4)
+110 ;;=^^^^^^14.98
