FHINI01R ; ; 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,441,1)
;;=26.26^8.06^0^185^66.44^^^11^1.4^21^149^190^78^2.78^.077^.019^^60^0^.059
;;^UTILITY(U,$J,112,441,2)
;;=.216^4.798^.913^.21^8^.23^1.55^.07^89^2.2^2.93^1.88^18^.88^^^0
;;^UTILITY(U,$J,112,441,3)
;;=.307^1.109^1.387^1.971^2.231^.727^.336^1.042^.887^1.303^1.584^.815^1.433^2.341^3.933^1.29^1.08^.903
;;^UTILITY(U,$J,112,441,4)
;;=0^.03^.06^1.52^.4^.52^2.44^.12
;;^UTILITY(U,$J,112,441,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,442,0)
;;=CHICKEN, THIGH, MEAT&SKIN, FRIED, BATTER^5-092^oz.^28.35^81^N
;;^UTILITY(U,$J,112,442,1)
;;=21.61^16.53^9.08^277^51.5^^^18^1.45^21^155^192^288^2.04^.082^.057^^95^0^.119
;;^UTILITY(U,$J,112,442,2)
;;=.227^5.715^.982^.26^9^.28^3.49^.19^93^4.41^6.7^3.9^29^1.27
;;^UTILITY(U,$J,112,442,3)
;;=.248^.886^1.085^1.59^1.699^.568^.297^.864^.705^1.056^1.317^.632^1.21^1.869^3.465^1.288^1.114^.796
;;^UTILITY(U,$J,112,442,4)
;;=0^.02^.1^2.96^.56^1.24^6.01^.1
;;^UTILITY(U,$J,112,442,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,443,0)
;;=CHICKEN, THIGH, MEAT&SKIN, FRIED, FLR^5-093^oz.^28.35^77^N
;;^UTILITY(U,$J,112,443,1)
;;=26.75^14.98^3.18^262^54.14^^^14^1.49^25^187^237^88^2.52^.089^.036^^98^0^.094
;;^UTILITY(U,$J,112,443,2)
;;=.243^6.946^1.185^.33^8^.3^2.97^.14^97^4.09^5.87^3.41^29^.94
;;^UTILITY(U,$J,112,443,3)
;;=.302^1.105^1.346^1.958^2.169^.713^.358^1.051^.869^1.303^1.656^.791^1.531^2.365^4.031^1.643^1.295^.949
;;^UTILITY(U,$J,112,443,4)
;;=0^.03^.11^2.9^.72^.94^4.97^.13
;;^UTILITY(U,$J,112,443,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,444,0)
;;=CHICKEN, THIGH, MEAT&SKIN, ROASTED^5-094^oz.^28.35^77^N
;;^UTILITY(U,$J,112,444,1)
;;=25.06^15.49^0^247^59.42^^^12^1.34^22^174^222^84^2.36^.078^.021^^165^0^.067
;;^UTILITY(U,$J,112,444,2)
;;=.212^6.365^1.108^.31^7^.29^2.99^.14^93^4.33^6.15^3.42^48^.88^^^0
;;^UTILITY(U,$J,112,444,3)
;;=.281^1.037^1.256^1.827^2.047^.669^.333^.975^.81^1.218^1.566^.739^1.454^2.234^3.67^1.59^1.2^.882
;;^UTILITY(U,$J,112,444,4)
;;=0^.03^.12^3.14^.84^.89^5.08^.13
;;^UTILITY(U,$J,112,444,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,445,0)
;;=CHICKEN, THIGH, MEAT&SKIN, STEWED^5-095^oz.^28.35^76^N
;;^UTILITY(U,$J,112,445,1)
;;=23.26^14.74^0^232^63.11^^^11^1.37^19^139^170^71^2.25^.07^.019^^151^0^.057
;;^UTILITY(U,$J,112,445,2)
;;=.191^4.894^.776^.17^6^.19^2.84^.13^84^4.11^5.84^3.25^44^.78^^^0
;;^UTILITY(U,$J,112,445,3)
;;=.26^.962^1.164^1.695^1.898^.62^.31^.905^.751^1.13^1.456^.685^1.352^2.074^3.405^1.487^1.119^.82
;;^UTILITY(U,$J,112,445,4)
;;=0^.03^.12^3^.81^.84^4.83^.12
;;^UTILITY(U,$J,112,445,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,446,0)
;;=CHICKEN, THIGH, MEAT ONLY, FRIED^5-097^oz.^28.35^64^N
;;^UTILITY(U,$J,112,446,1)
;;=28.18^10.3^1.18^218^59.31^^^13^1.46^26^199^259^95^2.79^.09^.027^^70^0^.088
;;^UTILITY(U,$J,112,446,2)
;;=.255^7.12^1.285^.38^9^.33^2.04^.1^102^2.78^3.82^2.43^21^1.04^^^0
;;^UTILITY(U,$J,112,446,3)
;;=.329^1.188^1.486^2.115^2.384^.778^.362^1.121^.951^1.397^1.697^.874^1.534^2.504^4.257^1.382^1.172^.973
;;^UTILITY(U,$J,112,446,4)
;;=0^.03^.07^1.9^.46^.7^3.26^.14
;;^UTILITY(U,$J,112,446,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,447,0)
;;=CHICKEN, THIGH, MEAT ONLY, ROASTED^5-098^oz.^28.35^65^N
;;^UTILITY(U,$J,112,447,1)
;;=25.94^10.88^0^209^62.87^^^12^1.31^24^183^238^88^2.57^.081^.021^^65^0^.074
;;^UTILITY(U,$J,112,447,2)
;;=.231^6.525^1.184^.35^8^.31^2.1^.1^95^3.03^4.15^2.48^20^.95^^^0
;;^UTILITY(U,$J,112,447,3)
;;=.303^1.096^1.37^1.947^2.204^.718^.332^1.029^.876^1.287^1.565^.805^1.415^2.312^3.885^1.274^1.067^.892
;;^UTILITY(U,$J,112,447,4)
;;=0^.03^.08^2.12^.56^.69^3.46^.13^^29
;;^UTILITY(U,$J,112,447,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,448,0)
;;=CHICKEN, THIGH, MEAT ONLY, STEWED^5-099^oz.^28.35^61^N
;;^UTILITY(U,$J,112,448,1)
;;=25^9.79^0^195^65.59^^^11^1.42^21^149^183^75^2.58^.077^.02^^62^0^.063
;;^UTILITY(U,$J,112,448,2)
;;=.218^5.2^.874^.21^7^.21^1.89^.09^90^2.71^3.7^2.24^19^.86^^^0
;;^UTILITY(U,$J,112,448,3)
;;=.292^1.056^1.32^1.876^2.123^.692^.32^.992^.844^1.24^1.508^.776^1.364^2.227^3.743^1.228^1.028^.86
;;^UTILITY(U,$J,112,448,4)
;;=0^.03^.07^1.89^.5^.62^3.08^.12
;;^UTILITY(U,$J,112,448,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,449,0)
;;=CHICKEN, WING, MEAT&SKIN, FRIED, BATTER^5-101^oz.^28.35^62^N
;;^UTILITY(U,$J,112,449,1)
;;=19.87^21.81^10.94^324^46.21^^^20^1.29^16^121^138^320^1.38^.063^.06^^113^0^.106
;;^UTILITY(U,$J,112,449,2)
;;=.152^5.265^.71^.3^6^.25^4.54^.24^79^5.83^8.96^5.07^34^1.17
FHINI01R ; ; 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,441,1)
+2 ;;=26.26^8.06^0^185^66.44^^^11^1.4^21^149^190^78^2.78^.077^.019^^60^0^.059
+3 ;;^UTILITY(U,$J,112,441,2)
+4 ;;=.216^4.798^.913^.21^8^.23^1.55^.07^89^2.2^2.93^1.88^18^.88^^^0
+5 ;;^UTILITY(U,$J,112,441,3)
+6 ;;=.307^1.109^1.387^1.971^2.231^.727^.336^1.042^.887^1.303^1.584^.815^1.433^2.341^3.933^1.29^1.08^.903
+7 ;;^UTILITY(U,$J,112,441,4)
+8 ;;=0^.03^.06^1.52^.4^.52^2.44^.12
+9 ;;^UTILITY(U,$J,112,441,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,442,0)
+12 ;;=CHICKEN, THIGH, MEAT&SKIN, FRIED, BATTER^5-092^oz.^28.35^81^N
+13 ;;^UTILITY(U,$J,112,442,1)
+14 ;;=21.61^16.53^9.08^277^51.5^^^18^1.45^21^155^192^288^2.04^.082^.057^^95^0^.119
+15 ;;^UTILITY(U,$J,112,442,2)
+16 ;;=.227^5.715^.982^.26^9^.28^3.49^.19^93^4.41^6.7^3.9^29^1.27
+17 ;;^UTILITY(U,$J,112,442,3)
+18 ;;=.248^.886^1.085^1.59^1.699^.568^.297^.864^.705^1.056^1.317^.632^1.21^1.869^3.465^1.288^1.114^.796
+19 ;;^UTILITY(U,$J,112,442,4)
+20 ;;=0^.02^.1^2.96^.56^1.24^6.01^.1
+21 ;;^UTILITY(U,$J,112,442,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,443,0)
+24 ;;=CHICKEN, THIGH, MEAT&SKIN, FRIED, FLR^5-093^oz.^28.35^77^N
+25 ;;^UTILITY(U,$J,112,443,1)
+26 ;;=26.75^14.98^3.18^262^54.14^^^14^1.49^25^187^237^88^2.52^.089^.036^^98^0^.094
+27 ;;^UTILITY(U,$J,112,443,2)
+28 ;;=.243^6.946^1.185^.33^8^.3^2.97^.14^97^4.09^5.87^3.41^29^.94
+29 ;;^UTILITY(U,$J,112,443,3)
+30 ;;=.302^1.105^1.346^1.958^2.169^.713^.358^1.051^.869^1.303^1.656^.791^1.531^2.365^4.031^1.643^1.295^.949
+31 ;;^UTILITY(U,$J,112,443,4)
+32 ;;=0^.03^.11^2.9^.72^.94^4.97^.13
+33 ;;^UTILITY(U,$J,112,443,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,444,0)
+36 ;;=CHICKEN, THIGH, MEAT&SKIN, ROASTED^5-094^oz.^28.35^77^N
+37 ;;^UTILITY(U,$J,112,444,1)
+38 ;;=25.06^15.49^0^247^59.42^^^12^1.34^22^174^222^84^2.36^.078^.021^^165^0^.067
+39 ;;^UTILITY(U,$J,112,444,2)
+40 ;;=.212^6.365^1.108^.31^7^.29^2.99^.14^93^4.33^6.15^3.42^48^.88^^^0
+41 ;;^UTILITY(U,$J,112,444,3)
+42 ;;=.281^1.037^1.256^1.827^2.047^.669^.333^.975^.81^1.218^1.566^.739^1.454^2.234^3.67^1.59^1.2^.882
+43 ;;^UTILITY(U,$J,112,444,4)
+44 ;;=0^.03^.12^3.14^.84^.89^5.08^.13
+45 ;;^UTILITY(U,$J,112,444,20)
+46 ;;=USDA Std. Reference, Release 10
+47 ;;^UTILITY(U,$J,112,445,0)
+48 ;;=CHICKEN, THIGH, MEAT&SKIN, STEWED^5-095^oz.^28.35^76^N
+49 ;;^UTILITY(U,$J,112,445,1)
+50 ;;=23.26^14.74^0^232^63.11^^^11^1.37^19^139^170^71^2.25^.07^.019^^151^0^.057
+51 ;;^UTILITY(U,$J,112,445,2)
+52 ;;=.191^4.894^.776^.17^6^.19^2.84^.13^84^4.11^5.84^3.25^44^.78^^^0
+53 ;;^UTILITY(U,$J,112,445,3)
+54 ;;=.26^.962^1.164^1.695^1.898^.62^.31^.905^.751^1.13^1.456^.685^1.352^2.074^3.405^1.487^1.119^.82
+55 ;;^UTILITY(U,$J,112,445,4)
+56 ;;=0^.03^.12^3^.81^.84^4.83^.12
+57 ;;^UTILITY(U,$J,112,445,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,446,0)
+60 ;;=CHICKEN, THIGH, MEAT ONLY, FRIED^5-097^oz.^28.35^64^N
+61 ;;^UTILITY(U,$J,112,446,1)
+62 ;;=28.18^10.3^1.18^218^59.31^^^13^1.46^26^199^259^95^2.79^.09^.027^^70^0^.088
+63 ;;^UTILITY(U,$J,112,446,2)
+64 ;;=.255^7.12^1.285^.38^9^.33^2.04^.1^102^2.78^3.82^2.43^21^1.04^^^0
+65 ;;^UTILITY(U,$J,112,446,3)
+66 ;;=.329^1.188^1.486^2.115^2.384^.778^.362^1.121^.951^1.397^1.697^.874^1.534^2.504^4.257^1.382^1.172^.973
+67 ;;^UTILITY(U,$J,112,446,4)
+68 ;;=0^.03^.07^1.9^.46^.7^3.26^.14
+69 ;;^UTILITY(U,$J,112,446,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,447,0)
+72 ;;=CHICKEN, THIGH, MEAT ONLY, ROASTED^5-098^oz.^28.35^65^N
+73 ;;^UTILITY(U,$J,112,447,1)
+74 ;;=25.94^10.88^0^209^62.87^^^12^1.31^24^183^238^88^2.57^.081^.021^^65^0^.074
+75 ;;^UTILITY(U,$J,112,447,2)
+76 ;;=.231^6.525^1.184^.35^8^.31^2.1^.1^95^3.03^4.15^2.48^20^.95^^^0
+77 ;;^UTILITY(U,$J,112,447,3)
+78 ;;=.303^1.096^1.37^1.947^2.204^.718^.332^1.029^.876^1.287^1.565^.805^1.415^2.312^3.885^1.274^1.067^.892
+79 ;;^UTILITY(U,$J,112,447,4)
+80 ;;=0^.03^.08^2.12^.56^.69^3.46^.13^^29
+81 ;;^UTILITY(U,$J,112,447,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,448,0)
+84 ;;=CHICKEN, THIGH, MEAT ONLY, STEWED^5-099^oz.^28.35^61^N
+85 ;;^UTILITY(U,$J,112,448,1)
+86 ;;=25^9.79^0^195^65.59^^^11^1.42^21^149^183^75^2.58^.077^.02^^62^0^.063
+87 ;;^UTILITY(U,$J,112,448,2)
+88 ;;=.218^5.2^.874^.21^7^.21^1.89^.09^90^2.71^3.7^2.24^19^.86^^^0
+89 ;;^UTILITY(U,$J,112,448,3)
+90 ;;=.292^1.056^1.32^1.876^2.123^.692^.32^.992^.844^1.24^1.508^.776^1.364^2.227^3.743^1.228^1.028^.86
+91 ;;^UTILITY(U,$J,112,448,4)
+92 ;;=0^.03^.07^1.89^.5^.62^3.08^.12
+93 ;;^UTILITY(U,$J,112,448,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,449,0)
+96 ;;=CHICKEN, WING, MEAT&SKIN, FRIED, BATTER^5-101^oz.^28.35^62^N
+97 ;;^UTILITY(U,$J,112,449,1)
+98 ;;=19.87^21.81^10.94^324^46.21^^^20^1.29^16^121^138^320^1.38^.063^.06^^113^0^.106
+99 ;;^UTILITY(U,$J,112,449,2)
+100 ;;=.152^5.265^.71^.3^6^.25^4.54^.24^79^5.83^8.96^5.07^34^1.17