FHINI088 ; ; 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,2855,2)
;;=.213^2.772^1.19^.635^74.5^0^6.174^.16^0^4.873^51.957^6.354^0^3.9
;;^UTILITY(U,$J,112,2855,3)
;;=.166^.344^.436^.844^.306^.125^.176^.527^.347^.508^1.654^.251^.544^1.231^2.715^.54^.391^.514
;;^UTILITY(U,$J,112,2855,4)
;;=^^.123^3.299^.223^1.348^51.475
;;^UTILITY(U,$J,112,2855,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2856,0)
;;=FILBERTS OR HAZELNUTS, DRY ROASTED, UNBLANCHED, WO/SALT^12-122^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2856,1)
;;=10.01^66.3^17.89^662^1.9^^^195^3.39^296^323^462^3^2.49^1.565^2.091^^69^1^.213
;;^UTILITY(U,$J,112,2856,2)
;;=.213^2.772^1.19^.635^74.5^0^6.174^.16^0^4.873^51.957^6.354^7^3.9
;;^UTILITY(U,$J,112,2856,3)
;;=.166^.344^.436^.844^.306^.125^.176^.527^.347^.508^1.654^.251^.544^1.231^2.715^.54^.391^.514
;;^UTILITY(U,$J,112,2856,4)
;;=^^.123^3.299^.223^1.348^51.475
;;^UTILITY(U,$J,112,2856,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2857,0)
;;=FILBERTS OR HAZELNUTS, OIL ROASTED, UNBLANCHED, W/SALT ADDED^12-623^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2857,1)
;;=14.25^63.6^19.15^660^1.2^^^196^3.42^298^326^465^786^2.51^1.576^2.106^^69^1^.215
;;^UTILITY(U,$J,112,2857,2)
;;=.215^2.792^1.19^.63^75.1^0^5.922^.154^0^4.675^49.841^6.095^7^1.8^^^6.4
;;^UTILITY(U,$J,112,2857,3)
;;=.237^.489^.621^1.202^.435^.177^.25^.75^.495^.723^2.355^.358^.774^1.753^3.865^.769^.556^.731
;;^UTILITY(U,$J,112,2857,4)
;;=^^.118^3.165^.214^1.293^49.379
;;^UTILITY(U,$J,112,2857,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2858,0)
;;=FILBERTS OR HAZELNUTS, OIL ROASTED, UNBLANCHED, WO/SALT^12-123^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2858,1)
;;=14.25^63.6^19.15^660^1.2^^^196^3.42^298^326^465^3^2.51^1.576^2.106^^70^1^.215
;;^UTILITY(U,$J,112,2858,2)
;;=.215^2.792^1.19^.64^75.1^0^5.922^.154^0^4.675^49.841^6.095^7^1.8^^^6.4
;;^UTILITY(U,$J,112,2858,3)
;;=.237^.489^.621^1.202^.435^.177^.25^.75^.495^.723^2.355^.358^.774^1.753^3.865^.769^.556^.731
;;^UTILITY(U,$J,112,2858,4)
;;=^^.118^3.165^.214^1.293^49.379
;;^UTILITY(U,$J,112,2858,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2859,0)
;;=NUTS, FORMULATED, WHEAT-BASED, ALL EXCEPT MACADAMIA, WO/SALT^12-200^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2859,1)
;;=13.11^62.3^20.79^647^2^^^22^2.6^59^366^320^91^2.96^.181^6.949^^1^.1^.4
;;^UTILITY(U,$J,112,2859,2)
;;=.3^1.5^.312^.348^124.6^0^22.448^1.777^0^9.37^25.722^24.284^0^1.8^^^5.2
;;^UTILITY(U,$J,112,2859,3)
;;=.172^.552^.552^.972^.886^.274^.226^.586^.486^.712^.981^.38^.753^1.194^2.433^.699^.857^.674
;;^UTILITY(U,$J,112,2859,4)
;;=^^.093^6.36^.248^2.948^25.416
;;^UTILITY(U,$J,112,2859,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2860,0)
;;=NUTS, FORMULATED, WHEAT-BASED, MACADAMIA FLAVORED, WO/SALT^12-199^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2860,1)
;;=11.19^56.5^27.91^619^3.1^^^20^2^58^301^261^47^2.92^.179^5.155^^1^.1^.2
;;^UTILITY(U,$J,112,2860,2)
;;=.2^1^.308^.261^93.9^0^20.23^1.583^0^8.482^23.521^21.867^0^1.3^^^5.2
;;^UTILITY(U,$J,112,2860,3)
;;=.139^.475^.486^.853^.766^.239^.185^.511^.428^.621^.816^.324^.623^1.021^2.115^.575^.766^.587
;;^UTILITY(U,$J,112,2860,4)
;;=^^.079^5.722^.225^2.704^23.242
;;^UTILITY(U,$J,112,2860,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2861,0)
;;=NUTS, FORMULATED, WHEAT-BASED, UNFLAVORED, W/SALT ADDED^12-140^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2861,1)
;;=13.82^57.7^23.68^622^2.5^^^26^2.4^58^371^318^505^2.94^.18^7.919^^1^.1^.3
;;^UTILITY(U,$J,112,2861,2)
;;=.3^1.5^.31^.394^142.1^0^20.974^1.687^0^8.701^23.545^22.714^0^2.3^^^5.2
;;^UTILITY(U,$J,112,2861,3)
;;=.164^.579^.555^.991^.91^.279^.252^.603^.484^.729^1.065^.393^.817^1.267^2.499^.772^.846^.696
;;^UTILITY(U,$J,112,2861,4)
;;=^^.094^5.957^.23^2.687^23.263
;;^UTILITY(U,$J,112,2861,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2862,0)
;;=MACADAMIA NUTS, OIL ROASTED, WO/SALT ADDED^12-133^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2862,1)
;;=7.26^76.52^12.9^718^1.67^^^45^1.8^117^200^329^7^1.1^.3^.595^^9^0^.213
;;^UTILITY(U,$J,112,2862,2)
;;=.109^2.02^.442^.198^15.9^0^1.319^^0^11.456^60.378^1.319^1^1.65
;;^UTILITY(U,$J,112,2862,3)
;;=.186^.23^.214^.404^.284^.081^.084^.227^.295^.281^.786^.147^.288^.723^1.559^.325^.347^.307
;;^UTILITY(U,$J,112,2862,4)
;;=^^.486^6.484^16.567^2.807^42.725
;;^UTILITY(U,$J,112,2862,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2863,0)
;;=PECANS, DRY ROASTED, W/SALT ADDED^12-643^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2863,1)
;;=7.97^64.6^22.33^659^1.1^^^35^2.18^133^304^370^780^5.68^1.236^4.706^^133^2^.317
FHINI088 ; ; 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,2855,2)
+2 ;;=.213^2.772^1.19^.635^74.5^0^6.174^.16^0^4.873^51.957^6.354^0^3.9
+3 ;;^UTILITY(U,$J,112,2855,3)
+4 ;;=.166^.344^.436^.844^.306^.125^.176^.527^.347^.508^1.654^.251^.544^1.231^2.715^.54^.391^.514
+5 ;;^UTILITY(U,$J,112,2855,4)
+6 ;;=^^.123^3.299^.223^1.348^51.475
+7 ;;^UTILITY(U,$J,112,2855,20)
+8 ;;=USDA Std. Reference, Release 10
+9 ;;^UTILITY(U,$J,112,2856,0)
+10 ;;=FILBERTS OR HAZELNUTS, DRY ROASTED, UNBLANCHED, WO/SALT^12-122^oz.^28.3^100^N
+11 ;;^UTILITY(U,$J,112,2856,1)
+12 ;;=10.01^66.3^17.89^662^1.9^^^195^3.39^296^323^462^3^2.49^1.565^2.091^^69^1^.213
+13 ;;^UTILITY(U,$J,112,2856,2)
+14 ;;=.213^2.772^1.19^.635^74.5^0^6.174^.16^0^4.873^51.957^6.354^7^3.9
+15 ;;^UTILITY(U,$J,112,2856,3)
+16 ;;=.166^.344^.436^.844^.306^.125^.176^.527^.347^.508^1.654^.251^.544^1.231^2.715^.54^.391^.514
+17 ;;^UTILITY(U,$J,112,2856,4)
+18 ;;=^^.123^3.299^.223^1.348^51.475
+19 ;;^UTILITY(U,$J,112,2856,20)
+20 ;;=USDA Std. Reference, Release 10
+21 ;;^UTILITY(U,$J,112,2857,0)
+22 ;;=FILBERTS OR HAZELNUTS, OIL ROASTED, UNBLANCHED, W/SALT ADDED^12-623^oz.^28.3^100^N
+23 ;;^UTILITY(U,$J,112,2857,1)
+24 ;;=14.25^63.6^19.15^660^1.2^^^196^3.42^298^326^465^786^2.51^1.576^2.106^^69^1^.215
+25 ;;^UTILITY(U,$J,112,2857,2)
+26 ;;=.215^2.792^1.19^.63^75.1^0^5.922^.154^0^4.675^49.841^6.095^7^1.8^^^6.4
+27 ;;^UTILITY(U,$J,112,2857,3)
+28 ;;=.237^.489^.621^1.202^.435^.177^.25^.75^.495^.723^2.355^.358^.774^1.753^3.865^.769^.556^.731
+29 ;;^UTILITY(U,$J,112,2857,4)
+30 ;;=^^.118^3.165^.214^1.293^49.379
+31 ;;^UTILITY(U,$J,112,2857,20)
+32 ;;=USDA Std. Reference, Release 10
+33 ;;^UTILITY(U,$J,112,2858,0)
+34 ;;=FILBERTS OR HAZELNUTS, OIL ROASTED, UNBLANCHED, WO/SALT^12-123^oz.^28.3^100^N
+35 ;;^UTILITY(U,$J,112,2858,1)
+36 ;;=14.25^63.6^19.15^660^1.2^^^196^3.42^298^326^465^3^2.51^1.576^2.106^^70^1^.215
+37 ;;^UTILITY(U,$J,112,2858,2)
+38 ;;=.215^2.792^1.19^.64^75.1^0^5.922^.154^0^4.675^49.841^6.095^7^1.8^^^6.4
+39 ;;^UTILITY(U,$J,112,2858,3)
+40 ;;=.237^.489^.621^1.202^.435^.177^.25^.75^.495^.723^2.355^.358^.774^1.753^3.865^.769^.556^.731
+41 ;;^UTILITY(U,$J,112,2858,4)
+42 ;;=^^.118^3.165^.214^1.293^49.379
+43 ;;^UTILITY(U,$J,112,2858,20)
+44 ;;=USDA Std. Reference, Release 10
+45 ;;^UTILITY(U,$J,112,2859,0)
+46 ;;=NUTS, FORMULATED, WHEAT-BASED, ALL EXCEPT MACADAMIA, WO/SALT^12-200^oz.^28.3^100^N
+47 ;;^UTILITY(U,$J,112,2859,1)
+48 ;;=13.11^62.3^20.79^647^2^^^22^2.6^59^366^320^91^2.96^.181^6.949^^1^.1^.4
+49 ;;^UTILITY(U,$J,112,2859,2)
+50 ;;=.3^1.5^.312^.348^124.6^0^22.448^1.777^0^9.37^25.722^24.284^0^1.8^^^5.2
+51 ;;^UTILITY(U,$J,112,2859,3)
+52 ;;=.172^.552^.552^.972^.886^.274^.226^.586^.486^.712^.981^.38^.753^1.194^2.433^.699^.857^.674
+53 ;;^UTILITY(U,$J,112,2859,4)
+54 ;;=^^.093^6.36^.248^2.948^25.416
+55 ;;^UTILITY(U,$J,112,2859,20)
+56 ;;=USDA Std. Reference, Release 10
+57 ;;^UTILITY(U,$J,112,2860,0)
+58 ;;=NUTS, FORMULATED, WHEAT-BASED, MACADAMIA FLAVORED, WO/SALT^12-199^oz.^28.3^100^N
+59 ;;^UTILITY(U,$J,112,2860,1)
+60 ;;=11.19^56.5^27.91^619^3.1^^^20^2^58^301^261^47^2.92^.179^5.155^^1^.1^.2
+61 ;;^UTILITY(U,$J,112,2860,2)
+62 ;;=.2^1^.308^.261^93.9^0^20.23^1.583^0^8.482^23.521^21.867^0^1.3^^^5.2
+63 ;;^UTILITY(U,$J,112,2860,3)
+64 ;;=.139^.475^.486^.853^.766^.239^.185^.511^.428^.621^.816^.324^.623^1.021^2.115^.575^.766^.587
+65 ;;^UTILITY(U,$J,112,2860,4)
+66 ;;=^^.079^5.722^.225^2.704^23.242
+67 ;;^UTILITY(U,$J,112,2860,20)
+68 ;;=USDA Std. Reference, Release 10
+69 ;;^UTILITY(U,$J,112,2861,0)
+70 ;;=NUTS, FORMULATED, WHEAT-BASED, UNFLAVORED, W/SALT ADDED^12-140^oz.^28.3^100^N
+71 ;;^UTILITY(U,$J,112,2861,1)
+72 ;;=13.82^57.7^23.68^622^2.5^^^26^2.4^58^371^318^505^2.94^.18^7.919^^1^.1^.3
+73 ;;^UTILITY(U,$J,112,2861,2)
+74 ;;=.3^1.5^.31^.394^142.1^0^20.974^1.687^0^8.701^23.545^22.714^0^2.3^^^5.2
+75 ;;^UTILITY(U,$J,112,2861,3)
+76 ;;=.164^.579^.555^.991^.91^.279^.252^.603^.484^.729^1.065^.393^.817^1.267^2.499^.772^.846^.696
+77 ;;^UTILITY(U,$J,112,2861,4)
+78 ;;=^^.094^5.957^.23^2.687^23.263
+79 ;;^UTILITY(U,$J,112,2861,20)
+80 ;;=USDA Std. Reference, Release 10
+81 ;;^UTILITY(U,$J,112,2862,0)
+82 ;;=MACADAMIA NUTS, OIL ROASTED, WO/SALT ADDED^12-133^oz.^28.3^100^N
+83 ;;^UTILITY(U,$J,112,2862,1)
+84 ;;=7.26^76.52^12.9^718^1.67^^^45^1.8^117^200^329^7^1.1^.3^.595^^9^0^.213
+85 ;;^UTILITY(U,$J,112,2862,2)
+86 ;;=.109^2.02^.442^.198^15.9^0^1.319^^0^11.456^60.378^1.319^1^1.65
+87 ;;^UTILITY(U,$J,112,2862,3)
+88 ;;=.186^.23^.214^.404^.284^.081^.084^.227^.295^.281^.786^.147^.288^.723^1.559^.325^.347^.307
+89 ;;^UTILITY(U,$J,112,2862,4)
+90 ;;=^^.486^6.484^16.567^2.807^42.725
+91 ;;^UTILITY(U,$J,112,2862,20)
+92 ;;=USDA Std. Reference, Release 10
+93 ;;^UTILITY(U,$J,112,2863,0)
+94 ;;=PECANS, DRY ROASTED, W/SALT ADDED^12-643^oz.^28.3^100^N
+95 ;;^UTILITY(U,$J,112,2863,1)
+96 ;;=7.97^64.6^22.33^659^1.1^^^35^2.18^133^304^370^780^5.68^1.236^4.706^^133^2^.317
