FHINI019 ; ; 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,263,4)
;;=.01^.01^.04^.4^.09^.11^7.035
;;^UTILITY(U,$J,112,263,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,264,0)
;;=CARDAMON, GROUND^2-006^tsp.^2.0^100^N
;;^UTILITY(U,$J,112,264,1)
;;=10.761^6.699^68.474^311.344^8.282^^^383.171^13.974^228.7^177.617^1118.752^18.333^7.467^.383^28^^0^^.198
;;^UTILITY(U,$J,112,264,2)
;;=.182^1.102^^^^0^.31^.12^0^.68^.87^.43^0^5.784
;;^UTILITY(U,$J,112,264,4)
;;=0^0^.03^.57^.02^.06^.85
;;^UTILITY(U,$J,112,264,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,265,0)
;;=CELERY SEED^2-007^tsp.^2.0^100^N
;;^UTILITY(U,$J,112,265,1)
;;=18.07^25.271^41.35^392.148^6.037^^^1766.667^44.9^440^546.667^1400^160^6.933^1.37^7.567^^52^17.14
;;^UTILITY(U,$J,112,265,2)
;;=^^^^^0^3.52^.2^0^2.19^15.93^3.72^5.2^9.272^^^11.8
;;^UTILITY(U,$J,112,265,4)
;;=.02^.02^.02^1.29^.24^.39^15.45
;;^UTILITY(U,$J,112,265,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,266,0)
;;=CHERVIL, DRIED^2-008^tsp.^0.6^100^N
;;^UTILITY(U,$J,112,266,1)
;;=23.2^3.9^49.1^236.551^7.2^^^1346^31.95^130^450^4740^82.5^8.8^.44^2.1
;;^UTILITY(U,$J,112,266,2)
;;=^^^1.225^^0^^^0^^^^^16.6^^^11.3
;;^UTILITY(U,$J,112,266,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,267,0)
;;=CHILI POWDER^2-009^tsp.^2.6^100^N
;;^UTILITY(U,$J,112,267,1)
;;=12.26^16.76^54.66^314^7.79^^^278^14.25^170^303^1916^1010^2.703^.429^2.165^^34927^64.142^.349
;;^UTILITY(U,$J,112,267,2)
;;=.794^7.893^^^^0^^^0^^^^3492.699^8.53^^^34.2
;;^UTILITY(U,$J,112,267,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,268,0)
;;=CINNAMON, GROUND^2-010^tsp.^2.3^100^N
;;^UTILITY(U,$J,112,268,1)
;;=3.894^3.185^79.847^261.309^9.52^^^1228.476^38.069^55.562^61.351^499.9^26.333^1.967^.233^16.667^^260^28.455^.077
;;^UTILITY(U,$J,112,268,2)
;;=.14^1.3^^^^0^.53^^0^.65^.48^.53^26^3.554^^^54.3
;;^UTILITY(U,$J,112,268,4)
;;=^.03^.09^.39^.03^.14^.45
;;^UTILITY(U,$J,112,268,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,269,0)
;;=CLOVES, GROUND^2-011^tsp.^2.1^100^N
;;^UTILITY(U,$J,112,269,1)
;;=5.983^20.066^61.211^322.687^6.857^^^645.667^8.683^263.96^105^1101.667^242.833^1.094^.347^30.033^^530^80.81^.115
;;^UTILITY(U,$J,112,269,2)
;;=.267^1.458^^^^0^^^0^4.39^^^53^5.883^^^34.2
;;^UTILITY(U,$J,112,269,4)
;;=^^.01^.1^^4.21
;;^UTILITY(U,$J,112,269,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,270,0)
;;=CORIANDER LEAF, DRIED^2-012^tsp.^0.6^100^N
;;^UTILITY(U,$J,112,270,1)
;;=21.925^4.778^51.946^278.948^7.3^^^1251.298^42.654^696.764^482.661^4486.051^212.058^^1.786^6.355^^^569.226^1.257
;;^UTILITY(U,$J,112,270,2)
;;=1.507^10.754^^^^0^^^0^^^^^14.079^^^10.4
;;^UTILITY(U,$J,112,270,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,271,0)
;;=CORIANDER SEED^2-013^tsp.^1.8^100^N
;;^UTILITY(U,$J,112,271,1)
;;=12.367^17.77^54.985^297.509^8.861^^^708.633^16.319^330.167^408.825^1267^35.314^4.7^.975^1.9^^0^^.239
;;^UTILITY(U,$J,112,271,2)
;;=.29^2.13^^^.032^0^1.75^^0^.99^13.58^1.75^0^6.017
;;^UTILITY(U,$J,112,271,4)
;;=^^.02^.81^.1^.11^13.48
;;^UTILITY(U,$J,112,271,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,272,0)
;;=CUMIN SEED^2-014^tsp.^2.1^100^N
;;^UTILITY(U,$J,112,272,1)
;;=17.812^22.27^44.239^374.541^8.063^^^930.714^66.355^365.5^498.571^1787.5^167.833^4.8^.867^3.333^^1270^7.713^.628
;;^UTILITY(U,$J,112,272,2)
;;=.327^4.579^^^^0^^^0^^^^127^7.616^^^10.5
;;^UTILITY(U,$J,112,272,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,273,0)
;;=CURRY POWDER^2-015^tsp.^2.0^100^N
;;^UTILITY(U,$J,112,273,1)
;;=12.66^13.81^58.15^325^9.52^^^478^29.59^254^349^1543^52^4.052^.815^4.289^^986^11.407^.253
;;^UTILITY(U,$J,112,273,2)
;;=.281^3.467^^^^0^^^0^^^^98.6^5.57^^^33.2
;;^UTILITY(U,$J,112,273,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,274,0)
;;=DILL SEED^2-016^tsp.^2.1^100^N
;;^UTILITY(U,$J,112,274,1)
;;=15.977^14.535^55.166^304.981^7.701^^^1515.6^16.325^255.875^276.725^1186^19.75^5.2^.78^1.833^^53^^.418
;;^UTILITY(U,$J,112,274,2)
;;=.284^2.807^^^^0^.96^.15^0^.73^9.41^1.01^5.3^6.621^^^21.1
;;^UTILITY(U,$J,112,274,3)
;;=^.575^.767^.925^1.038^.143^^.67^^1.12^1.263^.32
;;^UTILITY(U,$J,112,274,4)
;;=^.01^.01^.58^.05^.1^9.36
;;^UTILITY(U,$J,112,274,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,275,0)
;;=DILL WEED, DRIED^2-017^tsp.^1.0^100^N
;;^UTILITY(U,$J,112,275,1)
;;=19.96^4.36^55.82^253^7.3^^^1784.25^48.775^451.067^542.833^3307.5^208.333^3.3^.49^3.95^^^^.418
;;^UTILITY(U,$J,112,275,2)
;;=.284^2.807^^1.461^^0^^^0^^^^^12.555
FHINI019 ; ; 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,263,4)
+2 ;;=.01^.01^.04^.4^.09^.11^7.035
+3 ;;^UTILITY(U,$J,112,263,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,264,0)
+6 ;;=CARDAMON, GROUND^2-006^tsp.^2.0^100^N
+7 ;;^UTILITY(U,$J,112,264,1)
+8 ;;=10.761^6.699^68.474^311.344^8.282^^^383.171^13.974^228.7^177.617^1118.752^18.333^7.467^.383^28^^0^^.198
+9 ;;^UTILITY(U,$J,112,264,2)
+10 ;;=.182^1.102^^^^0^.31^.12^0^.68^.87^.43^0^5.784
+11 ;;^UTILITY(U,$J,112,264,4)
+12 ;;=0^0^.03^.57^.02^.06^.85
+13 ;;^UTILITY(U,$J,112,264,20)
+14 ;;=USDA Std. Reference, Release 10
+15 ;;^UTILITY(U,$J,112,265,0)
+16 ;;=CELERY SEED^2-007^tsp.^2.0^100^N
+17 ;;^UTILITY(U,$J,112,265,1)
+18 ;;=18.07^25.271^41.35^392.148^6.037^^^1766.667^44.9^440^546.667^1400^160^6.933^1.37^7.567^^52^17.14
+19 ;;^UTILITY(U,$J,112,265,2)
+20 ;;=^^^^^0^3.52^.2^0^2.19^15.93^3.72^5.2^9.272^^^11.8
+21 ;;^UTILITY(U,$J,112,265,4)
+22 ;;=.02^.02^.02^1.29^.24^.39^15.45
+23 ;;^UTILITY(U,$J,112,265,20)
+24 ;;=USDA Std. Reference, Release 10
+25 ;;^UTILITY(U,$J,112,266,0)
+26 ;;=CHERVIL, DRIED^2-008^tsp.^0.6^100^N
+27 ;;^UTILITY(U,$J,112,266,1)
+28 ;;=23.2^3.9^49.1^236.551^7.2^^^1346^31.95^130^450^4740^82.5^8.8^.44^2.1
+29 ;;^UTILITY(U,$J,112,266,2)
+30 ;;=^^^1.225^^0^^^0^^^^^16.6^^^11.3
+31 ;;^UTILITY(U,$J,112,266,20)
+32 ;;=USDA Std. Reference, Release 10
+33 ;;^UTILITY(U,$J,112,267,0)
+34 ;;=CHILI POWDER^2-009^tsp.^2.6^100^N
+35 ;;^UTILITY(U,$J,112,267,1)
+36 ;;=12.26^16.76^54.66^314^7.79^^^278^14.25^170^303^1916^1010^2.703^.429^2.165^^34927^64.142^.349
+37 ;;^UTILITY(U,$J,112,267,2)
+38 ;;=.794^7.893^^^^0^^^0^^^^3492.699^8.53^^^34.2
+39 ;;^UTILITY(U,$J,112,267,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,268,0)
+42 ;;=CINNAMON, GROUND^2-010^tsp.^2.3^100^N
+43 ;;^UTILITY(U,$J,112,268,1)
+44 ;;=3.894^3.185^79.847^261.309^9.52^^^1228.476^38.069^55.562^61.351^499.9^26.333^1.967^.233^16.667^^260^28.455^.077
+45 ;;^UTILITY(U,$J,112,268,2)
+46 ;;=.14^1.3^^^^0^.53^^0^.65^.48^.53^26^3.554^^^54.3
+47 ;;^UTILITY(U,$J,112,268,4)
+48 ;;=^.03^.09^.39^.03^.14^.45
+49 ;;^UTILITY(U,$J,112,268,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,269,0)
+52 ;;=CLOVES, GROUND^2-011^tsp.^2.1^100^N
+53 ;;^UTILITY(U,$J,112,269,1)
+54 ;;=5.983^20.066^61.211^322.687^6.857^^^645.667^8.683^263.96^105^1101.667^242.833^1.094^.347^30.033^^530^80.81^.115
+55 ;;^UTILITY(U,$J,112,269,2)
+56 ;;=.267^1.458^^^^0^^^0^4.39^^^53^5.883^^^34.2
+57 ;;^UTILITY(U,$J,112,269,4)
+58 ;;=^^.01^.1^^4.21
+59 ;;^UTILITY(U,$J,112,269,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,270,0)
+62 ;;=CORIANDER LEAF, DRIED^2-012^tsp.^0.6^100^N
+63 ;;^UTILITY(U,$J,112,270,1)
+64 ;;=21.925^4.778^51.946^278.948^7.3^^^1251.298^42.654^696.764^482.661^4486.051^212.058^^1.786^6.355^^^569.226^1.257
+65 ;;^UTILITY(U,$J,112,270,2)
+66 ;;=1.507^10.754^^^^0^^^0^^^^^14.079^^^10.4
+67 ;;^UTILITY(U,$J,112,270,20)
+68 ;;=USDA Std. Reference, Release 10
+69 ;;^UTILITY(U,$J,112,271,0)
+70 ;;=CORIANDER SEED^2-013^tsp.^1.8^100^N
+71 ;;^UTILITY(U,$J,112,271,1)
+72 ;;=12.367^17.77^54.985^297.509^8.861^^^708.633^16.319^330.167^408.825^1267^35.314^4.7^.975^1.9^^0^^.239
+73 ;;^UTILITY(U,$J,112,271,2)
+74 ;;=.29^2.13^^^.032^0^1.75^^0^.99^13.58^1.75^0^6.017
+75 ;;^UTILITY(U,$J,112,271,4)
+76 ;;=^^.02^.81^.1^.11^13.48
+77 ;;^UTILITY(U,$J,112,271,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,272,0)
+80 ;;=CUMIN SEED^2-014^tsp.^2.1^100^N
+81 ;;^UTILITY(U,$J,112,272,1)
+82 ;;=17.812^22.27^44.239^374.541^8.063^^^930.714^66.355^365.5^498.571^1787.5^167.833^4.8^.867^3.333^^1270^7.713^.628
+83 ;;^UTILITY(U,$J,112,272,2)
+84 ;;=.327^4.579^^^^0^^^0^^^^127^7.616^^^10.5
+85 ;;^UTILITY(U,$J,112,272,20)
+86 ;;=USDA Std. Reference, Release 10
+87 ;;^UTILITY(U,$J,112,273,0)
+88 ;;=CURRY POWDER^2-015^tsp.^2.0^100^N
+89 ;;^UTILITY(U,$J,112,273,1)
+90 ;;=12.66^13.81^58.15^325^9.52^^^478^29.59^254^349^1543^52^4.052^.815^4.289^^986^11.407^.253
+91 ;;^UTILITY(U,$J,112,273,2)
+92 ;;=.281^3.467^^^^0^^^0^^^^98.6^5.57^^^33.2
+93 ;;^UTILITY(U,$J,112,273,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,274,0)
+96 ;;=DILL SEED^2-016^tsp.^2.1^100^N
+97 ;;^UTILITY(U,$J,112,274,1)
+98 ;;=15.977^14.535^55.166^304.981^7.701^^^1515.6^16.325^255.875^276.725^1186^19.75^5.2^.78^1.833^^53^^.418
+99 ;;^UTILITY(U,$J,112,274,2)
+100 ;;=.284^2.807^^^^0^.96^.15^0^.73^9.41^1.01^5.3^6.621^^^21.1
+101 ;;^UTILITY(U,$J,112,274,3)
+102 ;;=^.575^.767^.925^1.038^.143^^.67^^1.12^1.263^.32
+103 ;;^UTILITY(U,$J,112,274,4)
+104 ;;=^.01^.01^.58^.05^.1^9.36
+105 ;;^UTILITY(U,$J,112,274,20)
+106 ;;=USDA Std. Reference, Release 10
+107 ;;^UTILITY(U,$J,112,275,0)
+108 ;;=DILL WEED, DRIED^2-017^tsp.^1.0^100^N
+109 ;;^UTILITY(U,$J,112,275,1)
+110 ;;=19.96^4.36^55.82^253^7.3^^^1784.25^48.775^451.067^542.833^3307.5^208.333^3.3^.49^3.95^^^^.418
+111 ;;^UTILITY(U,$J,112,275,2)
+112 ;;=.284^2.807^^1.461^^0^^^0^^^^^12.555
