FHINI0F5 ; ; 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,9344,0)
;;=CHICKEN,FRIED,HOT & SPICY,FROZEN,BANQUET^BC-02617^6.4-oz.^181
;;^UTILITY(U,$J,112,9344,1)
;;=9.945^10.497^11.05^182.32^^^^11.602^.552^^^79.558^668.508^^^^^46.961^0^.044
;;^UTILITY(U,$J,112,9344,2)
;;=.055^2.652
;;^UTILITY(U,$J,112,9344,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9345,0)
;;=CHICKEN,FRIED,NIBBLES WING SECTIONS,FROZEN,SWANSON^BC-02618^3.2-oz.^92
;;^UTILITY(U,$J,112,9345,1)
;;=13.696^20.652^20.435^321.739^^^^26.087^1.63^^^134.783^740.217^^^^^0^0^.141
;;^UTILITY(U,$J,112,9345,2)
;;=.141^3.37
;;^UTILITY(U,$J,112,9345,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9346,0)
;;=CHICKEN,FRIED,PLUMP & JUICY,FROZEN,SWANSON^BC-02619^3.2-oz.^92
;;^UTILITY(U,$J,112,9346,1)
;;=16.196^17.065^15.87^282.609^^^^33.696^1.63^^208.696^194.565^655.435^^^^^4.348^0^.13
;;^UTILITY(U,$J,112,9346,2)
;;=.185^4.674
;;^UTILITY(U,$J,112,9346,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9347,0)
;;=CHICKEN,FRIED,THIGHS,BACKS & DRUMSTICKS,FROZEN,SWANSON^BC-02620^3.2-oz.^92
;;^UTILITY(U,$J,112,9347,1)
;;=16.522^18.478^16.522^297.826^^^^29.348^1.63^^^192.391^635.87^^^^^1.087^0^.109
;;^UTILITY(U,$J,112,9347,2)
;;=.174^3.37
;;^UTILITY(U,$J,112,9347,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9348,0)
;;=CHICKEN,FRIED,WHITE MEAT,BANQUET PLATTER^BC-02621^9-oz.^255
;;^UTILITY(U,$J,112,9348,1)
;;=14.902^8.627^8.235^168.627^^^^9.804^.784^^118.431^235.294^^^^^^167.843^4.706^.067
;;^UTILITY(U,$J,112,9348,2)
;;=.082^5.49^^^^^^^41.176
;;^UTILITY(U,$J,112,9348,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9349,0)
;;=CHICKEN,MIN-DRUMS,CRISPY,FROZEN,WEAVER^BC-02622^3-oz.^85
;;^UTILITY(U,$J,112,9349,1)
;;=15.294^14.118^15.294^247.059^^^^^^^^^564.706
;;^UTILITY(U,$J,112,9349,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9350,0)
;;=CHICKEN,MINI-DRUMS,HERB & SPICE,FROZEN,WEAVER^BC-02623^3-oz.^85
;;^UTILITY(U,$J,112,9350,1)
;;=15.294^14.118^15.294^247.059^^^^^^^^^376.471
;;^UTILITY(U,$J,112,9350,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9351,0)
;;=CHICKEN,NUGGETS,BREADED & FRIED,PERDUE^BC-02624^4-nuggets^74
;;^UTILITY(U,$J,112,9351,1)
;;=16.216^10.811^10.811^216.216^^^^^^^^^421.622
;;^UTILITY(U,$J,112,9351,2)
;;=^^^^^^^^54.054
;;^UTILITY(U,$J,112,9351,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9352,0)
;;=CHICKEN,NUGGETS,BREADED,FROZEN,SWANSON^BC-02625^3.2-oz.^90
;;^UTILITY(U,$J,112,9352,1)
;;=14.222^14.444^15.667^250^^^^14.444^1^^^184.444^395.556^^^^^0^0^.111
;;^UTILITY(U,$J,112,9352,2)
;;=.111^4.556
;;^UTILITY(U,$J,112,9352,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9353,0)
;;=CHICKEN,NUGGETS,BRST,SOUTHERN FRD W/BBQ,FRZN,BANQUET,MICRO^BC-02626^4.5-oz.^128
;;^UTILITY(U,$J,112,9353,1)
;;=14.844^17.969^15.625^289.063^^^^11.719^.781^^180.469^218.75^726.563^^^^^0^2.344^.133
;;^UTILITY(U,$J,112,9353,2)
;;=.078^5.078
;;^UTILITY(U,$J,112,9353,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9354,0)
;;=CHICKEN,NUGGETS,FRZN,BANQUET PLATTER^BC-02627^6.4-oz.^181
;;^UTILITY(U,$J,112,9354,1)
;;=9.392^11.602^25.414^237.569^^^^8.84^1.105^^145.304^314.917^348.066^^^^^135.359^7.182^.105
;;^UTILITY(U,$J,112,9354,2)
;;=.044^2.818
;;^UTILITY(U,$J,112,9354,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9355,0)
;;=CHICKEN,NUGGETS,FRZN,COUNTRY PRIDE^BC-02628^3-oz.^85
;;^UTILITY(U,$J,112,9355,1)
;;=12.941^18.824^16.471^294.118^^^^10.588^1.176^^180^188.235^541.176^^^^^^2.353^.129
;;^UTILITY(U,$J,112,9355,2)
;;=.141^2.706
;;^UTILITY(U,$J,112,9355,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9356,0)
;;=CHICKEN,NUGGETS,FRZN,WEAVER^BC-02629^2.6-oz.^74
;;^UTILITY(U,$J,112,9356,1)
;;=13.514^16.216^13.514^256.757^^^^^^^^^608.108
;;^UTILITY(U,$J,112,9356,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9357,0)
;;=CHICKEN,PATTIES,FRZN,BANQUET PLATTER^BC-02630^7.5-oz.^213
;;^UTILITY(U,$J,112,9357,1)
;;=7.042^9.859^15.962^178.404^^^^15.962^.469^^34.272^220.657^356.808^^^^^197.183^2.817^.07
;;^UTILITY(U,$J,112,9357,2)
;;=.052^2.16
;;^UTILITY(U,$J,112,9357,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,9358,0)
;;=CHICKEN,PATTIES,FRZN,COUNTRY PRIDE^BC-02631^3-oz.^85
;;^UTILITY(U,$J,112,9358,1)
;;=14.118^18.824^16.471^294.118^^^^11.765^1.176^^190.588^188.235^670.588^^^^^^3.529^.106
FHINI0F5 ; ; 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,9344,0)
+2 ;;=CHICKEN,FRIED,HOT & SPICY,FROZEN,BANQUET^BC-02617^6.4-oz.^181
+3 ;;^UTILITY(U,$J,112,9344,1)
+4 ;;=9.945^10.497^11.05^182.32^^^^11.602^.552^^^79.558^668.508^^^^^46.961^0^.044
+5 ;;^UTILITY(U,$J,112,9344,2)
+6 ;;=.055^2.652
+7 ;;^UTILITY(U,$J,112,9344,20)
+8 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+9 ;;^UTILITY(U,$J,112,9345,0)
+10 ;;=CHICKEN,FRIED,NIBBLES WING SECTIONS,FROZEN,SWANSON^BC-02618^3.2-oz.^92
+11 ;;^UTILITY(U,$J,112,9345,1)
+12 ;;=13.696^20.652^20.435^321.739^^^^26.087^1.63^^^134.783^740.217^^^^^0^0^.141
+13 ;;^UTILITY(U,$J,112,9345,2)
+14 ;;=.141^3.37
+15 ;;^UTILITY(U,$J,112,9345,20)
+16 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+17 ;;^UTILITY(U,$J,112,9346,0)
+18 ;;=CHICKEN,FRIED,PLUMP & JUICY,FROZEN,SWANSON^BC-02619^3.2-oz.^92
+19 ;;^UTILITY(U,$J,112,9346,1)
+20 ;;=16.196^17.065^15.87^282.609^^^^33.696^1.63^^208.696^194.565^655.435^^^^^4.348^0^.13
+21 ;;^UTILITY(U,$J,112,9346,2)
+22 ;;=.185^4.674
+23 ;;^UTILITY(U,$J,112,9346,20)
+24 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+25 ;;^UTILITY(U,$J,112,9347,0)
+26 ;;=CHICKEN,FRIED,THIGHS,BACKS & DRUMSTICKS,FROZEN,SWANSON^BC-02620^3.2-oz.^92
+27 ;;^UTILITY(U,$J,112,9347,1)
+28 ;;=16.522^18.478^16.522^297.826^^^^29.348^1.63^^^192.391^635.87^^^^^1.087^0^.109
+29 ;;^UTILITY(U,$J,112,9347,2)
+30 ;;=.174^3.37
+31 ;;^UTILITY(U,$J,112,9347,20)
+32 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+33 ;;^UTILITY(U,$J,112,9348,0)
+34 ;;=CHICKEN,FRIED,WHITE MEAT,BANQUET PLATTER^BC-02621^9-oz.^255
+35 ;;^UTILITY(U,$J,112,9348,1)
+36 ;;=14.902^8.627^8.235^168.627^^^^9.804^.784^^118.431^235.294^^^^^^167.843^4.706^.067
+37 ;;^UTILITY(U,$J,112,9348,2)
+38 ;;=.082^5.49^^^^^^^41.176
+39 ;;^UTILITY(U,$J,112,9348,20)
+40 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+41 ;;^UTILITY(U,$J,112,9349,0)
+42 ;;=CHICKEN,MIN-DRUMS,CRISPY,FROZEN,WEAVER^BC-02622^3-oz.^85
+43 ;;^UTILITY(U,$J,112,9349,1)
+44 ;;=15.294^14.118^15.294^247.059^^^^^^^^^564.706
+45 ;;^UTILITY(U,$J,112,9349,20)
+46 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+47 ;;^UTILITY(U,$J,112,9350,0)
+48 ;;=CHICKEN,MINI-DRUMS,HERB & SPICE,FROZEN,WEAVER^BC-02623^3-oz.^85
+49 ;;^UTILITY(U,$J,112,9350,1)
+50 ;;=15.294^14.118^15.294^247.059^^^^^^^^^376.471
+51 ;;^UTILITY(U,$J,112,9350,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,9351,0)
+54 ;;=CHICKEN,NUGGETS,BREADED & FRIED,PERDUE^BC-02624^4-nuggets^74
+55 ;;^UTILITY(U,$J,112,9351,1)
+56 ;;=16.216^10.811^10.811^216.216^^^^^^^^^421.622
+57 ;;^UTILITY(U,$J,112,9351,2)
+58 ;;=^^^^^^^^54.054
+59 ;;^UTILITY(U,$J,112,9351,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,9352,0)
+62 ;;=CHICKEN,NUGGETS,BREADED,FROZEN,SWANSON^BC-02625^3.2-oz.^90
+63 ;;^UTILITY(U,$J,112,9352,1)
+64 ;;=14.222^14.444^15.667^250^^^^14.444^1^^^184.444^395.556^^^^^0^0^.111
+65 ;;^UTILITY(U,$J,112,9352,2)
+66 ;;=.111^4.556
+67 ;;^UTILITY(U,$J,112,9352,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,9353,0)
+70 ;;=CHICKEN,NUGGETS,BRST,SOUTHERN FRD W/BBQ,FRZN,BANQUET,MICRO^BC-02626^4.5-oz.^128
+71 ;;^UTILITY(U,$J,112,9353,1)
+72 ;;=14.844^17.969^15.625^289.063^^^^11.719^.781^^180.469^218.75^726.563^^^^^0^2.344^.133
+73 ;;^UTILITY(U,$J,112,9353,2)
+74 ;;=.078^5.078
+75 ;;^UTILITY(U,$J,112,9353,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,9354,0)
+78 ;;=CHICKEN,NUGGETS,FRZN,BANQUET PLATTER^BC-02627^6.4-oz.^181
+79 ;;^UTILITY(U,$J,112,9354,1)
+80 ;;=9.392^11.602^25.414^237.569^^^^8.84^1.105^^145.304^314.917^348.066^^^^^135.359^7.182^.105
+81 ;;^UTILITY(U,$J,112,9354,2)
+82 ;;=.044^2.818
+83 ;;^UTILITY(U,$J,112,9354,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,9355,0)
+86 ;;=CHICKEN,NUGGETS,FRZN,COUNTRY PRIDE^BC-02628^3-oz.^85
+87 ;;^UTILITY(U,$J,112,9355,1)
+88 ;;=12.941^18.824^16.471^294.118^^^^10.588^1.176^^180^188.235^541.176^^^^^^2.353^.129
+89 ;;^UTILITY(U,$J,112,9355,2)
+90 ;;=.141^2.706
+91 ;;^UTILITY(U,$J,112,9355,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,9356,0)
+94 ;;=CHICKEN,NUGGETS,FRZN,WEAVER^BC-02629^2.6-oz.^74
+95 ;;^UTILITY(U,$J,112,9356,1)
+96 ;;=13.514^16.216^13.514^256.757^^^^^^^^^608.108
+97 ;;^UTILITY(U,$J,112,9356,20)
+98 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+99 ;;^UTILITY(U,$J,112,9357,0)
+100 ;;=CHICKEN,PATTIES,FRZN,BANQUET PLATTER^BC-02630^7.5-oz.^213
+101 ;;^UTILITY(U,$J,112,9357,1)
+102 ;;=7.042^9.859^15.962^178.404^^^^15.962^.469^^34.272^220.657^356.808^^^^^197.183^2.817^.07
+103 ;;^UTILITY(U,$J,112,9357,2)
+104 ;;=.052^2.16
+105 ;;^UTILITY(U,$J,112,9357,20)
+106 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+107 ;;^UTILITY(U,$J,112,9358,0)
+108 ;;=CHICKEN,PATTIES,FRZN,COUNTRY PRIDE^BC-02631^3-oz.^85
+109 ;;^UTILITY(U,$J,112,9358,1)
+110 ;;=14.118^18.824^16.471^294.118^^^^11.765^1.176^^190.588^188.235^670.588^^^^^^3.529^.106
