FHINI05O ; ; 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,1952,4)
;;=.03^.11^.84^5.91^.64^2.19^8.84^.2
;;^UTILITY(U,$J,112,1952,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1953,0)
;;=TROUT, RAINBOW, COOKED, DRY HEAT^15-116^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1953,1)
;;=22.92^5.82^0^150^70.5^^^86^.38^31^269^448^56^.51^.058^.021^^50^2^.152
;;^UTILITY(U,$J,112,1953,2)
;;=.097^5.77^1.065^.346^19^6.3^.288^.187^69^1.619^1.746^1.831^15^1.6^^^0
;;^UTILITY(U,$J,112,1953,3)
;;=.257^1.005^1.056^1.863^2.105^.679^.246^.895^.774^1.181^1.372^.675^1.387^2.348^3.422^1.1^.811^.935
;;^UTILITY(U,$J,112,1953,4)
;;=^^.204^.918^.675^.265^.918^.12
;;^UTILITY(U,$J,112,1953,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1954,0)
;;=TUNA, LIGHT MEAT, CANNED IN WATER^15-121^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1954,1)
;;=25.51^.82^0^116^74.51^^^11^1.53^27^163^237^338^.77^.051^.011^^56^0^.032
;;^UTILITY(U,$J,112,1954,2)
;;=.074^13.28^.214^.35^4^2.99^.009^.002^30^.234^.159^.337^17^1.48^^^0
;;^UTILITY(U,$J,112,1954,3)
;;=.286^1.118^1.175^2.073^2.343^.755^.273^.996^.861^1.314^1.527^.751^1.543^2.612^3.808^1.224^.902^1.041
;;^UTILITY(U,$J,112,1954,4)
;;=^^.018^.156^.026^.06^.093^.034^^80.4
;;^UTILITY(U,$J,112,1954,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1955,0)
;;=TUNA, LIGHT MEAT, CANNED IN OIL^15-119^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1955,1)
;;=29.13^8.21^0^198^59.83^^^13^1.39^31^311^207^354^.9^.071^.015^^78^0^.038
;;^UTILITY(U,$J,112,1955,2)
;;=.12^12.4^.37^.11^5.3^2.2^2.683^.074^18^1.534^2.949^2.885^23^2.76^^^0
;;^UTILITY(U,$J,112,1955,3)
;;=.326^1.277^1.342^2.368^2.675^.862^.312^1.137^.983^1.501^1.743^.858^1.762^2.983^4.349^1.398^1.03^1.189
;;^UTILITY(U,$J,112,1955,4)
;;=^^.027^1.415^.083^.092^2.839^^^76
;;^UTILITY(U,$J,112,1955,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1956,0)
;;=TUNA, LIGHT MEAT, CANNED IN WATER, WO/SALT^15-184^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1956,1)
;;=29.58^.5^0^131^71.26^^^12^3.2^29^186^314^50^.44^.011^.015^^78^0^.04
;;^UTILITY(U,$J,112,1956,2)
;;=.12^12.4^.37^.378^4.7^2.2^.001^^18^.16^.143^.131^23^1.4^^^0
;;^UTILITY(U,$J,112,1956,3)
;;=.331^1.297^1.363^2.404^2.717^.876^.317^1.155^.999^1.524^1.77^.871^1.789^3.029^4.416^1.42^1.046^1.207
;;^UTILITY(U,$J,112,1956,4)
;;=^^.026^.112^.028^.022^.073^.005
;;^UTILITY(U,$J,112,1956,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1957,0)
;;=TUNA, WHITE MEAT, CANNED IN WATER^15-126^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1957,1)
;;=26.66^2.46^0^136^69.48^^^4^.6^34^267^283^392^.47^.192^.016^^80^0^.003
;;^UTILITY(U,$J,112,1957,2)
;;=.046^5.799^.37^.43^4.1^2.2^.045^.058^42^.654^.648^.918^24^1.58^^^0
;;^UTILITY(U,$J,112,1957,3)
;;=.299^1.169^1.229^2.167^2.449^.789^.286^1.041^.9^1.374^1.595^.785^1.613^2.73^3.98^1.28^.943^1.088
;;^UTILITY(U,$J,112,1957,4)
;;=^^.067^.485^.118^.097^.424^.042^^65.7
;;^UTILITY(U,$J,112,1957,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1958,0)
;;=TUNA SALAD^15-128^cups^205^100^N
;;^UTILITY(U,$J,112,1958,1)
;;=16.04^9.26^9.41^187^63.16^^^17^1^19^178^178^402^.56^.145^.04^^97^2.2^.031
;;^UTILITY(U,$J,112,1958,2)
;;=.07^6.7^.26^.081^7.3^1.2^3.722^.332^13^1.544^2.887^4.122^27^2.14^^^0
;;^UTILITY(U,$J,112,1958,3)
;;=.18^.701^.739^1.293^1.457^.47^.172^.626^.539^.824^.967^.467^.962^1.632^2.402^.767^.565^.657
;;^UTILITY(U,$J,112,1958,4)
;;=^^.014^1.28^.045^.249^2.828
;;^UTILITY(U,$J,112,1958,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1959,0)
;;=TURKEY POT PIE, FRZ, COMMERCIAL, UNHEATED^2351-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1959,1)
;;=5.8^10.4^20.1^197^62.3^^^12^.9^^56^114^369^^^^^890^2^.09
;;^UTILITY(U,$J,112,1959,2)
;;=.08^1.6^^^^^1^^9^4^^^^1.4
;;^UTILITY(U,$J,112,1959,4)
;;=^^^^^^7
;;^UTILITY(U,$J,112,1959,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1960,0)
;;=TURNIPS, BOILED, WO/SALT^11-565^cups^155^100^N
;;^UTILITY(U,$J,112,1960,1)
;;=.71^.08^4.9^18^93.6^^^22^.22^8^19^135^50^.2^.064^.1^^0^11.6^.027
;;^UTILITY(U,$J,112,1960,2)
;;=.023^.299^.142^.067^9.2^0^.009^.032^0^.008^.005^.042^0^.55^^^6.1
;;^UTILITY(U,$J,112,1960,3)
;;=.007^.02^.029^.026^.028^.009^.004^.014^.011^.023^.019^.011^.027^.05^.102^.019^.021^.023
;;^UTILITY(U,$J,112,1960,4)
;;=^^^.008^0^.001^.004
;;^UTILITY(U,$J,112,1960,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1961,0)
;;=TURNIPS, BOILED, W/SALT^11-889^cups^155^100^N
;;^UTILITY(U,$J,112,1961,1)
;;=.71^.08^4.9^18^93.6^^^22^.22^8^19^135^286^.2^.064^.1^^0^11.6^.027
FHINI05O ; ; 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,1952,4)
+2 ;;=.03^.11^.84^5.91^.64^2.19^8.84^.2
+3 ;;^UTILITY(U,$J,112,1952,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,1953,0)
+6 ;;=TROUT, RAINBOW, COOKED, DRY HEAT^15-116^oz.^28.3^100^N
+7 ;;^UTILITY(U,$J,112,1953,1)
+8 ;;=22.92^5.82^0^150^70.5^^^86^.38^31^269^448^56^.51^.058^.021^^50^2^.152
+9 ;;^UTILITY(U,$J,112,1953,2)
+10 ;;=.097^5.77^1.065^.346^19^6.3^.288^.187^69^1.619^1.746^1.831^15^1.6^^^0
+11 ;;^UTILITY(U,$J,112,1953,3)
+12 ;;=.257^1.005^1.056^1.863^2.105^.679^.246^.895^.774^1.181^1.372^.675^1.387^2.348^3.422^1.1^.811^.935
+13 ;;^UTILITY(U,$J,112,1953,4)
+14 ;;=^^.204^.918^.675^.265^.918^.12
+15 ;;^UTILITY(U,$J,112,1953,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,1954,0)
+18 ;;=TUNA, LIGHT MEAT, CANNED IN WATER^15-121^oz.^28.3^100^N
+19 ;;^UTILITY(U,$J,112,1954,1)
+20 ;;=25.51^.82^0^116^74.51^^^11^1.53^27^163^237^338^.77^.051^.011^^56^0^.032
+21 ;;^UTILITY(U,$J,112,1954,2)
+22 ;;=.074^13.28^.214^.35^4^2.99^.009^.002^30^.234^.159^.337^17^1.48^^^0
+23 ;;^UTILITY(U,$J,112,1954,3)
+24 ;;=.286^1.118^1.175^2.073^2.343^.755^.273^.996^.861^1.314^1.527^.751^1.543^2.612^3.808^1.224^.902^1.041
+25 ;;^UTILITY(U,$J,112,1954,4)
+26 ;;=^^.018^.156^.026^.06^.093^.034^^80.4
+27 ;;^UTILITY(U,$J,112,1954,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,1955,0)
+30 ;;=TUNA, LIGHT MEAT, CANNED IN OIL^15-119^oz.^28.3^100^N
+31 ;;^UTILITY(U,$J,112,1955,1)
+32 ;;=29.13^8.21^0^198^59.83^^^13^1.39^31^311^207^354^.9^.071^.015^^78^0^.038
+33 ;;^UTILITY(U,$J,112,1955,2)
+34 ;;=.12^12.4^.37^.11^5.3^2.2^2.683^.074^18^1.534^2.949^2.885^23^2.76^^^0
+35 ;;^UTILITY(U,$J,112,1955,3)
+36 ;;=.326^1.277^1.342^2.368^2.675^.862^.312^1.137^.983^1.501^1.743^.858^1.762^2.983^4.349^1.398^1.03^1.189
+37 ;;^UTILITY(U,$J,112,1955,4)
+38 ;;=^^.027^1.415^.083^.092^2.839^^^76
+39 ;;^UTILITY(U,$J,112,1955,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,1956,0)
+42 ;;=TUNA, LIGHT MEAT, CANNED IN WATER, WO/SALT^15-184^oz.^28.3^100^N
+43 ;;^UTILITY(U,$J,112,1956,1)
+44 ;;=29.58^.5^0^131^71.26^^^12^3.2^29^186^314^50^.44^.011^.015^^78^0^.04
+45 ;;^UTILITY(U,$J,112,1956,2)
+46 ;;=.12^12.4^.37^.378^4.7^2.2^.001^^18^.16^.143^.131^23^1.4^^^0
+47 ;;^UTILITY(U,$J,112,1956,3)
+48 ;;=.331^1.297^1.363^2.404^2.717^.876^.317^1.155^.999^1.524^1.77^.871^1.789^3.029^4.416^1.42^1.046^1.207
+49 ;;^UTILITY(U,$J,112,1956,4)
+50 ;;=^^.026^.112^.028^.022^.073^.005
+51 ;;^UTILITY(U,$J,112,1956,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,1957,0)
+54 ;;=TUNA, WHITE MEAT, CANNED IN WATER^15-126^oz.^28.3^100^N
+55 ;;^UTILITY(U,$J,112,1957,1)
+56 ;;=26.66^2.46^0^136^69.48^^^4^.6^34^267^283^392^.47^.192^.016^^80^0^.003
+57 ;;^UTILITY(U,$J,112,1957,2)
+58 ;;=.046^5.799^.37^.43^4.1^2.2^.045^.058^42^.654^.648^.918^24^1.58^^^0
+59 ;;^UTILITY(U,$J,112,1957,3)
+60 ;;=.299^1.169^1.229^2.167^2.449^.789^.286^1.041^.9^1.374^1.595^.785^1.613^2.73^3.98^1.28^.943^1.088
+61 ;;^UTILITY(U,$J,112,1957,4)
+62 ;;=^^.067^.485^.118^.097^.424^.042^^65.7
+63 ;;^UTILITY(U,$J,112,1957,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,1958,0)
+66 ;;=TUNA SALAD^15-128^cups^205^100^N
+67 ;;^UTILITY(U,$J,112,1958,1)
+68 ;;=16.04^9.26^9.41^187^63.16^^^17^1^19^178^178^402^.56^.145^.04^^97^2.2^.031
+69 ;;^UTILITY(U,$J,112,1958,2)
+70 ;;=.07^6.7^.26^.081^7.3^1.2^3.722^.332^13^1.544^2.887^4.122^27^2.14^^^0
+71 ;;^UTILITY(U,$J,112,1958,3)
+72 ;;=.18^.701^.739^1.293^1.457^.47^.172^.626^.539^.824^.967^.467^.962^1.632^2.402^.767^.565^.657
+73 ;;^UTILITY(U,$J,112,1958,4)
+74 ;;=^^.014^1.28^.045^.249^2.828
+75 ;;^UTILITY(U,$J,112,1958,20)
+76 ;;=USDA Std. Reference, Release 10
+77 ;;^UTILITY(U,$J,112,1959,0)
+78 ;;=TURKEY POT PIE, FRZ, COMMERCIAL, UNHEATED^2351-0^oz.^28.3^100^N
+79 ;;^UTILITY(U,$J,112,1959,1)
+80 ;;=5.8^10.4^20.1^197^62.3^^^12^.9^^56^114^369^^^^^890^2^.09
+81 ;;^UTILITY(U,$J,112,1959,2)
+82 ;;=.08^1.6^^^^^1^^9^4^^^^1.4
+83 ;;^UTILITY(U,$J,112,1959,4)
+84 ;;=^^^^^^7
+85 ;;^UTILITY(U,$J,112,1959,20)
+86 ;;=USDA Std. Reference, Release 8
+87 ;;^UTILITY(U,$J,112,1960,0)
+88 ;;=TURNIPS, BOILED, WO/SALT^11-565^cups^155^100^N
+89 ;;^UTILITY(U,$J,112,1960,1)
+90 ;;=.71^.08^4.9^18^93.6^^^22^.22^8^19^135^50^.2^.064^.1^^0^11.6^.027
+91 ;;^UTILITY(U,$J,112,1960,2)
+92 ;;=.023^.299^.142^.067^9.2^0^.009^.032^0^.008^.005^.042^0^.55^^^6.1
+93 ;;^UTILITY(U,$J,112,1960,3)
+94 ;;=.007^.02^.029^.026^.028^.009^.004^.014^.011^.023^.019^.011^.027^.05^.102^.019^.021^.023
+95 ;;^UTILITY(U,$J,112,1960,4)
+96 ;;=^^^.008^0^.001^.004
+97 ;;^UTILITY(U,$J,112,1960,20)
+98 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+99 ;;^UTILITY(U,$J,112,1961,0)
+100 ;;=TURNIPS, BOILED, W/SALT^11-889^cups^155^100^N
+101 ;;^UTILITY(U,$J,112,1961,1)
+102 ;;=.71^.08^4.9^18^93.6^^^22^.22^8^19^135^286^.2^.064^.1^^0^11.6^.027
