FHINI0GN ; ; 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,10099,1)
;;=3.263^6.526^14.947^131.579^74.105^^^27.368^.642^22.105^44.211^165.263^375.789^.253^.051^^^931.579^10.526^.095
;;^UTILITY(U,$J,112,10099,2)
;;=.084^.632^.263^.116^30.526^.011^^^0^1.263^^1.684
;;^UTILITY(U,$J,112,10099,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10100,0)
;;=ONION RINGS,FROZEN,MRS. PAUL'S^BC-03373^2.5-oz.^71
;;^UTILITY(U,$J,112,10100,1)
;;=3.944^14.366^33.944^281.69^^^^28.169^1.268^^^74.648^516.901^^^^^33.803^1.408^.127
;;^UTILITY(U,$J,112,10100,2)
;;=.07^1.268
;;^UTILITY(U,$J,112,10100,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10101,0)
;;=ONION RINGS,FROZEN,ORE-LDA^BC-03374^2-oz.^57
;;^UTILITY(U,$J,112,10101,1)
;;=3.158^12.456^31.053^249.123^51.754^^^21.053^.947^^^182.456^226.316^^^^^100^5.263^.088
;;^UTILITY(U,$J,112,10101,2)
;;=.053^1.228^^^^^^^^2.105^4.561^5.789
;;^UTILITY(U,$J,112,10101,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10102,0)
;;=ONION RINGS,FRZN,CHOPPED,ORE-LDA^BC-03375^2-oz.^57
;;^UTILITY(U,$J,112,10102,1)
;;=1.053^0^7.368^35.088^91.053^^^0^^^^159.649^14.035^^^^^^3.509^.053
;;^UTILITY(U,$J,112,10102,2)
;;=.018^.877^^^^^^^0^0^0^0
;;^UTILITY(U,$J,112,10102,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10103,0)
;;=ONION RINGS,FRZN,SMALL,WHOLE,BIRDS EYE^BC-03376^1/2-cup^113
;;^UTILITY(U,$J,112,10103,1)
;;=.885^.088^8.496^35.398^90.177^^^35.398^.46^10.619^23.009^138.053^8.85^.115^.05^^^16.814^7.965^.027
;;^UTILITY(U,$J,112,10103,2)
;;=.027^.177^.097^.088^21.239^0^^^0^0^^0
;;^UTILITY(U,$J,112,10103,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10104,0)
;;=ONION RINGS,FRZN,SMALL W/CREAM SCE,BIRDS EYE^BC-03377^1/2-cup^85
;;^UTILITY(U,$J,112,10104,1)
;;=1.882^6.941^12.706^117.647^76.941^^^64.706^.424^14.118^64.706^197.647^405.882^.141^.045^^^295.294^7.059^.035
;;^UTILITY(U,$J,112,10104,2)
;;=.118^.235^.282^.094^17.647^.259^^^1.176^1.412^^1.294
;;^UTILITY(U,$J,112,10104,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10105,0)
;;=VEGETABLE,ORIENTAL STYLE,FROZEN,GARDEN GOURMET^BC-03378^9.5-oz.^269
;;^UTILITY(U,$J,112,10105,1)
;;=2.9^.149^17.286^73.978^78.513^^^15.985^^^53.903^123.048^260.967^^^^^40.149^2.23
;;^UTILITY(U,$J,112,10105,2)
;;=.082^^^^^^^^^^^^^^^^2.007
;;^UTILITY(U,$J,112,10105,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10106,0)
;;=VEGETABLE,PASTA PRIMAVERA STYLE,FRZN,BIRDS EYE^BC-03379^1/2-cup^95
;;^UTILITY(U,$J,112,10106,1)
;;=5.263^5.474^15.053^128.421^72.632^^^100^1^21.053^102.105^181.053^355.789^.558^.071^^^4504.211^17.895^.147
;;^UTILITY(U,$J,112,10106,2)
;;=.137^1.158^.242^.105^30.526^.137^^^3.158^1.474^^.947
;;^UTILITY(U,$J,112,10106,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10107,0)
;;=PEAS & ONION,CND,PILLSBURY^BC-03380^1/2-cup^120
;;^UTILITY(U,$J,112,10107,1)
;;=2.917^.25^9^50^86^^^16.667^.8^^51.667^95.833^441.667^^^^^465^8.333^.092
;;^UTILITY(U,$J,112,10107,2)
;;=.067^1.417
;;^UTILITY(U,$J,112,10107,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10108,0)
;;=PEAS & PEARL ONIONS,FRZN,BIRD EYE^BC-03381^1/2-cup^95
;;^UTILITY(U,$J,112,10108,1)
;;=4.842^.211^14.211^74.737^79.579^^^15.789^.895^18.947^62.105^181.053^465.263^.505^.087^^^669.474^20^.253
;;^UTILITY(U,$J,112,10108,2)
;;=.084^1.895^.179^13.684^46.316^0^^^0^0^^.105^^^^^3.684
;;^UTILITY(U,$J,112,10108,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10109,0)
;;=PEAS & PEARL ONIONS,FRZN W/CHEESE SCE,BIRDS EYE^BC-03382^1/2-cup^142
;;^UTILITY(U,$J,112,10109,1)
;;=4.014^3.451^12.746^96.479^78.592^^^53.521^.859^17.606^76.761^152.817^314.085^.507^.066^^^1510.563^10.563^.155
;;^UTILITY(U,$J,112,10109,2)
;;=.113^1.056^.204^.092^30.282^.162^^^2.817^1.056^^.563
;;^UTILITY(U,$J,112,10109,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10110,0)
;;=PEAS & POTATOES W/CREAM SCE,FRZN,BIRDS EYE^BC-03383^1/2-cup^76
;;^UTILITY(U,$J,112,10110,1)
;;=4.474^8.158^19.474^167.105^65.789^^^55.263^.974^27.632^110.526^273.684^513.158^.632^.122^^^684.211^7.895^.197
;;^UTILITY(U,$J,112,10110,2)
;;=.171^1.184^.434^.158^34.211^.303^^^1.316^1.711^^1.447
;;^UTILITY(U,$J,112,10110,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,10111,0)
;;=PEAS ONIONS & CARROTS W/BUTTER SCE,FROZEN,LE SUEUR^BC-03384^1/2-cup^120
FHINI0GN ; ; 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,10099,1)
+2 ;;=3.263^6.526^14.947^131.579^74.105^^^27.368^.642^22.105^44.211^165.263^375.789^.253^.051^^^931.579^10.526^.095
+3 ;;^UTILITY(U,$J,112,10099,2)
+4 ;;=.084^.632^.263^.116^30.526^.011^^^0^1.263^^1.684
+5 ;;^UTILITY(U,$J,112,10099,20)
+6 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+7 ;;^UTILITY(U,$J,112,10100,0)
+8 ;;=ONION RINGS,FROZEN,MRS. PAUL'S^BC-03373^2.5-oz.^71
+9 ;;^UTILITY(U,$J,112,10100,1)
+10 ;;=3.944^14.366^33.944^281.69^^^^28.169^1.268^^^74.648^516.901^^^^^33.803^1.408^.127
+11 ;;^UTILITY(U,$J,112,10100,2)
+12 ;;=.07^1.268
+13 ;;^UTILITY(U,$J,112,10100,20)
+14 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+15 ;;^UTILITY(U,$J,112,10101,0)
+16 ;;=ONION RINGS,FROZEN,ORE-LDA^BC-03374^2-oz.^57
+17 ;;^UTILITY(U,$J,112,10101,1)
+18 ;;=3.158^12.456^31.053^249.123^51.754^^^21.053^.947^^^182.456^226.316^^^^^100^5.263^.088
+19 ;;^UTILITY(U,$J,112,10101,2)
+20 ;;=.053^1.228^^^^^^^^2.105^4.561^5.789
+21 ;;^UTILITY(U,$J,112,10101,20)
+22 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+23 ;;^UTILITY(U,$J,112,10102,0)
+24 ;;=ONION RINGS,FRZN,CHOPPED,ORE-LDA^BC-03375^2-oz.^57
+25 ;;^UTILITY(U,$J,112,10102,1)
+26 ;;=1.053^0^7.368^35.088^91.053^^^0^^^^159.649^14.035^^^^^^3.509^.053
+27 ;;^UTILITY(U,$J,112,10102,2)
+28 ;;=.018^.877^^^^^^^0^0^0^0
+29 ;;^UTILITY(U,$J,112,10102,20)
+30 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+31 ;;^UTILITY(U,$J,112,10103,0)
+32 ;;=ONION RINGS,FRZN,SMALL,WHOLE,BIRDS EYE^BC-03376^1/2-cup^113
+33 ;;^UTILITY(U,$J,112,10103,1)
+34 ;;=.885^.088^8.496^35.398^90.177^^^35.398^.46^10.619^23.009^138.053^8.85^.115^.05^^^16.814^7.965^.027
+35 ;;^UTILITY(U,$J,112,10103,2)
+36 ;;=.027^.177^.097^.088^21.239^0^^^0^0^^0
+37 ;;^UTILITY(U,$J,112,10103,20)
+38 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+39 ;;^UTILITY(U,$J,112,10104,0)
+40 ;;=ONION RINGS,FRZN,SMALL W/CREAM SCE,BIRDS EYE^BC-03377^1/2-cup^85
+41 ;;^UTILITY(U,$J,112,10104,1)
+42 ;;=1.882^6.941^12.706^117.647^76.941^^^64.706^.424^14.118^64.706^197.647^405.882^.141^.045^^^295.294^7.059^.035
+43 ;;^UTILITY(U,$J,112,10104,2)
+44 ;;=.118^.235^.282^.094^17.647^.259^^^1.176^1.412^^1.294
+45 ;;^UTILITY(U,$J,112,10104,20)
+46 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+47 ;;^UTILITY(U,$J,112,10105,0)
+48 ;;=VEGETABLE,ORIENTAL STYLE,FROZEN,GARDEN GOURMET^BC-03378^9.5-oz.^269
+49 ;;^UTILITY(U,$J,112,10105,1)
+50 ;;=2.9^.149^17.286^73.978^78.513^^^15.985^^^53.903^123.048^260.967^^^^^40.149^2.23
+51 ;;^UTILITY(U,$J,112,10105,2)
+52 ;;=.082^^^^^^^^^^^^^^^^2.007
+53 ;;^UTILITY(U,$J,112,10105,20)
+54 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+55 ;;^UTILITY(U,$J,112,10106,0)
+56 ;;=VEGETABLE,PASTA PRIMAVERA STYLE,FRZN,BIRDS EYE^BC-03379^1/2-cup^95
+57 ;;^UTILITY(U,$J,112,10106,1)
+58 ;;=5.263^5.474^15.053^128.421^72.632^^^100^1^21.053^102.105^181.053^355.789^.558^.071^^^4504.211^17.895^.147
+59 ;;^UTILITY(U,$J,112,10106,2)
+60 ;;=.137^1.158^.242^.105^30.526^.137^^^3.158^1.474^^.947
+61 ;;^UTILITY(U,$J,112,10106,20)
+62 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+63 ;;^UTILITY(U,$J,112,10107,0)
+64 ;;=PEAS & ONION,CND,PILLSBURY^BC-03380^1/2-cup^120
+65 ;;^UTILITY(U,$J,112,10107,1)
+66 ;;=2.917^.25^9^50^86^^^16.667^.8^^51.667^95.833^441.667^^^^^465^8.333^.092
+67 ;;^UTILITY(U,$J,112,10107,2)
+68 ;;=.067^1.417
+69 ;;^UTILITY(U,$J,112,10107,20)
+70 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+71 ;;^UTILITY(U,$J,112,10108,0)
+72 ;;=PEAS & PEARL ONIONS,FRZN,BIRD EYE^BC-03381^1/2-cup^95
+73 ;;^UTILITY(U,$J,112,10108,1)
+74 ;;=4.842^.211^14.211^74.737^79.579^^^15.789^.895^18.947^62.105^181.053^465.263^.505^.087^^^669.474^20^.253
+75 ;;^UTILITY(U,$J,112,10108,2)
+76 ;;=.084^1.895^.179^13.684^46.316^0^^^0^0^^.105^^^^^3.684
+77 ;;^UTILITY(U,$J,112,10108,20)
+78 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+79 ;;^UTILITY(U,$J,112,10109,0)
+80 ;;=PEAS & PEARL ONIONS,FRZN W/CHEESE SCE,BIRDS EYE^BC-03382^1/2-cup^142
+81 ;;^UTILITY(U,$J,112,10109,1)
+82 ;;=4.014^3.451^12.746^96.479^78.592^^^53.521^.859^17.606^76.761^152.817^314.085^.507^.066^^^1510.563^10.563^.155
+83 ;;^UTILITY(U,$J,112,10109,2)
+84 ;;=.113^1.056^.204^.092^30.282^.162^^^2.817^1.056^^.563
+85 ;;^UTILITY(U,$J,112,10109,20)
+86 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+87 ;;^UTILITY(U,$J,112,10110,0)
+88 ;;=PEAS & POTATOES W/CREAM SCE,FRZN,BIRDS EYE^BC-03383^1/2-cup^76
+89 ;;^UTILITY(U,$J,112,10110,1)
+90 ;;=4.474^8.158^19.474^167.105^65.789^^^55.263^.974^27.632^110.526^273.684^513.158^.632^.122^^^684.211^7.895^.197
+91 ;;^UTILITY(U,$J,112,10110,2)
+92 ;;=.171^1.184^.434^.158^34.211^.303^^^1.316^1.711^^1.447
+93 ;;^UTILITY(U,$J,112,10110,20)
+94 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+95 ;;^UTILITY(U,$J,112,10111,0)
+96 ;;=PEAS ONIONS & CARROTS W/BUTTER SCE,FROZEN,LE SUEUR^BC-03384^1/2-cup^120