FHINI097 ; ; 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,6347,0)
;;=SARA LEE, FUDGE NUT TORTE^^oz.^28.8
;;^UTILITY(U,$J,112,6347,1)
;;=3.5^15.8^47.6^346^31.9^^^64^1.4^31^165^46^209^^^^^120^6.2^.07
;;^UTILITY(U,$J,112,6347,2)
;;=.27^.7
;;^UTILITY(U,$J,112,6348,0)
;;=SARA LEE, OLD FASHIONED CHOCOLATE LAYER CAKE^^oz.^28.8
;;^UTILITY(U,$J,112,6348,1)
;;=4.4^21.8^47.8^405^23.6^^^43^3.5^32^145^283^327^^^^^190^3.4^.04
;;^UTILITY(U,$J,112,6348,2)
;;=.26^.5
;;^UTILITY(U,$J,112,6349,0)
;;=SARA LEE, GERMAN CHOCOLATE LAYER CAKE^^oz.^28.8
;;^UTILITY(U,$J,112,6349,1)
;;=5.1^22.9^43^399^26.1^^^83^1.9^45^124^173^297^^^^^121^2.4^.06
;;^UTILITY(U,$J,112,6349,2)
;;=.31^1.1
;;^UTILITY(U,$J,112,6350,0)
;;=SARA LEE, TRAY, DUTCH APPLE BARVARIAN^^oz.^28.8
;;^UTILITY(U,$J,112,6350,1)
;;=2.7^10.1^36.1^245^49.5^^^57^.5^12^52^132^114^^^^^141^1.2^.06
;;^UTILITY(U,$J,112,6350,2)
;;=.15^.4
;;^UTILITY(U,$J,112,6352,0)
;;=MARGARINE, L.S.^^tsp.^5
;;^UTILITY(U,$J,112,6352,1)
;;=.6^81^.4^721^^^^20^0^^16^9.7^0^^^^^3311^^0
;;^UTILITY(U,$J,112,6352,2)
;;=0
;;^UTILITY(U,$J,112,6353,0)
;;=PARSLEY, FRESH^^oz.^28.8
;;^UTILITY(U,$J,112,6353,1)
;;=3.6^.6^8.5^44^^^^20^.6^4^6^73^4^^^^^850^17^12
;;^UTILITY(U,$J,112,6353,2)
;;=26^.1
;;^UTILITY(U,$J,112,6354,0)
;;=WORCESTERSHIRE SAUCE^^oz.^28.35
;;^UTILITY(U,$J,112,6354,1)
;;=2^0^18^80^^^^100^6^^60^800^980^^^^^340^180^0
;;^UTILITY(U,$J,112,6354,2)
;;=.2^0^^^^^^^^^^0
;;^UTILITY(U,$J,112,6354,20)
;;=Bowes & Church, 13th ed. DOE: 071285 #516
;;^UTILITY(U,$J,112,6355,0)
;;=SARA LEE, CHOCOLATE BAVARIAN CAKE (TRAY)^^oz.^28.8
;;^UTILITY(U,$J,112,6355,1)
;;=3.5^20.6^30.8^313^43.1^^^72^.5^12^61^123^78^^^^^687^.6^.05
;;^UTILITY(U,$J,112,6355,2)
;;=.13^.3
;;^UTILITY(U,$J,112,6356,0)
;;=SARA LEE, CHOCOLATE BAVARIAN PIE^^oz.^28.8
;;^UTILITY(U,$J,112,6356,1)
;;=3.6^24.7^28.3^350^42.2^^^61^1.4^24^70^187^104^^^^^446^^.04
;;^UTILITY(U,$J,112,6356,2)
;;=.15^.5
;;^UTILITY(U,$J,112,6357,0)
;;=SARA LEE, STRAWBERRY BAVARIAN^^oz.^28.8
;;^UTILITY(U,$J,112,6357,1)
;;=3.2^18^26^279^51.8^^^50^.5^11^60^92^80^^^^^439^49.5^.04
;;^UTILITY(U,$J,112,6357,2)
;;=.13^.6
;;^UTILITY(U,$J,112,6358,0)
;;=SARA LEE, LIME BAVARIAN^^oz.^28.8
;;^UTILITY(U,$J,112,6358,1)
;;=2.5^19.4^30.1^305^47^^^44^.3^8^52^57^84^^^^^389^^.05
;;^UTILITY(U,$J,112,6358,2)
;;=.09^.6
;;^UTILITY(U,$J,112,6359,0)
;;=SARA LEE, DUTCH APPLE BAVARIAN^^oz.^28.8
;;^UTILITY(U,$J,112,6359,1)
;;=2.4^11.6^30.8^235^53.7^^^44^1.1^13^44^126^182^^^^^250^17^.04
;;^UTILITY(U,$J,112,6359,2)
;;=.08^.5
;;^UTILITY(U,$J,112,6360,0)
;;=SARA LEE, CHOCOLATE MINT BAVARIAN^^oz.^28.8
;;^UTILITY(U,$J,112,6360,1)
;;=3.6^24.7^27.3^350^42.2^^^61^1.4^24^70^187^104^^^^^446^^.04
;;^UTILITY(U,$J,112,6360,2)
;;=.15^.5
;;^UTILITY(U,$J,112,6361,0)
;;=SARA LEE, APPLE DEMI DANISH^^oz.^28.8
;;^UTILITY(U,$J,112,6361,1)
;;=5.2^14.6^46.6^339^32^^^32^1.9^11^63^77^404^^^^^143^12.6^.2
;;^UTILITY(U,$J,112,6361,2)
;;=.32^1.7
;;^UTILITY(U,$J,112,6362,0)
;;=SARA LEE, CHEESE DEMI DANISH^^oz.^28.8
;;^UTILITY(U,$J,112,6362,1)
;;=6.7^19.7^37.5^354^34.7^^^35^1.7^11^81^79^369^^^^^323^.4^.24
;;^UTILITY(U,$J,112,6362,2)
;;=.21^1.8
;;^UTILITY(U,$J,112,6363,0)
;;=SARA LEE, RASPBERRY DEMI DANISH^^oz.^28.8
;;^UTILITY(U,$J,112,6363,1)
;;=4.9^14.7^54.2^370^24.8^^^26^1.8^11^57^79^316^^^^^97^.5^.18
;;^UTILITY(U,$J,112,6363,2)
;;=.37^1.7
;;^UTILITY(U,$J,112,6364,0)
;;=SARA LEE, CINNAMON RASIN DEMI DANISH^^oz.^28.8
;;^UTILITY(U,$J,112,6364,1)
;;=6.5^18.4^48.9^387^24.1^^^42^2^19^94^200^379^^^^^101^2.7^.29
;;^UTILITY(U,$J,112,6364,2)
;;=.29^1.8
;;^UTILITY(U,$J,112,6365,0)
;;=SARA LEE, PECAN DEMI DANISH^^oz.^28.8
;;^UTILITY(U,$J,112,6365,1)
;;=6.9^26.8^40.2^426^23.8^^^54^1.8^23^101^152^439^^^^^118^.5^.31
;;^UTILITY(U,$J,112,6365,2)
;;=.22^2
;;^UTILITY(U,$J,112,6366,0)
;;=MACARONI AND BEEF CASSEROLE, HORMEL^^oz.^28.8
;;^UTILITY(U,$J,112,6366,1)
;;=5.8^2.7^12.2^96^77.7^^^9^.6^15.6^65^^465^^^^^333^1^.09
;;^UTILITY(U,$J,112,6366,2)
;;=.095^1.66^^.14^^.34
;;^UTILITY(U,$J,112,6378,0)
;;=CRISP, FRUIT (MILANI)^^oz.^28.38
;;^UTILITY(U,$J,112,6378,1)
;;=1.4^4.5^33.2^179^^^^^^^^108^93
;;^UTILITY(U,$J,112,6379,0)
;;=CORN MUFFINS ^^oz.^28.38
;;^UTILITY(U,$J,112,6379,1)
;;=6.4^10.6^42.5^277^^^^0^.8^^^^59^^^^^212^^.127
;;^UTILITY(U,$J,112,6379,2)
;;=.144^.85^^^^^^^30
;;^UTILITY(U,$J,112,6380,0)
;;=SQUASH, ZUCCHINI, FRIED^^oz.^28.38
;;^UTILITY(U,$J,112,6380,1)
;;=4.5^.1^24.1^115^69.3^^^57^1.4^^90^144^401.2^^^^^144^8.9^.11
;;^UTILITY(U,$J,112,6380,2)
;;=.14^1.64
;;^UTILITY(U,$J,112,6381,0)
;;=SALISBURY STEAK (FFF)^^oz.^28.38
;;^UTILITY(U,$J,112,6381,1)
;;=16.7^19.5^2.2^251^62.9^^^23^2.6^21.1^145^298^53.5^7.8^^^^52^6.3^.088
FHINI097 ; ; 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,6347,0)
+2 ;;=SARA LEE, FUDGE NUT TORTE^^oz.^28.8
+3 ;;^UTILITY(U,$J,112,6347,1)
+4 ;;=3.5^15.8^47.6^346^31.9^^^64^1.4^31^165^46^209^^^^^120^6.2^.07
+5 ;;^UTILITY(U,$J,112,6347,2)
+6 ;;=.27^.7
+7 ;;^UTILITY(U,$J,112,6348,0)
+8 ;;=SARA LEE, OLD FASHIONED CHOCOLATE LAYER CAKE^^oz.^28.8
+9 ;;^UTILITY(U,$J,112,6348,1)
+10 ;;=4.4^21.8^47.8^405^23.6^^^43^3.5^32^145^283^327^^^^^190^3.4^.04
+11 ;;^UTILITY(U,$J,112,6348,2)
+12 ;;=.26^.5
+13 ;;^UTILITY(U,$J,112,6349,0)
+14 ;;=SARA LEE, GERMAN CHOCOLATE LAYER CAKE^^oz.^28.8
+15 ;;^UTILITY(U,$J,112,6349,1)
+16 ;;=5.1^22.9^43^399^26.1^^^83^1.9^45^124^173^297^^^^^121^2.4^.06
+17 ;;^UTILITY(U,$J,112,6349,2)
+18 ;;=.31^1.1
+19 ;;^UTILITY(U,$J,112,6350,0)
+20 ;;=SARA LEE, TRAY, DUTCH APPLE BARVARIAN^^oz.^28.8
+21 ;;^UTILITY(U,$J,112,6350,1)
+22 ;;=2.7^10.1^36.1^245^49.5^^^57^.5^12^52^132^114^^^^^141^1.2^.06
+23 ;;^UTILITY(U,$J,112,6350,2)
+24 ;;=.15^.4
+25 ;;^UTILITY(U,$J,112,6352,0)
+26 ;;=MARGARINE, L.S.^^tsp.^5
+27 ;;^UTILITY(U,$J,112,6352,1)
+28 ;;=.6^81^.4^721^^^^20^0^^16^9.7^0^^^^^3311^^0
+29 ;;^UTILITY(U,$J,112,6352,2)
+30 ;;=0
+31 ;;^UTILITY(U,$J,112,6353,0)
+32 ;;=PARSLEY, FRESH^^oz.^28.8
+33 ;;^UTILITY(U,$J,112,6353,1)
+34 ;;=3.6^.6^8.5^44^^^^20^.6^4^6^73^4^^^^^850^17^12
+35 ;;^UTILITY(U,$J,112,6353,2)
+36 ;;=26^.1
+37 ;;^UTILITY(U,$J,112,6354,0)
+38 ;;=WORCESTERSHIRE SAUCE^^oz.^28.35
+39 ;;^UTILITY(U,$J,112,6354,1)
+40 ;;=2^0^18^80^^^^100^6^^60^800^980^^^^^340^180^0
+41 ;;^UTILITY(U,$J,112,6354,2)
+42 ;;=.2^0^^^^^^^^^^0
+43 ;;^UTILITY(U,$J,112,6354,20)
+44 ;;=Bowes & Church, 13th ed. DOE: 071285 #516
+45 ;;^UTILITY(U,$J,112,6355,0)
+46 ;;=SARA LEE, CHOCOLATE BAVARIAN CAKE (TRAY)^^oz.^28.8
+47 ;;^UTILITY(U,$J,112,6355,1)
+48 ;;=3.5^20.6^30.8^313^43.1^^^72^.5^12^61^123^78^^^^^687^.6^.05
+49 ;;^UTILITY(U,$J,112,6355,2)
+50 ;;=.13^.3
+51 ;;^UTILITY(U,$J,112,6356,0)
+52 ;;=SARA LEE, CHOCOLATE BAVARIAN PIE^^oz.^28.8
+53 ;;^UTILITY(U,$J,112,6356,1)
+54 ;;=3.6^24.7^28.3^350^42.2^^^61^1.4^24^70^187^104^^^^^446^^.04
+55 ;;^UTILITY(U,$J,112,6356,2)
+56 ;;=.15^.5
+57 ;;^UTILITY(U,$J,112,6357,0)
+58 ;;=SARA LEE, STRAWBERRY BAVARIAN^^oz.^28.8
+59 ;;^UTILITY(U,$J,112,6357,1)
+60 ;;=3.2^18^26^279^51.8^^^50^.5^11^60^92^80^^^^^439^49.5^.04
+61 ;;^UTILITY(U,$J,112,6357,2)
+62 ;;=.13^.6
+63 ;;^UTILITY(U,$J,112,6358,0)
+64 ;;=SARA LEE, LIME BAVARIAN^^oz.^28.8
+65 ;;^UTILITY(U,$J,112,6358,1)
+66 ;;=2.5^19.4^30.1^305^47^^^44^.3^8^52^57^84^^^^^389^^.05
+67 ;;^UTILITY(U,$J,112,6358,2)
+68 ;;=.09^.6
+69 ;;^UTILITY(U,$J,112,6359,0)
+70 ;;=SARA LEE, DUTCH APPLE BAVARIAN^^oz.^28.8
+71 ;;^UTILITY(U,$J,112,6359,1)
+72 ;;=2.4^11.6^30.8^235^53.7^^^44^1.1^13^44^126^182^^^^^250^17^.04
+73 ;;^UTILITY(U,$J,112,6359,2)
+74 ;;=.08^.5
+75 ;;^UTILITY(U,$J,112,6360,0)
+76 ;;=SARA LEE, CHOCOLATE MINT BAVARIAN^^oz.^28.8
+77 ;;^UTILITY(U,$J,112,6360,1)
+78 ;;=3.6^24.7^27.3^350^42.2^^^61^1.4^24^70^187^104^^^^^446^^.04
+79 ;;^UTILITY(U,$J,112,6360,2)
+80 ;;=.15^.5
+81 ;;^UTILITY(U,$J,112,6361,0)
+82 ;;=SARA LEE, APPLE DEMI DANISH^^oz.^28.8
+83 ;;^UTILITY(U,$J,112,6361,1)
+84 ;;=5.2^14.6^46.6^339^32^^^32^1.9^11^63^77^404^^^^^143^12.6^.2
+85 ;;^UTILITY(U,$J,112,6361,2)
+86 ;;=.32^1.7
+87 ;;^UTILITY(U,$J,112,6362,0)
+88 ;;=SARA LEE, CHEESE DEMI DANISH^^oz.^28.8
+89 ;;^UTILITY(U,$J,112,6362,1)
+90 ;;=6.7^19.7^37.5^354^34.7^^^35^1.7^11^81^79^369^^^^^323^.4^.24
+91 ;;^UTILITY(U,$J,112,6362,2)
+92 ;;=.21^1.8
+93 ;;^UTILITY(U,$J,112,6363,0)
+94 ;;=SARA LEE, RASPBERRY DEMI DANISH^^oz.^28.8
+95 ;;^UTILITY(U,$J,112,6363,1)
+96 ;;=4.9^14.7^54.2^370^24.8^^^26^1.8^11^57^79^316^^^^^97^.5^.18
+97 ;;^UTILITY(U,$J,112,6363,2)
+98 ;;=.37^1.7
+99 ;;^UTILITY(U,$J,112,6364,0)
+100 ;;=SARA LEE, CINNAMON RASIN DEMI DANISH^^oz.^28.8
+101 ;;^UTILITY(U,$J,112,6364,1)
+102 ;;=6.5^18.4^48.9^387^24.1^^^42^2^19^94^200^379^^^^^101^2.7^.29
+103 ;;^UTILITY(U,$J,112,6364,2)
+104 ;;=.29^1.8
+105 ;;^UTILITY(U,$J,112,6365,0)
+106 ;;=SARA LEE, PECAN DEMI DANISH^^oz.^28.8
+107 ;;^UTILITY(U,$J,112,6365,1)
+108 ;;=6.9^26.8^40.2^426^23.8^^^54^1.8^23^101^152^439^^^^^118^.5^.31
+109 ;;^UTILITY(U,$J,112,6365,2)
+110 ;;=.22^2
+111 ;;^UTILITY(U,$J,112,6366,0)
+112 ;;=MACARONI AND BEEF CASSEROLE, HORMEL^^oz.^28.8
+113 ;;^UTILITY(U,$J,112,6366,1)
+114 ;;=5.8^2.7^12.2^96^77.7^^^9^.6^15.6^65^^465^^^^^333^1^.09
+115 ;;^UTILITY(U,$J,112,6366,2)
+116 ;;=.095^1.66^^.14^^.34
+117 ;;^UTILITY(U,$J,112,6378,0)
+118 ;;=CRISP, FRUIT (MILANI)^^oz.^28.38
+119 ;;^UTILITY(U,$J,112,6378,1)
+120 ;;=1.4^4.5^33.2^179^^^^^^^^108^93
+121 ;;^UTILITY(U,$J,112,6379,0)
+122 ;;=CORN MUFFINS ^^oz.^28.38
+123 ;;^UTILITY(U,$J,112,6379,1)
+124 ;;=6.4^10.6^42.5^277^^^^0^.8^^^^59^^^^^212^^.127
+125 ;;^UTILITY(U,$J,112,6379,2)
+126 ;;=.144^.85^^^^^^^30
+127 ;;^UTILITY(U,$J,112,6380,0)
+128 ;;=SQUASH, ZUCCHINI, FRIED^^oz.^28.38
+129 ;;^UTILITY(U,$J,112,6380,1)
+130 ;;=4.5^.1^24.1^115^69.3^^^57^1.4^^90^144^401.2^^^^^144^8.9^.11
+131 ;;^UTILITY(U,$J,112,6380,2)
+132 ;;=.14^1.64
+133 ;;^UTILITY(U,$J,112,6381,0)
+134 ;;=SALISBURY STEAK (FFF)^^oz.^28.38
+135 ;;^UTILITY(U,$J,112,6381,1)
+136 ;;=16.7^19.5^2.2^251^62.9^^^23^2.6^21.1^145^298^53.5^7.8^^^^52^6.3^.088
