FHINI07W ; ; 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,2742,0)
;;=CHICKEN, CAPONS, GIBLETS, SIMMERED^5-138^giblets^11^100^N
;;^UTILITY(U,$J,112,2742,1)
;;=26.39^5.4^.76^164^66.54^^^13^6.8^20^235^153^55^4.67^.294^.192^^13266^9^.095
;;^UTILITY(U,$J,112,2742,2)
;;=1.061^4.12^3.296^.38^414^1.14^.75^.02^434^1.77^1.37^1.13^3980^.91^^^0
;;^UTILITY(U,$J,112,2742,3)
;;=.313^1.193^1.339^2.158^1.942^.654^.352^1.215^.878^1.453^1.738^.631^1.339^2.48^3.907^1.467^1.338^1.15
;;^UTILITY(U,$J,112,2742,4)
;;=0^0^.02^.98^.18^.69^1.18^.25
;;^UTILITY(U,$J,112,2742,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2743,0)
;;=CHICKEN, CAPONS, MEAT&SKIN, ROASTED^5-136^chickens^196^71^N
;;^UTILITY(U,$J,112,2743,1)
;;=28.96^11.65^0^229^58.7^^^14^1.49^24^246^255^49^1.74^.069^.021^^68^0^.07
;;^UTILITY(U,$J,112,2743,2)
;;=.17^8.947^1.104^.43^6^.33^2.22^.1^86^3.26^4.75^2.52^20^1.04^^^0
;;^UTILITY(U,$J,112,2743,3)
;;=.325^1.2^1.455^2.115^2.37^.774^.384^1.128^.938^1.409^1.806^.857^1.674^2.582^4.246^1.815^1.376^1.018
;;^UTILITY(U,$J,112,2743,4)
;;=0^.01^.09^2.42^.66^.64^3.91^.08
;;^UTILITY(U,$J,112,2743,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2744,0)
;;=CHICKEN, GIZZARD, SIMMERED^5-024^gizzards^7^100^N
;;^UTILITY(U,$J,112,2744,1)
;;=27.15^3.66^1.14^153^67.32^^^10^4.15^20^155^179^67^4.38^.11^.062^^188^1.6^.027
;;^UTILITY(U,$J,112,2744,2)
;;=.244^3.975^.714^.12^53^1.94^.75^.03^194^1.04^.93^1.06^56^.73^^^0
;;^UTILITY(U,$J,112,2744,3)
;;=.243^1.251^1.281^1.907^1.877^.712^.356^1.129^.825^1.216^1.95^.547^1.069^2.498^4.639^1.425^1.412^1.216
;;^UTILITY(U,$J,112,2744,4)
;;=0^0^.02^.57^.15^.3^.78^.28
;;^UTILITY(U,$J,112,2744,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2745,0)
;;=CHICKEN, HEART, SIMMERED^5-026^hearts^1^100^N
;;^UTILITY(U,$J,112,2745,1)
;;=26.41^7.92^.1^185^64.85^^^19^9.03^20^199^132^48^7.3^.502^.107^^28^1.8^.07
;;^UTILITY(U,$J,112,2745,2)
;;=.741^2.803^2.654^.32^80^7.29^1.62^.06^242^2.26^2.01^2.3^9^.72^^^0
;;^UTILITY(U,$J,112,2745,3)
;;=.338^1.196^1.415^2.303^2.214^.638^.359^1.183^.946^1.496^1.694^.693^1.665^2.569^3.921^1.466^1.348^1.065
;;^UTILITY(U,$J,112,2745,4)
;;=0^0^.05^1.23^.33^.66^1.68^.61
;;^UTILITY(U,$J,112,2745,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2746,0)
;;=CHICKEN, ROASTING, MEAT ONLY, ROASTED^5-114^oz.^28.3^57^N
;;^UTILITY(U,$J,112,2746,1)
;;=25.01^6.63^0^167^67.41^^^12^1.21^21^192^229^75^1.52^.057^.017^^41^0^.062
;;^UTILITY(U,$J,112,2746,2)
;;=.147^7.881^.972^.41^5^.29^1.24^.06^75^1.81^2.5^1.51^12^.95^^^0
;;^UTILITY(U,$J,112,2746,3)
;;=.292^1.056^1.321^1.877^2.125^.693^.32^.993^.844^1.24^1.509^.776^1.365^2.229^3.745^1.229^1.029^.86
;;^UTILITY(U,$J,112,2746,4)
;;=0^.01^.05^1.27^.34^.42^2.08^.1
;;^UTILITY(U,$J,112,2746,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2747,0)
;;=CHICKEN, ROASTING, MEAT&SKIN, ROASTED^5-112^oz.^28.3^70^N
;;^UTILITY(U,$J,112,2747,1)
;;=23.97^13.39^0^223^62.1^^^12^1.26^20^179^211^73^1.45^.058^.018^^83^0^.057
;;^UTILITY(U,$J,112,2747,2)
;;=.143^7.418^.918^.35^5^.27^2.55^.12^76^3.74^5.4^2.92^25^.86^^^0
;;^UTILITY(U,$J,112,2747,3)
;;=.266^.989^1.191^1.739^1.945^.636^.32^.929^.769^1.162^1.506^.701^1.403^2.137^3.497^1.574^1.173^.847
;;^UTILITY(U,$J,112,2747,4)
;;=0^.02^.11^2.76^.74^.74^4.45^.11
;;^UTILITY(U,$J,112,2747,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2748,0)
;;=CHICKEN, STEWING, MEAT ONLY, STEWED^5-126^oz.^28.3^52^N
;;^UTILITY(U,$J,112,2748,1)
;;=30.42^11.89^0^237^56.35^^^13^1.43^22^204^202^78^2.06^.116^.022^^112^0^.112
;;^UTILITY(U,$J,112,2748,2)
;;=.277^6.408^.861^.31^6^.26^2.15^.1^83^3.1^4.05^2.83^33^1.35^^^0
;;^UTILITY(U,$J,112,2748,3)
;;=.356^1.285^1.606^2.283^2.585^.842^.389^1.207^1.027^1.509^1.835^.944^1.66^2.711^4.556^1.494^1.251^1.046
;;^UTILITY(U,$J,112,2748,4)
;;=0^.03^.08^2.13^.56^.76^3.37^.29
;;^UTILITY(U,$J,112,2748,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2749,0)
;;=CHICKEN, STEWING, MEAT&SKIN, STEWED^5-124^oz.^28.3^68^N
;;^UTILITY(U,$J,112,2749,1)
;;=26.88^18.87^0^285^53.07^^^13^1.37^20^180^182^73^1.77^.1^.021^^131^0^.094
;;^UTILITY(U,$J,112,2749,2)
;;=.235^5.798^.753^.25^5^.23^3.53^.16^79^5.11^7.19^4.23^39^1.18^^^0
;;^UTILITY(U,$J,112,2749,3)
;;=.301^1.113^1.348^1.961^2.197^.717^.357^1.046^.869^1.307^1.68^.793^1.559^2.397^3.938^1.702^1.286^.946
;;^UTILITY(U,$J,112,2749,4)
;;=0^.03^.14^3.73^1^1.07^5.92^.25
;;^UTILITY(U,$J,112,2749,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2750,0)
;;=CHICORY, WITLOOF, RAW^11-151^cups^90^89^N
;;^UTILITY(U,$J,112,2750,1)
;;=.9^.1^4^17^94.52^^^19^.24^10^26^211^2^.16^.051^.1^^29^2.8^.062
FHINI07W ; ; 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,2742,0)
+2 ;;=CHICKEN, CAPONS, GIBLETS, SIMMERED^5-138^giblets^11^100^N
+3 ;;^UTILITY(U,$J,112,2742,1)
+4 ;;=26.39^5.4^.76^164^66.54^^^13^6.8^20^235^153^55^4.67^.294^.192^^13266^9^.095
+5 ;;^UTILITY(U,$J,112,2742,2)
+6 ;;=1.061^4.12^3.296^.38^414^1.14^.75^.02^434^1.77^1.37^1.13^3980^.91^^^0
+7 ;;^UTILITY(U,$J,112,2742,3)
+8 ;;=.313^1.193^1.339^2.158^1.942^.654^.352^1.215^.878^1.453^1.738^.631^1.339^2.48^3.907^1.467^1.338^1.15
+9 ;;^UTILITY(U,$J,112,2742,4)
+10 ;;=0^0^.02^.98^.18^.69^1.18^.25
+11 ;;^UTILITY(U,$J,112,2742,20)
+12 ;;=USDA Std. Reference, Release 10
+13 ;;^UTILITY(U,$J,112,2743,0)
+14 ;;=CHICKEN, CAPONS, MEAT&SKIN, ROASTED^5-136^chickens^196^71^N
+15 ;;^UTILITY(U,$J,112,2743,1)
+16 ;;=28.96^11.65^0^229^58.7^^^14^1.49^24^246^255^49^1.74^.069^.021^^68^0^.07
+17 ;;^UTILITY(U,$J,112,2743,2)
+18 ;;=.17^8.947^1.104^.43^6^.33^2.22^.1^86^3.26^4.75^2.52^20^1.04^^^0
+19 ;;^UTILITY(U,$J,112,2743,3)
+20 ;;=.325^1.2^1.455^2.115^2.37^.774^.384^1.128^.938^1.409^1.806^.857^1.674^2.582^4.246^1.815^1.376^1.018
+21 ;;^UTILITY(U,$J,112,2743,4)
+22 ;;=0^.01^.09^2.42^.66^.64^3.91^.08
+23 ;;^UTILITY(U,$J,112,2743,20)
+24 ;;=USDA Std. Reference, Release 10
+25 ;;^UTILITY(U,$J,112,2744,0)
+26 ;;=CHICKEN, GIZZARD, SIMMERED^5-024^gizzards^7^100^N
+27 ;;^UTILITY(U,$J,112,2744,1)
+28 ;;=27.15^3.66^1.14^153^67.32^^^10^4.15^20^155^179^67^4.38^.11^.062^^188^1.6^.027
+29 ;;^UTILITY(U,$J,112,2744,2)
+30 ;;=.244^3.975^.714^.12^53^1.94^.75^.03^194^1.04^.93^1.06^56^.73^^^0
+31 ;;^UTILITY(U,$J,112,2744,3)
+32 ;;=.243^1.251^1.281^1.907^1.877^.712^.356^1.129^.825^1.216^1.95^.547^1.069^2.498^4.639^1.425^1.412^1.216
+33 ;;^UTILITY(U,$J,112,2744,4)
+34 ;;=0^0^.02^.57^.15^.3^.78^.28
+35 ;;^UTILITY(U,$J,112,2744,20)
+36 ;;=USDA Std. Reference, Release 10
+37 ;;^UTILITY(U,$J,112,2745,0)
+38 ;;=CHICKEN, HEART, SIMMERED^5-026^hearts^1^100^N
+39 ;;^UTILITY(U,$J,112,2745,1)
+40 ;;=26.41^7.92^.1^185^64.85^^^19^9.03^20^199^132^48^7.3^.502^.107^^28^1.8^.07
+41 ;;^UTILITY(U,$J,112,2745,2)
+42 ;;=.741^2.803^2.654^.32^80^7.29^1.62^.06^242^2.26^2.01^2.3^9^.72^^^0
+43 ;;^UTILITY(U,$J,112,2745,3)
+44 ;;=.338^1.196^1.415^2.303^2.214^.638^.359^1.183^.946^1.496^1.694^.693^1.665^2.569^3.921^1.466^1.348^1.065
+45 ;;^UTILITY(U,$J,112,2745,4)
+46 ;;=0^0^.05^1.23^.33^.66^1.68^.61
+47 ;;^UTILITY(U,$J,112,2745,20)
+48 ;;=USDA Std. Reference, Release 10
+49 ;;^UTILITY(U,$J,112,2746,0)
+50 ;;=CHICKEN, ROASTING, MEAT ONLY, ROASTED^5-114^oz.^28.3^57^N
+51 ;;^UTILITY(U,$J,112,2746,1)
+52 ;;=25.01^6.63^0^167^67.41^^^12^1.21^21^192^229^75^1.52^.057^.017^^41^0^.062
+53 ;;^UTILITY(U,$J,112,2746,2)
+54 ;;=.147^7.881^.972^.41^5^.29^1.24^.06^75^1.81^2.5^1.51^12^.95^^^0
+55 ;;^UTILITY(U,$J,112,2746,3)
+56 ;;=.292^1.056^1.321^1.877^2.125^.693^.32^.993^.844^1.24^1.509^.776^1.365^2.229^3.745^1.229^1.029^.86
+57 ;;^UTILITY(U,$J,112,2746,4)
+58 ;;=0^.01^.05^1.27^.34^.42^2.08^.1
+59 ;;^UTILITY(U,$J,112,2746,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2747,0)
+62 ;;=CHICKEN, ROASTING, MEAT&SKIN, ROASTED^5-112^oz.^28.3^70^N
+63 ;;^UTILITY(U,$J,112,2747,1)
+64 ;;=23.97^13.39^0^223^62.1^^^12^1.26^20^179^211^73^1.45^.058^.018^^83^0^.057
+65 ;;^UTILITY(U,$J,112,2747,2)
+66 ;;=.143^7.418^.918^.35^5^.27^2.55^.12^76^3.74^5.4^2.92^25^.86^^^0
+67 ;;^UTILITY(U,$J,112,2747,3)
+68 ;;=.266^.989^1.191^1.739^1.945^.636^.32^.929^.769^1.162^1.506^.701^1.403^2.137^3.497^1.574^1.173^.847
+69 ;;^UTILITY(U,$J,112,2747,4)
+70 ;;=0^.02^.11^2.76^.74^.74^4.45^.11
+71 ;;^UTILITY(U,$J,112,2747,20)
+72 ;;=USDA Std. Reference, Release 10
+73 ;;^UTILITY(U,$J,112,2748,0)
+74 ;;=CHICKEN, STEWING, MEAT ONLY, STEWED^5-126^oz.^28.3^52^N
+75 ;;^UTILITY(U,$J,112,2748,1)
+76 ;;=30.42^11.89^0^237^56.35^^^13^1.43^22^204^202^78^2.06^.116^.022^^112^0^.112
+77 ;;^UTILITY(U,$J,112,2748,2)
+78 ;;=.277^6.408^.861^.31^6^.26^2.15^.1^83^3.1^4.05^2.83^33^1.35^^^0
+79 ;;^UTILITY(U,$J,112,2748,3)
+80 ;;=.356^1.285^1.606^2.283^2.585^.842^.389^1.207^1.027^1.509^1.835^.944^1.66^2.711^4.556^1.494^1.251^1.046
+81 ;;^UTILITY(U,$J,112,2748,4)
+82 ;;=0^.03^.08^2.13^.56^.76^3.37^.29
+83 ;;^UTILITY(U,$J,112,2748,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,2749,0)
+86 ;;=CHICKEN, STEWING, MEAT&SKIN, STEWED^5-124^oz.^28.3^68^N
+87 ;;^UTILITY(U,$J,112,2749,1)
+88 ;;=26.88^18.87^0^285^53.07^^^13^1.37^20^180^182^73^1.77^.1^.021^^131^0^.094
+89 ;;^UTILITY(U,$J,112,2749,2)
+90 ;;=.235^5.798^.753^.25^5^.23^3.53^.16^79^5.11^7.19^4.23^39^1.18^^^0
+91 ;;^UTILITY(U,$J,112,2749,3)
+92 ;;=.301^1.113^1.348^1.961^2.197^.717^.357^1.046^.869^1.307^1.68^.793^1.559^2.397^3.938^1.702^1.286^.946
+93 ;;^UTILITY(U,$J,112,2749,4)
+94 ;;=0^.03^.14^3.73^1^1.07^5.92^.25
+95 ;;^UTILITY(U,$J,112,2749,20)
+96 ;;=USDA Std. Reference, Release 10
+97 ;;^UTILITY(U,$J,112,2750,0)
+98 ;;=CHICORY, WITLOOF, RAW^11-151^cups^90^89^N
+99 ;;^UTILITY(U,$J,112,2750,1)
+100 ;;=.9^.1^4^17^94.52^^^19^.24^10^26^211^2^.16^.051^.1^^29^2.8^.062
