FHINI0BE ; ; 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,7491,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7492,0)
;;=ENTREES,CHILI,CHOPPED BEEF,STOUFFERS^BC-00765^3-oz.^85
;;^UTILITY(U,$J,112,7492,1)
;;=9.059^7.765^6.118^130.588^75.059^^^18.824^1.306^^^270.588^420^^^^^500^8.235^.035
;;^UTILITY(U,$J,112,7492,2)
;;=.118^1.765^^^^^^^30.588
;;^UTILITY(U,$J,112,7492,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7493,0)
;;=ENTREES,CHILI CON CARNE W/BEANS,STOUFFERS^BC-00766^8-oz.^227
;;^UTILITY(U,$J,112,7493,1)
;;=9.119^4.317^9.604^114.097^75.286^^^40.969^1.502^^^310.132^395.154^^^^^325.11^7.93^.07
;;^UTILITY(U,$J,112,7493,2)
;;=.119^1.41^^^^^^^22.026
;;^UTILITY(U,$J,112,7493,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7494,0)
;;=ENTREES,CHILI,THREE BEAN (MEATLESS),STOUFFERS^BC-00767^6-oz.^170
;;^UTILITY(U,$J,112,7494,1)
;;=3.588^1.588^11.118^73.529^82.118^^^52.353^1.2^^^315.294^304.118^^^^^397.059^4.706^.059
;;^UTILITY(U,$J,112,7494,2)
;;=.112^.882^^^^^^^1.765^.353^.471^.588^^^^^3
;;^UTILITY(U,$J,112,7494,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7495,0)
;;=ENTREES,CHOW MEIN,CHICKEN,CHUN KING^BC-00768^13-oz.^369
;;^UTILITY(U,$J,112,7495,1)
;;=6.775^1.626^14.363^100.271^^^^7.317^.542^^55.556^70.461^422.764^^^^^171.545^1.084
;;^UTILITY(U,$J,112,7495,2)
;;=.057^.813
;;^UTILITY(U,$J,112,7495,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7496,0)
;;=ENTREES,CHOW MEIN,CHICKEN,DINING LITE^BC-00769^9-oz.^255
;;^UTILITY(U,$J,112,7496,1)
;;=3.922^.784^12.157^70.588^^^^8.235^.392^^^70.588^254.902^^^^^34.51^1.961^.047
;;^UTILITY(U,$J,112,7496,2)
;;=.067^.745^^^^^^^11.765
;;^UTILITY(U,$J,112,7496,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7497,0)
;;=ENTREES,CHOW MEIN,CHICKEN,HEALTHY CHOICE^BC-00770^8.5-oz.^241
;;^UTILITY(U,$J,112,7497,1)
;;=6.639^1.245^12.863^91.286^^^^9.129^.415^^120.747^120.332^182.573^^^^^167.22^1.66^.075
;;^UTILITY(U,$J,112,7497,2)
;;=.058^1.95^^^^^^^18.672
;;^UTILITY(U,$J,112,7497,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7498,0)
;;=ENTREES,CHICKEN,LEAN CUISINE^BC-00771^11.3-oz.^319
;;^UTILITY(U,$J,112,7498,1)
;;=4.389^1.567^11.285^78.37^^^^12.539^.339^^^84.639^322.884^^^^^31.348^4.702^.047
;;^UTILITY(U,$J,112,7498,2)
;;=.053^1.254^^^^^^^9.404^.313^^.313
;;^UTILITY(U,$J,112,7498,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7499,0)
;;=ENTREES,VEG,STOUFFERS^BC-00772^4-oz.^113
;;^UTILITY(U,$J,112,7499,1)
;;=1.062^2.212^5.221^45.133^90^^^14.159^.204^^^79.646^509.735^^^^^100^13.274^.009
;;^UTILITY(U,$J,112,7499,2)
;;=.053^.265
;;^UTILITY(U,$J,112,7499,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7500,0)
;;=ENTREES,CORN FRITTERS,MRS. PAUL'S^BC-00773^2-fritters^113
;;^UTILITY(U,$J,112,7500,1)
;;=5.044^11.77^28.85^241.593^^^^23.894^1.239^^^86.726^453.097^^^^^93.805^0^.142
;;^UTILITY(U,$J,112,7500,2)
;;=.106^1.239^^^^^^^7.965
;;^UTILITY(U,$J,112,7500,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7501,0)
;;=ENTREES,EGG ROLLS,CHICKEN,CHUN KING^BC-00774^3.6-oz.^102
;;^UTILITY(U,$J,112,7501,1)
;;=4.902^7.843^31.373^215.686^^^^34.314^^^^117.647^588.235^^^^^^0^.088
;;^UTILITY(U,$J,112,7501,2)
;;=.049^.686
;;^UTILITY(U,$J,112,7501,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7502,0)
;;=ENTREES,EGG ROLLS,CHICKEN,JENO'S SNACKS^BC-00775^3.5-oz.^100
;;^UTILITY(U,$J,112,7502,1)
;;=5.5^10.4^25^217^50^^^17^2.5^^76^135^416^^^^^155^7^.3
;;^UTILITY(U,$J,112,7502,2)
;;=.2^2.8
;;^UTILITY(U,$J,112,7502,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7503,0)
;;=ENTREES,EGG ROLLS,CHICKEN,LACHOY^BC-00776^3-med.^37
;;^UTILITY(U,$J,112,7503,1)
;;=8.108^8.108^32.432^243.243^^^^24.324^2.162^^^148.649^378.378^^^^^^5.405^.297
;;^UTILITY(U,$J,112,7503,2)
;;=.216^2.973^^^^^^^8.108^1.622^^3.514^13.514^^^^0
;;^UTILITY(U,$J,112,7503,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7504,0)
;;=ENTREES,EGG ROLLS,MEAT & SHRIMP,CHUN KING^BC-00777^3.6-oz.^102
;;^UTILITY(U,$J,112,7504,1)
;;=5.882^7.843^30.392^215.686^^^^26.471^^^^127.451^666.667^^^^^41.176^0^.186
;;^UTILITY(U,$J,112,7504,2)
;;=.069^.686
;;^UTILITY(U,$J,112,7504,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7505,0)
;;=ENTREES,EGG ROLLS,MEAT & SHRIMP,JENO'S SNACKS^BC-00778^3.5-oz.^100
FHINI0BE ; ; 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,7491,20)
+2 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+3 ;;^UTILITY(U,$J,112,7492,0)
+4 ;;=ENTREES,CHILI,CHOPPED BEEF,STOUFFERS^BC-00765^3-oz.^85
+5 ;;^UTILITY(U,$J,112,7492,1)
+6 ;;=9.059^7.765^6.118^130.588^75.059^^^18.824^1.306^^^270.588^420^^^^^500^8.235^.035
+7 ;;^UTILITY(U,$J,112,7492,2)
+8 ;;=.118^1.765^^^^^^^30.588
+9 ;;^UTILITY(U,$J,112,7492,20)
+10 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+11 ;;^UTILITY(U,$J,112,7493,0)
+12 ;;=ENTREES,CHILI CON CARNE W/BEANS,STOUFFERS^BC-00766^8-oz.^227
+13 ;;^UTILITY(U,$J,112,7493,1)
+14 ;;=9.119^4.317^9.604^114.097^75.286^^^40.969^1.502^^^310.132^395.154^^^^^325.11^7.93^.07
+15 ;;^UTILITY(U,$J,112,7493,2)
+16 ;;=.119^1.41^^^^^^^22.026
+17 ;;^UTILITY(U,$J,112,7493,20)
+18 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+19 ;;^UTILITY(U,$J,112,7494,0)
+20 ;;=ENTREES,CHILI,THREE BEAN (MEATLESS),STOUFFERS^BC-00767^6-oz.^170
+21 ;;^UTILITY(U,$J,112,7494,1)
+22 ;;=3.588^1.588^11.118^73.529^82.118^^^52.353^1.2^^^315.294^304.118^^^^^397.059^4.706^.059
+23 ;;^UTILITY(U,$J,112,7494,2)
+24 ;;=.112^.882^^^^^^^1.765^.353^.471^.588^^^^^3
+25 ;;^UTILITY(U,$J,112,7494,20)
+26 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+27 ;;^UTILITY(U,$J,112,7495,0)
+28 ;;=ENTREES,CHOW MEIN,CHICKEN,CHUN KING^BC-00768^13-oz.^369
+29 ;;^UTILITY(U,$J,112,7495,1)
+30 ;;=6.775^1.626^14.363^100.271^^^^7.317^.542^^55.556^70.461^422.764^^^^^171.545^1.084
+31 ;;^UTILITY(U,$J,112,7495,2)
+32 ;;=.057^.813
+33 ;;^UTILITY(U,$J,112,7495,20)
+34 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+35 ;;^UTILITY(U,$J,112,7496,0)
+36 ;;=ENTREES,CHOW MEIN,CHICKEN,DINING LITE^BC-00769^9-oz.^255
+37 ;;^UTILITY(U,$J,112,7496,1)
+38 ;;=3.922^.784^12.157^70.588^^^^8.235^.392^^^70.588^254.902^^^^^34.51^1.961^.047
+39 ;;^UTILITY(U,$J,112,7496,2)
+40 ;;=.067^.745^^^^^^^11.765
+41 ;;^UTILITY(U,$J,112,7496,20)
+42 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+43 ;;^UTILITY(U,$J,112,7497,0)
+44 ;;=ENTREES,CHOW MEIN,CHICKEN,HEALTHY CHOICE^BC-00770^8.5-oz.^241
+45 ;;^UTILITY(U,$J,112,7497,1)
+46 ;;=6.639^1.245^12.863^91.286^^^^9.129^.415^^120.747^120.332^182.573^^^^^167.22^1.66^.075
+47 ;;^UTILITY(U,$J,112,7497,2)
+48 ;;=.058^1.95^^^^^^^18.672
+49 ;;^UTILITY(U,$J,112,7497,20)
+50 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+51 ;;^UTILITY(U,$J,112,7498,0)
+52 ;;=ENTREES,CHICKEN,LEAN CUISINE^BC-00771^11.3-oz.^319
+53 ;;^UTILITY(U,$J,112,7498,1)
+54 ;;=4.389^1.567^11.285^78.37^^^^12.539^.339^^^84.639^322.884^^^^^31.348^4.702^.047
+55 ;;^UTILITY(U,$J,112,7498,2)
+56 ;;=.053^1.254^^^^^^^9.404^.313^^.313
+57 ;;^UTILITY(U,$J,112,7498,20)
+58 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+59 ;;^UTILITY(U,$J,112,7499,0)
+60 ;;=ENTREES,VEG,STOUFFERS^BC-00772^4-oz.^113
+61 ;;^UTILITY(U,$J,112,7499,1)
+62 ;;=1.062^2.212^5.221^45.133^90^^^14.159^.204^^^79.646^509.735^^^^^100^13.274^.009
+63 ;;^UTILITY(U,$J,112,7499,2)
+64 ;;=.053^.265
+65 ;;^UTILITY(U,$J,112,7499,20)
+66 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+67 ;;^UTILITY(U,$J,112,7500,0)
+68 ;;=ENTREES,CORN FRITTERS,MRS. PAUL'S^BC-00773^2-fritters^113
+69 ;;^UTILITY(U,$J,112,7500,1)
+70 ;;=5.044^11.77^28.85^241.593^^^^23.894^1.239^^^86.726^453.097^^^^^93.805^0^.142
+71 ;;^UTILITY(U,$J,112,7500,2)
+72 ;;=.106^1.239^^^^^^^7.965
+73 ;;^UTILITY(U,$J,112,7500,20)
+74 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+75 ;;^UTILITY(U,$J,112,7501,0)
+76 ;;=ENTREES,EGG ROLLS,CHICKEN,CHUN KING^BC-00774^3.6-oz.^102
+77 ;;^UTILITY(U,$J,112,7501,1)
+78 ;;=4.902^7.843^31.373^215.686^^^^34.314^^^^117.647^588.235^^^^^^0^.088
+79 ;;^UTILITY(U,$J,112,7501,2)
+80 ;;=.049^.686
+81 ;;^UTILITY(U,$J,112,7501,20)
+82 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+83 ;;^UTILITY(U,$J,112,7502,0)
+84 ;;=ENTREES,EGG ROLLS,CHICKEN,JENO'S SNACKS^BC-00775^3.5-oz.^100
+85 ;;^UTILITY(U,$J,112,7502,1)
+86 ;;=5.5^10.4^25^217^50^^^17^2.5^^76^135^416^^^^^155^7^.3
+87 ;;^UTILITY(U,$J,112,7502,2)
+88 ;;=.2^2.8
+89 ;;^UTILITY(U,$J,112,7502,20)
+90 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+91 ;;^UTILITY(U,$J,112,7503,0)
+92 ;;=ENTREES,EGG ROLLS,CHICKEN,LACHOY^BC-00776^3-med.^37
+93 ;;^UTILITY(U,$J,112,7503,1)
+94 ;;=8.108^8.108^32.432^243.243^^^^24.324^2.162^^^148.649^378.378^^^^^^5.405^.297
+95 ;;^UTILITY(U,$J,112,7503,2)
+96 ;;=.216^2.973^^^^^^^8.108^1.622^^3.514^13.514^^^^0
+97 ;;^UTILITY(U,$J,112,7503,20)
+98 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+99 ;;^UTILITY(U,$J,112,7504,0)
+100 ;;=ENTREES,EGG ROLLS,MEAT & SHRIMP,CHUN KING^BC-00777^3.6-oz.^102
+101 ;;^UTILITY(U,$J,112,7504,1)
+102 ;;=5.882^7.843^30.392^215.686^^^^26.471^^^^127.451^666.667^^^^^41.176^0^.186
+103 ;;^UTILITY(U,$J,112,7504,2)
+104 ;;=.069^.686
+105 ;;^UTILITY(U,$J,112,7504,20)
+106 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+107 ;;^UTILITY(U,$J,112,7505,0)
+108 ;;=ENTREES,EGG ROLLS,MEAT & SHRIMP,JENO'S SNACKS^BC-00778^3.5-oz.^100
