FHINI07S ; ; 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,2702,4)
;;=^^.146^.842^.84^.237^1.474^.195
;;^UTILITY(U,$J,112,2702,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2703,0)
;;=CATFISH, CHANNEL, BREADED AND FRIED^15-011^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2703,1)
;;=18.09^13.33^8.04^229^58.81^^^44^1.43^27^216^340^280^.86^.101^.04^^28^0^.073
;;^UTILITY(U,$J,112,2703,2)
;;=.133^2.282^.73^.19^16.5^1.9^2.616^.178^81^3.288^5.611^3.325^8^1.26
;;^UTILITY(U,$J,112,2703,3)
;;=.2^.79^.836^1.508^1.597^.527^.205^.726^.622^.943^1.077^.53^1.103^1.817^2.72^.851^.686^.764
;;^UTILITY(U,$J,112,2703,4)
;;=^^.091^2.008^.171^1.169^5.347^.098
;;^UTILITY(U,$J,112,2703,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2704,0)
;;=CAVIAR, BLACK AND RED, GRANULAR^15-012^tbsp.^16^100^N
;;^UTILITY(U,$J,112,2704,1)
;;=24.6^17.9^4^252^47.5^^^275^11.88^300^356^181^1500^.95^.11^.05^^1868^0^.19
;;^UTILITY(U,$J,112,2704,2)
;;=.62^.12^3.5^.32^50^20^^^588^4.06^4.64^7.41^560^6.5^^^0
;;^UTILITY(U,$J,112,2704,3)
;;=.323^1.263^1.035^2.133^1.834^.646^.449^1.071^.968^1.263^1.59^.649^1.653^2.385^3.633^.74^1.2^1.897
;;^UTILITY(U,$J,112,2704,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2705,0)
;;=CELERIAC, BOILED, DRAINED, W/SALT^11-763^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2705,1)
;;=.96^.19^5.9^25^92.3^^^26^.43^12^66^173^297^.2^.043^.096^^0^3.6^.027
;;^UTILITY(U,$J,112,2705,2)
;;=.037^.427^.203^.101^3.4^0^^^0^^^^0^.64
;;^UTILITY(U,$J,112,2705,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2706,0)
;;=CELERIAC, BOILED, DRAINED, WO/SALT^11-142^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2706,1)
;;=.96^.19^5.9^25^92.3^^^26^.43^12^66^173^61^.2^.043^.096^^0^3.6^.027
;;^UTILITY(U,$J,112,2706,2)
;;=.037^.427^.203^.101^3.4^0^^^0^^^^0^.64
;;^UTILITY(U,$J,112,2706,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2707,0)
;;=CELERIAC, RAW^11-141^cups^156^86^N
;;^UTILITY(U,$J,112,2707,1)
;;=1.5^.3^9.2^39^88^^^43^.7^20^115^300^100^.33^.07^.158^^0^8^.05
;;^UTILITY(U,$J,112,2707,2)
;;=.06^.7^.352^.165^7.6^0^^^0^^^^0^1^^^4
;;^UTILITY(U,$J,112,2707,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,2708,0)
;;=CEREALS, 40% BRAN FLAKES, POST, (WHEAT BRAN)^8-029^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2708,1)
;;=11.3^1.6^79.3^324^3^^^44^15.9^216^630^533^917^5.3^.684^4.843^^4409^0^1.3
;;^UTILITY(U,$J,112,2708,2)
;;=1.5^17.6^1.384^1.8^353^5.3^^^0^^^^1324^4.8^^^19.5
;;^UTILITY(U,$J,112,2708,3)
;;=.197^.363^.424^.754^.376^.177^.229^.52^.338^.551^.669^.289^.48^.699^3.106^.562^1.007^.58
;;^UTILITY(U,$J,112,2708,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2709,0)
;;=CEREALS, ALPHA-BITS, (OAT W/OTHER GRNS)^8-002^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2709,1)
;;=7.6^2.3^86.6^392^1.3^^^29^9.5^59^181^388^635^5.3^.248^1.88^^4409^0^1.3
;;^UTILITY(U,$J,112,2709,2)
;;=1.5^17.6^.514^1.8^353^5.3^^^0^^^^1324^2.1^^^4.3
;;^UTILITY(U,$J,112,2709,3)
;;=.091^.267^.341^.706^.279^.139^.187^.413^.285^.438^.505^.181^.464^.629^1.743^.376^.506^.364
;;^UTILITY(U,$J,112,2709,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2710,0)
;;=CEREALS, APPLE JACKS, (CORN W/OTHER GRNS)^8-003^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2710,1)
;;=5.3^.5^90.7^387^2.3^^^11^15.9^22^106^81^440^13.2^.35^.7^^4409^53^1.3
;;^UTILITY(U,$J,112,2710,2)
;;=1.5^17.6^.352^1.8^353^0^^^0^^^^1324^1.2^^^1.9
;;^UTILITY(U,$J,112,2710,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2711,0)
;;=CEREALS, CAP'N CRUNCH'S CRUNCHBERRIES, (CORN,OAT)^8-011^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2711,1)
;;=5.2^8.4^81.5^417^2.6^^^31^25.82^39^133^140^696^10.17^.12^.693^^127^0^1.7
;;^UTILITY(U,$J,112,2711,2)
;;=1.92^23.24^8.548^2.648^365^7.157^1.3^.03^.21^5.52^1.1^1.34^13^2.3^^^1.9
;;^UTILITY(U,$J,112,2711,3)
;;=.045^.183^.221^.647^.149^.112^.117^.27^.21^.28^.237^.133^.379^.359^1.153^.191^.452^.252
;;^UTILITY(U,$J,112,2711,4)
;;=.35^2.6^.98^.81^.03^.22^1.07
;;^UTILITY(U,$J,112,2711,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2712,0)
;;=CEREALS, CAP'N CRUNCH'S PEANUT BUTTER, (CORN W/OTHER GRNS)^8-012^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2712,1)
;;=7.2^12.9^75.7^439^1.8^^^20^26.03^53^139^162^765^10.82^.16^.72^^156^0^1.72
;;^UTILITY(U,$J,112,2712,2)
;;=2^25.64^13.633^2.978^696^6.574^2.87^.02^0^5.44^3.92^2.89^16^2.4^^^1.3
;;^UTILITY(U,$J,112,2712,3)
;;=.07^.239^.299^.74^.231^.125^.137^.38^.303^.372^.578^.19^.437^.678^1.527^.35^.504^.365
;;^UTILITY(U,$J,112,2712,4)
;;=.26^1.92^.72^1.34^.02^.5^3.84
;;^UTILITY(U,$J,112,2712,20)
;;=USDA Std. Reference, Release 10
FHINI07S ; ; 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,2702,4)
+2 ;;=^^.146^.842^.84^.237^1.474^.195
+3 ;;^UTILITY(U,$J,112,2702,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,2703,0)
+6 ;;=CATFISH, CHANNEL, BREADED AND FRIED^15-011^oz.^28.3^100^N
+7 ;;^UTILITY(U,$J,112,2703,1)
+8 ;;=18.09^13.33^8.04^229^58.81^^^44^1.43^27^216^340^280^.86^.101^.04^^28^0^.073
+9 ;;^UTILITY(U,$J,112,2703,2)
+10 ;;=.133^2.282^.73^.19^16.5^1.9^2.616^.178^81^3.288^5.611^3.325^8^1.26
+11 ;;^UTILITY(U,$J,112,2703,3)
+12 ;;=.2^.79^.836^1.508^1.597^.527^.205^.726^.622^.943^1.077^.53^1.103^1.817^2.72^.851^.686^.764
+13 ;;^UTILITY(U,$J,112,2703,4)
+14 ;;=^^.091^2.008^.171^1.169^5.347^.098
+15 ;;^UTILITY(U,$J,112,2703,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2704,0)
+18 ;;=CAVIAR, BLACK AND RED, GRANULAR^15-012^tbsp.^16^100^N
+19 ;;^UTILITY(U,$J,112,2704,1)
+20 ;;=24.6^17.9^4^252^47.5^^^275^11.88^300^356^181^1500^.95^.11^.05^^1868^0^.19
+21 ;;^UTILITY(U,$J,112,2704,2)
+22 ;;=.62^.12^3.5^.32^50^20^^^588^4.06^4.64^7.41^560^6.5^^^0
+23 ;;^UTILITY(U,$J,112,2704,3)
+24 ;;=.323^1.263^1.035^2.133^1.834^.646^.449^1.071^.968^1.263^1.59^.649^1.653^2.385^3.633^.74^1.2^1.897
+25 ;;^UTILITY(U,$J,112,2704,20)
+26 ;;=USDA Std. Reference, Release 10
+27 ;;^UTILITY(U,$J,112,2705,0)
+28 ;;=CELERIAC, BOILED, DRAINED, W/SALT^11-763^oz.^28.3^100^N
+29 ;;^UTILITY(U,$J,112,2705,1)
+30 ;;=.96^.19^5.9^25^92.3^^^26^.43^12^66^173^297^.2^.043^.096^^0^3.6^.027
+31 ;;^UTILITY(U,$J,112,2705,2)
+32 ;;=.037^.427^.203^.101^3.4^0^^^0^^^^0^.64
+33 ;;^UTILITY(U,$J,112,2705,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,2706,0)
+36 ;;=CELERIAC, BOILED, DRAINED, WO/SALT^11-142^oz.^28.3^100^N
+37 ;;^UTILITY(U,$J,112,2706,1)
+38 ;;=.96^.19^5.9^25^92.3^^^26^.43^12^66^173^61^.2^.043^.096^^0^3.6^.027
+39 ;;^UTILITY(U,$J,112,2706,2)
+40 ;;=.037^.427^.203^.101^3.4^0^^^0^^^^0^.64
+41 ;;^UTILITY(U,$J,112,2706,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,2707,0)
+44 ;;=CELERIAC, RAW^11-141^cups^156^86^N
+45 ;;^UTILITY(U,$J,112,2707,1)
+46 ;;=1.5^.3^9.2^39^88^^^43^.7^20^115^300^100^.33^.07^.158^^0^8^.05
+47 ;;^UTILITY(U,$J,112,2707,2)
+48 ;;=.06^.7^.352^.165^7.6^0^^^0^^^^0^1^^^4
+49 ;;^UTILITY(U,$J,112,2707,20)
+50 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+51 ;;^UTILITY(U,$J,112,2708,0)
+52 ;;=CEREALS, 40% BRAN FLAKES, POST, (WHEAT BRAN)^8-029^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,2708,1)
+54 ;;=11.3^1.6^79.3^324^3^^^44^15.9^216^630^533^917^5.3^.684^4.843^^4409^0^1.3
+55 ;;^UTILITY(U,$J,112,2708,2)
+56 ;;=1.5^17.6^1.384^1.8^353^5.3^^^0^^^^1324^4.8^^^19.5
+57 ;;^UTILITY(U,$J,112,2708,3)
+58 ;;=.197^.363^.424^.754^.376^.177^.229^.52^.338^.551^.669^.289^.48^.699^3.106^.562^1.007^.58
+59 ;;^UTILITY(U,$J,112,2708,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2709,0)
+62 ;;=CEREALS, ALPHA-BITS, (OAT W/OTHER GRNS)^8-002^oz.^28.3^100^N
+63 ;;^UTILITY(U,$J,112,2709,1)
+64 ;;=7.6^2.3^86.6^392^1.3^^^29^9.5^59^181^388^635^5.3^.248^1.88^^4409^0^1.3
+65 ;;^UTILITY(U,$J,112,2709,2)
+66 ;;=1.5^17.6^.514^1.8^353^5.3^^^0^^^^1324^2.1^^^4.3
+67 ;;^UTILITY(U,$J,112,2709,3)
+68 ;;=.091^.267^.341^.706^.279^.139^.187^.413^.285^.438^.505^.181^.464^.629^1.743^.376^.506^.364
+69 ;;^UTILITY(U,$J,112,2709,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2710,0)
+72 ;;=CEREALS, APPLE JACKS, (CORN W/OTHER GRNS)^8-003^oz.^28.3^100^N
+73 ;;^UTILITY(U,$J,112,2710,1)
+74 ;;=5.3^.5^90.7^387^2.3^^^11^15.9^22^106^81^440^13.2^.35^.7^^4409^53^1.3
+75 ;;^UTILITY(U,$J,112,2710,2)
+76 ;;=1.5^17.6^.352^1.8^353^0^^^0^^^^1324^1.2^^^1.9
+77 ;;^UTILITY(U,$J,112,2710,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,2711,0)
+80 ;;=CEREALS, CAP'N CRUNCH'S CRUNCHBERRIES, (CORN,OAT)^8-011^oz.^28.3^100^N
+81 ;;^UTILITY(U,$J,112,2711,1)
+82 ;;=5.2^8.4^81.5^417^2.6^^^31^25.82^39^133^140^696^10.17^.12^.693^^127^0^1.7
+83 ;;^UTILITY(U,$J,112,2711,2)
+84 ;;=1.92^23.24^8.548^2.648^365^7.157^1.3^.03^.21^5.52^1.1^1.34^13^2.3^^^1.9
+85 ;;^UTILITY(U,$J,112,2711,3)
+86 ;;=.045^.183^.221^.647^.149^.112^.117^.27^.21^.28^.237^.133^.379^.359^1.153^.191^.452^.252
+87 ;;^UTILITY(U,$J,112,2711,4)
+88 ;;=.35^2.6^.98^.81^.03^.22^1.07
+89 ;;^UTILITY(U,$J,112,2711,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,2712,0)
+92 ;;=CEREALS, CAP'N CRUNCH'S PEANUT BUTTER, (CORN W/OTHER GRNS)^8-012^oz.^28.3^100^N
+93 ;;^UTILITY(U,$J,112,2712,1)
+94 ;;=7.2^12.9^75.7^439^1.8^^^20^26.03^53^139^162^765^10.82^.16^.72^^156^0^1.72
+95 ;;^UTILITY(U,$J,112,2712,2)
+96 ;;=2^25.64^13.633^2.978^696^6.574^2.87^.02^0^5.44^3.92^2.89^16^2.4^^^1.3
+97 ;;^UTILITY(U,$J,112,2712,3)
+98 ;;=.07^.239^.299^.74^.231^.125^.137^.38^.303^.372^.578^.19^.437^.678^1.527^.35^.504^.365
+99 ;;^UTILITY(U,$J,112,2712,4)
+100 ;;=.26^1.92^.72^1.34^.02^.5^3.84
+101 ;;^UTILITY(U,$J,112,2712,20)
+102 ;;=USDA Std. Reference, Release 10