FHINI01O ; ; 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,416,1)
;;=30.91^4.51^0^173^64.76^^^15^1.06^27^216^247^77^1.23^.05^.017^^29^0^.065
;;^UTILITY(U,$J,112,416,2)
;;=.116^12.421^.972^.6^4^.34^.74^.04^85^1.27^1.54^.98^9^1.02^^^0
;;^UTILITY(U,$J,112,416,3)
;;=.361^1.305^1.632^2.319^2.626^.855^.396^1.226^1.043^1.533^1.864^.959^1.686^2.754^4.629^1.518^1.271^1.063
;;^UTILITY(U,$J,112,416,4)
;;=0^.01^.04^.87^.18^.32^1.3^.08
;;^UTILITY(U,$J,112,416,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,417,0)
;;=CHICKEN, LIGHT MEAT, MEAT ONLY, STEWED^5-042^oz.^28.35^56^N
;;^UTILITY(U,$J,112,417,1)
;;=28.88^3.99^0^159^68.02^^^13^.93^22^159^180^65^1.19^.044^.018^^27^0^.042
;;^UTILITY(U,$J,112,417,2)
;;=.117^7.79^.573^.33^3^.23^.65^.03^77^1.12^1.35^.87^8^.87^^^0
;;^UTILITY(U,$J,112,417,3)
;;=.337^1.22^1.525^2.167^2.454^.799^.37^1.146^.975^1.433^1.742^.896^1.576^2.574^4.325^1.419^1.188^.994
;;^UTILITY(U,$J,112,417,4)
;;=0^.01^.03^.77^.16^.28^1.14^.07
;;^UTILITY(U,$J,112,417,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,418,0)
;;=CHICKEN, DARK MEAT, MEAT ONLY, FRIED^5-044^oz.^28.35^58^N
;;^UTILITY(U,$J,112,418,1)
;;=28.99^11.62^2.59^239^55.7^^^18^1.49^25^187^253^97^2.91^.089^.033^^79^0^.093
;;^UTILITY(U,$J,112,418,2)
;;=.249^7.07^1.261^.37^9^.33^2.33^.12^96^3.12^4.32^2.77^24^1.08^^^0
;;^UTILITY(U,$J,112,418,3)
;;=.34^1.221^1.528^2.176^2.441^.799^.375^1.156^.978^1.438^1.742^.897^1.575^2.568^4.425^1.42^1.222^1.006
;;^UTILITY(U,$J,112,418,4)
;;=0^.03^.08^2.1^.49^.81^3.72^.15
;;^UTILITY(U,$J,112,418,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,419,0)
;;=CHICKEN, DARK MEAT, MEAT ONLY, ROASTED^5-045^oz.^28.35^52^N
;;^UTILITY(U,$J,112,419,1)
;;=27.37^9.73^0^205^63.06^^^15^1.33^23^179^240^93^2.8^.08^.021^^72^0^.073
;;^UTILITY(U,$J,112,419,2)
;;=.227^6.548^1.21^.36^8^.32^1.87^.09^93^2.66^3.56^2.26^22^1.02^^^0
;;^UTILITY(U,$J,112,419,3)
;;=.32^1.156^1.445^2.053^2.325^.757^.35^1.086^.924^1.357^1.651^.849^1.493^2.439^4.098^1.344^1.125^.941
;;^UTILITY(U,$J,112,419,4)
;;=0^.03^.07^1.84^.49^.63^2.97^.14
;;^UTILITY(U,$J,112,419,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,420,0)
;;=CHICKEN, DARK MEAT, MEAT ONLY, STEWED^5-046^oz.^28.35^48^N
;;^UTILITY(U,$J,112,420,1)
;;=25.97^8.98^0^192^65.83^^^14^1.36^20^143^181^74^2.66^.075^.02^^69^0^.055
;;^UTILITY(U,$J,112,420,2)
;;=.202^4.737^.89^.21^7^.22^1.73^.08^88^2.45^3.26^2.09^21^.84^^^0
;;^UTILITY(U,$J,112,420,3)
;;=.303^1.097^1.371^1.949^2.206^.719^.332^1.03^.877^1.288^1.566^.806^1.417^2.314^3.889^1.276^1.068^.893
;;^UTILITY(U,$J,112,420,4)
;;=0^.03^.06^1.69^.45^.58^2.71^.13
;;^UTILITY(U,$J,112,420,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,421,0)
;;=CHICKEN, BREAST, MEAT&SKIN, FRIED, BATTER^5-058^oz.^28.35^88^N
;;^UTILITY(U,$J,112,421,1)
;;=24.84^13.2^8.99^260^51.64^^^20^1.25^24^185^201^275^.95^.06^.054^^67^0^.115
;;^UTILITY(U,$J,112,421,2)
;;=.146^10.523^.823^.43^6^.3^2.78^.15^85^3.52^5.46^3.08^20^1.33^^^.3
;;^UTILITY(U,$J,112,421,3)
;;=.285^1.022^1.252^1.83^1.97^.657^.339^.991^.812^1.216^1.515^.73^1.391^2.158^3.942^1.467^1.255^.908
;;^UTILITY(U,$J,112,421,4)
;;=0^.01^.08^2.35^.37^1.04^4.97^.06
;;^UTILITY(U,$J,112,421,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,422,0)
;;=CHICKEN, BREAST, MEAT&SKIN, FRIED, FLR^5-059^oz.^28.35^83^N
;;^UTILITY(U,$J,112,422,1)
;;=31.84^8.87^1.64^222^56.59^^^16^1.19^30^233^259^76^1.1^.057^.026^^50^0^.082
;;^UTILITY(U,$J,112,422,2)
;;=.131^13.742^1.001^.58^4^.34^1.69^.08^89^2.45^3.5^1.96^15^1.06
;;^UTILITY(U,$J,112,422,3)
;;=.364^1.327^1.632^2.353^2.634^.862^.418^1.253^1.049^1.562^1.954^.959^1.792^2.828^4.763^1.811^1.446^1.114
;;^UTILITY(U,$J,112,422,4)
;;=0^.01^.07^1.73^.38^.58^3^.07
;;^UTILITY(U,$J,112,422,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,423,0)
;;=CHICKEN, BREAST, MEAT&SKIN, ROASTED^5-060^oz.^28.35^81^N
;;^UTILITY(U,$J,112,423,1)
;;=29.8^7.78^0^197^62.44^^^14^1.07^27^214^245^71^1.02^.05^.018^^93^0^.066
;;^UTILITY(U,$J,112,423,2)
;;=.119^12.71^.936^.56^4^.32^1.41^.06^84^2.19^3.03^1.66^27^.99^^^0
;;^UTILITY(U,$J,112,423,3)
;;=.34^1.244^1.525^2.198^2.473^.807^.39^1.169^.98^1.461^1.837^.897^1.688^2.657^4.404^1.72^1.347^1.04
;;^UTILITY(U,$J,112,423,4)
;;=0^.01^.06^1.61^.4^.45^2.51^.07
;;^UTILITY(U,$J,112,423,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,424,0)
;;=CHICKEN, BREAST, MEAT&SKIN, STEWED^5-061^oz.^28.35^82^N
;;^UTILITY(U,$J,112,424,1)
;;=27.39^7.42^0^184^66.21^^^13^.92^22^156^178^62^.97^.044^.018^^82^0^.041
;;^UTILITY(U,$J,112,424,2)
;;=.115^7.807^.547^.29^3^.21^1.35^.06^75^2.08^2.9^1.58^24^.84^^^0
FHINI01O ; ; 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,416,1)
+2 ;;=30.91^4.51^0^173^64.76^^^15^1.06^27^216^247^77^1.23^.05^.017^^29^0^.065
+3 ;;^UTILITY(U,$J,112,416,2)
+4 ;;=.116^12.421^.972^.6^4^.34^.74^.04^85^1.27^1.54^.98^9^1.02^^^0
+5 ;;^UTILITY(U,$J,112,416,3)
+6 ;;=.361^1.305^1.632^2.319^2.626^.855^.396^1.226^1.043^1.533^1.864^.959^1.686^2.754^4.629^1.518^1.271^1.063
+7 ;;^UTILITY(U,$J,112,416,4)
+8 ;;=0^.01^.04^.87^.18^.32^1.3^.08
+9 ;;^UTILITY(U,$J,112,416,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,417,0)
+12 ;;=CHICKEN, LIGHT MEAT, MEAT ONLY, STEWED^5-042^oz.^28.35^56^N
+13 ;;^UTILITY(U,$J,112,417,1)
+14 ;;=28.88^3.99^0^159^68.02^^^13^.93^22^159^180^65^1.19^.044^.018^^27^0^.042
+15 ;;^UTILITY(U,$J,112,417,2)
+16 ;;=.117^7.79^.573^.33^3^.23^.65^.03^77^1.12^1.35^.87^8^.87^^^0
+17 ;;^UTILITY(U,$J,112,417,3)
+18 ;;=.337^1.22^1.525^2.167^2.454^.799^.37^1.146^.975^1.433^1.742^.896^1.576^2.574^4.325^1.419^1.188^.994
+19 ;;^UTILITY(U,$J,112,417,4)
+20 ;;=0^.01^.03^.77^.16^.28^1.14^.07
+21 ;;^UTILITY(U,$J,112,417,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,418,0)
+24 ;;=CHICKEN, DARK MEAT, MEAT ONLY, FRIED^5-044^oz.^28.35^58^N
+25 ;;^UTILITY(U,$J,112,418,1)
+26 ;;=28.99^11.62^2.59^239^55.7^^^18^1.49^25^187^253^97^2.91^.089^.033^^79^0^.093
+27 ;;^UTILITY(U,$J,112,418,2)
+28 ;;=.249^7.07^1.261^.37^9^.33^2.33^.12^96^3.12^4.32^2.77^24^1.08^^^0
+29 ;;^UTILITY(U,$J,112,418,3)
+30 ;;=.34^1.221^1.528^2.176^2.441^.799^.375^1.156^.978^1.438^1.742^.897^1.575^2.568^4.425^1.42^1.222^1.006
+31 ;;^UTILITY(U,$J,112,418,4)
+32 ;;=0^.03^.08^2.1^.49^.81^3.72^.15
+33 ;;^UTILITY(U,$J,112,418,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,419,0)
+36 ;;=CHICKEN, DARK MEAT, MEAT ONLY, ROASTED^5-045^oz.^28.35^52^N
+37 ;;^UTILITY(U,$J,112,419,1)
+38 ;;=27.37^9.73^0^205^63.06^^^15^1.33^23^179^240^93^2.8^.08^.021^^72^0^.073
+39 ;;^UTILITY(U,$J,112,419,2)
+40 ;;=.227^6.548^1.21^.36^8^.32^1.87^.09^93^2.66^3.56^2.26^22^1.02^^^0
+41 ;;^UTILITY(U,$J,112,419,3)
+42 ;;=.32^1.156^1.445^2.053^2.325^.757^.35^1.086^.924^1.357^1.651^.849^1.493^2.439^4.098^1.344^1.125^.941
+43 ;;^UTILITY(U,$J,112,419,4)
+44 ;;=0^.03^.07^1.84^.49^.63^2.97^.14
+45 ;;^UTILITY(U,$J,112,419,20)
+46 ;;=USDA Std. Reference, Release 10
+47 ;;^UTILITY(U,$J,112,420,0)
+48 ;;=CHICKEN, DARK MEAT, MEAT ONLY, STEWED^5-046^oz.^28.35^48^N
+49 ;;^UTILITY(U,$J,112,420,1)
+50 ;;=25.97^8.98^0^192^65.83^^^14^1.36^20^143^181^74^2.66^.075^.02^^69^0^.055
+51 ;;^UTILITY(U,$J,112,420,2)
+52 ;;=.202^4.737^.89^.21^7^.22^1.73^.08^88^2.45^3.26^2.09^21^.84^^^0
+53 ;;^UTILITY(U,$J,112,420,3)
+54 ;;=.303^1.097^1.371^1.949^2.206^.719^.332^1.03^.877^1.288^1.566^.806^1.417^2.314^3.889^1.276^1.068^.893
+55 ;;^UTILITY(U,$J,112,420,4)
+56 ;;=0^.03^.06^1.69^.45^.58^2.71^.13
+57 ;;^UTILITY(U,$J,112,420,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,421,0)
+60 ;;=CHICKEN, BREAST, MEAT&SKIN, FRIED, BATTER^5-058^oz.^28.35^88^N
+61 ;;^UTILITY(U,$J,112,421,1)
+62 ;;=24.84^13.2^8.99^260^51.64^^^20^1.25^24^185^201^275^.95^.06^.054^^67^0^.115
+63 ;;^UTILITY(U,$J,112,421,2)
+64 ;;=.146^10.523^.823^.43^6^.3^2.78^.15^85^3.52^5.46^3.08^20^1.33^^^.3
+65 ;;^UTILITY(U,$J,112,421,3)
+66 ;;=.285^1.022^1.252^1.83^1.97^.657^.339^.991^.812^1.216^1.515^.73^1.391^2.158^3.942^1.467^1.255^.908
+67 ;;^UTILITY(U,$J,112,421,4)
+68 ;;=0^.01^.08^2.35^.37^1.04^4.97^.06
+69 ;;^UTILITY(U,$J,112,421,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,422,0)
+72 ;;=CHICKEN, BREAST, MEAT&SKIN, FRIED, FLR^5-059^oz.^28.35^83^N
+73 ;;^UTILITY(U,$J,112,422,1)
+74 ;;=31.84^8.87^1.64^222^56.59^^^16^1.19^30^233^259^76^1.1^.057^.026^^50^0^.082
+75 ;;^UTILITY(U,$J,112,422,2)
+76 ;;=.131^13.742^1.001^.58^4^.34^1.69^.08^89^2.45^3.5^1.96^15^1.06
+77 ;;^UTILITY(U,$J,112,422,3)
+78 ;;=.364^1.327^1.632^2.353^2.634^.862^.418^1.253^1.049^1.562^1.954^.959^1.792^2.828^4.763^1.811^1.446^1.114
+79 ;;^UTILITY(U,$J,112,422,4)
+80 ;;=0^.01^.07^1.73^.38^.58^3^.07
+81 ;;^UTILITY(U,$J,112,422,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,423,0)
+84 ;;=CHICKEN, BREAST, MEAT&SKIN, ROASTED^5-060^oz.^28.35^81^N
+85 ;;^UTILITY(U,$J,112,423,1)
+86 ;;=29.8^7.78^0^197^62.44^^^14^1.07^27^214^245^71^1.02^.05^.018^^93^0^.066
+87 ;;^UTILITY(U,$J,112,423,2)
+88 ;;=.119^12.71^.936^.56^4^.32^1.41^.06^84^2.19^3.03^1.66^27^.99^^^0
+89 ;;^UTILITY(U,$J,112,423,3)
+90 ;;=.34^1.244^1.525^2.198^2.473^.807^.39^1.169^.98^1.461^1.837^.897^1.688^2.657^4.404^1.72^1.347^1.04
+91 ;;^UTILITY(U,$J,112,423,4)
+92 ;;=0^.01^.06^1.61^.4^.45^2.51^.07
+93 ;;^UTILITY(U,$J,112,423,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,424,0)
+96 ;;=CHICKEN, BREAST, MEAT&SKIN, STEWED^5-061^oz.^28.35^82^N
+97 ;;^UTILITY(U,$J,112,424,1)
+98 ;;=27.39^7.42^0^184^66.21^^^13^.92^22^156^178^62^.97^.044^.018^^82^0^.041
+99 ;;^UTILITY(U,$J,112,424,2)
+100 ;;=.115^7.807^.547^.29^3^.21^1.35^.06^75^2.08^2.9^1.58^24^.84^^^0
