FHINI01P ; ; 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,424,3)
;;=.312^1.143^1.401^2.019^2.272^.741^.359^1.074^.9^1.342^1.689^.824^1.552^2.441^4.046^1.586^1.24^.956
;;^UTILITY(U,$J,112,424,4)
;;=0^.01^.06^1.54^.39^.42^2.39^.06
;;^UTILITY(U,$J,112,424,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,425,0)
;;=CHICKEN, BREAST, MEAT ONLY, FRIED^5-063^oz.^28.35^73^N
;;^UTILITY(U,$J,112,425,1)
;;=33.44^4.71^.51^187^60.21^^^16^1.14^31^246^276^79^1.08^.054^.021^^23^0^.079
;;^UTILITY(U,$J,112,425,2)
;;=.125^14.782^1.04^.64^4^.37^.86^.05^91^1.29^1.72^1.07^7^1.14^^^0
;;^UTILITY(U,$J,112,425,3)
;;=.39^1.412^1.765^2.509^2.836^.925^.428^1.328^1.128^1.659^2.015^1.037^1.823^2.976^5.024^1.641^1.381^1.152
;;^UTILITY(U,$J,112,425,4)
;;=0^.01^.03^.85^.15^.37^1.52^.07
;;^UTILITY(U,$J,112,425,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,426,0)
;;=CHICKEN, BREAST, MEAT ONLY, ROASTED^5-064^oz.^28.35^72^N
;;^UTILITY(U,$J,112,426,1)
;;=31.02^3.57^0^165^65.26^^^15^1.04^29^228^256^74^1^.049^.017^^21^0^.07
;;^UTILITY(U,$J,112,426,2)
;;=.114^13.712^.965^.6^4^.34^.59^.03^85^1.01^1.24^.77^6^1.06^^^0
;;^UTILITY(U,$J,112,426,3)
;;=.362^1.31^1.638^2.328^2.635^.859^.397^1.231^1.047^1.539^1.871^.963^1.692^2.764^4.645^1.524^1.275^1.067
;;^UTILITY(U,$J,112,426,4)
;;=0^.01^.03^.69^.15^.25^1.04^.06^^27.6
;;^UTILITY(U,$J,112,426,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,427,0)
;;=CHICKEN, BREAST, MEAT ONLY, STEWED^5-065^oz.^28.35^70^N
;;^UTILITY(U,$J,112,427,1)
;;=28.98^3.03^0^151^68.27^^^13^.88^24^165^187^63^.97^.043^.018^^19^0^.042
;;^UTILITY(U,$J,112,427,2)
;;=.119^8.469^.573^.33^3^.23^.5^.02^77^.85^1.03^.66^6^.91^^^0
;;^UTILITY(U,$J,112,427,3)
;;=.339^1.224^1.53^2.175^2.462^.802^.371^1.15^.978^1.437^1.748^.9^1.581^2.583^4.34^1.424^1.192^.997
;;^UTILITY(U,$J,112,427,4)
;;=0^.01^.03^.58^.12^.21^.87^.05
;;^UTILITY(U,$J,112,427,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,428,0)
;;=CHICKEN, DRUMSTICK, MEAT&SKIN, FRIED, BATTER^5-067^oz.^28.35^74^N
;;^UTILITY(U,$J,112,428,1)
;;=21.95^15.75^8.28^268^52.77^^^17^1.35^20^147^186^269^2.33^.076^.052^^86^0^.112
;;^UTILITY(U,$J,112,428,2)
;;=.215^5.096^1.007^.27^9^.28^3.4^.19^86^4.14^6.43^3.79^26^1.25
;;^UTILITY(U,$J,112,428,3)
;;=.252^.903^1.108^1.618^1.74^.581^.3^.877^.719^1.075^1.336^.646^1.226^1.905^3.496^1.287^1.109^.803
;;^UTILITY(U,$J,112,428,4)
;;=0^.02^.09^2.71^.44^1.26^5.88^.09
;;^UTILITY(U,$J,112,428,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,429,0)
;;=CHICKEN, DRUMSTICK, MEAT&SKIN, FRIED, FLR^5-068^oz.^28.35^66^N
;;^UTILITY(U,$J,112,429,1)
;;=26.96^13.72^1.63^245^56.73^^^12^1.34^23^176^229^89^2.89^.08^.028^^84^0^.081
;;^UTILITY(U,$J,112,429,2)
;;=.225^6.037^1.215^.35^8^.32^2.83^.14^90^3.66^5.42^3.23^25^.96
;;^UTILITY(U,$J,112,429,3)
;;=.307^1.12^1.371^1.983^2.214^.725^.356^1.058^.882^1.318^1.663^.806^1.531^2.393^4.027^1.592^1.255^.948
;;^UTILITY(U,$J,112,429,4)
;;=0^.02^.09^2.5^.54^.97^4.75^.11
;;^UTILITY(U,$J,112,429,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,430,0)
;;=CHICKEN, DRUMSTICK, MEAT&SKIN, ROASTED^5-069^oz.^28.35^65^N
;;^UTILITY(U,$J,112,430,1)
;;=27.03^11.15^0^216^62.6^^^12^1.33^23^175^229^90^2.87^.077^.021^^100^0^.069
;;^UTILITY(U,$J,112,430,2)
;;=.216^5.994^1.211^.34^8^.32^2.14^.09^91^3.05^4.25^2.5^30^.96^^^0
;;^UTILITY(U,$J,112,430,3)
;;=.304^1.121^1.361^1.976^2.215^.723^.358^1.054^.877^1.316^1.685^.801^1.56^2.41^3.966^1.684^1.28^.95
;;^UTILITY(U,$J,112,430,4)
;;=0^.03^.08^2.22^.6^.63^3.5^.12
;;^UTILITY(U,$J,112,430,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,431,0)
;;=CHICKEN, DRUMSTICK, MEAT&SKIN, STEWED^5-070^oz.^28.35^64^N
;;^UTILITY(U,$J,112,431,1)
;;=25.32^10.64^0^204^65.12^^^11^1.33^20^141^184^76^2.65^.071^.019^^91^0^.05
;;^UTILITY(U,$J,112,431,2)
;;=.19^4.204^.858^.19^7^.22^2.04^.09^83^2.91^4.07^2.38^27^.82^^^0
;;^UTILITY(U,$J,112,431,3)
;;=.286^1.051^1.28^1.855^2.082^.68^.335^.988^.824^1.235^1.573^.753^1.454^2.257^3.722^1.547^1.184^.888
;;^UTILITY(U,$J,112,431,4)
;;=0^.02^.08^2.12^.57^.6^3.35^.11
;;^UTILITY(U,$J,112,431,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,432,0)
;;=CHICKEN, DRUMSTICK, MEAT ONLY, FRIED^5-072^oz.^28.35^56^N
;;^UTILITY(U,$J,112,432,1)
;;=28.62^8.08^0^195^62.24^^^12^1.32^24^186^249^96^3.22^.08^.021^^61^0^.077
;;^UTILITY(U,$J,112,432,2)
;;=.236^6.146^1.32^.39^9^.35^1.64^.08^94^2.13^2.94^1.97^18^1.06^^^0
;;^UTILITY(U,$J,112,432,3)
;;=.335^1.209^1.511^2.148^2.431^.792^.366^1.135^.966^1.42^1.727^.888^1.561^2.55^4.286^1.406^1.177^.985
FHINI01P ; ; 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,424,3)
+2 ;;=.312^1.143^1.401^2.019^2.272^.741^.359^1.074^.9^1.342^1.689^.824^1.552^2.441^4.046^1.586^1.24^.956
+3 ;;^UTILITY(U,$J,112,424,4)
+4 ;;=0^.01^.06^1.54^.39^.42^2.39^.06
+5 ;;^UTILITY(U,$J,112,424,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,425,0)
+8 ;;=CHICKEN, BREAST, MEAT ONLY, FRIED^5-063^oz.^28.35^73^N
+9 ;;^UTILITY(U,$J,112,425,1)
+10 ;;=33.44^4.71^.51^187^60.21^^^16^1.14^31^246^276^79^1.08^.054^.021^^23^0^.079
+11 ;;^UTILITY(U,$J,112,425,2)
+12 ;;=.125^14.782^1.04^.64^4^.37^.86^.05^91^1.29^1.72^1.07^7^1.14^^^0
+13 ;;^UTILITY(U,$J,112,425,3)
+14 ;;=.39^1.412^1.765^2.509^2.836^.925^.428^1.328^1.128^1.659^2.015^1.037^1.823^2.976^5.024^1.641^1.381^1.152
+15 ;;^UTILITY(U,$J,112,425,4)
+16 ;;=0^.01^.03^.85^.15^.37^1.52^.07
+17 ;;^UTILITY(U,$J,112,425,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,426,0)
+20 ;;=CHICKEN, BREAST, MEAT ONLY, ROASTED^5-064^oz.^28.35^72^N
+21 ;;^UTILITY(U,$J,112,426,1)
+22 ;;=31.02^3.57^0^165^65.26^^^15^1.04^29^228^256^74^1^.049^.017^^21^0^.07
+23 ;;^UTILITY(U,$J,112,426,2)
+24 ;;=.114^13.712^.965^.6^4^.34^.59^.03^85^1.01^1.24^.77^6^1.06^^^0
+25 ;;^UTILITY(U,$J,112,426,3)
+26 ;;=.362^1.31^1.638^2.328^2.635^.859^.397^1.231^1.047^1.539^1.871^.963^1.692^2.764^4.645^1.524^1.275^1.067
+27 ;;^UTILITY(U,$J,112,426,4)
+28 ;;=0^.01^.03^.69^.15^.25^1.04^.06^^27.6
+29 ;;^UTILITY(U,$J,112,426,20)
+30 ;;=USDA Std. Reference, Release 10
+31 ;;^UTILITY(U,$J,112,427,0)
+32 ;;=CHICKEN, BREAST, MEAT ONLY, STEWED^5-065^oz.^28.35^70^N
+33 ;;^UTILITY(U,$J,112,427,1)
+34 ;;=28.98^3.03^0^151^68.27^^^13^.88^24^165^187^63^.97^.043^.018^^19^0^.042
+35 ;;^UTILITY(U,$J,112,427,2)
+36 ;;=.119^8.469^.573^.33^3^.23^.5^.02^77^.85^1.03^.66^6^.91^^^0
+37 ;;^UTILITY(U,$J,112,427,3)
+38 ;;=.339^1.224^1.53^2.175^2.462^.802^.371^1.15^.978^1.437^1.748^.9^1.581^2.583^4.34^1.424^1.192^.997
+39 ;;^UTILITY(U,$J,112,427,4)
+40 ;;=0^.01^.03^.58^.12^.21^.87^.05
+41 ;;^UTILITY(U,$J,112,427,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,428,0)
+44 ;;=CHICKEN, DRUMSTICK, MEAT&SKIN, FRIED, BATTER^5-067^oz.^28.35^74^N
+45 ;;^UTILITY(U,$J,112,428,1)
+46 ;;=21.95^15.75^8.28^268^52.77^^^17^1.35^20^147^186^269^2.33^.076^.052^^86^0^.112
+47 ;;^UTILITY(U,$J,112,428,2)
+48 ;;=.215^5.096^1.007^.27^9^.28^3.4^.19^86^4.14^6.43^3.79^26^1.25
+49 ;;^UTILITY(U,$J,112,428,3)
+50 ;;=.252^.903^1.108^1.618^1.74^.581^.3^.877^.719^1.075^1.336^.646^1.226^1.905^3.496^1.287^1.109^.803
+51 ;;^UTILITY(U,$J,112,428,4)
+52 ;;=0^.02^.09^2.71^.44^1.26^5.88^.09
+53 ;;^UTILITY(U,$J,112,428,20)
+54 ;;=USDA Std. Reference, Release 10
+55 ;;^UTILITY(U,$J,112,429,0)
+56 ;;=CHICKEN, DRUMSTICK, MEAT&SKIN, FRIED, FLR^5-068^oz.^28.35^66^N
+57 ;;^UTILITY(U,$J,112,429,1)
+58 ;;=26.96^13.72^1.63^245^56.73^^^12^1.34^23^176^229^89^2.89^.08^.028^^84^0^.081
+59 ;;^UTILITY(U,$J,112,429,2)
+60 ;;=.225^6.037^1.215^.35^8^.32^2.83^.14^90^3.66^5.42^3.23^25^.96
+61 ;;^UTILITY(U,$J,112,429,3)
+62 ;;=.307^1.12^1.371^1.983^2.214^.725^.356^1.058^.882^1.318^1.663^.806^1.531^2.393^4.027^1.592^1.255^.948
+63 ;;^UTILITY(U,$J,112,429,4)
+64 ;;=0^.02^.09^2.5^.54^.97^4.75^.11
+65 ;;^UTILITY(U,$J,112,429,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,430,0)
+68 ;;=CHICKEN, DRUMSTICK, MEAT&SKIN, ROASTED^5-069^oz.^28.35^65^N
+69 ;;^UTILITY(U,$J,112,430,1)
+70 ;;=27.03^11.15^0^216^62.6^^^12^1.33^23^175^229^90^2.87^.077^.021^^100^0^.069
+71 ;;^UTILITY(U,$J,112,430,2)
+72 ;;=.216^5.994^1.211^.34^8^.32^2.14^.09^91^3.05^4.25^2.5^30^.96^^^0
+73 ;;^UTILITY(U,$J,112,430,3)
+74 ;;=.304^1.121^1.361^1.976^2.215^.723^.358^1.054^.877^1.316^1.685^.801^1.56^2.41^3.966^1.684^1.28^.95
+75 ;;^UTILITY(U,$J,112,430,4)
+76 ;;=0^.03^.08^2.22^.6^.63^3.5^.12
+77 ;;^UTILITY(U,$J,112,430,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,431,0)
+80 ;;=CHICKEN, DRUMSTICK, MEAT&SKIN, STEWED^5-070^oz.^28.35^64^N
+81 ;;^UTILITY(U,$J,112,431,1)
+82 ;;=25.32^10.64^0^204^65.12^^^11^1.33^20^141^184^76^2.65^.071^.019^^91^0^.05
+83 ;;^UTILITY(U,$J,112,431,2)
+84 ;;=.19^4.204^.858^.19^7^.22^2.04^.09^83^2.91^4.07^2.38^27^.82^^^0
+85 ;;^UTILITY(U,$J,112,431,3)
+86 ;;=.286^1.051^1.28^1.855^2.082^.68^.335^.988^.824^1.235^1.573^.753^1.454^2.257^3.722^1.547^1.184^.888
+87 ;;^UTILITY(U,$J,112,431,4)
+88 ;;=0^.02^.08^2.12^.57^.6^3.35^.11
+89 ;;^UTILITY(U,$J,112,431,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,432,0)
+92 ;;=CHICKEN, DRUMSTICK, MEAT ONLY, FRIED^5-072^oz.^28.35^56^N
+93 ;;^UTILITY(U,$J,112,432,1)
+94 ;;=28.62^8.08^0^195^62.24^^^12^1.32^24^186^249^96^3.22^.08^.021^^61^0^.077
+95 ;;^UTILITY(U,$J,112,432,2)
+96 ;;=.236^6.146^1.32^.39^9^.35^1.64^.08^94^2.13^2.94^1.97^18^1.06^^^0
+97 ;;^UTILITY(U,$J,112,432,3)
+98 ;;=.335^1.209^1.511^2.148^2.431^.792^.366^1.135^.966^1.42^1.727^.888^1.561^2.55^4.286^1.406^1.177^.985
