FHINI02X ; ; 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,884,2)
;;=.15^.9^^^^^1.49^^48^4.85^^^^1.4
;;^UTILITY(U,$J,112,884,4)
;;=^^^^^^5.25
;;^UTILITY(U,$J,112,884,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,885,0)
;;=CAKE, GINGERBREAD, BKD FROM MIX, ENR^18-115^pieces^63^100^N
;;^UTILITY(U,$J,112,885,1)
;;=4^10.2^50.7^309^33.1^^^69^3.31^16^168^241^458^.41^.16^.359^^55^.1^.189
;;^UTILITY(U,$J,112,885,2)
;;=.186^1.562^.224^.038^10^.07^1.258^.063^35^2.603^5.6^1.336^16^2^^^3.2
;;^UTILITY(U,$J,112,885,3)
;;=.054^.143^.175^.298^.201^.078^.083^.197^.133^.196^.205^.089^.159^.295^.987^.144^.323^.235
;;^UTILITY(U,$J,112,885,4)
;;=.001^.001^.049^1.392^.025^1.156^5.572^.012
;;^UTILITY(U,$J,112,885,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,886,0)
;;=CAKE, HONEY SPICE, BKD FROM MIX, ENR, W/CARA-IC^563-0^pieces^77^100^N
;;^UTILITY(U,$J,112,886,1)
;;=4.1^10.8^60.9^352^22.7^^^71^1.6^^193^82^245^^^^^160^.2^.12
;;^UTILITY(U,$J,112,886,2)
;;=.16^1^^^^^1.94^^58^3.2^^^^1.5
;;^UTILITY(U,$J,112,886,4)
;;=^^^^^^5.05
;;^UTILITY(U,$J,112,886,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,887,0)
;;=CAKE, MARBLE, BKD FROM MIX, ENR, W/BOILED WHT ICING^565-0^pieces^65^100^N
;;^UTILITY(U,$J,112,887,1)
;;=4.4^8.7^62^331^23.6^^^78^1.5^^171^122^259^^^^^90^.1^.12
;;^UTILITY(U,$J,112,887,2)
;;=.15^1^^^^^1.65^^51^2.44^^^^1.3
;;^UTILITY(U,$J,112,887,4)
;;=^^^^^^4.18
;;^UTILITY(U,$J,112,887,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,888,0)
;;=CAKE, WHITE, BKD FROM MIX, ENR, W/CHOC-IC^567-0^pieces^71^100^N
;;^UTILITY(U,$J,112,888,1)
;;=3.9^10.7^62.8^351^21.1^^^99^1.3^^179^116^227^^^^^60^.2^.13
;;^UTILITY(U,$J,112,888,2)
;;=.16^1.1^^^^^1.53^^2^3.99^^^^1.5
;;^UTILITY(U,$J,112,888,4)
;;=^^^^^^4.7
;;^UTILITY(U,$J,112,888,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,889,0)
;;=CAKE, YEL, BKD FROM MIX, ENR, W/CHOC-IC^569-0^pieces^69^100^N
;;^UTILITY(U,$J,112,889,1)
;;=4.1^11.3^57.6^337^25.6^^^91^1.4^^182^109^227^^^^^140^.1^.11
;;^UTILITY(U,$J,112,889,2)
;;=.15^1^^^^^1.58^^48^4.11^^^^1.4
;;^UTILITY(U,$J,112,889,4)
;;=^^^^^^4.98
;;^UTILITY(U,$J,112,889,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,890,0)
;;=CAKE ICING, CARAMEL^570-0^cups^340^100^N
;;^UTILITY(U,$J,112,890,1)
;;=1.3^6.7^76.5^360^14.1^^^102^2^^63^52^83^^^^^280^.3^.01
;;^UTILITY(U,$J,112,890,2)
;;=.06^0^^^^^.2^^22^3.68^^^^1.4
;;^UTILITY(U,$J,112,890,4)
;;=^^^^^^2.21
;;^UTILITY(U,$J,112,890,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,891,0)
;;=CAKE ICING, CHOCOLATE^571-0^cups^275^100^N
;;^UTILITY(U,$J,112,891,1)
;;=3.2^13.9^67.4^376^14.3^^^60^1.2^^111^195^61^^^^^210^.2^.02
;;^UTILITY(U,$J,112,891,2)
;;=.1^.2^^^^^.32^^16^7.74^^^^.9
;;^UTILITY(U,$J,112,891,4)
;;=^^^^^^4.95
;;^UTILITY(U,$J,112,891,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,892,0)
;;=CAKE ICING, COCONUT^572-0^cups^166^100^N
;;^UTILITY(U,$J,112,892,1)
;;=1.9^7.7^74.9^364^15^^^6^.5^^30^167^118^^^^^0^0^.01
;;^UTILITY(U,$J,112,892,2)
;;=.04^.2^^^^^0^^0^6.62^^^^.5
;;^UTILITY(U,$J,112,892,4)
;;=^^^^^^.54
;;^UTILITY(U,$J,112,892,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,893,0)
;;=CAKE ICING, WHITE, UNCKD^573-0^cups^319^100^N
;;^UTILITY(U,$J,112,893,1)
;;=.5^6.6^81.6^376^11.1^^^15^0^^12^18^49^^^^^270^0^0
;;^UTILITY(U,$J,112,893,2)
;;=.02^0^^^^^.2^^20^3.63^^^^.2
;;^UTILITY(U,$J,112,893,4)
;;=^^^^^^2.18
;;^UTILITY(U,$J,112,893,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,894,0)
;;=CAKE ICING, WHITE, BOILED^574-0^cups^94^100^N
;;^UTILITY(U,$J,112,894,1)
;;=1.4^0^80.3^316^17.9^^^2^0^^2^18^143^^^^^0^0^0
;;^UTILITY(U,$J,112,894,2)
;;=.03^0^^^^^0^^0^0^^^^.4
;;^UTILITY(U,$J,112,894,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,894,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,895,0)
;;=CAKE ICING, CHOCOLATE FUDGE, MADE FROM MIX^576-2^cups^310^100^N
;;^UTILITY(U,$J,112,895,1)
;;=2.2^14.4^67^378^15.3^^^16^1^^66^63^156^^^^^270^0^.01
;;^UTILITY(U,$J,112,895,2)
;;=.04^.2^^^^^3.3^^0^3.53^^^^1.1
;;^UTILITY(U,$J,112,895,4)
;;=^^^^^^7.11
;;^UTILITY(U,$J,112,895,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,896,0)
;;=CAKE ICING, CREAMY FUDGE, MADE FROM MIX^579-2^cups^245^100^N
;;^UTILITY(U,$J,112,896,1)
;;=2.6^15.2^65.9^383^15.1^^^37^1^^81^89^321^^^^^390^0^.02
;;^UTILITY(U,$J,112,896,2)
;;=.07^.3^^^^^3.63^^0^3.53^^^^1.2
;;^UTILITY(U,$J,112,896,4)
;;=^^^^^^7.55
;;^UTILITY(U,$J,112,896,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,897,0)
;;=CANDY, BUTTERSCOTCH^19-070^oz.^28.3^100^N
FHINI02X ; ; 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,884,2)
+2 ;;=.15^.9^^^^^1.49^^48^4.85^^^^1.4
+3 ;;^UTILITY(U,$J,112,884,4)
+4 ;;=^^^^^^5.25
+5 ;;^UTILITY(U,$J,112,884,20)
+6 ;;=USDA Std. Reference, Release 8
+7 ;;^UTILITY(U,$J,112,885,0)
+8 ;;=CAKE, GINGERBREAD, BKD FROM MIX, ENR^18-115^pieces^63^100^N
+9 ;;^UTILITY(U,$J,112,885,1)
+10 ;;=4^10.2^50.7^309^33.1^^^69^3.31^16^168^241^458^.41^.16^.359^^55^.1^.189
+11 ;;^UTILITY(U,$J,112,885,2)
+12 ;;=.186^1.562^.224^.038^10^.07^1.258^.063^35^2.603^5.6^1.336^16^2^^^3.2
+13 ;;^UTILITY(U,$J,112,885,3)
+14 ;;=.054^.143^.175^.298^.201^.078^.083^.197^.133^.196^.205^.089^.159^.295^.987^.144^.323^.235
+15 ;;^UTILITY(U,$J,112,885,4)
+16 ;;=.001^.001^.049^1.392^.025^1.156^5.572^.012
+17 ;;^UTILITY(U,$J,112,885,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,886,0)
+20 ;;=CAKE, HONEY SPICE, BKD FROM MIX, ENR, W/CARA-IC^563-0^pieces^77^100^N
+21 ;;^UTILITY(U,$J,112,886,1)
+22 ;;=4.1^10.8^60.9^352^22.7^^^71^1.6^^193^82^245^^^^^160^.2^.12
+23 ;;^UTILITY(U,$J,112,886,2)
+24 ;;=.16^1^^^^^1.94^^58^3.2^^^^1.5
+25 ;;^UTILITY(U,$J,112,886,4)
+26 ;;=^^^^^^5.05
+27 ;;^UTILITY(U,$J,112,886,20)
+28 ;;=USDA Std. Reference, Release 8
+29 ;;^UTILITY(U,$J,112,887,0)
+30 ;;=CAKE, MARBLE, BKD FROM MIX, ENR, W/BOILED WHT ICING^565-0^pieces^65^100^N
+31 ;;^UTILITY(U,$J,112,887,1)
+32 ;;=4.4^8.7^62^331^23.6^^^78^1.5^^171^122^259^^^^^90^.1^.12
+33 ;;^UTILITY(U,$J,112,887,2)
+34 ;;=.15^1^^^^^1.65^^51^2.44^^^^1.3
+35 ;;^UTILITY(U,$J,112,887,4)
+36 ;;=^^^^^^4.18
+37 ;;^UTILITY(U,$J,112,887,20)
+38 ;;=USDA Std. Reference, Release 8
+39 ;;^UTILITY(U,$J,112,888,0)
+40 ;;=CAKE, WHITE, BKD FROM MIX, ENR, W/CHOC-IC^567-0^pieces^71^100^N
+41 ;;^UTILITY(U,$J,112,888,1)
+42 ;;=3.9^10.7^62.8^351^21.1^^^99^1.3^^179^116^227^^^^^60^.2^.13
+43 ;;^UTILITY(U,$J,112,888,2)
+44 ;;=.16^1.1^^^^^1.53^^2^3.99^^^^1.5
+45 ;;^UTILITY(U,$J,112,888,4)
+46 ;;=^^^^^^4.7
+47 ;;^UTILITY(U,$J,112,888,20)
+48 ;;=USDA Std. Reference, Release 8
+49 ;;^UTILITY(U,$J,112,889,0)
+50 ;;=CAKE, YEL, BKD FROM MIX, ENR, W/CHOC-IC^569-0^pieces^69^100^N
+51 ;;^UTILITY(U,$J,112,889,1)
+52 ;;=4.1^11.3^57.6^337^25.6^^^91^1.4^^182^109^227^^^^^140^.1^.11
+53 ;;^UTILITY(U,$J,112,889,2)
+54 ;;=.15^1^^^^^1.58^^48^4.11^^^^1.4
+55 ;;^UTILITY(U,$J,112,889,4)
+56 ;;=^^^^^^4.98
+57 ;;^UTILITY(U,$J,112,889,20)
+58 ;;=USDA Std. Reference, Release 8
+59 ;;^UTILITY(U,$J,112,890,0)
+60 ;;=CAKE ICING, CARAMEL^570-0^cups^340^100^N
+61 ;;^UTILITY(U,$J,112,890,1)
+62 ;;=1.3^6.7^76.5^360^14.1^^^102^2^^63^52^83^^^^^280^.3^.01
+63 ;;^UTILITY(U,$J,112,890,2)
+64 ;;=.06^0^^^^^.2^^22^3.68^^^^1.4
+65 ;;^UTILITY(U,$J,112,890,4)
+66 ;;=^^^^^^2.21
+67 ;;^UTILITY(U,$J,112,890,20)
+68 ;;=USDA Std. Reference, Release 8
+69 ;;^UTILITY(U,$J,112,891,0)
+70 ;;=CAKE ICING, CHOCOLATE^571-0^cups^275^100^N
+71 ;;^UTILITY(U,$J,112,891,1)
+72 ;;=3.2^13.9^67.4^376^14.3^^^60^1.2^^111^195^61^^^^^210^.2^.02
+73 ;;^UTILITY(U,$J,112,891,2)
+74 ;;=.1^.2^^^^^.32^^16^7.74^^^^.9
+75 ;;^UTILITY(U,$J,112,891,4)
+76 ;;=^^^^^^4.95
+77 ;;^UTILITY(U,$J,112,891,20)
+78 ;;=USDA Std. Reference, Release 8
+79 ;;^UTILITY(U,$J,112,892,0)
+80 ;;=CAKE ICING, COCONUT^572-0^cups^166^100^N
+81 ;;^UTILITY(U,$J,112,892,1)
+82 ;;=1.9^7.7^74.9^364^15^^^6^.5^^30^167^118^^^^^0^0^.01
+83 ;;^UTILITY(U,$J,112,892,2)
+84 ;;=.04^.2^^^^^0^^0^6.62^^^^.5
+85 ;;^UTILITY(U,$J,112,892,4)
+86 ;;=^^^^^^.54
+87 ;;^UTILITY(U,$J,112,892,20)
+88 ;;=USDA Std. Reference, Release 8
+89 ;;^UTILITY(U,$J,112,893,0)
+90 ;;=CAKE ICING, WHITE, UNCKD^573-0^cups^319^100^N
+91 ;;^UTILITY(U,$J,112,893,1)
+92 ;;=.5^6.6^81.6^376^11.1^^^15^0^^12^18^49^^^^^270^0^0
+93 ;;^UTILITY(U,$J,112,893,2)
+94 ;;=.02^0^^^^^.2^^20^3.63^^^^.2
+95 ;;^UTILITY(U,$J,112,893,4)
+96 ;;=^^^^^^2.18
+97 ;;^UTILITY(U,$J,112,893,20)
+98 ;;=USDA Std. Reference, Release 8
+99 ;;^UTILITY(U,$J,112,894,0)
+100 ;;=CAKE ICING, WHITE, BOILED^574-0^cups^94^100^N
+101 ;;^UTILITY(U,$J,112,894,1)
+102 ;;=1.4^0^80.3^316^17.9^^^2^0^^2^18^143^^^^^0^0^0
+103 ;;^UTILITY(U,$J,112,894,2)
+104 ;;=.03^0^^^^^0^^0^0^^^^.4
+105 ;;^UTILITY(U,$J,112,894,4)
+106 ;;=^^^^^^0
+107 ;;^UTILITY(U,$J,112,894,20)
+108 ;;=USDA Std. Reference, Release 8
+109 ;;^UTILITY(U,$J,112,895,0)
+110 ;;=CAKE ICING, CHOCOLATE FUDGE, MADE FROM MIX^576-2^cups^310^100^N
+111 ;;^UTILITY(U,$J,112,895,1)
+112 ;;=2.2^14.4^67^378^15.3^^^16^1^^66^63^156^^^^^270^0^.01
+113 ;;^UTILITY(U,$J,112,895,2)
+114 ;;=.04^.2^^^^^3.3^^0^3.53^^^^1.1
+115 ;;^UTILITY(U,$J,112,895,4)
+116 ;;=^^^^^^7.11
+117 ;;^UTILITY(U,$J,112,895,20)
+118 ;;=USDA Std. Reference, Release 8
+119 ;;^UTILITY(U,$J,112,896,0)
+120 ;;=CAKE ICING, CREAMY FUDGE, MADE FROM MIX^579-2^cups^245^100^N
+121 ;;^UTILITY(U,$J,112,896,1)
+122 ;;=2.6^15.2^65.9^383^15.1^^^37^1^^81^89^321^^^^^390^0^.02
+123 ;;^UTILITY(U,$J,112,896,2)
+124 ;;=.07^.3^^^^^3.63^^0^3.53^^^^1.2
+125 ;;^UTILITY(U,$J,112,896,4)
+126 ;;=^^^^^^7.55
+127 ;;^UTILITY(U,$J,112,896,20)
+128 ;;=USDA Std. Reference, Release 8
+129 ;;^UTILITY(U,$J,112,897,0)
+130 ;;=CANDY, BUTTERSCOTCH^19-070^oz.^28.3^100^N