FHINI0EC ; ; 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,8955,0)
;;=BF,CHICKEN,GERBER THIRD FOOD^BC-02228^2.5-oz.^71
;;^UTILITY(U,$J,112,8955,1)
;;=15.775^9.437^.282^149.296^^^^30.986^.986^15.493^156.338^171.831^39.437^1.197^.028^.014^^^1.408^.014
;;^UTILITY(U,$J,112,8955,2)
;;=.07^3.944^^.169^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8955,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8956,0)
;;=BF,CHICKEN,GERBER SECOND FOOD^BC-02229^2.5-oz.^71
;;^UTILITY(U,$J,112,8956,1)
;;=14.366^8.873^0^138.028^^^^60.563^.986^15.493^154.93^174.648^39.437^1.197^.028^.014^^^1.408^.014
;;^UTILITY(U,$J,112,8956,2)
;;=.113^4.085^^.211^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8956,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8957,0)
;;=BF,CHICKEN & CHICKEN BROTH,BEECH NUT STAGE 2^BC-02230^2.8-oz.^79
;;^UTILITY(U,$J,112,8957,1)
;;=13.165^2.785^0^75.949^^^^29.114^1.595^^^^54.43^^^^^^^.025
;;^UTILITY(U,$J,112,8957,2)
;;=.165^2.532
;;^UTILITY(U,$J,112,8957,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8958,0)
;;=BF,CHICKEN STICKS,TODDLER,GERBER^BC-02231^2.5-oz.^71
;;^UTILITY(U,$J,112,8958,1)
;;=15.352^8.31^1.268^142.254^^^^57.746^1.127^12.676^122.535^123.944^445.07^1.338^.042^.014^^^2.817^.028
;;^UTILITY(U,$J,112,8958,2)
;;=.127^2.817^^.099^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8958,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8959,0)
;;=BF,EGG YOLKS,GERBER SECOND FOOD^BC-02232^2.25-oz.^64
;;^UTILITY(U,$J,112,8959,1)
;;=9.844^17.031^.313^193.75^^^^70.313^1.875^3.125^248.438^65.625^42.188^1.078^.047^.031^^^0^.063
;;^UTILITY(U,$J,112,8959,2)
;;=.219^0^^.156^^^^^^^^^137.5
;;^UTILITY(U,$J,112,8959,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8960,0)
;;=BF,HAM,GERBER THIRD FOOD^BC-02233^2.5-oz.^71
;;^UTILITY(U,$J,112,8960,1)
;;=14.789^6.761^.141^119.718^^^^4.225^.986^14.085^125.352^238.028^42.254^2.099^.028^.014^^^1.408^.113
;;^UTILITY(U,$J,112,8960,2)
;;=.141^2.958^^.169^^^^^^^^^2.817
;;^UTILITY(U,$J,112,8960,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8961,0)
;;=BF,HAM,GERBER SECOND FOOD^BC-02234^2.5-oz.^71
;;^UTILITY(U,$J,112,8961,1)
;;=13.38^6.338^.282^111.268^^^^4.225^.986^14.085^123.944^233.803^42.254^1.972^.028^.014^^^1.408^.099
;;^UTILITY(U,$J,112,8961,2)
;;=.127^2.958^^.141^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8961,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8962,0)
;;=BF,LAMB,GERBER SECOND FOOD^BC-02235^2.5-oz.^71
;;^UTILITY(U,$J,112,8962,1)
;;=14.648^4.648^.282^101.408^^^^5.634^1.268^14.085^123.944^218.31^50.704^2.775^.042^.014^^^1.408^.028
;;^UTILITY(U,$J,112,8962,2)
;;=.197^2.958^^.127^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8962,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8963,0)
;;=BF,LAMB & LAMB BROTH,BEECH-NUT STAGE 2^BC-02236^2.8-oz.^79
;;^UTILITY(U,$J,112,8963,1)
;;=13.165^2.658^0^75.949^^^^12.658^1.304^^^^56.962^^^^^^^.025
;;^UTILITY(U,$J,112,8963,2)
;;=.165^3.165
;;^UTILITY(U,$J,112,8963,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8964,0)
;;=BF,MEAT STICKS,TODDLER GERBER^BC-02237^2.5-oz.^71
;;^UTILITY(U,$J,112,8964,1)
;;=14.225^9.718^.986^147.887^^^^26.761^1.408^9.859^109.859^128.169^450.704^2.845^.042^.014^^^1.408^.07
;;^UTILITY(U,$J,112,8964,2)
;;=.127^1.69^^.085^^^^^^^^^2.817
;;^UTILITY(U,$J,112,8964,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8965,0)
;;=BF,TURKEY,GERBER THIRD FOOD^BC-02238^2.5-oz.^71
;;^UTILITY(U,$J,112,8965,1)
;;=15.352^7.746^0^132.394^^^^4.225^.845^14.085^125.352^202.817^52.113^2.099^.028^.014^^^2.817^.028
;;^UTILITY(U,$J,112,8965,2)
;;=.127^3.239^^.183^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8965,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8966,0)
;;=BF,TURKEY,GERBER SECOND FOOD^BC-02239^2.5-oz.^71
;;^UTILITY(U,$J,112,8966,1)
;;=14.085^7.746^.141^126.761^^^^56.338^1.268^^177.465^208.451^53.521^^^^^^2.817^.014
;;^UTILITY(U,$J,112,8966,2)
;;=.127^3.662^^.127^^^^^^^^^1.408
;;^UTILITY(U,$J,112,8966,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8967,0)
;;=BF,TURKEY & TURKEY BROTH,BEECH-NUT STAGE 2^BC-02240^2.8-oz.^79
;;^UTILITY(U,$J,112,8967,1)
;;=12.025^6.203^0^103.797^^^^36.709^1^^^^54.43^^^^^^^.025
;;^UTILITY(U,$J,112,8967,2)
;;=.19^2.785
;;^UTILITY(U,$J,112,8967,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8968,0)
;;=BF,TURKEY STICKS,TODDLER,GERBER^BC-02241^2.5-oz.^71
FHINI0EC ; ; 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,8955,0)
+2 ;;=BF,CHICKEN,GERBER THIRD FOOD^BC-02228^2.5-oz.^71
+3 ;;^UTILITY(U,$J,112,8955,1)
+4 ;;=15.775^9.437^.282^149.296^^^^30.986^.986^15.493^156.338^171.831^39.437^1.197^.028^.014^^^1.408^.014
+5 ;;^UTILITY(U,$J,112,8955,2)
+6 ;;=.07^3.944^^.169^^^^^^^^^1.408
+7 ;;^UTILITY(U,$J,112,8955,20)
+8 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+9 ;;^UTILITY(U,$J,112,8956,0)
+10 ;;=BF,CHICKEN,GERBER SECOND FOOD^BC-02229^2.5-oz.^71
+11 ;;^UTILITY(U,$J,112,8956,1)
+12 ;;=14.366^8.873^0^138.028^^^^60.563^.986^15.493^154.93^174.648^39.437^1.197^.028^.014^^^1.408^.014
+13 ;;^UTILITY(U,$J,112,8956,2)
+14 ;;=.113^4.085^^.211^^^^^^^^^1.408
+15 ;;^UTILITY(U,$J,112,8956,20)
+16 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+17 ;;^UTILITY(U,$J,112,8957,0)
+18 ;;=BF,CHICKEN & CHICKEN BROTH,BEECH NUT STAGE 2^BC-02230^2.8-oz.^79
+19 ;;^UTILITY(U,$J,112,8957,1)
+20 ;;=13.165^2.785^0^75.949^^^^29.114^1.595^^^^54.43^^^^^^^.025
+21 ;;^UTILITY(U,$J,112,8957,2)
+22 ;;=.165^2.532
+23 ;;^UTILITY(U,$J,112,8957,20)
+24 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+25 ;;^UTILITY(U,$J,112,8958,0)
+26 ;;=BF,CHICKEN STICKS,TODDLER,GERBER^BC-02231^2.5-oz.^71
+27 ;;^UTILITY(U,$J,112,8958,1)
+28 ;;=15.352^8.31^1.268^142.254^^^^57.746^1.127^12.676^122.535^123.944^445.07^1.338^.042^.014^^^2.817^.028
+29 ;;^UTILITY(U,$J,112,8958,2)
+30 ;;=.127^2.817^^.099^^^^^^^^^1.408
+31 ;;^UTILITY(U,$J,112,8958,20)
+32 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+33 ;;^UTILITY(U,$J,112,8959,0)
+34 ;;=BF,EGG YOLKS,GERBER SECOND FOOD^BC-02232^2.25-oz.^64
+35 ;;^UTILITY(U,$J,112,8959,1)
+36 ;;=9.844^17.031^.313^193.75^^^^70.313^1.875^3.125^248.438^65.625^42.188^1.078^.047^.031^^^0^.063
+37 ;;^UTILITY(U,$J,112,8959,2)
+38 ;;=.219^0^^.156^^^^^^^^^137.5
+39 ;;^UTILITY(U,$J,112,8959,20)
+40 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+41 ;;^UTILITY(U,$J,112,8960,0)
+42 ;;=BF,HAM,GERBER THIRD FOOD^BC-02233^2.5-oz.^71
+43 ;;^UTILITY(U,$J,112,8960,1)
+44 ;;=14.789^6.761^.141^119.718^^^^4.225^.986^14.085^125.352^238.028^42.254^2.099^.028^.014^^^1.408^.113
+45 ;;^UTILITY(U,$J,112,8960,2)
+46 ;;=.141^2.958^^.169^^^^^^^^^2.817
+47 ;;^UTILITY(U,$J,112,8960,20)
+48 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+49 ;;^UTILITY(U,$J,112,8961,0)
+50 ;;=BF,HAM,GERBER SECOND FOOD^BC-02234^2.5-oz.^71
+51 ;;^UTILITY(U,$J,112,8961,1)
+52 ;;=13.38^6.338^.282^111.268^^^^4.225^.986^14.085^123.944^233.803^42.254^1.972^.028^.014^^^1.408^.099
+53 ;;^UTILITY(U,$J,112,8961,2)
+54 ;;=.127^2.958^^.141^^^^^^^^^1.408
+55 ;;^UTILITY(U,$J,112,8961,20)
+56 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+57 ;;^UTILITY(U,$J,112,8962,0)
+58 ;;=BF,LAMB,GERBER SECOND FOOD^BC-02235^2.5-oz.^71
+59 ;;^UTILITY(U,$J,112,8962,1)
+60 ;;=14.648^4.648^.282^101.408^^^^5.634^1.268^14.085^123.944^218.31^50.704^2.775^.042^.014^^^1.408^.028
+61 ;;^UTILITY(U,$J,112,8962,2)
+62 ;;=.197^2.958^^.127^^^^^^^^^1.408
+63 ;;^UTILITY(U,$J,112,8962,20)
+64 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+65 ;;^UTILITY(U,$J,112,8963,0)
+66 ;;=BF,LAMB & LAMB BROTH,BEECH-NUT STAGE 2^BC-02236^2.8-oz.^79
+67 ;;^UTILITY(U,$J,112,8963,1)
+68 ;;=13.165^2.658^0^75.949^^^^12.658^1.304^^^^56.962^^^^^^^.025
+69 ;;^UTILITY(U,$J,112,8963,2)
+70 ;;=.165^3.165
+71 ;;^UTILITY(U,$J,112,8963,20)
+72 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+73 ;;^UTILITY(U,$J,112,8964,0)
+74 ;;=BF,MEAT STICKS,TODDLER GERBER^BC-02237^2.5-oz.^71
+75 ;;^UTILITY(U,$J,112,8964,1)
+76 ;;=14.225^9.718^.986^147.887^^^^26.761^1.408^9.859^109.859^128.169^450.704^2.845^.042^.014^^^1.408^.07
+77 ;;^UTILITY(U,$J,112,8964,2)
+78 ;;=.127^1.69^^.085^^^^^^^^^2.817
+79 ;;^UTILITY(U,$J,112,8964,20)
+80 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+81 ;;^UTILITY(U,$J,112,8965,0)
+82 ;;=BF,TURKEY,GERBER THIRD FOOD^BC-02238^2.5-oz.^71
+83 ;;^UTILITY(U,$J,112,8965,1)
+84 ;;=15.352^7.746^0^132.394^^^^4.225^.845^14.085^125.352^202.817^52.113^2.099^.028^.014^^^2.817^.028
+85 ;;^UTILITY(U,$J,112,8965,2)
+86 ;;=.127^3.239^^.183^^^^^^^^^1.408
+87 ;;^UTILITY(U,$J,112,8965,20)
+88 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+89 ;;^UTILITY(U,$J,112,8966,0)
+90 ;;=BF,TURKEY,GERBER SECOND FOOD^BC-02239^2.5-oz.^71
+91 ;;^UTILITY(U,$J,112,8966,1)
+92 ;;=14.085^7.746^.141^126.761^^^^56.338^1.268^^177.465^208.451^53.521^^^^^^2.817^.014
+93 ;;^UTILITY(U,$J,112,8966,2)
+94 ;;=.127^3.662^^.127^^^^^^^^^1.408
+95 ;;^UTILITY(U,$J,112,8966,20)
+96 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+97 ;;^UTILITY(U,$J,112,8967,0)
+98 ;;=BF,TURKEY & TURKEY BROTH,BEECH-NUT STAGE 2^BC-02240^2.8-oz.^79
+99 ;;^UTILITY(U,$J,112,8967,1)
+100 ;;=12.025^6.203^0^103.797^^^^36.709^1^^^^54.43^^^^^^^.025
+101 ;;^UTILITY(U,$J,112,8967,2)
+102 ;;=.19^2.785
+103 ;;^UTILITY(U,$J,112,8967,20)
+104 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+105 ;;^UTILITY(U,$J,112,8968,0)
+106 ;;=BF,TURKEY STICKS,TODDLER,GERBER^BC-02241^2.5-oz.^71
