FHINI0BA ; ; 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,7438,2)
;;=.094^1.333^^^^^^^17.647
;;^UTILITY(U,$J,112,7438,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7439,0)
;;=ENTREES,BURRITO,PATIO,BEEF & BEAN^BC-00712^burritos^142
;;^UTILITY(U,$J,112,7439,1)
;;=7.746^11.268^30.282^260.563^^^^30.282^2.113^^99.296^253.521^584.507^^^^^213.38^0^.254
;;^UTILITY(U,$J,112,7439,2)
;;=.176^1.831
;;^UTILITY(U,$J,112,7439,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7440,0)
;;=ENTREES,BURRITO,PATIO,BEEF,BEAN & GREEN CHILI^BC-00713^burritos^142
;;^UTILITY(U,$J,112,7440,1)
;;=8.451^8.451^30.282^232.394^^^^31.69^2.113^^107.746^260.563^542.254^^^^^^0^.324
;;^UTILITY(U,$J,112,7440,2)
;;=.141^2.183
;;^UTILITY(U,$J,112,7440,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7441,0)
;;=ENTREES,BURRITO,PATIO,BEEF,BEAN & RED CHILI^BC-00714^burritos^142
;;^UTILITY(U,$J,112,7441,1)
;;=7.746^9.155^30.986^239.437^^^^32.394^2.113^^103.521^274.648^570.423^^^^^565.493^0^.331
;;^UTILITY(U,$J,112,7441,2)
;;=.19^1.761
;;^UTILITY(U,$J,112,7441,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7442,0)
;;=ENTREES,BURRITO,PATIO,RED HOT^BC-00715^burritos^142
;;^UTILITY(U,$J,112,7442,1)
;;=8.451^10.563^30.282^253.521^^^^28.169^2.113^^94.366^246.479^563.38^^^^^481.69^0^.345
;;^UTILITY(U,$J,112,7442,2)
;;=.211^.493
;;^UTILITY(U,$J,112,7442,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7443,0)
;;=ENTREES,CABBAGE,STUFFED W/BEEF,STOUFFERS^BC-00716^2.5-oz.^71
;;^UTILITY(U,$J,112,7443,1)
;;=8.451^6.056^11.972^136.62^71.972^^^25.352^1.394^^^150.704^519.718^^^^^0^1.408^.085
;;^UTILITY(U,$J,112,7443,2)
;;=.099^1.549^^^^^^^19.718
;;^UTILITY(U,$J,112,7443,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7444,0)
;;=ENTREES,CABBAGE,STUFFED W/BEEF,RICE & SCE,STOUFFERS^BC-00717^7.7-oz.^218
;;^UTILITY(U,$J,112,7444,1)
;;=5.183^4.679^9.083^100^78.991^^^55.046^.798^^^170.183^539.908^^^^^170.183^5.963^.06
;;^UTILITY(U,$J,112,7444,2)
;;=.069^1.193^^^^^^^11.927
;;^UTILITY(U,$J,112,7444,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7445,0)
;;=ENTREES,CABBAGE,STUFFED W/MEAT & SCE,LEAN CUISINE^BC-00718^10.7-oz.^304
;;^UTILITY(U,$J,112,7445,1)
;;=4.934^2.961^6.579^72.368^^^^26.316^.592^^^174.342^305.921^^^^^411.184^1.974^.049
;;^UTILITY(U,$J,112,7445,2)
;;=.046^.987^^^^^^^13.158^.658^^0
;;^UTILITY(U,$J,112,7445,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7446,0)
;;=ENTREES,CAJUN SEASONED STEW,STOUFFERS^BC-00719^4-oz.^113
;;^UTILITY(U,$J,112,7446,1)
;;=5.133^5.221^4.69^85.841^83.009^^^21.239^.602^^^250.442^409.735^^^^^369.912^6.195^.062
;;^UTILITY(U,$J,112,7446,2)
;;=.071^1.416^^^^^^^22.124
;;^UTILITY(U,$J,112,7446,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7447,0)
;;=ENTREES,CANNELLONI,BEEF & PORK,LEAN CUISINE^BC-00720^9.6-oz.^273
;;^UTILITY(U,$J,112,7447,1)
;;=6.96^3.663^9.158^98.901^^^^73.26^.527^^^146.52^344.322^^^^^732.601^0^.055
;;^UTILITY(U,$J,112,7447,2)
;;=.125^.733^^^^^^^16.484^1.465^^.366
;;^UTILITY(U,$J,112,7447,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7448,0)
;;=ENTREES,CANNELLONI,CHEESE,DINING LITE^BC-00721^9-oz.^255
;;^UTILITY(U,$J,112,7448,1)
;;=7.451^3.529^14.902^121.569^^^^154.51^.784^^^203.922^254.902^^^^^350.98^1.961^.169
;;^UTILITY(U,$J,112,7448,2)
;;=.145^1.02^^^^^^^27.451
;;^UTILITY(U,$J,112,7448,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7449,0)
;;=ENTREES,CHEESE,STOUFFERS^BC-00722^5.5-oz.^156
;;^UTILITY(U,$J,112,7449,1)
;;=6.474^5.321^8.782^110.256^78.013^^^139.744^.397^^^139.744^389.744^^^^^500^10.897^.038
;;^UTILITY(U,$J,112,7449,2)
;;=.122^.577^^^^^^^12.821
;;^UTILITY(U,$J,112,7449,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7450,0)
;;=ENTREES,CHEESE W/TOMATO,LEAN CUISINE^BC-00723^9.1-oz.^258
;;^UTILITY(U,$J,112,7450,1)
;;=8.527^3.876^9.302^104.651^^^^116.279^.279^^^127.907^348.837^^^^^290.698^2.326^.047
;;^UTILITY(U,$J,112,7450,2)
;;=.101^.465^^^^^^^11.628^1.938^^.388
;;^UTILITY(U,$J,112,7450,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7451,0)
;;=ENTREES,CHEESE STUFFED SHELLS,STOUFFERS^BC-00724^9.7-oz.^275
;;^UTILITY(U,$J,112,7451,1)
;;=5.418^3.091^12.109^97.455^78.291^^^110.182^^^^188^208^^.811^^^277.091^1.818^.091
;;^UTILITY(U,$J,112,7451,2)
;;=.109^1.091^^^^^^^8.727^.873^.436^.255^^^^^1.891
FHINI0BA ; ; 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,7438,2)
+2 ;;=.094^1.333^^^^^^^17.647
+3 ;;^UTILITY(U,$J,112,7438,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7439,0)
+6 ;;=ENTREES,BURRITO,PATIO,BEEF & BEAN^BC-00712^burritos^142
+7 ;;^UTILITY(U,$J,112,7439,1)
+8 ;;=7.746^11.268^30.282^260.563^^^^30.282^2.113^^99.296^253.521^584.507^^^^^213.38^0^.254
+9 ;;^UTILITY(U,$J,112,7439,2)
+10 ;;=.176^1.831
+11 ;;^UTILITY(U,$J,112,7439,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7440,0)
+14 ;;=ENTREES,BURRITO,PATIO,BEEF,BEAN & GREEN CHILI^BC-00713^burritos^142
+15 ;;^UTILITY(U,$J,112,7440,1)
+16 ;;=8.451^8.451^30.282^232.394^^^^31.69^2.113^^107.746^260.563^542.254^^^^^^0^.324
+17 ;;^UTILITY(U,$J,112,7440,2)
+18 ;;=.141^2.183
+19 ;;^UTILITY(U,$J,112,7440,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7441,0)
+22 ;;=ENTREES,BURRITO,PATIO,BEEF,BEAN & RED CHILI^BC-00714^burritos^142
+23 ;;^UTILITY(U,$J,112,7441,1)
+24 ;;=7.746^9.155^30.986^239.437^^^^32.394^2.113^^103.521^274.648^570.423^^^^^565.493^0^.331
+25 ;;^UTILITY(U,$J,112,7441,2)
+26 ;;=.19^1.761
+27 ;;^UTILITY(U,$J,112,7441,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7442,0)
+30 ;;=ENTREES,BURRITO,PATIO,RED HOT^BC-00715^burritos^142
+31 ;;^UTILITY(U,$J,112,7442,1)
+32 ;;=8.451^10.563^30.282^253.521^^^^28.169^2.113^^94.366^246.479^563.38^^^^^481.69^0^.345
+33 ;;^UTILITY(U,$J,112,7442,2)
+34 ;;=.211^.493
+35 ;;^UTILITY(U,$J,112,7442,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7443,0)
+38 ;;=ENTREES,CABBAGE,STUFFED W/BEEF,STOUFFERS^BC-00716^2.5-oz.^71
+39 ;;^UTILITY(U,$J,112,7443,1)
+40 ;;=8.451^6.056^11.972^136.62^71.972^^^25.352^1.394^^^150.704^519.718^^^^^0^1.408^.085
+41 ;;^UTILITY(U,$J,112,7443,2)
+42 ;;=.099^1.549^^^^^^^19.718
+43 ;;^UTILITY(U,$J,112,7443,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7444,0)
+46 ;;=ENTREES,CABBAGE,STUFFED W/BEEF,RICE & SCE,STOUFFERS^BC-00717^7.7-oz.^218
+47 ;;^UTILITY(U,$J,112,7444,1)
+48 ;;=5.183^4.679^9.083^100^78.991^^^55.046^.798^^^170.183^539.908^^^^^170.183^5.963^.06
+49 ;;^UTILITY(U,$J,112,7444,2)
+50 ;;=.069^1.193^^^^^^^11.927
+51 ;;^UTILITY(U,$J,112,7444,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7445,0)
+54 ;;=ENTREES,CABBAGE,STUFFED W/MEAT & SCE,LEAN CUISINE^BC-00718^10.7-oz.^304
+55 ;;^UTILITY(U,$J,112,7445,1)
+56 ;;=4.934^2.961^6.579^72.368^^^^26.316^.592^^^174.342^305.921^^^^^411.184^1.974^.049
+57 ;;^UTILITY(U,$J,112,7445,2)
+58 ;;=.046^.987^^^^^^^13.158^.658^^0
+59 ;;^UTILITY(U,$J,112,7445,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7446,0)
+62 ;;=ENTREES,CAJUN SEASONED STEW,STOUFFERS^BC-00719^4-oz.^113
+63 ;;^UTILITY(U,$J,112,7446,1)
+64 ;;=5.133^5.221^4.69^85.841^83.009^^^21.239^.602^^^250.442^409.735^^^^^369.912^6.195^.062
+65 ;;^UTILITY(U,$J,112,7446,2)
+66 ;;=.071^1.416^^^^^^^22.124
+67 ;;^UTILITY(U,$J,112,7446,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7447,0)
+70 ;;=ENTREES,CANNELLONI,BEEF & PORK,LEAN CUISINE^BC-00720^9.6-oz.^273
+71 ;;^UTILITY(U,$J,112,7447,1)
+72 ;;=6.96^3.663^9.158^98.901^^^^73.26^.527^^^146.52^344.322^^^^^732.601^0^.055
+73 ;;^UTILITY(U,$J,112,7447,2)
+74 ;;=.125^.733^^^^^^^16.484^1.465^^.366
+75 ;;^UTILITY(U,$J,112,7447,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7448,0)
+78 ;;=ENTREES,CANNELLONI,CHEESE,DINING LITE^BC-00721^9-oz.^255
+79 ;;^UTILITY(U,$J,112,7448,1)
+80 ;;=7.451^3.529^14.902^121.569^^^^154.51^.784^^^203.922^254.902^^^^^350.98^1.961^.169
+81 ;;^UTILITY(U,$J,112,7448,2)
+82 ;;=.145^1.02^^^^^^^27.451
+83 ;;^UTILITY(U,$J,112,7448,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7449,0)
+86 ;;=ENTREES,CHEESE,STOUFFERS^BC-00722^5.5-oz.^156
+87 ;;^UTILITY(U,$J,112,7449,1)
+88 ;;=6.474^5.321^8.782^110.256^78.013^^^139.744^.397^^^139.744^389.744^^^^^500^10.897^.038
+89 ;;^UTILITY(U,$J,112,7449,2)
+90 ;;=.122^.577^^^^^^^12.821
+91 ;;^UTILITY(U,$J,112,7449,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7450,0)
+94 ;;=ENTREES,CHEESE W/TOMATO,LEAN CUISINE^BC-00723^9.1-oz.^258
+95 ;;^UTILITY(U,$J,112,7450,1)
+96 ;;=8.527^3.876^9.302^104.651^^^^116.279^.279^^^127.907^348.837^^^^^290.698^2.326^.047
+97 ;;^UTILITY(U,$J,112,7450,2)
+98 ;;=.101^.465^^^^^^^11.628^1.938^^.388
+99 ;;^UTILITY(U,$J,112,7450,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7451,0)
+102 ;;=ENTREES,CHEESE STUFFED SHELLS,STOUFFERS^BC-00724^9.7-oz.^275
+103 ;;^UTILITY(U,$J,112,7451,1)
+104 ;;=5.418^3.091^12.109^97.455^78.291^^^110.182^^^^188^208^^.811^^^277.091^1.818^.091
+105 ;;^UTILITY(U,$J,112,7451,2)
+106 ;;=.109^1.091^^^^^^^8.727^.873^.436^.255^^^^^1.891
