FHINI0C8 ; ; 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,7889,2)
;;=.107^1.129^^^^^^^17.241
;;^UTILITY(U,$J,112,7889,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7890,0)
;;=FROZEN DINNERS,VEAL PARMIGIANA,MORTON^BC-01163^10-oz.^284
;;^UTILITY(U,$J,112,7890,1)
;;=3.521^2.817^12.324^91.549^^^^14.437^.704^^51.408^158.451^531.69^^^^^1347.535^1.408^.07
;;^UTILITY(U,$J,112,7890,2)
;;=.06^.81^^^^^^^12.324
;;^UTILITY(U,$J,112,7890,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7891,0)
;;=FROZEN DINNERS,VEAL PARMIGIANA,SWANSON^BC-01164^12.2-oz.^347
;;^UTILITY(U,$J,112,7891,1)
;;=6.311^5.85^12.305^127.089^^^^46.686^1.066^^^118.732^318.732^^^^^192.795^2.594^.078
;;^UTILITY(U,$J,112,7891,2)
;;=.086^1.671
;;^UTILITY(U,$J,112,7891,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7892,0)
;;=FROZEN DINNERS,VEAL PARMIGIANA W/ROTINI ALFREDO,LE MENU^BC-01165^11.5-oz.^326
;;^UTILITY(U,$J,112,7892,1)
;;=7.546^5.276^9.939^117.485^^^^81.288^.982^^^146.012^251.227^^^^^442.025^5.521^.077
;;^UTILITY(U,$J,112,7892,2)
;;=.107^1.503
;;^UTILITY(U,$J,112,7892,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7893,0)
;;=FROZEN DINNERS,VEAL PARMIGIANA W/SPAGHETTI,SWANSON HGRY-MAN^BC-01166^18.2-oz.^517
;;^UTILITY(U,$J,112,7893,1)
;;=6.325^4.681^10.89^111.025^^^^44.681^1.064^^^148.549^345.068^^^^^280.271^4.255^.07
;;^UTILITY(U,$J,112,7893,2)
;;=.104^1.721
;;^UTILITY(U,$J,112,7893,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7894,0)
;;=FROZEN DINNERS,WESTERN STYLE,BANQUET^BC-01167^11-oz.^312
;;^UTILITY(U,$J,112,7894,1)
;;=8.974^13.141^12.821^201.923^^^^22.436^1.603^^^259.615^230.769^^^^^48.077^4.487^.08
;;^UTILITY(U,$J,112,7894,2)
;;=.077^2.276^^^^^^^28.846
;;^UTILITY(U,$J,112,7894,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7895,0)
;;=FROZEN DINNERS,WESTERN STYLE,MORTON^BC-01168^10-oz.^284
;;^UTILITY(U,$J,112,7895,1)
;;=4.93^4.93^10.211^102.113^^^^22.887^.704^^74.296^179.577^510.563^^^^^54.577^0^.056
;;^UTILITY(U,$J,112,7895,2)
;;=.06^.493^^^^^^^12.324
;;^UTILITY(U,$J,112,7895,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7896,0)
;;=FROZEN DINNERS,WESTERN STYLE,SWANSON^BC-01169^11.5-oz.^326
;;^UTILITY(U,$J,112,7896,1)
;;=6.687^5.798^13.067^131.288^^^^22.699^1.38^^^147.239^325.46^^^^^191.411^4.294^.049
;;^UTILITY(U,$J,112,7896,2)
;;=.064^1.319
;;^UTILITY(U,$J,112,7896,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7897,0)
;;=FROZEN DINNERS,YANKEE POT ROAST,ARMOUR CLASSICS^BC-01170^10-oz.^284
;;^UTILITY(U,$J,112,7897,1)
;;=8.803^4.225^9.155^109.155^^^^16.197^1.056^^82.394^250^235.915^^^^^1149.296^3.873^.085
;;^UTILITY(U,$J,112,7897,2)
;;=.095^1.056^^^^^^^29.93
;;^UTILITY(U,$J,112,7897,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7898,0)
;;=FROZEN DINNERS,YANKEE POT ROAST,HEALTHY CHOICE^BC-01171^11-oz.^312
;;^UTILITY(U,$J,112,7898,1)
;;=6.09^1.282^11.538^83.333^^^^15.705^.321^^50^112.179^99.359^^^^^169.872^3.205^.064
;;^UTILITY(U,$J,112,7898,2)
;;=.067^.545^^^^^^^14.423^.641^^0
;;^UTILITY(U,$J,112,7898,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7899,0)
;;=FROZEN DINNERS,YANKEE POT ROAST,LE MENU^BC-01172^10-oz.^284
;;^UTILITY(U,$J,112,7899,1)
;;=9.014^4.225^9.331^111.268^^^^16.549^1.444^^69.014^226.761^245.423^^^^^2537.324^3.169^.046
;;^UTILITY(U,$J,112,7899,2)
;;=.092^1.901^^^^^^^^^^^^^^^1.69
;;^UTILITY(U,$J,112,7899,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7900,0)
;;=FROZEN DINNERS,ZITI W/MEAT SCE,SWANSON HUNGRY-MAN^BC-01173^17.6-oz.^489
;;^UTILITY(U,$J,112,7900,1)
;;=5.808^4.806^11.943^114.11^^^^52.147^1.534^^^210.02^345.399^^^^^486.912^7.771^.076
;;^UTILITY(U,$J,112,7900,2)
;;=.092^1.35
;;^UTILITY(U,$J,112,7900,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7901,0)
;;=KIDS MEAL,BEEF PATTY & CHEESE SANDWICH,KID CUISINE^BC-01174^6.25-oz.^177
;;^UTILITY(U,$J,112,7901,1)
;;=6.78^10.734^26.554^225.989^^^^74.576^1.13^^106.78^203.39^310.734^^^^^^1.695^.181
;;^UTILITY(U,$J,112,7901,2)
;;=.13^1.13^^^^^^^22.599
;;^UTILITY(U,$J,112,7901,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7902,0)
;;=KIDS MEAL,CHICKEN BBQ GLAZED,YOSEMITE SAM,TYSON^BC-01175^8-oz.^227
;;^UTILITY(U,$J,112,7902,1)
;;=12.335^9.251^13.216^185.022^^^^^^^^^330.396
;;^UTILITY(U,$J,112,7902,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
FHINI0C8 ; ; 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,7889,2)
+2 ;;=.107^1.129^^^^^^^17.241
+3 ;;^UTILITY(U,$J,112,7889,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7890,0)
+6 ;;=FROZEN DINNERS,VEAL PARMIGIANA,MORTON^BC-01163^10-oz.^284
+7 ;;^UTILITY(U,$J,112,7890,1)
+8 ;;=3.521^2.817^12.324^91.549^^^^14.437^.704^^51.408^158.451^531.69^^^^^1347.535^1.408^.07
+9 ;;^UTILITY(U,$J,112,7890,2)
+10 ;;=.06^.81^^^^^^^12.324
+11 ;;^UTILITY(U,$J,112,7890,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7891,0)
+14 ;;=FROZEN DINNERS,VEAL PARMIGIANA,SWANSON^BC-01164^12.2-oz.^347
+15 ;;^UTILITY(U,$J,112,7891,1)
+16 ;;=6.311^5.85^12.305^127.089^^^^46.686^1.066^^^118.732^318.732^^^^^192.795^2.594^.078
+17 ;;^UTILITY(U,$J,112,7891,2)
+18 ;;=.086^1.671
+19 ;;^UTILITY(U,$J,112,7891,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7892,0)
+22 ;;=FROZEN DINNERS,VEAL PARMIGIANA W/ROTINI ALFREDO,LE MENU^BC-01165^11.5-oz.^326
+23 ;;^UTILITY(U,$J,112,7892,1)
+24 ;;=7.546^5.276^9.939^117.485^^^^81.288^.982^^^146.012^251.227^^^^^442.025^5.521^.077
+25 ;;^UTILITY(U,$J,112,7892,2)
+26 ;;=.107^1.503
+27 ;;^UTILITY(U,$J,112,7892,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7893,0)
+30 ;;=FROZEN DINNERS,VEAL PARMIGIANA W/SPAGHETTI,SWANSON HGRY-MAN^BC-01166^18.2-oz.^517
+31 ;;^UTILITY(U,$J,112,7893,1)
+32 ;;=6.325^4.681^10.89^111.025^^^^44.681^1.064^^^148.549^345.068^^^^^280.271^4.255^.07
+33 ;;^UTILITY(U,$J,112,7893,2)
+34 ;;=.104^1.721
+35 ;;^UTILITY(U,$J,112,7893,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7894,0)
+38 ;;=FROZEN DINNERS,WESTERN STYLE,BANQUET^BC-01167^11-oz.^312
+39 ;;^UTILITY(U,$J,112,7894,1)
+40 ;;=8.974^13.141^12.821^201.923^^^^22.436^1.603^^^259.615^230.769^^^^^48.077^4.487^.08
+41 ;;^UTILITY(U,$J,112,7894,2)
+42 ;;=.077^2.276^^^^^^^28.846
+43 ;;^UTILITY(U,$J,112,7894,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7895,0)
+46 ;;=FROZEN DINNERS,WESTERN STYLE,MORTON^BC-01168^10-oz.^284
+47 ;;^UTILITY(U,$J,112,7895,1)
+48 ;;=4.93^4.93^10.211^102.113^^^^22.887^.704^^74.296^179.577^510.563^^^^^54.577^0^.056
+49 ;;^UTILITY(U,$J,112,7895,2)
+50 ;;=.06^.493^^^^^^^12.324
+51 ;;^UTILITY(U,$J,112,7895,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7896,0)
+54 ;;=FROZEN DINNERS,WESTERN STYLE,SWANSON^BC-01169^11.5-oz.^326
+55 ;;^UTILITY(U,$J,112,7896,1)
+56 ;;=6.687^5.798^13.067^131.288^^^^22.699^1.38^^^147.239^325.46^^^^^191.411^4.294^.049
+57 ;;^UTILITY(U,$J,112,7896,2)
+58 ;;=.064^1.319
+59 ;;^UTILITY(U,$J,112,7896,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7897,0)
+62 ;;=FROZEN DINNERS,YANKEE POT ROAST,ARMOUR CLASSICS^BC-01170^10-oz.^284
+63 ;;^UTILITY(U,$J,112,7897,1)
+64 ;;=8.803^4.225^9.155^109.155^^^^16.197^1.056^^82.394^250^235.915^^^^^1149.296^3.873^.085
+65 ;;^UTILITY(U,$J,112,7897,2)
+66 ;;=.095^1.056^^^^^^^29.93
+67 ;;^UTILITY(U,$J,112,7897,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7898,0)
+70 ;;=FROZEN DINNERS,YANKEE POT ROAST,HEALTHY CHOICE^BC-01171^11-oz.^312
+71 ;;^UTILITY(U,$J,112,7898,1)
+72 ;;=6.09^1.282^11.538^83.333^^^^15.705^.321^^50^112.179^99.359^^^^^169.872^3.205^.064
+73 ;;^UTILITY(U,$J,112,7898,2)
+74 ;;=.067^.545^^^^^^^14.423^.641^^0
+75 ;;^UTILITY(U,$J,112,7898,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7899,0)
+78 ;;=FROZEN DINNERS,YANKEE POT ROAST,LE MENU^BC-01172^10-oz.^284
+79 ;;^UTILITY(U,$J,112,7899,1)
+80 ;;=9.014^4.225^9.331^111.268^^^^16.549^1.444^^69.014^226.761^245.423^^^^^2537.324^3.169^.046
+81 ;;^UTILITY(U,$J,112,7899,2)
+82 ;;=.092^1.901^^^^^^^^^^^^^^^1.69
+83 ;;^UTILITY(U,$J,112,7899,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7900,0)
+86 ;;=FROZEN DINNERS,ZITI W/MEAT SCE,SWANSON HUNGRY-MAN^BC-01173^17.6-oz.^489
+87 ;;^UTILITY(U,$J,112,7900,1)
+88 ;;=5.808^4.806^11.943^114.11^^^^52.147^1.534^^^210.02^345.399^^^^^486.912^7.771^.076
+89 ;;^UTILITY(U,$J,112,7900,2)
+90 ;;=.092^1.35
+91 ;;^UTILITY(U,$J,112,7900,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7901,0)
+94 ;;=KIDS MEAL,BEEF PATTY & CHEESE SANDWICH,KID CUISINE^BC-01174^6.25-oz.^177
+95 ;;^UTILITY(U,$J,112,7901,1)
+96 ;;=6.78^10.734^26.554^225.989^^^^74.576^1.13^^106.78^203.39^310.734^^^^^^1.695^.181
+97 ;;^UTILITY(U,$J,112,7901,2)
+98 ;;=.13^1.13^^^^^^^22.599
+99 ;;^UTILITY(U,$J,112,7901,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7902,0)
+102 ;;=KIDS MEAL,CHICKEN BBQ GLAZED,YOSEMITE SAM,TYSON^BC-01175^8-oz.^227
+103 ;;^UTILITY(U,$J,112,7902,1)
+104 ;;=12.335^9.251^13.216^185.022^^^^^^^^^330.396
+105 ;;^UTILITY(U,$J,112,7902,20)
+106 ;;=Bowes & Church's Food Values, Sixteenth Edition.
