FHINI08S ; ; 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,3036,4)
;;=^.001^0^.024^.001^.003^.009
;;^UTILITY(U,$J,112,3036,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3037,0)
;;=SQUASH, ZUCCHINI, ITALIAN STYLE, CND^11-481^cups^228^100^N
;;^UTILITY(U,$J,112,3037,1)
;;=1.03^.11^6.85^29^90.61^^^17^.68^14^29^274^374^.26^.098^.24^^539^2.3^.042
;;^UTILITY(U,$J,112,3037,2)
;;=.04^.528^.274^.152^30.2^0^.017^.029^0^.023^.008^.047^54^1.4
;;^UTILITY(U,$J,112,3037,3)
;;=.009^.025^.037^.06^.057^.015^.011^.036^.027^.046^.043^.022^.054^.125^.11^.039^.032^.042
;;^UTILITY(U,$J,112,3037,4)
;;=^0^0^.02^0^.002^.008
;;^UTILITY(U,$J,112,3037,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3038,0)
;;=SQUID, FRIED^15-176^oz.^28.3^100^N
;;^UTILITY(U,$J,112,3038,1)
;;=17.94^7.48^7.79^175^64.54^^^39^1.01^38^251^279^306^1.74^2.114^.07^^35^4.2^.056
;;^UTILITY(U,$J,112,3038,2)
;;=.458^2.602^.51^.058^5.3^1.228^1.468^.1^260^1.878^2.749^2.136^11^1.59^^^0
;;^UTILITY(U,$J,112,3038,3)
;;=.202^.763^.78^1.267^1.31^.403^.242^.656^.576^.786^1.29^.348^1.068^1.699^2.588^1.108^.783^.812
;;^UTILITY(U,$J,112,3038,4)
;;=^^.064^1.131^.009^.689^2.675^.01
;;^UTILITY(U,$J,112,3038,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3039,0)
;;=SQUIRREL, ROASTED^17-184^oz.^28.3^100^N
;;^UTILITY(U,$J,112,3039,1)
;;=30.77^4.65^0^173^62.07^^^3^6.81^28^211^352^119^2.27^.189^.032^^0^0^.06
;;^UTILITY(U,$J,112,3039,2)
;;=.29^4.64^.93^.47^11^8.3^1.34^.03^121^.55^1.72^1.36^0^1.68^^^0
;;^UTILITY(U,$J,112,3039,3)
;;=^1.172^1.172^2.211^2.225^.675^^1.191^.921^1.216^1.605^.803^1.457^2.447^4.16^1.334^1.147^1.009
;;^UTILITY(U,$J,112,3039,4)
;;=^^.02^.44^.14^.08^1.57
;;^UTILITY(U,$J,112,3039,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3040,0)
;;=STURGEON, COOKED, DRY HEAT^15-105^oz.^28.3^100^N
;;^UTILITY(U,$J,112,3040,1)
;;=20.7^5.18^0^135^69.94^^^17^.9^45^271^364^69^.54^.053^.03^^808^0^.08
;;^UTILITY(U,$J,112,3040,2)
;;=.09^10.1^.87^.23^17.3^2.5^.087^.128^77^1.173^2.486^.885^242^1.41^^^0
;;^UTILITY(U,$J,112,3040,3)
;;=.232^.907^.954^1.682^1.901^.613^.222^.808^.699^1.066^1.238^.609^1.252^2.119^3.089^.993^.732^.844
;;^UTILITY(U,$J,112,3040,4)
;;=^^.197^.878^.523^.097^1.837^.079
;;^UTILITY(U,$J,112,3040,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3041,0)
;;=STURGEON, SMOKED^15-106^oz.^28.3^100^N
;;^UTILITY(U,$J,112,3041,1)
;;=31.2^4.4^0^173^62.5^^^17^.93^47^281^379^739^.56^.05^.03^^933^0^.09
;;^UTILITY(U,$J,112,3041,2)
;;=.09^11.1^1^.27^20^2.9^.062^.115^80^1.037^2.356^.436^280^1.9^^^0
;;^UTILITY(U,$J,112,3041,3)
;;=.349^1.368^1.438^2.536^2.865^.924^.334^1.218^1.053^1.607^1.867^.919^1.887^3.195^4.658^1.498^1.103^1.273
;;^UTILITY(U,$J,112,3041,4)
;;=^^.177^.761^.44^.099^1.858^.053
;;^UTILITY(U,$J,112,3041,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3042,0)
;;=SURIMI^15-109^oz.^28.3^100^N
;;^UTILITY(U,$J,112,3042,1)
;;=15.18^.9^6.85^99^76.34^^^9^.26^43^282^112^143^.33^.032^.011^^66^0^.02
;;^UTILITY(U,$J,112,3042,2)
;;=.021^.22^.07^.03^1.6^1.6^^^30^.18^.14^.46^20^.72^^^0
;;^UTILITY(U,$J,112,3042,3)
;;=.092^.734^.709^1.202^1.387^.515^.163^.595^.612^.77^1.008^.35^.891^1.518^2.397^.588^.566^.663
;;^UTILITY(U,$J,112,3042,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3043,0)
;;=SWORDFISH, COOKED, DRY HEAT^15-111^oz.^28.3^100^N
;;^UTILITY(U,$J,112,3043,1)
;;=25.39^5.14^0^155^68.75^^^6^1.04^34^337^369^115^1.47^.162^.02^^137^1.1^.043
;;^UTILITY(U,$J,112,3043,2)
;;=.116^11.79^.38^.381^2.3^2.019^.037^.238^50^1.406^1.981^1.182^41^1.89^^^0
;;^UTILITY(U,$J,112,3043,3)
;;=.284^1.113^1.17^2.063^2.332^.751^.272^.991^.857^1.308^1.519^.747^1.535^2.6^3.79^1.219^.898^1.036
;;^UTILITY(U,$J,112,3043,4)
;;=^^.138^.965^.322^.271^1.392^.087
;;^UTILITY(U,$J,112,3043,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3044,0)
;;=TEA, BREWED, PREPARED WITH DISTILLED WATER^14-544^floz.^29.6^100^N
;;^UTILITY(U,$J,112,3044,1)
;;=0^0^.3^1^99.7^^^0^.01^1^1^21^0^.01^.008^.219^^0^0^0
;;^UTILITY(U,$J,112,3044,2)
;;=.014^0^.011^0^5.2^0^.001^.003^0^.002^.001^.004^0^0^^20
;;^UTILITY(U,$J,112,3044,3)
;;=0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0
;;^UTILITY(U,$J,112,3044,4)
;;=^^^.001^0^0^0
;;^UTILITY(U,$J,112,3044,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,3045,0)
;;=TEA, HERB, CHAMOMILE, BREWED^14-545^floz.^29.6^100^N
;;^UTILITY(U,$J,112,3045,1)
;;=0^0^.2^1^99.7^^^2^.08^1^0^9^1^.04^.015^.044^^20^0^.01
;;^UTILITY(U,$J,112,3045,2)
;;=.004^0^.011^0^.6^0^.002^.003^0^.002^.001^.005^2^0^^0^0
;;^UTILITY(U,$J,112,3045,4)
;;=^^^.002^0^0^.001
FHINI08S ; ; 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,3036,4)
+2 ;;=^.001^0^.024^.001^.003^.009
+3 ;;^UTILITY(U,$J,112,3036,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,3037,0)
+6 ;;=SQUASH, ZUCCHINI, ITALIAN STYLE, CND^11-481^cups^228^100^N
+7 ;;^UTILITY(U,$J,112,3037,1)
+8 ;;=1.03^.11^6.85^29^90.61^^^17^.68^14^29^274^374^.26^.098^.24^^539^2.3^.042
+9 ;;^UTILITY(U,$J,112,3037,2)
+10 ;;=.04^.528^.274^.152^30.2^0^.017^.029^0^.023^.008^.047^54^1.4
+11 ;;^UTILITY(U,$J,112,3037,3)
+12 ;;=.009^.025^.037^.06^.057^.015^.011^.036^.027^.046^.043^.022^.054^.125^.11^.039^.032^.042
+13 ;;^UTILITY(U,$J,112,3037,4)
+14 ;;=^0^0^.02^0^.002^.008
+15 ;;^UTILITY(U,$J,112,3037,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,3038,0)
+18 ;;=SQUID, FRIED^15-176^oz.^28.3^100^N
+19 ;;^UTILITY(U,$J,112,3038,1)
+20 ;;=17.94^7.48^7.79^175^64.54^^^39^1.01^38^251^279^306^1.74^2.114^.07^^35^4.2^.056
+21 ;;^UTILITY(U,$J,112,3038,2)
+22 ;;=.458^2.602^.51^.058^5.3^1.228^1.468^.1^260^1.878^2.749^2.136^11^1.59^^^0
+23 ;;^UTILITY(U,$J,112,3038,3)
+24 ;;=.202^.763^.78^1.267^1.31^.403^.242^.656^.576^.786^1.29^.348^1.068^1.699^2.588^1.108^.783^.812
+25 ;;^UTILITY(U,$J,112,3038,4)
+26 ;;=^^.064^1.131^.009^.689^2.675^.01
+27 ;;^UTILITY(U,$J,112,3038,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,3039,0)
+30 ;;=SQUIRREL, ROASTED^17-184^oz.^28.3^100^N
+31 ;;^UTILITY(U,$J,112,3039,1)
+32 ;;=30.77^4.65^0^173^62.07^^^3^6.81^28^211^352^119^2.27^.189^.032^^0^0^.06
+33 ;;^UTILITY(U,$J,112,3039,2)
+34 ;;=.29^4.64^.93^.47^11^8.3^1.34^.03^121^.55^1.72^1.36^0^1.68^^^0
+35 ;;^UTILITY(U,$J,112,3039,3)
+36 ;;=^1.172^1.172^2.211^2.225^.675^^1.191^.921^1.216^1.605^.803^1.457^2.447^4.16^1.334^1.147^1.009
+37 ;;^UTILITY(U,$J,112,3039,4)
+38 ;;=^^.02^.44^.14^.08^1.57
+39 ;;^UTILITY(U,$J,112,3039,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,3040,0)
+42 ;;=STURGEON, COOKED, DRY HEAT^15-105^oz.^28.3^100^N
+43 ;;^UTILITY(U,$J,112,3040,1)
+44 ;;=20.7^5.18^0^135^69.94^^^17^.9^45^271^364^69^.54^.053^.03^^808^0^.08
+45 ;;^UTILITY(U,$J,112,3040,2)
+46 ;;=.09^10.1^.87^.23^17.3^2.5^.087^.128^77^1.173^2.486^.885^242^1.41^^^0
+47 ;;^UTILITY(U,$J,112,3040,3)
+48 ;;=.232^.907^.954^1.682^1.901^.613^.222^.808^.699^1.066^1.238^.609^1.252^2.119^3.089^.993^.732^.844
+49 ;;^UTILITY(U,$J,112,3040,4)
+50 ;;=^^.197^.878^.523^.097^1.837^.079
+51 ;;^UTILITY(U,$J,112,3040,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,3041,0)
+54 ;;=STURGEON, SMOKED^15-106^oz.^28.3^100^N
+55 ;;^UTILITY(U,$J,112,3041,1)
+56 ;;=31.2^4.4^0^173^62.5^^^17^.93^47^281^379^739^.56^.05^.03^^933^0^.09
+57 ;;^UTILITY(U,$J,112,3041,2)
+58 ;;=.09^11.1^1^.27^20^2.9^.062^.115^80^1.037^2.356^.436^280^1.9^^^0
+59 ;;^UTILITY(U,$J,112,3041,3)
+60 ;;=.349^1.368^1.438^2.536^2.865^.924^.334^1.218^1.053^1.607^1.867^.919^1.887^3.195^4.658^1.498^1.103^1.273
+61 ;;^UTILITY(U,$J,112,3041,4)
+62 ;;=^^.177^.761^.44^.099^1.858^.053
+63 ;;^UTILITY(U,$J,112,3041,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,3042,0)
+66 ;;=SURIMI^15-109^oz.^28.3^100^N
+67 ;;^UTILITY(U,$J,112,3042,1)
+68 ;;=15.18^.9^6.85^99^76.34^^^9^.26^43^282^112^143^.33^.032^.011^^66^0^.02
+69 ;;^UTILITY(U,$J,112,3042,2)
+70 ;;=.021^.22^.07^.03^1.6^1.6^^^30^.18^.14^.46^20^.72^^^0
+71 ;;^UTILITY(U,$J,112,3042,3)
+72 ;;=.092^.734^.709^1.202^1.387^.515^.163^.595^.612^.77^1.008^.35^.891^1.518^2.397^.588^.566^.663
+73 ;;^UTILITY(U,$J,112,3042,20)
+74 ;;=USDA Std. Reference, Release 10
+75 ;;^UTILITY(U,$J,112,3043,0)
+76 ;;=SWORDFISH, COOKED, DRY HEAT^15-111^oz.^28.3^100^N
+77 ;;^UTILITY(U,$J,112,3043,1)
+78 ;;=25.39^5.14^0^155^68.75^^^6^1.04^34^337^369^115^1.47^.162^.02^^137^1.1^.043
+79 ;;^UTILITY(U,$J,112,3043,2)
+80 ;;=.116^11.79^.38^.381^2.3^2.019^.037^.238^50^1.406^1.981^1.182^41^1.89^^^0
+81 ;;^UTILITY(U,$J,112,3043,3)
+82 ;;=.284^1.113^1.17^2.063^2.332^.751^.272^.991^.857^1.308^1.519^.747^1.535^2.6^3.79^1.219^.898^1.036
+83 ;;^UTILITY(U,$J,112,3043,4)
+84 ;;=^^.138^.965^.322^.271^1.392^.087
+85 ;;^UTILITY(U,$J,112,3043,20)
+86 ;;=USDA Std. Reference, Release 10
+87 ;;^UTILITY(U,$J,112,3044,0)
+88 ;;=TEA, BREWED, PREPARED WITH DISTILLED WATER^14-544^floz.^29.6^100^N
+89 ;;^UTILITY(U,$J,112,3044,1)
+90 ;;=0^0^.3^1^99.7^^^0^.01^1^1^21^0^.01^.008^.219^^0^0^0
+91 ;;^UTILITY(U,$J,112,3044,2)
+92 ;;=.014^0^.011^0^5.2^0^.001^.003^0^.002^.001^.004^0^0^^20
+93 ;;^UTILITY(U,$J,112,3044,3)
+94 ;;=0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0
+95 ;;^UTILITY(U,$J,112,3044,4)
+96 ;;=^^^.001^0^0^0
+97 ;;^UTILITY(U,$J,112,3044,20)
+98 ;;=USDA Std. Reference, Release 10
+99 ;;^UTILITY(U,$J,112,3045,0)
+100 ;;=TEA, HERB, CHAMOMILE, BREWED^14-545^floz.^29.6^100^N
+101 ;;^UTILITY(U,$J,112,3045,1)
+102 ;;=0^0^.2^1^99.7^^^2^.08^1^0^9^1^.04^.015^.044^^20^0^.01
+103 ;;^UTILITY(U,$J,112,3045,2)
+104 ;;=.004^0^.011^0^.6^0^.002^.003^0^.002^.001^.005^2^0^^0^0
+105 ;;^UTILITY(U,$J,112,3045,4)
+106 ;;=^^^.002^0^0^.001
