FHINI0BI ; ; 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,7545,0)
;;=ENTREES,MACARONI & BEEF W/CHEESE TOPPING,SWANSON^BC-00818^9-oz.^255
;;^UTILITY(U,$J,112,7545,1)
;;=7.765^3.608^10.039^103.922^^^^64.706^1.137^^^202.745^436.863^^^^^116.078^12.941^.043
;;^UTILITY(U,$J,112,7545,2)
;;=.114^2.039
;;^UTILITY(U,$J,112,7545,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7546,0)
;;=ENTREES,MACARONI & BEEF W/TOMATO SCE,STOUFFERS^BC-00819^6-oz.^170
;;^UTILITY(U,$J,112,7546,1)
;;=6.118^5.294^9.529^110^77^^^18.824^1^^^185.294^540^^^^^240^8.235^.006
;;^UTILITY(U,$J,112,7546,2)
;;=.088^1.529^^^^^^^15.294
;;^UTILITY(U,$J,112,7546,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7547,0)
;;=ENTREES,MACARONI & CHEESE,BANQUET^BC-00820^8-oz.^227
;;^UTILITY(U,$J,112,7547,1)
;;=4.846^7.489^15.859^154.185^^^^92.511^.441^^^59.471^409.692^^^^^266.52^0^.022
;;^UTILITY(U,$J,112,7547,2)
;;=.057^.308
;;^UTILITY(U,$J,112,7547,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7548,0)
;;=ENTREES,MACARONI & CHEESE,PILSBURY^BC-00821^5.75-oz.^163
;;^UTILITY(U,$J,112,7548,1)
;;=5.521^5.521^17.178^141.104^^^^^^^^104.294^361.963
;;^UTILITY(U,$J,112,7548,2)
;;=^^^^^^^^15.337^2.454
;;^UTILITY(U,$J,112,7548,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7549,0)
;;=ENTREES,MACARONI & CHEESE,STOUFFERS^BC-00822^6-oz.^170
;;^UTILITY(U,$J,112,7549,1)
;;=6.706^7.706^14^151.765^70^^^141.765^.5^^^75.294^420^^^^^70^0^.1
;;^UTILITY(U,$J,112,7549,2)
;;=.2^.588^^^^^^^14.118
;;^UTILITY(U,$J,112,7549,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7550,0)
;;=ENTREES,MACARONI & CHEESE,SWANSON HOMESTYLE^BC-00823^10-oz.^284
;;^UTILITY(U,$J,112,7550,1)
;;=6.056^6.655^13.134^136.62^^^^160.563^.739^^^47.887^394.014^^^^^49.296^.352^.081
;;^UTILITY(U,$J,112,7550,2)
;;=.102^.352
;;^UTILITY(U,$J,112,7550,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7551,0)
;;=ENTREES,MACARONI & CHEESE,SWANSON MICROWAVABLE^BC-00824^6-oz.^170
;;^UTILITY(U,$J,112,7551,1)
;;=4.647^4.176^13.588^110.588^^^^88.824^.941^^^60^434.706^^^^^224.706^.588^.065
;;^UTILITY(U,$J,112,7551,2)
;;=.118^.647
;;^UTILITY(U,$J,112,7551,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7552,0)
;;=ENTREES,MANICOTTI,3 CHEESE W/TOMATO SCE,LE MENU^BC-00825^11.7-oz.^333
;;^UTILITY(U,$J,112,7552,1)
;;=6.006^4.565^13.303^118.318^^^^148.048^.931^^^120.42^261.562^^^^^33.033^5.105^.084
;;^UTILITY(U,$J,112,7552,2)
;;=.114^1.201
;;^UTILITY(U,$J,112,7552,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7553,0)
;;=ENTREES,MEATBALLS,ITALIAN STYLE,SWANSON^BC-00826^13-oz.^369
;;^UTILITY(U,$J,112,7553,1)
;;=6.64^4.309^16.369^130.894^^^^40.108^1.545^^^174.797^253.388^^^^^455.014^4.336^.106
;;^UTILITY(U,$J,112,7553,2)
;;=.106^1.328
;;^UTILITY(U,$J,112,7553,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7554,0)
;;=ENTREES,MEATBALLS,SWEDISH,LE MENU LIGHTSTYLE^BC-00827^8.5-oz.^241
;;^UTILITY(U,$J,112,7554,1)
;;=7.593^3.029^12.946^109.544^^^^38.589^1.328^^^181.743^282.988^^^^^433.61^0^.104
;;^UTILITY(U,$J,112,7554,2)
;;=.112^1.826^^^^^^^16.598^1.162^^.747
;;^UTILITY(U,$J,112,7554,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7555,0)
;;=ENTREES,MEATBALLS,SWEDISH W/SCE,DINING LITE^BC-00828^9-oz.^255
;;^UTILITY(U,$J,112,7555,1)
;;=5.49^3.922^13.333^109.804^^^^34.902^.784^^^105.882^258.824^^^^^^0^.122
;;^UTILITY(U,$J,112,7555,2)
;;=.122^.824^^^^^^^21.569
;;^UTILITY(U,$J,112,7555,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7556,0)
;;=ENTREES,MEATBALL STEW,LEAN CUISINE^BC-00829^10-oz.^283
;;^UTILITY(U,$J,112,7556,1)
;;=7.42^3.534^7.067^88.339^^^^14.134^.954^^^155.477^395.76^^^^^530.035^1.413^.106
;;^UTILITY(U,$J,112,7556,2)
;;=.12^1.413^^^^^^^26.502^1.06^^.353
;;^UTILITY(U,$J,112,7556,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7557,0)
;;=ENTREES,MEATLOAF,BANQUET (BAG)^BC-00830^4-oz.^113
;;^UTILITY(U,$J,112,7557,1)
;;=8.85^12.389^7.08^176.991^^^^48.673^2.212^^^340.708^731.858^^^^^268.142^16.814^.124
;;^UTILITY(U,$J,112,7557,2)
;;=.133^1.416
;;^UTILITY(U,$J,112,7557,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7558,0)
;;=ENTREES,MEATLOAF,BEEF,STOUFFERS^BC-00831^3-oz.^85
;;^UTILITY(U,$J,112,7558,1)
;;=17.059^9.176^7.647^182.353^63.059^^^23.529^2.306^^^240^680^^^^^80^0^.106
FHINI0BI ; ; 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,7545,0)
+2 ;;=ENTREES,MACARONI & BEEF W/CHEESE TOPPING,SWANSON^BC-00818^9-oz.^255
+3 ;;^UTILITY(U,$J,112,7545,1)
+4 ;;=7.765^3.608^10.039^103.922^^^^64.706^1.137^^^202.745^436.863^^^^^116.078^12.941^.043
+5 ;;^UTILITY(U,$J,112,7545,2)
+6 ;;=.114^2.039
+7 ;;^UTILITY(U,$J,112,7545,20)
+8 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+9 ;;^UTILITY(U,$J,112,7546,0)
+10 ;;=ENTREES,MACARONI & BEEF W/TOMATO SCE,STOUFFERS^BC-00819^6-oz.^170
+11 ;;^UTILITY(U,$J,112,7546,1)
+12 ;;=6.118^5.294^9.529^110^77^^^18.824^1^^^185.294^540^^^^^240^8.235^.006
+13 ;;^UTILITY(U,$J,112,7546,2)
+14 ;;=.088^1.529^^^^^^^15.294
+15 ;;^UTILITY(U,$J,112,7546,20)
+16 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+17 ;;^UTILITY(U,$J,112,7547,0)
+18 ;;=ENTREES,MACARONI & CHEESE,BANQUET^BC-00820^8-oz.^227
+19 ;;^UTILITY(U,$J,112,7547,1)
+20 ;;=4.846^7.489^15.859^154.185^^^^92.511^.441^^^59.471^409.692^^^^^266.52^0^.022
+21 ;;^UTILITY(U,$J,112,7547,2)
+22 ;;=.057^.308
+23 ;;^UTILITY(U,$J,112,7547,20)
+24 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+25 ;;^UTILITY(U,$J,112,7548,0)
+26 ;;=ENTREES,MACARONI & CHEESE,PILSBURY^BC-00821^5.75-oz.^163
+27 ;;^UTILITY(U,$J,112,7548,1)
+28 ;;=5.521^5.521^17.178^141.104^^^^^^^^104.294^361.963
+29 ;;^UTILITY(U,$J,112,7548,2)
+30 ;;=^^^^^^^^15.337^2.454
+31 ;;^UTILITY(U,$J,112,7548,20)
+32 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+33 ;;^UTILITY(U,$J,112,7549,0)
+34 ;;=ENTREES,MACARONI & CHEESE,STOUFFERS^BC-00822^6-oz.^170
+35 ;;^UTILITY(U,$J,112,7549,1)
+36 ;;=6.706^7.706^14^151.765^70^^^141.765^.5^^^75.294^420^^^^^70^0^.1
+37 ;;^UTILITY(U,$J,112,7549,2)
+38 ;;=.2^.588^^^^^^^14.118
+39 ;;^UTILITY(U,$J,112,7549,20)
+40 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+41 ;;^UTILITY(U,$J,112,7550,0)
+42 ;;=ENTREES,MACARONI & CHEESE,SWANSON HOMESTYLE^BC-00823^10-oz.^284
+43 ;;^UTILITY(U,$J,112,7550,1)
+44 ;;=6.056^6.655^13.134^136.62^^^^160.563^.739^^^47.887^394.014^^^^^49.296^.352^.081
+45 ;;^UTILITY(U,$J,112,7550,2)
+46 ;;=.102^.352
+47 ;;^UTILITY(U,$J,112,7550,20)
+48 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+49 ;;^UTILITY(U,$J,112,7551,0)
+50 ;;=ENTREES,MACARONI & CHEESE,SWANSON MICROWAVABLE^BC-00824^6-oz.^170
+51 ;;^UTILITY(U,$J,112,7551,1)
+52 ;;=4.647^4.176^13.588^110.588^^^^88.824^.941^^^60^434.706^^^^^224.706^.588^.065
+53 ;;^UTILITY(U,$J,112,7551,2)
+54 ;;=.118^.647
+55 ;;^UTILITY(U,$J,112,7551,20)
+56 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+57 ;;^UTILITY(U,$J,112,7552,0)
+58 ;;=ENTREES,MANICOTTI,3 CHEESE W/TOMATO SCE,LE MENU^BC-00825^11.7-oz.^333
+59 ;;^UTILITY(U,$J,112,7552,1)
+60 ;;=6.006^4.565^13.303^118.318^^^^148.048^.931^^^120.42^261.562^^^^^33.033^5.105^.084
+61 ;;^UTILITY(U,$J,112,7552,2)
+62 ;;=.114^1.201
+63 ;;^UTILITY(U,$J,112,7552,20)
+64 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+65 ;;^UTILITY(U,$J,112,7553,0)
+66 ;;=ENTREES,MEATBALLS,ITALIAN STYLE,SWANSON^BC-00826^13-oz.^369
+67 ;;^UTILITY(U,$J,112,7553,1)
+68 ;;=6.64^4.309^16.369^130.894^^^^40.108^1.545^^^174.797^253.388^^^^^455.014^4.336^.106
+69 ;;^UTILITY(U,$J,112,7553,2)
+70 ;;=.106^1.328
+71 ;;^UTILITY(U,$J,112,7553,20)
+72 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+73 ;;^UTILITY(U,$J,112,7554,0)
+74 ;;=ENTREES,MEATBALLS,SWEDISH,LE MENU LIGHTSTYLE^BC-00827^8.5-oz.^241
+75 ;;^UTILITY(U,$J,112,7554,1)
+76 ;;=7.593^3.029^12.946^109.544^^^^38.589^1.328^^^181.743^282.988^^^^^433.61^0^.104
+77 ;;^UTILITY(U,$J,112,7554,2)
+78 ;;=.112^1.826^^^^^^^16.598^1.162^^.747
+79 ;;^UTILITY(U,$J,112,7554,20)
+80 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+81 ;;^UTILITY(U,$J,112,7555,0)
+82 ;;=ENTREES,MEATBALLS,SWEDISH W/SCE,DINING LITE^BC-00828^9-oz.^255
+83 ;;^UTILITY(U,$J,112,7555,1)
+84 ;;=5.49^3.922^13.333^109.804^^^^34.902^.784^^^105.882^258.824^^^^^^0^.122
+85 ;;^UTILITY(U,$J,112,7555,2)
+86 ;;=.122^.824^^^^^^^21.569
+87 ;;^UTILITY(U,$J,112,7555,20)
+88 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+89 ;;^UTILITY(U,$J,112,7556,0)
+90 ;;=ENTREES,MEATBALL STEW,LEAN CUISINE^BC-00829^10-oz.^283
+91 ;;^UTILITY(U,$J,112,7556,1)
+92 ;;=7.42^3.534^7.067^88.339^^^^14.134^.954^^^155.477^395.76^^^^^530.035^1.413^.106
+93 ;;^UTILITY(U,$J,112,7556,2)
+94 ;;=.12^1.413^^^^^^^26.502^1.06^^.353
+95 ;;^UTILITY(U,$J,112,7556,20)
+96 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+97 ;;^UTILITY(U,$J,112,7557,0)
+98 ;;=ENTREES,MEATLOAF,BANQUET (BAG)^BC-00830^4-oz.^113
+99 ;;^UTILITY(U,$J,112,7557,1)
+100 ;;=8.85^12.389^7.08^176.991^^^^48.673^2.212^^^340.708^731.858^^^^^268.142^16.814^.124
+101 ;;^UTILITY(U,$J,112,7557,2)
+102 ;;=.133^1.416
+103 ;;^UTILITY(U,$J,112,7557,20)
+104 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+105 ;;^UTILITY(U,$J,112,7558,0)
+106 ;;=ENTREES,MEATLOAF,BEEF,STOUFFERS^BC-00831^3-oz.^85
+107 ;;^UTILITY(U,$J,112,7558,1)
+108 ;;=17.059^9.176^7.647^182.353^63.059^^^23.529^2.306^^^240^680^^^^^80^0^.106
