FHINI0DU ; ; 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,8712,0)
;;=BF,CEREAL,DRY,GERBER^BC-01985^.5-oz.^14
;;^UTILITY(U,$J,112,8712,1)
;;=12.143^4.286^75^385.714^^^^642.857^47.857^92.857^650^342.857^14.286^2.429^.286^1.5^^^^1.571
;;^UTILITY(U,$J,112,8712,2)
;;=1.929^14.286^^.357^^^^^^^^^0
;;^UTILITY(U,$J,112,8712,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8713,0)
;;=BF,HIGH PROTEIN,DRY,GERBER^BC-01986^.5-oz.^14
;;^UTILITY(U,$J,112,8713,1)
;;=37.143^7.143^45^392.857^^^^642.857^47.857^228.571^692.857^1578.571^7.143^3.786^1.071^3.429^^^0^1.571
;;^UTILITY(U,$J,112,8713,2)
;;=1.929^14.286^^.5^^^^^^^^^0
;;^UTILITY(U,$J,112,8713,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8714,0)
;;=BF,CEREAL,MIXED,DRY,BEECH-NUT STAGE 2^BC-01987^.5-oz.^14
;;^UTILITY(U,$J,112,8714,1)
;;=12.143^5^72.857^385.714^^^^850^48^^^^42.857^^^^^^^1.571
;;^UTILITY(U,$J,112,8714,2)
;;=2^25.714
;;^UTILITY(U,$J,112,8714,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8715,0)
;;=BF,CEREAL,MIXED,DRY,GERBER^BC-01988^.5-oz.^14
;;^UTILITY(U,$J,112,8715,1)
;;=8.571^5.714^75^392.857^^^^642.857^47.857^71.429^578.571^228.571^7.143^1.643^.143^2.071^^^^1.571
;;^UTILITY(U,$J,112,8715,2)
;;=1.929^14.286^^.143^^^^^^^^^0
;;^UTILITY(U,$J,112,8715,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8716,0)
;;=BF,CEREAL,MIXED W/APPLES & BANANAS,GERBER THIRD FOOD^BC-01989^6-oz.^170
;;^UTILITY(U,$J,112,8716,1)
;;=1.353^.529^17.412^80^^^^5.882^4.059^10.588^35.294^58.235^2.941^.235^.035^.329^^^9.412^.129
;;^UTILITY(U,$J,112,8716,2)
;;=.159^2.118^^.112^^^^^^^^^.588
;;^UTILITY(U,$J,112,8716,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8717,0)
;;=BF,CEREAL,MIXED W/APPLES & BANANAS,GERBER SECOND FOOD^BC-01990^4-oz.^113
;;^UTILITY(U,$J,112,8717,1)
;;=1.239^.531^17.522^80.531^^^^4.425^5.31^8.85^29.204^51.327^3.54^.221^.035^^^^12.389^.177
;;^UTILITY(U,$J,112,8717,2)
;;=.212^2.832^^.142^^^^^^^^^0
;;^UTILITY(U,$J,112,8717,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8718,0)
;;=BF,CEREAL,MIXED W/APPLESAUCE & BANANAS,BEECH-NUT STAGE 2^BC-01991^4.5-oz.^128
;;^UTILITY(U,$J,112,8718,1)
;;=1.719^.938^12.578^64.844^^^^10.938^5.297^^^^^^^^^^12.5^.18
;;^UTILITY(U,$J,112,8718,2)
;;=.211^2.813
;;^UTILITY(U,$J,112,8718,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8719,0)
;;=BF,CEREAL,MIXED W/BANANAS,DRY,GERBER^BC-01992^.5-oz.^14
;;^UTILITY(U,$J,112,8719,1)
;;=9.286^3.571^80.714^392.857^^^^642.857^47.857^71.429^442.857^407.143^7.143^1.286^.286^1.643^^^0^1.571
;;^UTILITY(U,$J,112,8719,2)
;;=1.929^14.286^^.429^^^^^^^^^7.143
;;^UTILITY(U,$J,112,8719,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8720,0)
;;=BF,CEREAL,MIXED W/BANANAS & APPLE JCE,INST. HEINZ^BC-01993^4-tbsp.^14
;;^UTILITY(U,$J,112,8720,1)
;;=7.143^0^85.714^357.143^^^^42.857^50^^185.714^571.429^14.286^1.286^.286^^^71.429^121.429^1.714
;;^UTILITY(U,$J,112,8720,2)
;;=2^25.714^^.429
;;^UTILITY(U,$J,112,8720,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8721,0)
;;=BF,CEREAL,OATMEAL,DRY,BEECH-NUT STAGE 1^BC-01994^.5-oz.^14
;;^UTILITY(U,$J,112,8721,1)
;;=15.714^7.857^66.429^400^^^^850^48^^^^57.143^^^^^^^1.571
;;^UTILITY(U,$J,112,8721,2)
;;=2^25.714
;;^UTILITY(U,$J,112,8721,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8722,0)
;;=BF,CEREAL,OATMEAL,DRY,GERBER^BC-01995^.5-oz.^14
;;^UTILITY(U,$J,112,8722,1)
;;=15.714^7.857^67.143^407.143^^^^642.857^47.857^107.143^742.857^357.143^7.143^3.071^.214^4.143^^^^1.571
;;^UTILITY(U,$J,112,8722,2)
;;=1.929^14.286^^.143^^^^^^^^^0
;;^UTILITY(U,$J,112,8722,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8723,0)
;;=BF,CEREAL,OATMEAL W/APPLES & BANANAS,GERBER THIRD FOOD^BC-01996^6-oz.^170
;;^UTILITY(U,$J,112,8723,1)
;;=1.588^.765^16.059^77.647^^^^5.882^4.118^13.529^45.294^71.176^3.529^.306^.047^.429^^^9.412^.129
;;^UTILITY(U,$J,112,8723,2)
;;=.159^2.118^^.112^^^^^^^^^1.176
;;^UTILITY(U,$J,112,8723,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8724,0)
;;=BF,CEREAL,OATMEAL W/APPLES & BANANAS,GERBER SECOND FOOD^BC-01997^4-oz.^113
;;^UTILITY(U,$J,112,8724,1)
;;=1.416^.796^16.726^79.646^^^^6.195^5.310^12.389^39.823^64.602^3.54^.283^.053^.416^^^12.389^.177
;;^UTILITY(U,$J,112,8724,2)
;;=.212^2.832^^.142^^^^^^^^^0
;;^UTILITY(U,$J,112,8724,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
FHINI0DU ; ; 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,8712,0)
+2 ;;=BF,CEREAL,DRY,GERBER^BC-01985^.5-oz.^14
+3 ;;^UTILITY(U,$J,112,8712,1)
+4 ;;=12.143^4.286^75^385.714^^^^642.857^47.857^92.857^650^342.857^14.286^2.429^.286^1.5^^^^1.571
+5 ;;^UTILITY(U,$J,112,8712,2)
+6 ;;=1.929^14.286^^.357^^^^^^^^^0
+7 ;;^UTILITY(U,$J,112,8712,20)
+8 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+9 ;;^UTILITY(U,$J,112,8713,0)
+10 ;;=BF,HIGH PROTEIN,DRY,GERBER^BC-01986^.5-oz.^14
+11 ;;^UTILITY(U,$J,112,8713,1)
+12 ;;=37.143^7.143^45^392.857^^^^642.857^47.857^228.571^692.857^1578.571^7.143^3.786^1.071^3.429^^^0^1.571
+13 ;;^UTILITY(U,$J,112,8713,2)
+14 ;;=1.929^14.286^^.5^^^^^^^^^0
+15 ;;^UTILITY(U,$J,112,8713,20)
+16 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+17 ;;^UTILITY(U,$J,112,8714,0)
+18 ;;=BF,CEREAL,MIXED,DRY,BEECH-NUT STAGE 2^BC-01987^.5-oz.^14
+19 ;;^UTILITY(U,$J,112,8714,1)
+20 ;;=12.143^5^72.857^385.714^^^^850^48^^^^42.857^^^^^^^1.571
+21 ;;^UTILITY(U,$J,112,8714,2)
+22 ;;=2^25.714
+23 ;;^UTILITY(U,$J,112,8714,20)
+24 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+25 ;;^UTILITY(U,$J,112,8715,0)
+26 ;;=BF,CEREAL,MIXED,DRY,GERBER^BC-01988^.5-oz.^14
+27 ;;^UTILITY(U,$J,112,8715,1)
+28 ;;=8.571^5.714^75^392.857^^^^642.857^47.857^71.429^578.571^228.571^7.143^1.643^.143^2.071^^^^1.571
+29 ;;^UTILITY(U,$J,112,8715,2)
+30 ;;=1.929^14.286^^.143^^^^^^^^^0
+31 ;;^UTILITY(U,$J,112,8715,20)
+32 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+33 ;;^UTILITY(U,$J,112,8716,0)
+34 ;;=BF,CEREAL,MIXED W/APPLES & BANANAS,GERBER THIRD FOOD^BC-01989^6-oz.^170
+35 ;;^UTILITY(U,$J,112,8716,1)
+36 ;;=1.353^.529^17.412^80^^^^5.882^4.059^10.588^35.294^58.235^2.941^.235^.035^.329^^^9.412^.129
+37 ;;^UTILITY(U,$J,112,8716,2)
+38 ;;=.159^2.118^^.112^^^^^^^^^.588
+39 ;;^UTILITY(U,$J,112,8716,20)
+40 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+41 ;;^UTILITY(U,$J,112,8717,0)
+42 ;;=BF,CEREAL,MIXED W/APPLES & BANANAS,GERBER SECOND FOOD^BC-01990^4-oz.^113
+43 ;;^UTILITY(U,$J,112,8717,1)
+44 ;;=1.239^.531^17.522^80.531^^^^4.425^5.31^8.85^29.204^51.327^3.54^.221^.035^^^^12.389^.177
+45 ;;^UTILITY(U,$J,112,8717,2)
+46 ;;=.212^2.832^^.142^^^^^^^^^0
+47 ;;^UTILITY(U,$J,112,8717,20)
+48 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+49 ;;^UTILITY(U,$J,112,8718,0)
+50 ;;=BF,CEREAL,MIXED W/APPLESAUCE & BANANAS,BEECH-NUT STAGE 2^BC-01991^4.5-oz.^128
+51 ;;^UTILITY(U,$J,112,8718,1)
+52 ;;=1.719^.938^12.578^64.844^^^^10.938^5.297^^^^^^^^^^12.5^.18
+53 ;;^UTILITY(U,$J,112,8718,2)
+54 ;;=.211^2.813
+55 ;;^UTILITY(U,$J,112,8718,20)
+56 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+57 ;;^UTILITY(U,$J,112,8719,0)
+58 ;;=BF,CEREAL,MIXED W/BANANAS,DRY,GERBER^BC-01992^.5-oz.^14
+59 ;;^UTILITY(U,$J,112,8719,1)
+60 ;;=9.286^3.571^80.714^392.857^^^^642.857^47.857^71.429^442.857^407.143^7.143^1.286^.286^1.643^^^0^1.571
+61 ;;^UTILITY(U,$J,112,8719,2)
+62 ;;=1.929^14.286^^.429^^^^^^^^^7.143
+63 ;;^UTILITY(U,$J,112,8719,20)
+64 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+65 ;;^UTILITY(U,$J,112,8720,0)
+66 ;;=BF,CEREAL,MIXED W/BANANAS & APPLE JCE,INST. HEINZ^BC-01993^4-tbsp.^14
+67 ;;^UTILITY(U,$J,112,8720,1)
+68 ;;=7.143^0^85.714^357.143^^^^42.857^50^^185.714^571.429^14.286^1.286^.286^^^71.429^121.429^1.714
+69 ;;^UTILITY(U,$J,112,8720,2)
+70 ;;=2^25.714^^.429
+71 ;;^UTILITY(U,$J,112,8720,20)
+72 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+73 ;;^UTILITY(U,$J,112,8721,0)
+74 ;;=BF,CEREAL,OATMEAL,DRY,BEECH-NUT STAGE 1^BC-01994^.5-oz.^14
+75 ;;^UTILITY(U,$J,112,8721,1)
+76 ;;=15.714^7.857^66.429^400^^^^850^48^^^^57.143^^^^^^^1.571
+77 ;;^UTILITY(U,$J,112,8721,2)
+78 ;;=2^25.714
+79 ;;^UTILITY(U,$J,112,8721,20)
+80 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+81 ;;^UTILITY(U,$J,112,8722,0)
+82 ;;=BF,CEREAL,OATMEAL,DRY,GERBER^BC-01995^.5-oz.^14
+83 ;;^UTILITY(U,$J,112,8722,1)
+84 ;;=15.714^7.857^67.143^407.143^^^^642.857^47.857^107.143^742.857^357.143^7.143^3.071^.214^4.143^^^^1.571
+85 ;;^UTILITY(U,$J,112,8722,2)
+86 ;;=1.929^14.286^^.143^^^^^^^^^0
+87 ;;^UTILITY(U,$J,112,8722,20)
+88 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+89 ;;^UTILITY(U,$J,112,8723,0)
+90 ;;=BF,CEREAL,OATMEAL W/APPLES & BANANAS,GERBER THIRD FOOD^BC-01996^6-oz.^170
+91 ;;^UTILITY(U,$J,112,8723,1)
+92 ;;=1.588^.765^16.059^77.647^^^^5.882^4.118^13.529^45.294^71.176^3.529^.306^.047^.429^^^9.412^.129
+93 ;;^UTILITY(U,$J,112,8723,2)
+94 ;;=.159^2.118^^.112^^^^^^^^^1.176
+95 ;;^UTILITY(U,$J,112,8723,20)
+96 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+97 ;;^UTILITY(U,$J,112,8724,0)
+98 ;;=BF,CEREAL,OATMEAL W/APPLES & BANANAS,GERBER SECOND FOOD^BC-01997^4-oz.^113
+99 ;;^UTILITY(U,$J,112,8724,1)
+100 ;;=1.416^.796^16.726^79.646^^^^6.195^5.310^12.389^39.823^64.602^3.54^.283^.053^.416^^^12.389^.177
+101 ;;^UTILITY(U,$J,112,8724,2)
+102 ;;=.212^2.832^^.142^^^^^^^^^0
+103 ;;^UTILITY(U,$J,112,8724,20)
+104 ;;=Bowes & Church's Food Values, Sixteenth Edition.
