FHINI065 ; ; 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,2112,1)
;;=17.3^51.45^25.35^594^1.75^^^70^3.7^225^435^597^12^3.8^1.279^1.937^^15^.4^.2
;;^UTILITY(U,$J,112,2112,2)
;;=.2^4.7^1.205^.296^50.4^0^10.535^.19^0^6.899^31.395^10.768^1^4.15^^^9
;;^UTILITY(U,$J,112,2112,3)
;;=.264^.597^.744^1.371^.712^.228^.287^.953^.676^.934^2.242^.48^.806^2.056^4.423^1.064^.875^.917
;;^UTILITY(U,$J,112,2112,4)
;;=.045^.271^.216^4.213^.223^1.749^30.802
;;^UTILITY(U,$J,112,2112,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2113,0)
;;=MIXED NUTS, WITH PEANUTS, OIL ROASTED, WO/SALT^12-137^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2113,1)
;;=16.76^56.33^21.41^617^2.03^^^108^3.21^235^464^581^11^5.08^1.661^1.892^^19^.5^.498
;;^UTILITY(U,$J,112,2113,2)
;;=.222^5.061^1.248^.24^83^0^13.067^.176^0^8.725^31.695^13.299^2^3.47^^^9.9
;;^UTILITY(U,$J,112,2113,3)
;;=.247^.569^.724^1.344^.658^.338^.294^.92^.655^.936^2.024^.471^.772^1.958^4.128^1.006^.822^.911
;;^UTILITY(U,$J,112,2113,4)
;;=.05^.296^.255^5.238^.238^2.423^31.048
;;^UTILITY(U,$J,112,2113,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2114,0)
;;=MIXED NUTS, WITHOUT PEANUTS, OIL ROASTED, WO/SALT^12-138^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2114,1)
;;=15.52^56.17^22.27^615^3.15^^^106^2.57^251^449^544^11^4.66^1.795^1.547^^20^.5^.504
;;^UTILITY(U,$J,112,2114,2)
;;=.486^1.964^.962^.18^56.4^0^11.137^.249^0^9.087^33.137^11.449^2^2.89
;;^UTILITY(U,$J,112,2114,3)
;;=.252^.568^.703^1.265^.682^.346^.302^.82^.51^.952^1.989^.416^.715^1.617^3.872^.844^.773^1.62
;;^UTILITY(U,$J,112,2114,4)
;;=.078^.467^.342^4.932^.329^2.783^32.517
;;^UTILITY(U,$J,112,2114,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2115,0)
;;=PISTACHIO NUTS, DRY ROASTED, WO/SALT^12-152^oz.^28.3^52^N
;;^UTILITY(U,$J,112,2115,1)
;;=14.93^52.82^27.53^606^2.09^^^70^3.17^130^476^970^6^1.36^1.211^.333^^238^7.3^.423
;;^UTILITY(U,$J,112,2115,2)
;;=.246^1.408^1.212^.255^59.1^0^7.665^.275^0^6.688^35.659^7.986^24^2.63^^^10.8
;;^UTILITY(U,$J,112,2115,3)
;;=.206^.524^.707^1.217^.927^.276^.372^.859^.518^1.023^1.586^.389^.721^1.535^3.566^.794^.687^.98
;;^UTILITY(U,$J,112,2115,4)
;;=^^.05^5.838^.313^.685^34.904
;;^UTILITY(U,$J,112,2115,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2116,0)
;;=SUNFLOWER SEEDS, DRY ROASTED, W/SALT^12-537^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2116,1)
;;=19.33^49.8^24.07^582^1.2^^^70^3.8^129^1155^850^780^5.29^1.83^2.11^^0^1.4^.106
;;^UTILITY(U,$J,112,2116,2)
;;=.246^7.042^7.042^.804^237.4^0^32.782^.069^0^5.219^9.505^32.884^0^5.6^^^6.8
;;^UTILITY(U,$J,112,2116,3)
;;=.295^.788^.967^1.408^.795^.42^.383^.992^.565^1.116^2.039^.536^.948^2.076^4.735^1.24^1.003^.912
;;^UTILITY(U,$J,112,2116,4)
;;=^^.051^2.808^.049^2.212^9.399
;;^UTILITY(U,$J,112,2116,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2117,0)
;;=SUNFLOWER SEEDS, OIL ROASTED, W/SALT^12-538^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2117,1)
;;=21.36^57.45^14.73^615^2.6^^^56^6.7^127^1139^483^603^5.21^1.804^2.08^^51^1.4^.32
;;^UTILITY(U,$J,112,2117,2)
;;=.28^4.13^6.942^.792^234^0^37.818^.08^0^6.021^10.965^37.936^5^3.87^^^6.8
;;^UTILITY(U,$J,112,2117,3)
;;=.326^.87^1.068^1.556^.879^.463^.423^1.096^.625^1.233^2.253^.592^1.048^2.293^5.231^1.37^1.108^1.008
;;^UTILITY(U,$J,112,2117,4)
;;=^^.059^3.239^.057^2.551^10.843
;;^UTILITY(U,$J,112,2117,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2118,0)
;;=ALMONDS, DRY ROASTED, UNBLANCHED, W/SALT^12-563^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2118,1)
;;=16.33^51.6^24.17^587^3^^^282^3.8^304^548^770^780^4.9^1.225^1.977^^0^.7^.13
;;^UTILITY(U,$J,112,2118,2)
;;=.599^2.817^.254^.074^63.8^0^10.372^.369^0^4.891^33.504^10.828^0^4.9^^^13.7
;;^UTILITY(U,$J,112,2118,3)
;;=.293^.605^.709^1.27^.545^.186^.293^.911^.577^.842^2.042^.457^.772^1.923^4.857^1.012^1.028^.738
;;^UTILITY(U,$J,112,2118,4)
;;=^.005^.294^3.414^.3^1.009^32.885
;;^UTILITY(U,$J,112,2118,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2119,0)
;;=CASHEW NUTS, DRY ROASTED, W/SALT^12-585^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2119,1)
;;=15.31^46.35^32.69^574^1.7^^^45^6^260^490^565^640^5.6^2.22^.826^^0^0^.2
;;^UTILITY(U,$J,112,2119,2)
;;=.2^1.4^1.217^.256^69.2^0^7.66^.161^0^9.157^27.317^7.836^0^3.95^^^3
;;^UTILITY(U,$J,112,2119,3)
;;=.237^.592^.731^1.285^.817^.274^.283^.791^.491^1.04^1.741^.399^.702^1.505^3.624^.803^.69^.849
;;^UTILITY(U,$J,112,2119,4)
;;=.132^.784^.347^4.351^.318^2.972^26.808
;;^UTILITY(U,$J,112,2119,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2120,0)
;;=MACADAMIA NUTS, OIL ROASTED, W/SALT^12-633^oz.^28.3^100^N
FHINI065 ; ; 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,2112,1)
+2 ;;=17.3^51.45^25.35^594^1.75^^^70^3.7^225^435^597^12^3.8^1.279^1.937^^15^.4^.2
+3 ;;^UTILITY(U,$J,112,2112,2)
+4 ;;=.2^4.7^1.205^.296^50.4^0^10.535^.19^0^6.899^31.395^10.768^1^4.15^^^9
+5 ;;^UTILITY(U,$J,112,2112,3)
+6 ;;=.264^.597^.744^1.371^.712^.228^.287^.953^.676^.934^2.242^.48^.806^2.056^4.423^1.064^.875^.917
+7 ;;^UTILITY(U,$J,112,2112,4)
+8 ;;=.045^.271^.216^4.213^.223^1.749^30.802
+9 ;;^UTILITY(U,$J,112,2112,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,2113,0)
+12 ;;=MIXED NUTS, WITH PEANUTS, OIL ROASTED, WO/SALT^12-137^oz.^28.3^100^N
+13 ;;^UTILITY(U,$J,112,2113,1)
+14 ;;=16.76^56.33^21.41^617^2.03^^^108^3.21^235^464^581^11^5.08^1.661^1.892^^19^.5^.498
+15 ;;^UTILITY(U,$J,112,2113,2)
+16 ;;=.222^5.061^1.248^.24^83^0^13.067^.176^0^8.725^31.695^13.299^2^3.47^^^9.9
+17 ;;^UTILITY(U,$J,112,2113,3)
+18 ;;=.247^.569^.724^1.344^.658^.338^.294^.92^.655^.936^2.024^.471^.772^1.958^4.128^1.006^.822^.911
+19 ;;^UTILITY(U,$J,112,2113,4)
+20 ;;=.05^.296^.255^5.238^.238^2.423^31.048
+21 ;;^UTILITY(U,$J,112,2113,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,2114,0)
+24 ;;=MIXED NUTS, WITHOUT PEANUTS, OIL ROASTED, WO/SALT^12-138^oz.^28.3^100^N
+25 ;;^UTILITY(U,$J,112,2114,1)
+26 ;;=15.52^56.17^22.27^615^3.15^^^106^2.57^251^449^544^11^4.66^1.795^1.547^^20^.5^.504
+27 ;;^UTILITY(U,$J,112,2114,2)
+28 ;;=.486^1.964^.962^.18^56.4^0^11.137^.249^0^9.087^33.137^11.449^2^2.89
+29 ;;^UTILITY(U,$J,112,2114,3)
+30 ;;=.252^.568^.703^1.265^.682^.346^.302^.82^.51^.952^1.989^.416^.715^1.617^3.872^.844^.773^1.62
+31 ;;^UTILITY(U,$J,112,2114,4)
+32 ;;=.078^.467^.342^4.932^.329^2.783^32.517
+33 ;;^UTILITY(U,$J,112,2114,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,2115,0)
+36 ;;=PISTACHIO NUTS, DRY ROASTED, WO/SALT^12-152^oz.^28.3^52^N
+37 ;;^UTILITY(U,$J,112,2115,1)
+38 ;;=14.93^52.82^27.53^606^2.09^^^70^3.17^130^476^970^6^1.36^1.211^.333^^238^7.3^.423
+39 ;;^UTILITY(U,$J,112,2115,2)
+40 ;;=.246^1.408^1.212^.255^59.1^0^7.665^.275^0^6.688^35.659^7.986^24^2.63^^^10.8
+41 ;;^UTILITY(U,$J,112,2115,3)
+42 ;;=.206^.524^.707^1.217^.927^.276^.372^.859^.518^1.023^1.586^.389^.721^1.535^3.566^.794^.687^.98
+43 ;;^UTILITY(U,$J,112,2115,4)
+44 ;;=^^.05^5.838^.313^.685^34.904
+45 ;;^UTILITY(U,$J,112,2115,20)
+46 ;;=USDA Std. Reference, Release 10
+47 ;;^UTILITY(U,$J,112,2116,0)
+48 ;;=SUNFLOWER SEEDS, DRY ROASTED, W/SALT^12-537^oz.^28.3^100^N
+49 ;;^UTILITY(U,$J,112,2116,1)
+50 ;;=19.33^49.8^24.07^582^1.2^^^70^3.8^129^1155^850^780^5.29^1.83^2.11^^0^1.4^.106
+51 ;;^UTILITY(U,$J,112,2116,2)
+52 ;;=.246^7.042^7.042^.804^237.4^0^32.782^.069^0^5.219^9.505^32.884^0^5.6^^^6.8
+53 ;;^UTILITY(U,$J,112,2116,3)
+54 ;;=.295^.788^.967^1.408^.795^.42^.383^.992^.565^1.116^2.039^.536^.948^2.076^4.735^1.24^1.003^.912
+55 ;;^UTILITY(U,$J,112,2116,4)
+56 ;;=^^.051^2.808^.049^2.212^9.399
+57 ;;^UTILITY(U,$J,112,2116,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,2117,0)
+60 ;;=SUNFLOWER SEEDS, OIL ROASTED, W/SALT^12-538^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,2117,1)
+62 ;;=21.36^57.45^14.73^615^2.6^^^56^6.7^127^1139^483^603^5.21^1.804^2.08^^51^1.4^.32
+63 ;;^UTILITY(U,$J,112,2117,2)
+64 ;;=.28^4.13^6.942^.792^234^0^37.818^.08^0^6.021^10.965^37.936^5^3.87^^^6.8
+65 ;;^UTILITY(U,$J,112,2117,3)
+66 ;;=.326^.87^1.068^1.556^.879^.463^.423^1.096^.625^1.233^2.253^.592^1.048^2.293^5.231^1.37^1.108^1.008
+67 ;;^UTILITY(U,$J,112,2117,4)
+68 ;;=^^.059^3.239^.057^2.551^10.843
+69 ;;^UTILITY(U,$J,112,2117,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2118,0)
+72 ;;=ALMONDS, DRY ROASTED, UNBLANCHED, W/SALT^12-563^oz.^28.3^100^N
+73 ;;^UTILITY(U,$J,112,2118,1)
+74 ;;=16.33^51.6^24.17^587^3^^^282^3.8^304^548^770^780^4.9^1.225^1.977^^0^.7^.13
+75 ;;^UTILITY(U,$J,112,2118,2)
+76 ;;=.599^2.817^.254^.074^63.8^0^10.372^.369^0^4.891^33.504^10.828^0^4.9^^^13.7
+77 ;;^UTILITY(U,$J,112,2118,3)
+78 ;;=.293^.605^.709^1.27^.545^.186^.293^.911^.577^.842^2.042^.457^.772^1.923^4.857^1.012^1.028^.738
+79 ;;^UTILITY(U,$J,112,2118,4)
+80 ;;=^.005^.294^3.414^.3^1.009^32.885
+81 ;;^UTILITY(U,$J,112,2118,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,2119,0)
+84 ;;=CASHEW NUTS, DRY ROASTED, W/SALT^12-585^oz.^28.3^100^N
+85 ;;^UTILITY(U,$J,112,2119,1)
+86 ;;=15.31^46.35^32.69^574^1.7^^^45^6^260^490^565^640^5.6^2.22^.826^^0^0^.2
+87 ;;^UTILITY(U,$J,112,2119,2)
+88 ;;=.2^1.4^1.217^.256^69.2^0^7.66^.161^0^9.157^27.317^7.836^0^3.95^^^3
+89 ;;^UTILITY(U,$J,112,2119,3)
+90 ;;=.237^.592^.731^1.285^.817^.274^.283^.791^.491^1.04^1.741^.399^.702^1.505^3.624^.803^.69^.849
+91 ;;^UTILITY(U,$J,112,2119,4)
+92 ;;=.132^.784^.347^4.351^.318^2.972^26.808
+93 ;;^UTILITY(U,$J,112,2119,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,2120,0)
+96 ;;=MACADAMIA NUTS, OIL ROASTED, W/SALT^12-633^oz.^28.3^100^N