FHINI02P ; ; 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,801,4)
;;=.02^.022^.14^2.402^.018^1.687^6.91^0
;;^UTILITY(U,$J,112,801,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,802,0)
;;=BISCUIT DOUGH, COMMERCIAL, ENR, CHILLED, IN CANS^18-012^oz.^28.3^100^N
;;^UTILITY(U,$J,112,802,1)
;;=6.7^4.5^47.6^257^37.9^^^17^2.66^15^400^159^1248^.39^.079^.301^^0^0^.448
;;^UTILITY(U,$J,112,802,2)
;;=.222^3.295^.367^.027^6^0^.637^.034^0^1.113^2.405^.671^0^3.3
;;^UTILITY(U,$J,112,802,3)
;;=.082^.182^.231^.461^.148^.118^.142^.337^.202^.269^.27^.149^.215^.282^2.251^.24^.775^.333
;;^UTILITY(U,$J,112,802,4)
;;=^^.02^.596^^.497^2.405
;;^UTILITY(U,$J,112,802,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,803,0)
;;=BISCUIT DOUGH, COMMERCIAL, ENR, FRZ^414-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,803,1)
;;=5.7^11.9^48.9^327^30.9^^^71^2.1^^400^86^910^^^^^0^0^.311
;;^UTILITY(U,$J,112,803,2)
;;=.237^2.52^^^^^1^^0^3^^^^2.6
;;^UTILITY(U,$J,112,803,4)
;;=^^^^^^8
;;^UTILITY(U,$J,112,803,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,804,0)
;;=BISCUIT MIX, DRY FORM, ENRICHED^18-010^cups^120^100^N
;;^UTILITY(U,$J,112,804,1)
;;=8^15.4^63.3^428^9.2^^^179^2.77^25^585^163^1276^.6^.154^.34^^4^.1^.575
;;^UTILITY(U,$J,112,804,2)
;;=.437^4.542^.884^.076^8^.11^5.509^.339^1^3.086^5.422^5.847^1^4^^^2.3
;;^UTILITY(U,$J,112,804,3)
;;=.098^.233^.288^.562^.213^.142^.164^.392^.242^.334^.315^.177^.261^.364^2.567^.276^.896^.393
;;^UTILITY(U,$J,112,804,4)
;;=.002^.003^.009^1.542^.002^1.524^5.42
;;^UTILITY(U,$J,112,804,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,805,0)
;;=BISCUITS, FROM MIX, ENR, MADE W/MILK^18-011^biscuits^28.35^100^N
;;^UTILITY(U,$J,112,805,1)
;;=7.3^12.1^48.4^335^28.9^^^185^2.05^25^470^188^955^.61^.116^.249^^94^.4^.35
;;^UTILITY(U,$J,112,805,2)
;;=.357^3.021^.548^.068^6^.21^4.045^.26^4^2.789^4.206^4.305^26^3.3^^^1.8
;;^UTILITY(U,$J,112,805,3)
;;=.091^.234^.296^.549^.267^.139^.133^.355^.245^.339^.281^.167^.239^.373^2.172^.232^.791^.364
;;^UTILITY(U,$J,112,805,4)
;;=.024^.027^.096^1.36^.021^1.221^4.183^0
;;^UTILITY(U,$J,112,805,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,806,0)
;;=BLUEFISH, BAKED OR BROILED^430-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,806,1)
;;=26.2^5.2^0^159^68^^^29^.7^^287^420^104^^^^^50^0^.11
;;^UTILITY(U,$J,112,806,2)
;;=.1^1.9^^^^^1^^70^1
;;^UTILITY(U,$J,112,806,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,807,0)
;;=BLUEFISH, FRIED^431-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,807,1)
;;=22.7^9.8^4.7^205^60.8^^^35^.9^^257^420^146^^^^^100^0^.11
;;^UTILITY(U,$J,112,807,2)
;;=.11^1.8^^^^^2^^61^2
;;^UTILITY(U,$J,112,807,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,808,0)
;;=BREAD, BOSTON BROWN BREAD^18-021^pieces^45^100^N
;;^UTILITY(U,$J,112,808,1)
;;=5.2^1.5^43.3^195^47.2^^^70^2.1^63^112^318^631^.5^.08^1.02^^87^0^.014
;;^UTILITY(U,$J,112,808,2)
;;=.115^1.12^.566^.082^7^.01^.511^.052^1^.282^.207^.564^11^2.8^^^4.7
;;^UTILITY(U,$J,112,808,3)
;;=.073^.162^.186^.35^.156^.092^.116^.233^.148^.233^.255^.128^.203^.324^1.537^.203^.498^.251
;;^UTILITY(U,$J,112,808,4)
;;=.004^.004^.017^.217^.01^.029^.195^.001
;;^UTILITY(U,$J,112,808,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,809,0)
;;=BRAZILNUTS^12-078^oz.^28.3^48^N
;;^UTILITY(U,$J,112,809,1)
;;=14.34^66.22^12.8^656^3.34^^^176^3.4^225^600^600^2^4.59^1.77^.774^^0^.7^1
;;^UTILITY(U,$J,112,809,2)
;;=.122^1.622^.236^.251^4^0^23.807^.062^0^16.154^23.016^24.129^0^3.3^^^5.4
;;^UTILITY(U,$J,112,809,3)
;;=.26^.46^.601^1.187^.541^1.014^.349^.746^.457^.911^2.39^.402^.57^1.355^3.151^.657^.762^.746
;;^UTILITY(U,$J,112,809,4)
;;=^^.62^9.519^.324^5.679^22.382^^^2960
;;^UTILITY(U,$J,112,809,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,810,0)
;;=BREAD, CRACKED WHEAT^18-025^slices^25^100^N
;;^UTILITY(U,$J,112,810,1)
;;=8.7^3.9^49.5^260^35.8^^^43^2.81^52^153^177^538^1.24^.222^1.371^^0^0^.358
;;^UTILITY(U,$J,112,810,2)
;;=.24^3.671^.512^.304^39^.03^.648^.033^0^.916^1.902^.682^0^2.1^^^5.3
;;^UTILITY(U,$J,112,810,3)
;;=.112^.261^.338^.606^.244^.148^.19^.419^.253^.387^.348^.193^.306^.433^2.77^.321^.922^.417
;;^UTILITY(U,$J,112,810,4)
;;=0^.001^.017^.509^.011^.386^1.892^0^^25.3
;;^UTILITY(U,$J,112,810,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,811,0)
;;=BREAD, CRACKED WHEAT, TOASTED^18-026^slices^21^100^N
;;^UTILITY(U,$J,112,811,1)
;;=9.5^4.2^53.8^283^30.2^^^47^3.05^57^166^192^585^1.35^.241^1.49^^0^0^.312
;;^UTILITY(U,$J,112,811,2)
;;=.235^3.591^.361^.297^30^.03^.704^.036^0^.995^2.068^.741^0^2.3
FHINI02P ; ; 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,801,4)
+2 ;;=.02^.022^.14^2.402^.018^1.687^6.91^0
+3 ;;^UTILITY(U,$J,112,801,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,802,0)
+6 ;;=BISCUIT DOUGH, COMMERCIAL, ENR, CHILLED, IN CANS^18-012^oz.^28.3^100^N
+7 ;;^UTILITY(U,$J,112,802,1)
+8 ;;=6.7^4.5^47.6^257^37.9^^^17^2.66^15^400^159^1248^.39^.079^.301^^0^0^.448
+9 ;;^UTILITY(U,$J,112,802,2)
+10 ;;=.222^3.295^.367^.027^6^0^.637^.034^0^1.113^2.405^.671^0^3.3
+11 ;;^UTILITY(U,$J,112,802,3)
+12 ;;=.082^.182^.231^.461^.148^.118^.142^.337^.202^.269^.27^.149^.215^.282^2.251^.24^.775^.333
+13 ;;^UTILITY(U,$J,112,802,4)
+14 ;;=^^.02^.596^^.497^2.405
+15 ;;^UTILITY(U,$J,112,802,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,803,0)
+18 ;;=BISCUIT DOUGH, COMMERCIAL, ENR, FRZ^414-0^oz.^28.3^100^N
+19 ;;^UTILITY(U,$J,112,803,1)
+20 ;;=5.7^11.9^48.9^327^30.9^^^71^2.1^^400^86^910^^^^^0^0^.311
+21 ;;^UTILITY(U,$J,112,803,2)
+22 ;;=.237^2.52^^^^^1^^0^3^^^^2.6
+23 ;;^UTILITY(U,$J,112,803,4)
+24 ;;=^^^^^^8
+25 ;;^UTILITY(U,$J,112,803,20)
+26 ;;=USDA Std. Reference, Release 8
+27 ;;^UTILITY(U,$J,112,804,0)
+28 ;;=BISCUIT MIX, DRY FORM, ENRICHED^18-010^cups^120^100^N
+29 ;;^UTILITY(U,$J,112,804,1)
+30 ;;=8^15.4^63.3^428^9.2^^^179^2.77^25^585^163^1276^.6^.154^.34^^4^.1^.575
+31 ;;^UTILITY(U,$J,112,804,2)
+32 ;;=.437^4.542^.884^.076^8^.11^5.509^.339^1^3.086^5.422^5.847^1^4^^^2.3
+33 ;;^UTILITY(U,$J,112,804,3)
+34 ;;=.098^.233^.288^.562^.213^.142^.164^.392^.242^.334^.315^.177^.261^.364^2.567^.276^.896^.393
+35 ;;^UTILITY(U,$J,112,804,4)
+36 ;;=.002^.003^.009^1.542^.002^1.524^5.42
+37 ;;^UTILITY(U,$J,112,804,20)
+38 ;;=USDA Std. Reference, Release 10
+39 ;;^UTILITY(U,$J,112,805,0)
+40 ;;=BISCUITS, FROM MIX, ENR, MADE W/MILK^18-011^biscuits^28.35^100^N
+41 ;;^UTILITY(U,$J,112,805,1)
+42 ;;=7.3^12.1^48.4^335^28.9^^^185^2.05^25^470^188^955^.61^.116^.249^^94^.4^.35
+43 ;;^UTILITY(U,$J,112,805,2)
+44 ;;=.357^3.021^.548^.068^6^.21^4.045^.26^4^2.789^4.206^4.305^26^3.3^^^1.8
+45 ;;^UTILITY(U,$J,112,805,3)
+46 ;;=.091^.234^.296^.549^.267^.139^.133^.355^.245^.339^.281^.167^.239^.373^2.172^.232^.791^.364
+47 ;;^UTILITY(U,$J,112,805,4)
+48 ;;=.024^.027^.096^1.36^.021^1.221^4.183^0
+49 ;;^UTILITY(U,$J,112,805,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,806,0)
+52 ;;=BLUEFISH, BAKED OR BROILED^430-0^oz.^28.3^^N
+53 ;;^UTILITY(U,$J,112,806,1)
+54 ;;=26.2^5.2^0^159^68^^^29^.7^^287^420^104^^^^^50^0^.11
+55 ;;^UTILITY(U,$J,112,806,2)
+56 ;;=.1^1.9^^^^^1^^70^1
+57 ;;^UTILITY(U,$J,112,806,20)
+58 ;;=USDA Std. Reference, Release 8
+59 ;;^UTILITY(U,$J,112,807,0)
+60 ;;=BLUEFISH, FRIED^431-0^oz.^28.3^^N
+61 ;;^UTILITY(U,$J,112,807,1)
+62 ;;=22.7^9.8^4.7^205^60.8^^^35^.9^^257^420^146^^^^^100^0^.11
+63 ;;^UTILITY(U,$J,112,807,2)
+64 ;;=.11^1.8^^^^^2^^61^2
+65 ;;^UTILITY(U,$J,112,807,20)
+66 ;;=USDA Std. Reference, Release 8
+67 ;;^UTILITY(U,$J,112,808,0)
+68 ;;=BREAD, BOSTON BROWN BREAD^18-021^pieces^45^100^N
+69 ;;^UTILITY(U,$J,112,808,1)
+70 ;;=5.2^1.5^43.3^195^47.2^^^70^2.1^63^112^318^631^.5^.08^1.02^^87^0^.014
+71 ;;^UTILITY(U,$J,112,808,2)
+72 ;;=.115^1.12^.566^.082^7^.01^.511^.052^1^.282^.207^.564^11^2.8^^^4.7
+73 ;;^UTILITY(U,$J,112,808,3)
+74 ;;=.073^.162^.186^.35^.156^.092^.116^.233^.148^.233^.255^.128^.203^.324^1.537^.203^.498^.251
+75 ;;^UTILITY(U,$J,112,808,4)
+76 ;;=.004^.004^.017^.217^.01^.029^.195^.001
+77 ;;^UTILITY(U,$J,112,808,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,809,0)
+80 ;;=BRAZILNUTS^12-078^oz.^28.3^48^N
+81 ;;^UTILITY(U,$J,112,809,1)
+82 ;;=14.34^66.22^12.8^656^3.34^^^176^3.4^225^600^600^2^4.59^1.77^.774^^0^.7^1
+83 ;;^UTILITY(U,$J,112,809,2)
+84 ;;=.122^1.622^.236^.251^4^0^23.807^.062^0^16.154^23.016^24.129^0^3.3^^^5.4
+85 ;;^UTILITY(U,$J,112,809,3)
+86 ;;=.26^.46^.601^1.187^.541^1.014^.349^.746^.457^.911^2.39^.402^.57^1.355^3.151^.657^.762^.746
+87 ;;^UTILITY(U,$J,112,809,4)
+88 ;;=^^.62^9.519^.324^5.679^22.382^^^2960
+89 ;;^UTILITY(U,$J,112,809,20)
+90 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+91 ;;^UTILITY(U,$J,112,810,0)
+92 ;;=BREAD, CRACKED WHEAT^18-025^slices^25^100^N
+93 ;;^UTILITY(U,$J,112,810,1)
+94 ;;=8.7^3.9^49.5^260^35.8^^^43^2.81^52^153^177^538^1.24^.222^1.371^^0^0^.358
+95 ;;^UTILITY(U,$J,112,810,2)
+96 ;;=.24^3.671^.512^.304^39^.03^.648^.033^0^.916^1.902^.682^0^2.1^^^5.3
+97 ;;^UTILITY(U,$J,112,810,3)
+98 ;;=.112^.261^.338^.606^.244^.148^.19^.419^.253^.387^.348^.193^.306^.433^2.77^.321^.922^.417
+99 ;;^UTILITY(U,$J,112,810,4)
+100 ;;=0^.001^.017^.509^.011^.386^1.892^0^^25.3
+101 ;;^UTILITY(U,$J,112,810,20)
+102 ;;=USDA Std. Reference, Release 10
+103 ;;^UTILITY(U,$J,112,811,0)
+104 ;;=BREAD, CRACKED WHEAT, TOASTED^18-026^slices^21^100^N
+105 ;;^UTILITY(U,$J,112,811,1)
+106 ;;=9.5^4.2^53.8^283^30.2^^^47^3.05^57^166^192^585^1.35^.241^1.49^^0^0^.312
+107 ;;^UTILITY(U,$J,112,811,2)
+108 ;;=.235^3.591^.361^.297^30^.03^.704^.036^0^.995^2.068^.741^0^2.3