FHINI0BO ; ; 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,7625,0)
;;=ENTREES,TUNA NOODLE CASSEROLE,SWANSON^BC-00898^9-oz.^255
;;^UTILITY(U,$J,112,7625,1)
;;=5.255^3.098^13.137^101.569^^^^44.314^.745^^^77.647^409.02^^^^^116.471^.392^.059
;;^UTILITY(U,$J,112,7625,2)
;;=.09^1.294
;;^UTILITY(U,$J,112,7625,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7626,0)
;;=ENTREES,TURKEY BREAST W/GRAVY & STUFFING,STOUFFERS^BC-00899^7.9-oz.^223
;;^UTILITY(U,$J,112,7626,1)
;;=9.865^5.83^10.762^134.529^^^^^^^^^443.946
;;^UTILITY(U,$J,112,7626,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7627,0)
;;=ENTREES,TURKEY CASSEROLE,PILSBURY (MICRO)^BC-00900^3.5-oz.^100
;;^UTILITY(U,$J,112,7627,1)
;;=8.1^9.6^12.3^168^67^^^39^1.4^^91^160^345^^^^^600^3^.08
;;^UTILITY(U,$J,112,7627,2)
;;=.12^2.3^^^^^^^^^^^^^^^1
;;^UTILITY(U,$J,112,7627,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7628,0)
;;=ENTREES,TURKEY DIJON,LEAN CUISINE^BC-00901^9.5-oz.^269
;;^UTILITY(U,$J,112,7628,1)
;;=9.665^3.717^7.807^104.089^^^^37.175^.401^^^174.721^304.833^^^^^1672.862^.372^.056
;;^UTILITY(U,$J,112,7628,2)
;;=.097^2.23^^^^^^^24.164^1.115^^.372
;;^UTILITY(U,$J,112,7628,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7629,0)
;;=ENTREES,TURKEY DIJON,STOUFFERS^BC-00902^6-oz.^170
;;^UTILITY(U,$J,112,7629,1)
;;=9.412^5.118^7^111.765^77^^^60^.5^^^180^410^^^^^600^1.176^.071
;;^UTILITY(U,$J,112,7629,2)
;;=.141^2.412^^^^^^^22.941
;;^UTILITY(U,$J,112,7629,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7630,0)
;;=ENTREES,TURKEY,GLAZED,LE MENU LIGHTSTYLE^BC-00903^8.25-oz.^234
;;^UTILITY(U,$J,112,7630,1)
;;=8.077^2.009^13.803^105.983^^^^9.829^.641^^^145.726^258.547^^^^^128.205^1.282^.038
;;^UTILITY(U,$J,112,7630,2)
;;=.103^2.521^^^^^^^12.393^.385^^.855
;;^UTILITY(U,$J,112,7630,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7631,0)
;;=ENTREES,TURKEY W/GRAVY & DRESSING,LEAN CUISINE^BC-00904^7.8-oz.^222
;;^UTILITY(U,$J,112,7631,1)
;;=9.009^2.703^11.712^108.108^^^^18.018^.649^^^^324.324^^^^^0^0^.104
;;^UTILITY(U,$J,112,7631,2)
;;=.117^3.604^^^^^^^20.27^.45^^.45
;;^UTILITY(U,$J,112,7631,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7632,0)
;;=ENTREES,TURKEY W/GRAVY,BANQUET (BAG)^BC-00905^5-oz.^142
;;^UTILITY(U,$J,112,7632,1)
;;=4.93^4.225^3.521^70.423^^^^13.38^.493^^^58.451^412.676^^^^^5.634^0^.028
;;^UTILITY(U,$J,112,7632,2)
;;=.063^1.197^^^^^^^31.69
;;^UTILITY(U,$J,112,7632,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7633,0)
;;=ENTREES,TURKEY W/MUSHROOM SCE,LEAN CUISINE^BC-00906^8-oz.^226
;;^UTILITY(U,$J,112,7633,1)
;;=10.619^2.212^8.85^97.345^^^^8.85^.319^^^154.867^331.858^^^^^221.239^.885^.04
;;^UTILITY(U,$J,112,7633,2)
;;=.115^3.54^^^^^^^22.124^.885^^.442
;;^UTILITY(U,$J,112,7633,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7634,0)
;;=ENTREES,TURKEY TETRAZZINI,STOUFFERS^BC-00907^6-oz.^170
;;^UTILITY(U,$J,112,7634,1)
;;=7^8.412^9.118^140^74^^^45.294^.6^^^100^390^^^^^30^0^.082
;;^UTILITY(U,$J,112,7634,2)
;;=.159^1.176^^^^^^^25.294
;;^UTILITY(U,$J,112,7634,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7635,0)
;;=ENTREES,VEAL PARMIGIANA BREADED,BANQUET (BAG)^BC-00908^4-oz.^113
;;^UTILITY(U,$J,112,7635,1)
;;=8.85^9.735^17.699^203.54^^^^58.407^1.504^^^209.735^745.133^^^^^423.009^0^.115
;;^UTILITY(U,$J,112,7635,2)
;;=.106^1.416^^^^^^^30.973
;;^UTILITY(U,$J,112,7635,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7636,0)
;;=ENTREES,VEAL PARMIGIANA,LE MENU LIGHTSTYLE^BC-00909^8.25-oz.^234
;;^UTILITY(U,$J,112,7636,1)
;;=9.359^2.35^3.846^74.359^^^^33.761^1.368^^^262.821^271.795^^^^^143.162^31.197^.047
;;^UTILITY(U,$J,112,7636,2)
;;=.171^2.265^^^^^^^41.453^1.154^^.256
;;^UTILITY(U,$J,112,7636,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7637,0)
;;=ENTREES,BEEF STEAK W/GRAVY,POTATOES & ONIONS,CAMPBELL'S^BC-00910^10-oz.^284
;;^UTILITY(U,$J,112,7637,1)
;;=10.211^6.092^9.085^132.042^^^^10.563^1.725^^^171.127^257.042^^^^^0^0^.039
;;^UTILITY(U,$J,112,7637,2)
;;=.088^1.338
;;^UTILITY(U,$J,112,7637,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7638,0)
;;=ENTREES,CHICKEN BREAST,FLORENTINE & RICE PILAF,CAMPBELL'S^BC-00911^10.8-oz.^305
;;^UTILITY(U,$J,112,7638,1)
;;=8.295^5.443^11.311^127.541^^^^48.525^.918^^^225.574^258.361^^^^^1324.59^4.59^.072
FHINI0BO ; ; 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,7625,0)
+2 ;;=ENTREES,TUNA NOODLE CASSEROLE,SWANSON^BC-00898^9-oz.^255
+3 ;;^UTILITY(U,$J,112,7625,1)
+4 ;;=5.255^3.098^13.137^101.569^^^^44.314^.745^^^77.647^409.02^^^^^116.471^.392^.059
+5 ;;^UTILITY(U,$J,112,7625,2)
+6 ;;=.09^1.294
+7 ;;^UTILITY(U,$J,112,7625,20)
+8 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+9 ;;^UTILITY(U,$J,112,7626,0)
+10 ;;=ENTREES,TURKEY BREAST W/GRAVY & STUFFING,STOUFFERS^BC-00899^7.9-oz.^223
+11 ;;^UTILITY(U,$J,112,7626,1)
+12 ;;=9.865^5.83^10.762^134.529^^^^^^^^^443.946
+13 ;;^UTILITY(U,$J,112,7626,20)
+14 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+15 ;;^UTILITY(U,$J,112,7627,0)
+16 ;;=ENTREES,TURKEY CASSEROLE,PILSBURY (MICRO)^BC-00900^3.5-oz.^100
+17 ;;^UTILITY(U,$J,112,7627,1)
+18 ;;=8.1^9.6^12.3^168^67^^^39^1.4^^91^160^345^^^^^600^3^.08
+19 ;;^UTILITY(U,$J,112,7627,2)
+20 ;;=.12^2.3^^^^^^^^^^^^^^^1
+21 ;;^UTILITY(U,$J,112,7627,20)
+22 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+23 ;;^UTILITY(U,$J,112,7628,0)
+24 ;;=ENTREES,TURKEY DIJON,LEAN CUISINE^BC-00901^9.5-oz.^269
+25 ;;^UTILITY(U,$J,112,7628,1)
+26 ;;=9.665^3.717^7.807^104.089^^^^37.175^.401^^^174.721^304.833^^^^^1672.862^.372^.056
+27 ;;^UTILITY(U,$J,112,7628,2)
+28 ;;=.097^2.23^^^^^^^24.164^1.115^^.372
+29 ;;^UTILITY(U,$J,112,7628,20)
+30 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+31 ;;^UTILITY(U,$J,112,7629,0)
+32 ;;=ENTREES,TURKEY DIJON,STOUFFERS^BC-00902^6-oz.^170
+33 ;;^UTILITY(U,$J,112,7629,1)
+34 ;;=9.412^5.118^7^111.765^77^^^60^.5^^^180^410^^^^^600^1.176^.071
+35 ;;^UTILITY(U,$J,112,7629,2)
+36 ;;=.141^2.412^^^^^^^22.941
+37 ;;^UTILITY(U,$J,112,7629,20)
+38 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+39 ;;^UTILITY(U,$J,112,7630,0)
+40 ;;=ENTREES,TURKEY,GLAZED,LE MENU LIGHTSTYLE^BC-00903^8.25-oz.^234
+41 ;;^UTILITY(U,$J,112,7630,1)
+42 ;;=8.077^2.009^13.803^105.983^^^^9.829^.641^^^145.726^258.547^^^^^128.205^1.282^.038
+43 ;;^UTILITY(U,$J,112,7630,2)
+44 ;;=.103^2.521^^^^^^^12.393^.385^^.855
+45 ;;^UTILITY(U,$J,112,7630,20)
+46 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+47 ;;^UTILITY(U,$J,112,7631,0)
+48 ;;=ENTREES,TURKEY W/GRAVY & DRESSING,LEAN CUISINE^BC-00904^7.8-oz.^222
+49 ;;^UTILITY(U,$J,112,7631,1)
+50 ;;=9.009^2.703^11.712^108.108^^^^18.018^.649^^^^324.324^^^^^0^0^.104
+51 ;;^UTILITY(U,$J,112,7631,2)
+52 ;;=.117^3.604^^^^^^^20.27^.45^^.45
+53 ;;^UTILITY(U,$J,112,7631,20)
+54 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+55 ;;^UTILITY(U,$J,112,7632,0)
+56 ;;=ENTREES,TURKEY W/GRAVY,BANQUET (BAG)^BC-00905^5-oz.^142
+57 ;;^UTILITY(U,$J,112,7632,1)
+58 ;;=4.93^4.225^3.521^70.423^^^^13.38^.493^^^58.451^412.676^^^^^5.634^0^.028
+59 ;;^UTILITY(U,$J,112,7632,2)
+60 ;;=.063^1.197^^^^^^^31.69
+61 ;;^UTILITY(U,$J,112,7632,20)
+62 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+63 ;;^UTILITY(U,$J,112,7633,0)
+64 ;;=ENTREES,TURKEY W/MUSHROOM SCE,LEAN CUISINE^BC-00906^8-oz.^226
+65 ;;^UTILITY(U,$J,112,7633,1)
+66 ;;=10.619^2.212^8.85^97.345^^^^8.85^.319^^^154.867^331.858^^^^^221.239^.885^.04
+67 ;;^UTILITY(U,$J,112,7633,2)
+68 ;;=.115^3.54^^^^^^^22.124^.885^^.442
+69 ;;^UTILITY(U,$J,112,7633,20)
+70 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+71 ;;^UTILITY(U,$J,112,7634,0)
+72 ;;=ENTREES,TURKEY TETRAZZINI,STOUFFERS^BC-00907^6-oz.^170
+73 ;;^UTILITY(U,$J,112,7634,1)
+74 ;;=7^8.412^9.118^140^74^^^45.294^.6^^^100^390^^^^^30^0^.082
+75 ;;^UTILITY(U,$J,112,7634,2)
+76 ;;=.159^1.176^^^^^^^25.294
+77 ;;^UTILITY(U,$J,112,7634,20)
+78 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+79 ;;^UTILITY(U,$J,112,7635,0)
+80 ;;=ENTREES,VEAL PARMIGIANA BREADED,BANQUET (BAG)^BC-00908^4-oz.^113
+81 ;;^UTILITY(U,$J,112,7635,1)
+82 ;;=8.85^9.735^17.699^203.54^^^^58.407^1.504^^^209.735^745.133^^^^^423.009^0^.115
+83 ;;^UTILITY(U,$J,112,7635,2)
+84 ;;=.106^1.416^^^^^^^30.973
+85 ;;^UTILITY(U,$J,112,7635,20)
+86 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+87 ;;^UTILITY(U,$J,112,7636,0)
+88 ;;=ENTREES,VEAL PARMIGIANA,LE MENU LIGHTSTYLE^BC-00909^8.25-oz.^234
+89 ;;^UTILITY(U,$J,112,7636,1)
+90 ;;=9.359^2.35^3.846^74.359^^^^33.761^1.368^^^262.821^271.795^^^^^143.162^31.197^.047
+91 ;;^UTILITY(U,$J,112,7636,2)
+92 ;;=.171^2.265^^^^^^^41.453^1.154^^.256
+93 ;;^UTILITY(U,$J,112,7636,20)
+94 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+95 ;;^UTILITY(U,$J,112,7637,0)
+96 ;;=ENTREES,BEEF STEAK W/GRAVY,POTATOES & ONIONS,CAMPBELL'S^BC-00910^10-oz.^284
+97 ;;^UTILITY(U,$J,112,7637,1)
+98 ;;=10.211^6.092^9.085^132.042^^^^10.563^1.725^^^171.127^257.042^^^^^0^0^.039
+99 ;;^UTILITY(U,$J,112,7637,2)
+100 ;;=.088^1.338
+101 ;;^UTILITY(U,$J,112,7637,20)
+102 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+103 ;;^UTILITY(U,$J,112,7638,0)
+104 ;;=ENTREES,CHICKEN BREAST,FLORENTINE & RICE PILAF,CAMPBELL'S^BC-00911^10.8-oz.^305
+105 ;;^UTILITY(U,$J,112,7638,1)
+106 ;;=8.295^5.443^11.311^127.541^^^^48.525^.918^^^225.574^258.361^^^^^1324.59^4.59^.072
