FHINI0GM ; ; 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,10086,2)
;;=.08^1.416^^^^^^^^^^^^^^^4.779
;;^UTILITY(U,$J,112,10086,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10087,0)
;;=BEANS,LIMA,FROZEN W/BUTTER SCE,PILLSBURY^BC-03360^1/2-cup^113
;;^UTILITY(U,$J,112,10087,1)
;;=5.31^2.655^15.044^88.496^65.221^^^28.319^1.159^^68.142^353.982^345.133^^^^^196.46^12.389^.053
;;^UTILITY(U,$J,112,10087,2)
;;=.035^.885^^^^^^^4.425^.885^^0
;;^UTILITY(U,$J,112,10087,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10088,0)
;;=VEGETABLE,MANDARIN STYLE,FROZEN,BIRDS EYE^BC-03361^1/2-cup^95
;;^UTILITY(U,$J,112,10088,1)
;;=1.474^4.316^12.526^91.579^80^^^43.158^.674^15.789^33.684^234.737^410.526^.221^.055^^^4266.316^21.053^.042
;;^UTILITY(U,$J,112,10088,2)
;;=.074^.632^.211^.137^26.316^0^^^0^.842^^.842
;;^UTILITY(U,$J,112,10088,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10089,0)
;;=VEGETABLE,MEXICAN STYLE,FRZN,PILLSBURY^BC-03362^1/2-cup^140
;;^UTILITY(U,$J,112,10089,1)
;;=3.5^3.5^16.786^100.714^75^^^52.857^.357^^97.143^102.143^284.286^^^^^1294.286^17.143^.057
;;^UTILITY(U,$J,112,10089,2)
;;=.079^1.071^^^^^^^^^^^^^^^3
;;^UTILITY(U,$J,112,10089,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10090,0)
;;=VEGETABLE,MIXED,FROZEN,BIRDS EYE^BC-03363^1/2-cup^95
;;^UTILITY(U,$J,112,10090,1)
;;=2.737^.421^13.579^62.105^82.632^^^23.158^.853^18.947^54.737^196.842^43.158^.421^.066^^^6849.474^9.474^.105
;;^UTILITY(U,$J,112,10090,2)
;;=.074^1.263^.158^.137^28.421^0^^^0^.105^^.211^^^^^2.632
;;^UTILITY(U,$J,112,10090,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10091,0)
;;=VEGETABLE,MIXED,FRZN,PILLSBURY^BC-03364^1/2-cup^76
;;^UTILITY(U,$J,112,10091,1)
;;=2.763^.395^12.632^52.632^71.447^^^21.053^.671^^53.947^151.316^52.632^^^^^2140.789^6.579^.066
;;^UTILITY(U,$J,112,10091,2)
;;=.066^.395^^^^^^^0
;;^UTILITY(U,$J,112,10091,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10092,0)
;;=VEGETABLE,MIXED,FRZN W/BUTTER SCE,PILLSBURY^BC-03365^1/2-cup^113
;;^UTILITY(U,$J,112,10092,1)
;;=1.77^1.504^9.735^53.097^83.717^^^20.354^.602^^49.558^132.743^265.487^^^^^2170.796^7.965^.053
;;^UTILITY(U,$J,112,10092,2)
;;=.062^.796^^^^^^^0^^^0
;;^UTILITY(U,$J,112,10092,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10093,0)
;;=VEGETABLE,MIXED,FRZN W/ONION SCE,BIRDS EYE^BC-03366^1/3-cup^76
;;^UTILITY(U,$J,112,10093,1)
;;=2.895^6.842^15.263^127.632^73.158^^^56.579^.697^19.737^77.632^239.474^447.368^.342^.054^^^5467.105^6.579^.079
;;^UTILITY(U,$J,112,10093,2)
;;=.145^.789^.316^.132^19.737^.25^^^1.316^1.447^^1.316
;;^UTILITY(U,$J,112,10093,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10094,0)
;;=BEANS,MUNG SPROUTS,CND,LACHOY^BC-03367^2/3-cup^62
;;^UTILITY(U,$J,112,10094,1)
;;=1.613^0^1.613^12.903^^^^^.645^^^40.323^32.258^^^^^^24.194
;;^UTILITY(U,$J,112,10094,2)
;;=^^^^^^^^0^^^^^^^^0
;;^UTILITY(U,$J,112,10094,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10095,0)
;;=MUSHROOMS,BREADED,FRZN,ORE-LDA^BC-03368^2.67-oz.^76
;;^UTILITY(U,$J,112,10095,1)
;;=4.737^9.737^18.421^180.263^65.526^^^9.211^1.803^^^247.368^601.316^^^^^^^.092
;;^UTILITY(U,$J,112,10095,2)
;;=.355^2.632^^^^^^^1.316^1.711^6.711^1.316
;;^UTILITY(U,$J,112,10095,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10096,0)
;;=MUSHROOMS,CND,B&B^BC-03369^1/2-cup^85
;;^UTILITY(U,$J,112,10096,1)
;;=2.235^.353^2.824^23.529^93.059^^^7.059^.6^^43.529^152.941^527.059^^^^^0^4.706^0
;;^UTILITY(U,$J,112,10096,2)
;;=.165^1.529^^^^^^^0^^^^^^^^.824
;;^UTILITY(U,$J,112,10096,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10097,0)
;;=MUSHROOMS,CND,W/BUTTER SCE,PILLSBURY^BC-03370^1/2-cup^78
;;^UTILITY(U,$J,112,10097,1)
;;=2.179^.385^2.821^23.077^92.949^^^7.692^.603^^43.59^152.564^526.923^^^^^0^3.846^0
;;^UTILITY(U,$J,112,10097,2)
;;=.154^1.538^^^^^^^0^^^^^^^^.769
;;^UTILITY(U,$J,112,10097,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10098,0)
;;=MUSHROOMS,ORIENTAL STRAW,CND,PILLSBURY^BC-03371^1/4-cup^66
;;^UTILITY(U,$J,112,10098,1)
;;=2.273^.152^3.182^22.727^93.03^^^6.061^.197^^43.939^89.394^433.333^^^^^0^0^0
;;^UTILITY(U,$J,112,10098,2)
;;=.106^.909^^^^^^^0^^^^^^^^1.061
;;^UTILITY(U,$J,112,10098,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10099,0)
;;=BEANS,NAVY,NEW ENGLAND STYLE,FROZEN,BIRDS EYE^BC-03372^1/2-cup^95
FHINI0GM ; ; 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,10086,2)
+2 ;;=.08^1.416^^^^^^^^^^^^^^^4.779
+3 ;;^UTILITY(U,$J,112,10086,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,10087,0)
+6 ;;=BEANS,LIMA,FROZEN W/BUTTER SCE,PILLSBURY^BC-03360^1/2-cup^113
+7 ;;^UTILITY(U,$J,112,10087,1)
+8 ;;=5.31^2.655^15.044^88.496^65.221^^^28.319^1.159^^68.142^353.982^345.133^^^^^196.46^12.389^.053
+9 ;;^UTILITY(U,$J,112,10087,2)
+10 ;;=.035^.885^^^^^^^4.425^.885^^0
+11 ;;^UTILITY(U,$J,112,10087,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,10088,0)
+14 ;;=VEGETABLE,MANDARIN STYLE,FROZEN,BIRDS EYE^BC-03361^1/2-cup^95
+15 ;;^UTILITY(U,$J,112,10088,1)
+16 ;;=1.474^4.316^12.526^91.579^80^^^43.158^.674^15.789^33.684^234.737^410.526^.221^.055^^^4266.316^21.053^.042
+17 ;;^UTILITY(U,$J,112,10088,2)
+18 ;;=.074^.632^.211^.137^26.316^0^^^0^.842^^.842
+19 ;;^UTILITY(U,$J,112,10088,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,10089,0)
+22 ;;=VEGETABLE,MEXICAN STYLE,FRZN,PILLSBURY^BC-03362^1/2-cup^140
+23 ;;^UTILITY(U,$J,112,10089,1)
+24 ;;=3.5^3.5^16.786^100.714^75^^^52.857^.357^^97.143^102.143^284.286^^^^^1294.286^17.143^.057
+25 ;;^UTILITY(U,$J,112,10089,2)
+26 ;;=.079^1.071^^^^^^^^^^^^^^^3
+27 ;;^UTILITY(U,$J,112,10089,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,10090,0)
+30 ;;=VEGETABLE,MIXED,FROZEN,BIRDS EYE^BC-03363^1/2-cup^95
+31 ;;^UTILITY(U,$J,112,10090,1)
+32 ;;=2.737^.421^13.579^62.105^82.632^^^23.158^.853^18.947^54.737^196.842^43.158^.421^.066^^^6849.474^9.474^.105
+33 ;;^UTILITY(U,$J,112,10090,2)
+34 ;;=.074^1.263^.158^.137^28.421^0^^^0^.105^^.211^^^^^2.632
+35 ;;^UTILITY(U,$J,112,10090,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,10091,0)
+38 ;;=VEGETABLE,MIXED,FRZN,PILLSBURY^BC-03364^1/2-cup^76
+39 ;;^UTILITY(U,$J,112,10091,1)
+40 ;;=2.763^.395^12.632^52.632^71.447^^^21.053^.671^^53.947^151.316^52.632^^^^^2140.789^6.579^.066
+41 ;;^UTILITY(U,$J,112,10091,2)
+42 ;;=.066^.395^^^^^^^0
+43 ;;^UTILITY(U,$J,112,10091,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,10092,0)
+46 ;;=VEGETABLE,MIXED,FRZN W/BUTTER SCE,PILLSBURY^BC-03365^1/2-cup^113
+47 ;;^UTILITY(U,$J,112,10092,1)
+48 ;;=1.77^1.504^9.735^53.097^83.717^^^20.354^.602^^49.558^132.743^265.487^^^^^2170.796^7.965^.053
+49 ;;^UTILITY(U,$J,112,10092,2)
+50 ;;=.062^.796^^^^^^^0^^^0
+51 ;;^UTILITY(U,$J,112,10092,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,10093,0)
+54 ;;=VEGETABLE,MIXED,FRZN W/ONION SCE,BIRDS EYE^BC-03366^1/3-cup^76
+55 ;;^UTILITY(U,$J,112,10093,1)
+56 ;;=2.895^6.842^15.263^127.632^73.158^^^56.579^.697^19.737^77.632^239.474^447.368^.342^.054^^^5467.105^6.579^.079
+57 ;;^UTILITY(U,$J,112,10093,2)
+58 ;;=.145^.789^.316^.132^19.737^.25^^^1.316^1.447^^1.316
+59 ;;^UTILITY(U,$J,112,10093,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,10094,0)
+62 ;;=BEANS,MUNG SPROUTS,CND,LACHOY^BC-03367^2/3-cup^62
+63 ;;^UTILITY(U,$J,112,10094,1)
+64 ;;=1.613^0^1.613^12.903^^^^^.645^^^40.323^32.258^^^^^^24.194
+65 ;;^UTILITY(U,$J,112,10094,2)
+66 ;;=^^^^^^^^0^^^^^^^^0
+67 ;;^UTILITY(U,$J,112,10094,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,10095,0)
+70 ;;=MUSHROOMS,BREADED,FRZN,ORE-LDA^BC-03368^2.67-oz.^76
+71 ;;^UTILITY(U,$J,112,10095,1)
+72 ;;=4.737^9.737^18.421^180.263^65.526^^^9.211^1.803^^^247.368^601.316^^^^^^^.092
+73 ;;^UTILITY(U,$J,112,10095,2)
+74 ;;=.355^2.632^^^^^^^1.316^1.711^6.711^1.316
+75 ;;^UTILITY(U,$J,112,10095,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,10096,0)
+78 ;;=MUSHROOMS,CND,B&B^BC-03369^1/2-cup^85
+79 ;;^UTILITY(U,$J,112,10096,1)
+80 ;;=2.235^.353^2.824^23.529^93.059^^^7.059^.6^^43.529^152.941^527.059^^^^^0^4.706^0
+81 ;;^UTILITY(U,$J,112,10096,2)
+82 ;;=.165^1.529^^^^^^^0^^^^^^^^.824
+83 ;;^UTILITY(U,$J,112,10096,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,10097,0)
+86 ;;=MUSHROOMS,CND,W/BUTTER SCE,PILLSBURY^BC-03370^1/2-cup^78
+87 ;;^UTILITY(U,$J,112,10097,1)
+88 ;;=2.179^.385^2.821^23.077^92.949^^^7.692^.603^^43.59^152.564^526.923^^^^^0^3.846^0
+89 ;;^UTILITY(U,$J,112,10097,2)
+90 ;;=.154^1.538^^^^^^^0^^^^^^^^.769
+91 ;;^UTILITY(U,$J,112,10097,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,10098,0)
+94 ;;=MUSHROOMS,ORIENTAL STRAW,CND,PILLSBURY^BC-03371^1/4-cup^66
+95 ;;^UTILITY(U,$J,112,10098,1)
+96 ;;=2.273^.152^3.182^22.727^93.03^^^6.061^.197^^43.939^89.394^433.333^^^^^0^0^0
+97 ;;^UTILITY(U,$J,112,10098,2)
+98 ;;=.106^.909^^^^^^^0^^^^^^^^1.061
+99 ;;^UTILITY(U,$J,112,10098,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,10099,0)
+102 ;;=BEANS,NAVY,NEW ENGLAND STYLE,FROZEN,BIRDS EYE^BC-03372^1/2-cup^95
