FHINI0C7 ; ; 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,7876,2)
;;=.094^.725
;;^UTILITY(U,$J,112,7876,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7877,0)
;;=FROZEN DINNERS,TAMALES,PATIO MEXICAN^BC-01150^13-oz.^369
;;^UTILITY(U,$J,112,7877,1)
;;=3.252^5.691^15.718^127.371^^^^27.1^1.084^^64.499^181.572^501.355^^^^^417.344^0^.079
;;^UTILITY(U,$J,112,7877,2)
;;=.07^.434^^^^^^^9.485
;;^UTILITY(U,$J,112,7877,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7878,0)
;;=FROZEN DINNERS,TORTELLINI CHEESE,LE MENU LIGHTSTYLE^BC-01151^10-oz.^284
;;^UTILITY(U,$J,112,7878,1)
;;=3.592^1.866^12.007^79.225^^^^47.183^.951^^^147.183^160.211^^^^^103.873^15.845^.092
;;^UTILITY(U,$J,112,7878,2)
;;=.151^.986^^^^^^^4.577^.599^^.493
;;^UTILITY(U,$J,112,7878,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7879,0)
;;=FROZEN DINNERS,TURKEY,BANQUET^BC-01152^10.5-oz.^298
;;^UTILITY(U,$J,112,7879,1)
;;=6.04^6.711^11.745^130.872^^^^16.443^.336^^^167.785^372.483^^^^^183.221^2.013^.044
;;^UTILITY(U,$J,112,7879,2)
;;=.064^1.946^^^^^^^13.423
;;^UTILITY(U,$J,112,7879,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7880,0)
;;=FROZEN DINNERS,TURKEY,BANQUET EXTRA HELPING^BC-01153^19-oz.^539
;;^UTILITY(U,$J,112,7880,1)
;;=5.38^7.792^12.616^139.147^^^^17.254^.557^^66.976^163.265^367.347^^^^^155.288^1.484^.046
;;^UTILITY(U,$J,112,7880,2)
;;=.065^1.892^^^^^^^12.059
;;^UTILITY(U,$J,112,7880,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7881,0)
;;=FROZEN DINNERS,TURKEY BREAST,HEALTHY CHOICE^BC-01154^10.5-oz.^298
;;^UTILITY(U,$J,112,7881,1)
;;=7.047^1.678^13.087^97.315^^^^16.443^.671^^91.275^181.208^140.94^^^^^85.906^17.45^.158
;;^UTILITY(U,$J,112,7881,2)
;;=.087^2.282^^^^^^^15.101^.671^^0
;;^UTILITY(U,$J,112,7881,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7882,0)
;;=FROZEN DINNERS,TURKEY,MORTON^BC-01155^10-oz.^284
;;^UTILITY(U,$J,112,7882,1)
;;=5.282^2.113^9.859^80.986^^^^17.958^.704^^70.423^144.366^457.746^^^^^1627.113^1.056^.085
;;^UTILITY(U,$J,112,7882,2)
;;=.085^1.408^^^^^^^15.845
;;^UTILITY(U,$J,112,7882,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7883,0)
;;=FROZEN DINNERS,TURKEY,SWANSON^BC-01156^11.5-oz.^326
;;^UTILITY(U,$J,112,7883,1)
;;=6.166^3.405^13.037^107.362^^^^15.951^.828^^^127.301^321.166^^^^^87.117^1.84^.067
;;^UTILITY(U,$J,112,7883,2)
;;=.074^2.025
;;^UTILITY(U,$J,112,7883,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7884,0)
;;=FROZEN DINNERS,TURKEY,SWANSON HUNGRY-MAN^BC-01157^17-oz.^482
;;^UTILITY(U,$J,112,7884,1)
;;=7.531^3.34^12.822^111.411^^^^17.427^^^^165.768^357.054^^^^^123.237^2.282^.071
;;^UTILITY(U,$J,112,7884,2)
;;=.085^2.573
;;^UTILITY(U,$J,112,7884,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7885,0)
;;=FROZEN DINNERS,TURKEY,WHITE MEAT,LE MENU^BC-01158^10.5-oz.^298
;;^UTILITY(U,$J,112,7885,1)
;;=9.396^4.362^8.054^109.06^^^^18.121^^^^209.732^278.859^^^^^903.691^5.705^.054
;;^UTILITY(U,$J,112,7885,2)
;;=.097^2.617
;;^UTILITY(U,$J,112,7885,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7886,0)
;;=FROZEN DINNERS,TURKEY W/DRESSING & GRAVY,ARMOUR CLASSICS^BC-01159^11.5-oz.^326
;;^UTILITY(U,$J,112,7886,1)
;;=5.828^3.681^10.429^98.16^^^^29.141^.613^^63.19^159.509^392.638^^^^^922.086^2.454^.092
;;^UTILITY(U,$J,112,7886,2)
;;=.067^1.687^^^^^^^15.337
;;^UTILITY(U,$J,112,7886,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7887,0)
;;=FROZEN DINNERS,TURKEY DIVAN,LE MENU LIGHTSTYLE^BC-01160^10-oz.^284
;;^UTILITY(U,$J,112,7887,1)
;;=7.993^2.887^9.014^94.014^^^^40.845^.599^^^173.239^287.676^^^^^233.451^7.746^.039
;;^UTILITY(U,$J,112,7887,2)
;;=.074^2.113^^^^^^^15.141^.88^^.493
;;^UTILITY(U,$J,112,7887,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7888,0)
;;=FROZEN DINNERS,VEAL MARSALA,LE MENU LIGHTSTYLE^BC-01161^10-oz.^284
;;^UTILITY(U,$J,112,7888,1)
;;=8.908^1.831^8.944^88.028^^^^11.62^.634^^^173.239^256.338^^^^^428.169^1.056^.063
;;^UTILITY(U,$J,112,7888,2)
;;=.187^2.606^^^^^^^39.437^.352^^.352
;;^UTILITY(U,$J,112,7888,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7889,0)
;;=FROZEN DINNERS,VEAL PARMIGIANA,ARMOUR CLASSICS^BC-01162^11.25-oz.^319
;;^UTILITY(U,$J,112,7889,1)
;;=5.643^6.897^10.658^125.392^^^^51.411^.94^^52.978^163.009^413.793^^^^^345.455^8.464^.107
FHINI0C7 ; ; 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,7876,2)
+2 ;;=.094^.725
+3 ;;^UTILITY(U,$J,112,7876,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7877,0)
+6 ;;=FROZEN DINNERS,TAMALES,PATIO MEXICAN^BC-01150^13-oz.^369
+7 ;;^UTILITY(U,$J,112,7877,1)
+8 ;;=3.252^5.691^15.718^127.371^^^^27.1^1.084^^64.499^181.572^501.355^^^^^417.344^0^.079
+9 ;;^UTILITY(U,$J,112,7877,2)
+10 ;;=.07^.434^^^^^^^9.485
+11 ;;^UTILITY(U,$J,112,7877,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7878,0)
+14 ;;=FROZEN DINNERS,TORTELLINI CHEESE,LE MENU LIGHTSTYLE^BC-01151^10-oz.^284
+15 ;;^UTILITY(U,$J,112,7878,1)
+16 ;;=3.592^1.866^12.007^79.225^^^^47.183^.951^^^147.183^160.211^^^^^103.873^15.845^.092
+17 ;;^UTILITY(U,$J,112,7878,2)
+18 ;;=.151^.986^^^^^^^4.577^.599^^.493
+19 ;;^UTILITY(U,$J,112,7878,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7879,0)
+22 ;;=FROZEN DINNERS,TURKEY,BANQUET^BC-01152^10.5-oz.^298
+23 ;;^UTILITY(U,$J,112,7879,1)
+24 ;;=6.04^6.711^11.745^130.872^^^^16.443^.336^^^167.785^372.483^^^^^183.221^2.013^.044
+25 ;;^UTILITY(U,$J,112,7879,2)
+26 ;;=.064^1.946^^^^^^^13.423
+27 ;;^UTILITY(U,$J,112,7879,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7880,0)
+30 ;;=FROZEN DINNERS,TURKEY,BANQUET EXTRA HELPING^BC-01153^19-oz.^539
+31 ;;^UTILITY(U,$J,112,7880,1)
+32 ;;=5.38^7.792^12.616^139.147^^^^17.254^.557^^66.976^163.265^367.347^^^^^155.288^1.484^.046
+33 ;;^UTILITY(U,$J,112,7880,2)
+34 ;;=.065^1.892^^^^^^^12.059
+35 ;;^UTILITY(U,$J,112,7880,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7881,0)
+38 ;;=FROZEN DINNERS,TURKEY BREAST,HEALTHY CHOICE^BC-01154^10.5-oz.^298
+39 ;;^UTILITY(U,$J,112,7881,1)
+40 ;;=7.047^1.678^13.087^97.315^^^^16.443^.671^^91.275^181.208^140.94^^^^^85.906^17.45^.158
+41 ;;^UTILITY(U,$J,112,7881,2)
+42 ;;=.087^2.282^^^^^^^15.101^.671^^0
+43 ;;^UTILITY(U,$J,112,7881,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7882,0)
+46 ;;=FROZEN DINNERS,TURKEY,MORTON^BC-01155^10-oz.^284
+47 ;;^UTILITY(U,$J,112,7882,1)
+48 ;;=5.282^2.113^9.859^80.986^^^^17.958^.704^^70.423^144.366^457.746^^^^^1627.113^1.056^.085
+49 ;;^UTILITY(U,$J,112,7882,2)
+50 ;;=.085^1.408^^^^^^^15.845
+51 ;;^UTILITY(U,$J,112,7882,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7883,0)
+54 ;;=FROZEN DINNERS,TURKEY,SWANSON^BC-01156^11.5-oz.^326
+55 ;;^UTILITY(U,$J,112,7883,1)
+56 ;;=6.166^3.405^13.037^107.362^^^^15.951^.828^^^127.301^321.166^^^^^87.117^1.84^.067
+57 ;;^UTILITY(U,$J,112,7883,2)
+58 ;;=.074^2.025
+59 ;;^UTILITY(U,$J,112,7883,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7884,0)
+62 ;;=FROZEN DINNERS,TURKEY,SWANSON HUNGRY-MAN^BC-01157^17-oz.^482
+63 ;;^UTILITY(U,$J,112,7884,1)
+64 ;;=7.531^3.34^12.822^111.411^^^^17.427^^^^165.768^357.054^^^^^123.237^2.282^.071
+65 ;;^UTILITY(U,$J,112,7884,2)
+66 ;;=.085^2.573
+67 ;;^UTILITY(U,$J,112,7884,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7885,0)
+70 ;;=FROZEN DINNERS,TURKEY,WHITE MEAT,LE MENU^BC-01158^10.5-oz.^298
+71 ;;^UTILITY(U,$J,112,7885,1)
+72 ;;=9.396^4.362^8.054^109.06^^^^18.121^^^^209.732^278.859^^^^^903.691^5.705^.054
+73 ;;^UTILITY(U,$J,112,7885,2)
+74 ;;=.097^2.617
+75 ;;^UTILITY(U,$J,112,7885,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7886,0)
+78 ;;=FROZEN DINNERS,TURKEY W/DRESSING & GRAVY,ARMOUR CLASSICS^BC-01159^11.5-oz.^326
+79 ;;^UTILITY(U,$J,112,7886,1)
+80 ;;=5.828^3.681^10.429^98.16^^^^29.141^.613^^63.19^159.509^392.638^^^^^922.086^2.454^.092
+81 ;;^UTILITY(U,$J,112,7886,2)
+82 ;;=.067^1.687^^^^^^^15.337
+83 ;;^UTILITY(U,$J,112,7886,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7887,0)
+86 ;;=FROZEN DINNERS,TURKEY DIVAN,LE MENU LIGHTSTYLE^BC-01160^10-oz.^284
+87 ;;^UTILITY(U,$J,112,7887,1)
+88 ;;=7.993^2.887^9.014^94.014^^^^40.845^.599^^^173.239^287.676^^^^^233.451^7.746^.039
+89 ;;^UTILITY(U,$J,112,7887,2)
+90 ;;=.074^2.113^^^^^^^15.141^.88^^.493
+91 ;;^UTILITY(U,$J,112,7887,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7888,0)
+94 ;;=FROZEN DINNERS,VEAL MARSALA,LE MENU LIGHTSTYLE^BC-01161^10-oz.^284
+95 ;;^UTILITY(U,$J,112,7888,1)
+96 ;;=8.908^1.831^8.944^88.028^^^^11.62^.634^^^173.239^256.338^^^^^428.169^1.056^.063
+97 ;;^UTILITY(U,$J,112,7888,2)
+98 ;;=.187^2.606^^^^^^^39.437^.352^^.352
+99 ;;^UTILITY(U,$J,112,7888,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7889,0)
+102 ;;=FROZEN DINNERS,VEAL PARMIGIANA,ARMOUR CLASSICS^BC-01162^11.25-oz.^319
+103 ;;^UTILITY(U,$J,112,7889,1)
+104 ;;=5.643^6.897^10.658^125.392^^^^51.411^.94^^52.978^163.009^413.793^^^^^345.455^8.464^.107