FHINI0A9 ; ; 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,6935,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6936,0)
;;=CHEESE PRODUCTS,CHEDDARELLA,LAND O'LAKES^BC-00209^oz.^28
;;^UTILITY(U,$J,112,6936,1)
;;=25^28.571^0^357.143^^^^^^^^71.429^642.857^0
;;^UTILITY(U,$J,112,6936,2)
;;=^^^^^^^^89.286^17.857^7.143^0
;;^UTILITY(U,$J,112,6936,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6937,0)
;;=CHEESE PRODUCTS,CHEDDAR MEXICAN STYLE,COUNTRY CROCK^BC-00210^oz.^28
;;^UTILITY(U,$J,112,6937,1)
;;=18.929^12.5^9.286^225^^^^^^^^^671.429^9.286
;;^UTILITY(U,$J,112,6937,2)
;;=^^^^^^^^53.571
;;^UTILITY(U,$J,112,6937,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6938,0)
;;=CHEESE PRODUCTS,CHEDDAR W/PORT WINE,COUNTRY CROCK^BC-00211^oz.^28
;;^UTILITY(U,$J,112,6938,1)
;;=17.5^13.214^10^228.571^^^^^^^^^671.429^10
;;^UTILITY(U,$J,112,6938,2)
;;=^^^^^^^^53.571
;;^UTILITY(U,$J,112,6938,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6939,0)
;;=CHEESE PRODUCTS,CLASSIC RANCH,COUNTRY CROCK^BC-00212^oz.^28
;;^UTILITY(U,$J,112,6939,1)
;;=8.571^21.429^5^246.429^^^^^^^^^692.857^5
;;^UTILITY(U,$J,112,6939,2)
;;=^^^^^^^^64.286
;;^UTILITY(U,$J,112,6939,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6940,0)
;;=CHEESE PRODUCTS,GARDEN VEGETABLE,COUNTRY CROCK^BC-00213^oz.^28
;;^UTILITY(U,$J,112,6940,1)
;;=8.214^21.429^5.357^246.429^^^^^^^^^671.429^5.357
;;^UTILITY(U,$J,112,6940,2)
;;=^^^^^^^^64.286
;;^UTILITY(U,$J,112,6940,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6941,0)
;;=CHEESE PRODUCTS,SHARP CHEDDAR,LIGHT N' LIVELY^BC-00214^oz.^28
;;^UTILITY(U,$J,112,6941,1)
;;=21.071^14.643^10.357^257.143^50^^^685.714^.286^39.286^503.571^228.571^1442.857^3.286^.029^^^732.143^0^.071
;;^UTILITY(U,$J,112,6941,2)
;;=.429^.357^.75^.107^17.857^.786^^^42.857^8.571^^.357
;;^UTILITY(U,$J,112,6941,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6942,0)
;;=CHEESE PRODUCTS,SINGLES,LIGHT N'LIVELY^BC-00215^oz.^28
;;^UTILITY(U,$J,112,6942,1)
;;=22.857^15.357^7.5^260.714^49.643^^^678.571^.286^32.143^560.714^267.857^1467.857^3.143^.05^.036^^700^0^.071
;;^UTILITY(U,$J,112,6942,2)
;;=.429^.357^.679^.107^21.429^1.179^^^53.571^8.929^^.357
;;^UTILITY(U,$J,112,6942,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6943,0)
;;=CHEESE PRODUCTS,SWISS LIGHT N'LIVELY^BC-00216^oz.^28
;;^UTILITY(U,$J,112,6943,1)
;;=22.5^13.214^11.071^253.571^49.643^^^764.286^.321^32.143^535.714^246.429^1307.143^3.321^.114^^^357.143^0^.071
;;^UTILITY(U,$J,112,6943,2)
;;=.429^.357^.75^.107^10.714^1.143^^^42.857^7.143^^.357
;;^UTILITY(U,$J,112,6943,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6944,0)
;;=CHEESE PRODUCTS,CHEDDAR,LA CHEDDA^BC-00217^oz.^28
;;^UTILITY(U,$J,112,6944,1)
;;=3.929^8.214^8.929^128.571^^^^132.143^.071^^210.714^100^653.571^8.929^^^^107.143^0^.036
;;^UTILITY(U,$J,112,6944,2)
;;=.143^0^^^^^^^14.286^2.857^3.571^.714
;;^UTILITY(U,$J,112,6944,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6945,0)
;;=CHEESE PRODUCTS,CHEDDAR,MILD,LAND O'LAKES^BC-00218^oz.^28
;;^UTILITY(U,$J,112,6945,1)
;;=2.5^10.357^8.929^139.286^^^^78.571^.071^^92.857^71.429^753.571^8.929^^^^53.571^0^.036
;;^UTILITY(U,$J,112,6945,2)
;;=.071^0^^^^^^^7.143^2.5^5^.714
;;^UTILITY(U,$J,112,6945,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6946,0)
;;=CHEESE PRODUCTS,MILD NACHO,LAND O'LAKES^BC-00219^oz.^28
;;^UTILITY(U,$J,112,6946,1)
;;=2.143^13.571^7.5^164.286^^^^53.571^.071^^182.143^60.714^764.286^7.5^^^^53.571^0^.036
;;^UTILITY(U,$J,112,6946,2)
;;=.071^0^^^^^^^3.571^2.857^7.143^1.071
;;^UTILITY(U,$J,112,6946,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6947,0)
;;=CHEESE PRODUCTS,CHEDDAR,COUNTRY CROCK^BC-00220^oz.^28
;;^UTILITY(U,$J,112,6947,1)
;;=17.5^13.571^8.571^228.571^^^^^^^^^671.429^8.571
;;^UTILITY(U,$J,112,6947,2)
;;=^^^^^^^^53.571
;;^UTILITY(U,$J,112,6947,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,6948,0)
;;=CHEESE PRODUCTS,CHEEZ WHIZ,KRAFT^BC-00221^oz.^28
;;^UTILITY(U,$J,112,6948,1)
;;=16.429^20.357^6.429^275^51.786^^^525^.214^28.571^910.714^185.714^1321.429^2.464^.068^^^689.286^0^.071
;;^UTILITY(U,$J,112,6948,2)
;;=.393^.357^.571^.071^14.286^.643^^^57.143^11.071^^.357
;;^UTILITY(U,$J,112,6948,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
FHINI0A9 ; ; 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,6935,20)
+2 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+3 ;;^UTILITY(U,$J,112,6936,0)
+4 ;;=CHEESE PRODUCTS,CHEDDARELLA,LAND O'LAKES^BC-00209^oz.^28
+5 ;;^UTILITY(U,$J,112,6936,1)
+6 ;;=25^28.571^0^357.143^^^^^^^^71.429^642.857^0
+7 ;;^UTILITY(U,$J,112,6936,2)
+8 ;;=^^^^^^^^89.286^17.857^7.143^0
+9 ;;^UTILITY(U,$J,112,6936,20)
+10 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+11 ;;^UTILITY(U,$J,112,6937,0)
+12 ;;=CHEESE PRODUCTS,CHEDDAR MEXICAN STYLE,COUNTRY CROCK^BC-00210^oz.^28
+13 ;;^UTILITY(U,$J,112,6937,1)
+14 ;;=18.929^12.5^9.286^225^^^^^^^^^671.429^9.286
+15 ;;^UTILITY(U,$J,112,6937,2)
+16 ;;=^^^^^^^^53.571
+17 ;;^UTILITY(U,$J,112,6937,20)
+18 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+19 ;;^UTILITY(U,$J,112,6938,0)
+20 ;;=CHEESE PRODUCTS,CHEDDAR W/PORT WINE,COUNTRY CROCK^BC-00211^oz.^28
+21 ;;^UTILITY(U,$J,112,6938,1)
+22 ;;=17.5^13.214^10^228.571^^^^^^^^^671.429^10
+23 ;;^UTILITY(U,$J,112,6938,2)
+24 ;;=^^^^^^^^53.571
+25 ;;^UTILITY(U,$J,112,6938,20)
+26 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+27 ;;^UTILITY(U,$J,112,6939,0)
+28 ;;=CHEESE PRODUCTS,CLASSIC RANCH,COUNTRY CROCK^BC-00212^oz.^28
+29 ;;^UTILITY(U,$J,112,6939,1)
+30 ;;=8.571^21.429^5^246.429^^^^^^^^^692.857^5
+31 ;;^UTILITY(U,$J,112,6939,2)
+32 ;;=^^^^^^^^64.286
+33 ;;^UTILITY(U,$J,112,6939,20)
+34 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+35 ;;^UTILITY(U,$J,112,6940,0)
+36 ;;=CHEESE PRODUCTS,GARDEN VEGETABLE,COUNTRY CROCK^BC-00213^oz.^28
+37 ;;^UTILITY(U,$J,112,6940,1)
+38 ;;=8.214^21.429^5.357^246.429^^^^^^^^^671.429^5.357
+39 ;;^UTILITY(U,$J,112,6940,2)
+40 ;;=^^^^^^^^64.286
+41 ;;^UTILITY(U,$J,112,6940,20)
+42 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+43 ;;^UTILITY(U,$J,112,6941,0)
+44 ;;=CHEESE PRODUCTS,SHARP CHEDDAR,LIGHT N' LIVELY^BC-00214^oz.^28
+45 ;;^UTILITY(U,$J,112,6941,1)
+46 ;;=21.071^14.643^10.357^257.143^50^^^685.714^.286^39.286^503.571^228.571^1442.857^3.286^.029^^^732.143^0^.071
+47 ;;^UTILITY(U,$J,112,6941,2)
+48 ;;=.429^.357^.75^.107^17.857^.786^^^42.857^8.571^^.357
+49 ;;^UTILITY(U,$J,112,6941,20)
+50 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+51 ;;^UTILITY(U,$J,112,6942,0)
+52 ;;=CHEESE PRODUCTS,SINGLES,LIGHT N'LIVELY^BC-00215^oz.^28
+53 ;;^UTILITY(U,$J,112,6942,1)
+54 ;;=22.857^15.357^7.5^260.714^49.643^^^678.571^.286^32.143^560.714^267.857^1467.857^3.143^.05^.036^^700^0^.071
+55 ;;^UTILITY(U,$J,112,6942,2)
+56 ;;=.429^.357^.679^.107^21.429^1.179^^^53.571^8.929^^.357
+57 ;;^UTILITY(U,$J,112,6942,20)
+58 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+59 ;;^UTILITY(U,$J,112,6943,0)
+60 ;;=CHEESE PRODUCTS,SWISS LIGHT N'LIVELY^BC-00216^oz.^28
+61 ;;^UTILITY(U,$J,112,6943,1)
+62 ;;=22.5^13.214^11.071^253.571^49.643^^^764.286^.321^32.143^535.714^246.429^1307.143^3.321^.114^^^357.143^0^.071
+63 ;;^UTILITY(U,$J,112,6943,2)
+64 ;;=.429^.357^.75^.107^10.714^1.143^^^42.857^7.143^^.357
+65 ;;^UTILITY(U,$J,112,6943,20)
+66 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+67 ;;^UTILITY(U,$J,112,6944,0)
+68 ;;=CHEESE PRODUCTS,CHEDDAR,LA CHEDDA^BC-00217^oz.^28
+69 ;;^UTILITY(U,$J,112,6944,1)
+70 ;;=3.929^8.214^8.929^128.571^^^^132.143^.071^^210.714^100^653.571^8.929^^^^107.143^0^.036
+71 ;;^UTILITY(U,$J,112,6944,2)
+72 ;;=.143^0^^^^^^^14.286^2.857^3.571^.714
+73 ;;^UTILITY(U,$J,112,6944,20)
+74 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+75 ;;^UTILITY(U,$J,112,6945,0)
+76 ;;=CHEESE PRODUCTS,CHEDDAR,MILD,LAND O'LAKES^BC-00218^oz.^28
+77 ;;^UTILITY(U,$J,112,6945,1)
+78 ;;=2.5^10.357^8.929^139.286^^^^78.571^.071^^92.857^71.429^753.571^8.929^^^^53.571^0^.036
+79 ;;^UTILITY(U,$J,112,6945,2)
+80 ;;=.071^0^^^^^^^7.143^2.5^5^.714
+81 ;;^UTILITY(U,$J,112,6945,20)
+82 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+83 ;;^UTILITY(U,$J,112,6946,0)
+84 ;;=CHEESE PRODUCTS,MILD NACHO,LAND O'LAKES^BC-00219^oz.^28
+85 ;;^UTILITY(U,$J,112,6946,1)
+86 ;;=2.143^13.571^7.5^164.286^^^^53.571^.071^^182.143^60.714^764.286^7.5^^^^53.571^0^.036
+87 ;;^UTILITY(U,$J,112,6946,2)
+88 ;;=.071^0^^^^^^^3.571^2.857^7.143^1.071
+89 ;;^UTILITY(U,$J,112,6946,20)
+90 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+91 ;;^UTILITY(U,$J,112,6947,0)
+92 ;;=CHEESE PRODUCTS,CHEDDAR,COUNTRY CROCK^BC-00220^oz.^28
+93 ;;^UTILITY(U,$J,112,6947,1)
+94 ;;=17.5^13.571^8.571^228.571^^^^^^^^^671.429^8.571
+95 ;;^UTILITY(U,$J,112,6947,2)
+96 ;;=^^^^^^^^53.571
+97 ;;^UTILITY(U,$J,112,6947,20)
+98 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+99 ;;^UTILITY(U,$J,112,6948,0)
+100 ;;=CHEESE PRODUCTS,CHEEZ WHIZ,KRAFT^BC-00221^oz.^28
+101 ;;^UTILITY(U,$J,112,6948,1)
+102 ;;=16.429^20.357^6.429^275^51.786^^^525^.214^28.571^910.714^185.714^1321.429^2.464^.068^^^689.286^0^.071
+103 ;;^UTILITY(U,$J,112,6948,2)
+104 ;;=.393^.357^.571^.071^14.286^.643^^^57.143^11.071^^.357
+105 ;;^UTILITY(U,$J,112,6948,20)
+106 ;;=Bowes & Church's Food Values, Sixteenth Edition.
