FHINI0DV ; ; 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,8725,0)
;;=BF,CEREAL,OATMEAL W/APPLESCE & BANANAS,BEECH-NUT STAGE 2^BC-01998^4.5-oz.^128
;;^UTILITY(U,$J,112,8725,1)
;;=1.719^.703^14.063^68.75^^^^^^^^^5.469^^^^^^12.5^.18
;;^UTILITY(U,$J,112,8725,2)
;;=.211^2.813
;;^UTILITY(U,$J,112,8725,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8726,0)
;;=BF,CEREAL,OATMEAL W/BANANAS,DRY,BEECH-NUT STAGE 2^BC-01999^.5-oz.^14
;;^UTILITY(U,$J,112,8726,1)
;;=11.429^6.429^75.714^400^^^^642.857^37^^^^28.571^^^^^71.429^^1.286
;;^UTILITY(U,$J,112,8726,2)
;;=1.5^20
;;^UTILITY(U,$J,112,8726,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8727,0)
;;=BF,CEREAL,OATMEAL W/BANANAS,DRY,GERBER^BC-02000^.5-oz.^14
;;^UTILITY(U,$J,112,8727,1)
;;=13.571^7.143^75^414.286^^^^642.857^47.857^114.286^550^485.714^14.286^2.143^.357^2.929^^^0^1.571
;;^UTILITY(U,$J,112,8727,2)
;;=1.5^14.286^^.429^^^^^^^^^0
;;^UTILITY(U,$J,112,8727,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8728,0)
;;=BF,CEREAL,OATMEAL W/BANANAS & APPLE JCE,INST,HEINZ^BC-02001^4-tbsp.^14
;;^UTILITY(U,$J,112,8728,1)
;;=7.143^0^85.714^428.571^^^^85.714^50^^271.429^800^7.143^1.786^.357^^^28.571^121.429^1.714
;;^UTILITY(U,$J,112,8728,2)
;;=2^25.714^^.5
;;^UTILITY(U,$J,112,8728,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8729,0)
;;=BF,CEREAL,RICE,DRY,BEECH-NUT STAGE 1^BC-02002^.5-oz.^14
;;^UTILITY(U,$J,112,8729,1)
;;=7.857^2.857^80^378.571^^^^850^48^^^^21.429^^^^^^^1.571
;;^UTILITY(U,$J,112,8729,2)
;;=.357^25.714
;;^UTILITY(U,$J,112,8729,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8730,0)
;;=BF,CEREAL,RICE,DRY,GERBER^BC-02003^.5-oz.^14
;;^UTILITY(U,$J,112,8730,1)
;;=8.571^5.714^80^385.714^^^^642.857^47.857^50^528.571^164.286^7.143^1.429^.143^2.143^^^^1.571
;;^UTILITY(U,$J,112,8730,2)
;;=1.929^14.286^^.214^^^^^^^^^0
;;^UTILITY(U,$J,112,8730,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8731,0)
;;=BF,CEREAL,RICE W/APPLES,DRY,BEECH-NUT STAGE 2^BC-02004^.5-oz.^14
;;^UTILITY(U,$J,112,8731,1)
;;=6.429^2.143^83.571^385.714^^^^850^37^^^^14.286^^^^^^^1.286
;;^UTILITY(U,$J,112,8731,2)
;;=1.5^20
;;^UTILITY(U,$J,112,8731,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8732,0)
;;=BF,CEREAL,RICE W/APPLES & BANANAS,GERBER SECOND FOOD^BC-02005^4-oz.^113
;;^UTILITY(U,$J,112,8732,1)
;;=.973^.177^18.23^78.761^^^^15.929^5.31^5.31^21.239^47.788^11.504^.168^.027^.142^^^12.389^.177
;;^UTILITY(U,$J,112,8732,2)
;;=.212^2.832^^.142^^^^^^^^^0
;;^UTILITY(U,$J,112,8732,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8733,0)
;;=BF,CEREAL,RICE W/APPLESCE & BANANAS,BEECH-NUT STAGE 2^BC-02006^4.5-oz.^128
;;^UTILITY(U,$J,112,8733,1)
;;=1.563^0^18.281^79.688^^^^39.844^5.297^^^^18.75^^^^^^12.5^.18
;;^UTILITY(U,$J,112,8733,2)
;;=.211^2.813
;;^UTILITY(U,$J,112,8733,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8734,0)
;;=BF,CEREAL,RICE W/BANANAS,DRY,BEECH-NUT STAGE 2^BC-02007^.5-oz.^14
;;^UTILITY(U,$J,112,8734,1)
;;=7.143^2.143^84.286^385.714^^^^642.857^37^^^^21.429^^^^^28.571^^1.286
;;^UTILITY(U,$J,112,8734,2)
;;=1.5^20
;;^UTILITY(U,$J,112,8734,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8735,0)
;;=BF,CEREAL,RICE W/BANANAS,DRY,GERBER^BC-02008^.5-oz.^14
;;^UTILITY(U,$J,112,8735,1)
;;=9.286^2.857^82.857^392.857^^^^642.857^47.857^57.143^421.429^350^35.714^1.214^.286^1.357^^^0^1.571
;;^UTILITY(U,$J,112,8735,2)
;;=1.929^14.286^^.5^^^^^^^^^7.143
;;^UTILITY(U,$J,112,8735,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8736,0)
;;=BF,CEREAL,RICE W/BANANAS & APPLE JCE,INST,HEINZ^BC-02009^4-tbsp.^14
;;^UTILITY(U,$J,112,8736,1)
;;=7.143^0^85.714^357.143^^^^35.714^50^^142.857^500^7.143^1.143^.286^^^71.429^121.429^1.714
;;^UTILITY(U,$J,112,8736,2)
;;=2^25.714^^.5
;;^UTILITY(U,$J,112,8736,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8737,0)
;;=BF,CEREAL,RICE W/MIXED FRUIT,GERBER THIRD FOOD^BC-02010^6-oz.^170
;;^UTILITY(U,$J,112,8737,1)
;;=.941^.176^18^77.647^^^^15.882^2.647^5.294^21.176^41.765^10^.153^.018^.153^^^9.412^.129
;;^UTILITY(U,$J,112,8737,2)
;;=.159^2.118^^.112^^^^^^^^^.588
;;^UTILITY(U,$J,112,8737,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8738,0)
;;=BF,CEREAL,RICE W/PEARS & APPLE JCE,INST,HEINZ^BC-02011^4-tbsp.^14
;;^UTILITY(U,$J,112,8738,1)
;;=7.143^0^92.857^357.143^^^^57.143^50^^157.143^307.143^57.143^1.214^.429^^^85.714^121.429^1.714
FHINI0DV ; ; 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,8725,0)
+2 ;;=BF,CEREAL,OATMEAL W/APPLESCE & BANANAS,BEECH-NUT STAGE 2^BC-01998^4.5-oz.^128
+3 ;;^UTILITY(U,$J,112,8725,1)
+4 ;;=1.719^.703^14.063^68.75^^^^^^^^^5.469^^^^^^12.5^.18
+5 ;;^UTILITY(U,$J,112,8725,2)
+6 ;;=.211^2.813
+7 ;;^UTILITY(U,$J,112,8725,20)
+8 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+9 ;;^UTILITY(U,$J,112,8726,0)
+10 ;;=BF,CEREAL,OATMEAL W/BANANAS,DRY,BEECH-NUT STAGE 2^BC-01999^.5-oz.^14
+11 ;;^UTILITY(U,$J,112,8726,1)
+12 ;;=11.429^6.429^75.714^400^^^^642.857^37^^^^28.571^^^^^71.429^^1.286
+13 ;;^UTILITY(U,$J,112,8726,2)
+14 ;;=1.5^20
+15 ;;^UTILITY(U,$J,112,8726,20)
+16 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+17 ;;^UTILITY(U,$J,112,8727,0)
+18 ;;=BF,CEREAL,OATMEAL W/BANANAS,DRY,GERBER^BC-02000^.5-oz.^14
+19 ;;^UTILITY(U,$J,112,8727,1)
+20 ;;=13.571^7.143^75^414.286^^^^642.857^47.857^114.286^550^485.714^14.286^2.143^.357^2.929^^^0^1.571
+21 ;;^UTILITY(U,$J,112,8727,2)
+22 ;;=1.5^14.286^^.429^^^^^^^^^0
+23 ;;^UTILITY(U,$J,112,8727,20)
+24 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+25 ;;^UTILITY(U,$J,112,8728,0)
+26 ;;=BF,CEREAL,OATMEAL W/BANANAS & APPLE JCE,INST,HEINZ^BC-02001^4-tbsp.^14
+27 ;;^UTILITY(U,$J,112,8728,1)
+28 ;;=7.143^0^85.714^428.571^^^^85.714^50^^271.429^800^7.143^1.786^.357^^^28.571^121.429^1.714
+29 ;;^UTILITY(U,$J,112,8728,2)
+30 ;;=2^25.714^^.5
+31 ;;^UTILITY(U,$J,112,8728,20)
+32 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+33 ;;^UTILITY(U,$J,112,8729,0)
+34 ;;=BF,CEREAL,RICE,DRY,BEECH-NUT STAGE 1^BC-02002^.5-oz.^14
+35 ;;^UTILITY(U,$J,112,8729,1)
+36 ;;=7.857^2.857^80^378.571^^^^850^48^^^^21.429^^^^^^^1.571
+37 ;;^UTILITY(U,$J,112,8729,2)
+38 ;;=.357^25.714
+39 ;;^UTILITY(U,$J,112,8729,20)
+40 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+41 ;;^UTILITY(U,$J,112,8730,0)
+42 ;;=BF,CEREAL,RICE,DRY,GERBER^BC-02003^.5-oz.^14
+43 ;;^UTILITY(U,$J,112,8730,1)
+44 ;;=8.571^5.714^80^385.714^^^^642.857^47.857^50^528.571^164.286^7.143^1.429^.143^2.143^^^^1.571
+45 ;;^UTILITY(U,$J,112,8730,2)
+46 ;;=1.929^14.286^^.214^^^^^^^^^0
+47 ;;^UTILITY(U,$J,112,8730,20)
+48 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+49 ;;^UTILITY(U,$J,112,8731,0)
+50 ;;=BF,CEREAL,RICE W/APPLES,DRY,BEECH-NUT STAGE 2^BC-02004^.5-oz.^14
+51 ;;^UTILITY(U,$J,112,8731,1)
+52 ;;=6.429^2.143^83.571^385.714^^^^850^37^^^^14.286^^^^^^^1.286
+53 ;;^UTILITY(U,$J,112,8731,2)
+54 ;;=1.5^20
+55 ;;^UTILITY(U,$J,112,8731,20)
+56 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+57 ;;^UTILITY(U,$J,112,8732,0)
+58 ;;=BF,CEREAL,RICE W/APPLES & BANANAS,GERBER SECOND FOOD^BC-02005^4-oz.^113
+59 ;;^UTILITY(U,$J,112,8732,1)
+60 ;;=.973^.177^18.23^78.761^^^^15.929^5.31^5.31^21.239^47.788^11.504^.168^.027^.142^^^12.389^.177
+61 ;;^UTILITY(U,$J,112,8732,2)
+62 ;;=.212^2.832^^.142^^^^^^^^^0
+63 ;;^UTILITY(U,$J,112,8732,20)
+64 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+65 ;;^UTILITY(U,$J,112,8733,0)
+66 ;;=BF,CEREAL,RICE W/APPLESCE & BANANAS,BEECH-NUT STAGE 2^BC-02006^4.5-oz.^128
+67 ;;^UTILITY(U,$J,112,8733,1)
+68 ;;=1.563^0^18.281^79.688^^^^39.844^5.297^^^^18.75^^^^^^12.5^.18
+69 ;;^UTILITY(U,$J,112,8733,2)
+70 ;;=.211^2.813
+71 ;;^UTILITY(U,$J,112,8733,20)
+72 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+73 ;;^UTILITY(U,$J,112,8734,0)
+74 ;;=BF,CEREAL,RICE W/BANANAS,DRY,BEECH-NUT STAGE 2^BC-02007^.5-oz.^14
+75 ;;^UTILITY(U,$J,112,8734,1)
+76 ;;=7.143^2.143^84.286^385.714^^^^642.857^37^^^^21.429^^^^^28.571^^1.286
+77 ;;^UTILITY(U,$J,112,8734,2)
+78 ;;=1.5^20
+79 ;;^UTILITY(U,$J,112,8734,20)
+80 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+81 ;;^UTILITY(U,$J,112,8735,0)
+82 ;;=BF,CEREAL,RICE W/BANANAS,DRY,GERBER^BC-02008^.5-oz.^14
+83 ;;^UTILITY(U,$J,112,8735,1)
+84 ;;=9.286^2.857^82.857^392.857^^^^642.857^47.857^57.143^421.429^350^35.714^1.214^.286^1.357^^^0^1.571
+85 ;;^UTILITY(U,$J,112,8735,2)
+86 ;;=1.929^14.286^^.5^^^^^^^^^7.143
+87 ;;^UTILITY(U,$J,112,8735,20)
+88 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+89 ;;^UTILITY(U,$J,112,8736,0)
+90 ;;=BF,CEREAL,RICE W/BANANAS & APPLE JCE,INST,HEINZ^BC-02009^4-tbsp.^14
+91 ;;^UTILITY(U,$J,112,8736,1)
+92 ;;=7.143^0^85.714^357.143^^^^35.714^50^^142.857^500^7.143^1.143^.286^^^71.429^121.429^1.714
+93 ;;^UTILITY(U,$J,112,8736,2)
+94 ;;=2^25.714^^.5
+95 ;;^UTILITY(U,$J,112,8736,20)
+96 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+97 ;;^UTILITY(U,$J,112,8737,0)
+98 ;;=BF,CEREAL,RICE W/MIXED FRUIT,GERBER THIRD FOOD^BC-02010^6-oz.^170
+99 ;;^UTILITY(U,$J,112,8737,1)
+100 ;;=.941^.176^18^77.647^^^^15.882^2.647^5.294^21.176^41.765^10^.153^.018^.153^^^9.412^.129
+101 ;;^UTILITY(U,$J,112,8737,2)
+102 ;;=.159^2.118^^.112^^^^^^^^^.588
+103 ;;^UTILITY(U,$J,112,8737,20)
+104 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+105 ;;^UTILITY(U,$J,112,8738,0)
+106 ;;=BF,CEREAL,RICE W/PEARS & APPLE JCE,INST,HEINZ^BC-02011^4-tbsp.^14
+107 ;;^UTILITY(U,$J,112,8738,1)
+108 ;;=7.143^0^92.857^357.143^^^^57.143^50^^157.143^307.143^57.143^1.214^.429^^^85.714^121.429^1.714
