FHINI07O ; ; 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,2663,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,2664,0)
;;=BEEFALO, ROASTED^17-153^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2664,1)
;;=30.66^6.32^0^188^61.7^^^24^3.05^^250^459^82^6.4^^^^0^9^.03
;;^UTILITY(U,$J,112,2664,2)
;;=.11^4.89^.58^^18^2.55^.15^.06^58^2.68^2.68^.2^0^1.21^^^0
;;^UTILITY(U,$J,112,2664,4)
;;=^.01^.13^1.26^.24^1.2^2.4
;;^UTILITY(U,$J,112,2664,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2665,0)
;;=BEET GREENS, RAW^11-086^cups^38^56^N
;;^UTILITY(U,$J,112,2665,1)
;;=1.82^.06^3.97^19^92.15^^^119^3.3^72^40^547^201^.38^.191^.391^^6100^30^.1
;;^UTILITY(U,$J,112,2665,2)
;;=.22^.4^.25^.106^14.8^0^.019^.002^0^.009^.012^.021^610^2.01^^^3.7
;;^UTILITY(U,$J,112,2665,3)
;;=.029^.054^.038^.081^.053^.015^.017^.048^.043^.054^.052^.028^.067^.107^.221^.067^.043^.058
;;^UTILITY(U,$J,112,2665,4)
;;=^^^.009^^0^.012
;;^UTILITY(U,$J,112,2665,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2666,0)
;;=BISON, ROASTED^17-157^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2666,1)
;;=28.44^2.42^0^143^66.54^^^8^3.42^26^209^361^57^3.68^.107^.008^^0^0
;;^UTILITY(U,$J,112,2666,2)
;;=^^^^^^.14^.04^82^.91^.95^.24^0^1.58^^^0
;;^UTILITY(U,$J,112,2666,3)
;;=^1.171^1.198^2.21^2.219^.674^^1.065^.914^1.287^1.686^.754^1.615^2.467^4.145^1.367^1.136^1.083
;;^UTILITY(U,$J,112,2666,4)
;;=^^.03^.43^.06^.45^.88^.07
;;^UTILITY(U,$J,112,2666,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2667,0)
;;=MARGARINE BLEND, 60% CORN OIL AND 40% BUTTER^4-585^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2667,1)
;;=.88^80.7^.65^718^15.77^^^28^.06^2^23^36^897^.02^.006^.002^^3207^.1^.008
;;^UTILITY(U,$J,112,2667,2)
;;=.035^.031^.05^.006^2^.06^15.224^.723^88^28.442^32.76^15.947^897^2^^^0
;;^UTILITY(U,$J,112,2667,3)
;;=.012^.038^.051^.082^.067^.021^.008^.04^.04^.056^.03^.023^.029^.064^.176^.018^.081^.046
;;^UTILITY(U,$J,112,2667,4)
;;=.825^.927^3.381^14.308^.743^6.935^32.016
;;^UTILITY(U,$J,112,2667,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2668,0)
;;=BOAR, WILD, ROASTED^17-159^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2668,1)
;;=28.3^4.38^0^160^63.87^^^16^^^134^^^^^^^0^0^.31
;;^UTILITY(U,$J,112,2668,2)
;;=.14^4.21^^^^^.5^.03^^1.3^1.71^.64^0^1.27^^^0
;;^UTILITY(U,$J,112,2668,3)
;;=.38^1.331^1.367^2.3^2.789^.697^.367^1.132^1.01^1.517^1.965^1.435^1.675^2.626^4.396^1.29^1.073^1.164
;;^UTILITY(U,$J,112,2668,4)
;;=^^.05^.77^.22^.44^1.49^.11
;;^UTILITY(U,$J,112,2668,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2669,0)
;;=BORAGE, BOILED, DRAINED, W/SALT^11-737^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2669,1)
;;=2.09^.81^3.55^25^91.88^^^102^3.64^57^55^491^324^.22^.143^.385^^4385^32.5^.059
;;^UTILITY(U,$J,112,2669,2)
;;=.165^.94^.045^.088^10^0^.127^^0^.197^.245^.127^438^1.67
;;^UTILITY(U,$J,112,2669,4)
;;=^^^.069^.222^.024
;;^UTILITY(U,$J,112,2669,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2670,0)
;;=BORAGE, BOILED, DRAINED, WO/SALT^11-614^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2670,1)
;;=2.09^.81^3.55^25^91.88^^^102^3.64^57^55^491^88^.22^.143^.385^^4385^32.5^.059
;;^UTILITY(U,$J,112,2670,2)
;;=.165^.94^.045^.088^10^0^.127^^0^.197^.245^.127^438^1.67
;;^UTILITY(U,$J,112,2670,4)
;;=^^^.069^.222^.024
;;^UTILITY(U,$J,112,2670,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2671,0)
;;=BORAGE, RAW^11-613^cups^88^80^N
;;^UTILITY(U,$J,112,2671,1)
;;=1.8^.7^3.06^21^93^^^93^3.3^52^53^470^80^.2^.13^.349^^4200^35^.06
;;^UTILITY(U,$J,112,2671,2)
;;=.15^.9^.041^.084^13.2^0^.109^^0^.17^.211^.109^420^1.44
;;^UTILITY(U,$J,112,2671,4)
;;=^^^.06^.191^.021
;;^UTILITY(U,$J,112,2671,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2672,0)
;;=BRAIN, LAMB, BRAISED^17-186^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2672,1)
;;=12.55^10.17^0^145^75.73^^^12^1.68^14^337^205^134^1.36^.21^.059^^0^12^.11
;;^UTILITY(U,$J,112,2672,2)
;;=.24^2.47^.99^.11^5^9.25^.03^0^2043^2.6^1.84^1.04^0^1.36^^^0
;;^UTILITY(U,$J,112,2672,3)
;;=.129^.562^.499^.98^.805^.25^.131^.605^.459^.598^.846^.333^.711^1.047^1.487^.594^.54^.653
;;^UTILITY(U,$J,112,2672,4)
;;=^0^.04^1.25^.06^1.27^1.53^.27
;;^UTILITY(U,$J,112,2672,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2673,0)
;;=BRAIN, LAMB, PAN-FRIED^17-187^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2673,1)
;;=16.97^22.19^0^273^60.71^^^21^2.04^22^495^358^157^2^.48^.067^^0^23^.17
;;^UTILITY(U,$J,112,2673,2)
;;=.37^4.55^1.56^.23^7^24.1^.07^0^2504^5.67^4.02^2.28^0^1.82^^^0
;;^UTILITY(U,$J,112,2673,3)
;;=.175^.76^.675^1.326^1.088^.338^.177^.818^.621^.808^1.144^.45^.962^1.416^2.012^.804^.731^.883
FHINI07O ; ; 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,2663,20)
+2 ;;=USDA Std. Reference, Release 8
+3 ;;^UTILITY(U,$J,112,2664,0)
+4 ;;=BEEFALO, ROASTED^17-153^oz.^28.3^100^N
+5 ;;^UTILITY(U,$J,112,2664,1)
+6 ;;=30.66^6.32^0^188^61.7^^^24^3.05^^250^459^82^6.4^^^^0^9^.03
+7 ;;^UTILITY(U,$J,112,2664,2)
+8 ;;=.11^4.89^.58^^18^2.55^.15^.06^58^2.68^2.68^.2^0^1.21^^^0
+9 ;;^UTILITY(U,$J,112,2664,4)
+10 ;;=^.01^.13^1.26^.24^1.2^2.4
+11 ;;^UTILITY(U,$J,112,2664,20)
+12 ;;=USDA Std. Reference, Release 10
+13 ;;^UTILITY(U,$J,112,2665,0)
+14 ;;=BEET GREENS, RAW^11-086^cups^38^56^N
+15 ;;^UTILITY(U,$J,112,2665,1)
+16 ;;=1.82^.06^3.97^19^92.15^^^119^3.3^72^40^547^201^.38^.191^.391^^6100^30^.1
+17 ;;^UTILITY(U,$J,112,2665,2)
+18 ;;=.22^.4^.25^.106^14.8^0^.019^.002^0^.009^.012^.021^610^2.01^^^3.7
+19 ;;^UTILITY(U,$J,112,2665,3)
+20 ;;=.029^.054^.038^.081^.053^.015^.017^.048^.043^.054^.052^.028^.067^.107^.221^.067^.043^.058
+21 ;;^UTILITY(U,$J,112,2665,4)
+22 ;;=^^^.009^^0^.012
+23 ;;^UTILITY(U,$J,112,2665,20)
+24 ;;=USDA Std. Reference, Release 10
+25 ;;^UTILITY(U,$J,112,2666,0)
+26 ;;=BISON, ROASTED^17-157^oz.^28.3^100^N
+27 ;;^UTILITY(U,$J,112,2666,1)
+28 ;;=28.44^2.42^0^143^66.54^^^8^3.42^26^209^361^57^3.68^.107^.008^^0^0
+29 ;;^UTILITY(U,$J,112,2666,2)
+30 ;;=^^^^^^.14^.04^82^.91^.95^.24^0^1.58^^^0
+31 ;;^UTILITY(U,$J,112,2666,3)
+32 ;;=^1.171^1.198^2.21^2.219^.674^^1.065^.914^1.287^1.686^.754^1.615^2.467^4.145^1.367^1.136^1.083
+33 ;;^UTILITY(U,$J,112,2666,4)
+34 ;;=^^.03^.43^.06^.45^.88^.07
+35 ;;^UTILITY(U,$J,112,2666,20)
+36 ;;=USDA Std. Reference, Release 10
+37 ;;^UTILITY(U,$J,112,2667,0)
+38 ;;=MARGARINE BLEND, 60% CORN OIL AND 40% BUTTER^4-585^oz.^28.3^100^N
+39 ;;^UTILITY(U,$J,112,2667,1)
+40 ;;=.88^80.7^.65^718^15.77^^^28^.06^2^23^36^897^.02^.006^.002^^3207^.1^.008
+41 ;;^UTILITY(U,$J,112,2667,2)
+42 ;;=.035^.031^.05^.006^2^.06^15.224^.723^88^28.442^32.76^15.947^897^2^^^0
+43 ;;^UTILITY(U,$J,112,2667,3)
+44 ;;=.012^.038^.051^.082^.067^.021^.008^.04^.04^.056^.03^.023^.029^.064^.176^.018^.081^.046
+45 ;;^UTILITY(U,$J,112,2667,4)
+46 ;;=.825^.927^3.381^14.308^.743^6.935^32.016
+47 ;;^UTILITY(U,$J,112,2667,20)
+48 ;;=USDA Std. Reference, Release 10
+49 ;;^UTILITY(U,$J,112,2668,0)
+50 ;;=BOAR, WILD, ROASTED^17-159^oz.^28.3^100^N
+51 ;;^UTILITY(U,$J,112,2668,1)
+52 ;;=28.3^4.38^0^160^63.87^^^16^^^134^^^^^^^0^0^.31
+53 ;;^UTILITY(U,$J,112,2668,2)
+54 ;;=.14^4.21^^^^^.5^.03^^1.3^1.71^.64^0^1.27^^^0
+55 ;;^UTILITY(U,$J,112,2668,3)
+56 ;;=.38^1.331^1.367^2.3^2.789^.697^.367^1.132^1.01^1.517^1.965^1.435^1.675^2.626^4.396^1.29^1.073^1.164
+57 ;;^UTILITY(U,$J,112,2668,4)
+58 ;;=^^.05^.77^.22^.44^1.49^.11
+59 ;;^UTILITY(U,$J,112,2668,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2669,0)
+62 ;;=BORAGE, BOILED, DRAINED, W/SALT^11-737^oz.^28.3^100^N
+63 ;;^UTILITY(U,$J,112,2669,1)
+64 ;;=2.09^.81^3.55^25^91.88^^^102^3.64^57^55^491^324^.22^.143^.385^^4385^32.5^.059
+65 ;;^UTILITY(U,$J,112,2669,2)
+66 ;;=.165^.94^.045^.088^10^0^.127^^0^.197^.245^.127^438^1.67
+67 ;;^UTILITY(U,$J,112,2669,4)
+68 ;;=^^^.069^.222^.024
+69 ;;^UTILITY(U,$J,112,2669,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2670,0)
+72 ;;=BORAGE, BOILED, DRAINED, WO/SALT^11-614^oz.^28.3^100^N
+73 ;;^UTILITY(U,$J,112,2670,1)
+74 ;;=2.09^.81^3.55^25^91.88^^^102^3.64^57^55^491^88^.22^.143^.385^^4385^32.5^.059
+75 ;;^UTILITY(U,$J,112,2670,2)
+76 ;;=.165^.94^.045^.088^10^0^.127^^0^.197^.245^.127^438^1.67
+77 ;;^UTILITY(U,$J,112,2670,4)
+78 ;;=^^^.069^.222^.024
+79 ;;^UTILITY(U,$J,112,2670,20)
+80 ;;=USDA Std. Reference, Release 10
+81 ;;^UTILITY(U,$J,112,2671,0)
+82 ;;=BORAGE, RAW^11-613^cups^88^80^N
+83 ;;^UTILITY(U,$J,112,2671,1)
+84 ;;=1.8^.7^3.06^21^93^^^93^3.3^52^53^470^80^.2^.13^.349^^4200^35^.06
+85 ;;^UTILITY(U,$J,112,2671,2)
+86 ;;=.15^.9^.041^.084^13.2^0^.109^^0^.17^.211^.109^420^1.44
+87 ;;^UTILITY(U,$J,112,2671,4)
+88 ;;=^^^.06^.191^.021
+89 ;;^UTILITY(U,$J,112,2671,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,2672,0)
+92 ;;=BRAIN, LAMB, BRAISED^17-186^oz.^28.3^100^N
+93 ;;^UTILITY(U,$J,112,2672,1)
+94 ;;=12.55^10.17^0^145^75.73^^^12^1.68^14^337^205^134^1.36^.21^.059^^0^12^.11
+95 ;;^UTILITY(U,$J,112,2672,2)
+96 ;;=.24^2.47^.99^.11^5^9.25^.03^0^2043^2.6^1.84^1.04^0^1.36^^^0
+97 ;;^UTILITY(U,$J,112,2672,3)
+98 ;;=.129^.562^.499^.98^.805^.25^.131^.605^.459^.598^.846^.333^.711^1.047^1.487^.594^.54^.653
+99 ;;^UTILITY(U,$J,112,2672,4)
+100 ;;=^0^.04^1.25^.06^1.27^1.53^.27
+101 ;;^UTILITY(U,$J,112,2672,20)
+102 ;;=USDA Std. Reference, Release 10
+103 ;;^UTILITY(U,$J,112,2673,0)
+104 ;;=BRAIN, LAMB, PAN-FRIED^17-187^oz.^28.3^100^N
+105 ;;^UTILITY(U,$J,112,2673,1)
+106 ;;=16.97^22.19^0^273^60.71^^^21^2.04^22^495^358^157^2^.48^.067^^0^23^.17
+107 ;;^UTILITY(U,$J,112,2673,2)
+108 ;;=.37^4.55^1.56^.23^7^24.1^.07^0^2504^5.67^4.02^2.28^0^1.82^^^0
+109 ;;^UTILITY(U,$J,112,2673,3)
+110 ;;=.175^.76^.675^1.326^1.088^.338^.177^.818^.621^.808^1.144^.45^.962^1.416^2.012^.804^.731^.883
