FHINI07R ; ; 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,2692,3)
;;=.06^.138^.182^.332^.165^.084^.087^.221^.148^.208^.176^.101^.143^.218^1.397^.146^.498^.231
;;^UTILITY(U,$J,112,2692,4)
;;=.001^.001^.013^1.086^.043^.529^4.488
;;^UTILITY(U,$J,112,2692,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2693,0)
;;=CAKEMIX, YELLOW, DRY^18-144^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2693,1)
;;=4.4^11.6^78.1^432^3.7^^^135^1.5^10^310^82^657^.27^.072^.191^^1^.2^.193
;;^UTILITY(U,$J,112,2693,2)
;;=.2^1.778^.364^.077^9^.12^4.051^.3^2^1.732^4.842^4.351^0^2.3
;;^UTILITY(U,$J,112,2693,3)
;;=.061^.137^.187^.325^.197^.081^.079^.204^.144^.213^.162^.094^.134^.216^1.288^.132^.463^.228
;;^UTILITY(U,$J,112,2693,4)
;;=.001^.001^.014^1.148^.046^.565^4.796
;;^UTILITY(U,$J,112,2693,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2694,0)
;;=BEVERAGE, LOW CAL, COLA, W/ ASPARTAME^14-416^floz.^29.6^100^N
;;^UTILITY(U,$J,112,2694,1)
;;=.1^0^.1^1^99.8^^^4^.03^1^9^0^6^.08^.011^.035^^0^0^.005
;;^UTILITY(U,$J,112,2694,2)
;;=.023^0^0^0^0^0^0^0^0^0^0^0^0^0^^14^0
;;^UTILITY(U,$J,112,2694,4)
;;=0^0^0^0^0^0^0^0^.005
;;^UTILITY(U,$J,112,2694,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2695,0)
;;=BEVERAGE, PEPPER TYPE^14-153^floz.^30.7^100^N
;;^UTILITY(U,$J,112,2695,1)
;;=0^.1^10.4^41^89.4^^^3^.04^0^11^1^10^.04^.006^.035^^0^0^0
;;^UTILITY(U,$J,112,2695,2)
;;=0^0^0^0^0^0^0^^0^.07^^^0^0^^10^0
;;^UTILITY(U,$J,112,2695,3)
;;=0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0
;;^UTILITY(U,$J,112,2695,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,2695,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2696,0)
;;=CARDOON, BOILED, DRAINED, W/SALT^11-756^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2696,1)
;;=.76^.11^5.33^22^93.46^^^72^.73^43^23^392^412^.18^.029^.133^^118^1.7^.018
;;^UTILITY(U,$J,112,2696,2)
;;=.031^.294^.097^.042^21.6^0^.044^^0^.012^.02^.044^12^.34
;;^UTILITY(U,$J,112,2696,4)
;;=^^^.01^0^.002^.02
;;^UTILITY(U,$J,112,2696,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2697,0)
;;=CARDOON, BOILED, DRAINED, WO/SALT^11-123^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2697,1)
;;=.76^.11^5.33^22^93.46^^^72^.73^43^23^392^176^.18^.029^.133^^118^1.7^.018
;;^UTILITY(U,$J,112,2697,2)
;;=.031^.294^.097^.042^21.6^0^.044^^0^.012^.02^.044^12^.34
;;^UTILITY(U,$J,112,2697,4)
;;=^^^.01^0^.002^.02
;;^UTILITY(U,$J,112,2697,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2698,0)
;;=CARDOON, RAW^11-122^cups^178^49^N
;;^UTILITY(U,$J,112,2698,1)
;;=.7^.1^4.89^20^94^^^70^.7^42^23^400^170^.17^.028^.128^^120^2^.02
;;^UTILITY(U,$J,112,2698,2)
;;=.03^.3^.099^.043^28.3^0^.041^^0^.011^.018^.041^12^.31^^^1.6
;;^UTILITY(U,$J,112,2698,4)
;;=^^^.009^0^.002^.018
;;^UTILITY(U,$J,112,2698,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2699,0)
;;=CARIBOU, ROASTED^17-163^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2699,1)
;;=29.77^4.42^0^167^62.43^^^22^6.17^27^233^310^60^5.26^.263^.087^^0^3^.25
;;^UTILITY(U,$J,112,2699,2)
;;=.9^5.79^2.68^.32^5^6.64^.31^.03^109^1.7^1.33^.62^0^1.5^^^0
;;^UTILITY(U,$J,112,2699,3)
;;=.458^1.273^1.347^2.457^2.697^.665^.214^1.324^.976^1.399^1.771^1.179^1.593^2.633^4.673^1.249^.925^1.047
;;^UTILITY(U,$J,112,2699,4)
;;=^^.12^.89^.11^.59^1.22^.18
;;^UTILITY(U,$J,112,2699,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2700,0)
;;=CAROB FLAVOR BEVERAGE MIX, POWDER^14-168^tsp.^4^100^N
;;^UTILITY(U,$J,112,2700,1)
;;=1.8^.2^93.3^372^2.9^^^32^4.6^5^7^104^103^.08^.06^.063^^0^0^.009
;;^UTILITY(U,$J,112,2700,2)
;;=.001^.76^.006^.124^0^0^.066^.002^0^.03^.06^.068^0^1.9
;;^UTILITY(U,$J,112,2700,4)
;;=^^0^.024^.001^.005^.059
;;^UTILITY(U,$J,112,2700,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2701,0)
;;=CAROB FLAVOR BEVERAGE MIX, PREPARED FROM POWDER WITH MILK^14-169^cups^256^100^N
;;^UTILITY(U,$J,112,2701,1)
;;=3.2^3.2^8.8^76^84^^^114^.26^13^89^144^52^.36^.009^.002^^120^.9^.037
;;^UTILITY(U,$J,112,2701,2)
;;=.154^.116^.299^.046^4.8^.34^.075^.047^13^1.983^.923^.121^30^.8
;;^UTILITY(U,$J,112,2701,3)
;;=.044^.142^.19^.307^.249^.079^.029^.152^.152^.21^.113^.085^.108^.238^.657^.067^.304^.171
;;^UTILITY(U,$J,112,2701,4)
;;=.08^.09^.32^.839^.072^.386^.803
;;^UTILITY(U,$J,112,2701,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2702,0)
;;=CARP, COOKED, DRY HEAT^15-009^oz.^28.3^100^N
;;^UTILITY(U,$J,112,2702,1)
;;=22.86^7.17^0^162^69.63^^^52^1.59^38^531^427^63^1.9^.073^.05^^32^1.6^.14
;;^UTILITY(U,$J,112,2702,2)
;;=.07^2.1^.87^.219^17.3^1.471^.663^.346^84^1.388^2.985^1.835^9^1.87^^^0
;;^UTILITY(U,$J,112,2702,3)
;;=.256^1.002^1.054^1.858^2.1^.677^.245^.893^.772^1.178^1.368^.673^1.383^2.341^3.413^1.097^.808^.933
FHINI07R ; ; 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,2692,3)
+2 ;;=.06^.138^.182^.332^.165^.084^.087^.221^.148^.208^.176^.101^.143^.218^1.397^.146^.498^.231
+3 ;;^UTILITY(U,$J,112,2692,4)
+4 ;;=.001^.001^.013^1.086^.043^.529^4.488
+5 ;;^UTILITY(U,$J,112,2692,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,2693,0)
+8 ;;=CAKEMIX, YELLOW, DRY^18-144^oz.^28.3^100^N
+9 ;;^UTILITY(U,$J,112,2693,1)
+10 ;;=4.4^11.6^78.1^432^3.7^^^135^1.5^10^310^82^657^.27^.072^.191^^1^.2^.193
+11 ;;^UTILITY(U,$J,112,2693,2)
+12 ;;=.2^1.778^.364^.077^9^.12^4.051^.3^2^1.732^4.842^4.351^0^2.3
+13 ;;^UTILITY(U,$J,112,2693,3)
+14 ;;=.061^.137^.187^.325^.197^.081^.079^.204^.144^.213^.162^.094^.134^.216^1.288^.132^.463^.228
+15 ;;^UTILITY(U,$J,112,2693,4)
+16 ;;=.001^.001^.014^1.148^.046^.565^4.796
+17 ;;^UTILITY(U,$J,112,2693,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,2694,0)
+20 ;;=BEVERAGE, LOW CAL, COLA, W/ ASPARTAME^14-416^floz.^29.6^100^N
+21 ;;^UTILITY(U,$J,112,2694,1)
+22 ;;=.1^0^.1^1^99.8^^^4^.03^1^9^0^6^.08^.011^.035^^0^0^.005
+23 ;;^UTILITY(U,$J,112,2694,2)
+24 ;;=.023^0^0^0^0^0^0^0^0^0^0^0^0^0^^14^0
+25 ;;^UTILITY(U,$J,112,2694,4)
+26 ;;=0^0^0^0^0^0^0^0^.005
+27 ;;^UTILITY(U,$J,112,2694,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,2695,0)
+30 ;;=BEVERAGE, PEPPER TYPE^14-153^floz.^30.7^100^N
+31 ;;^UTILITY(U,$J,112,2695,1)
+32 ;;=0^.1^10.4^41^89.4^^^3^.04^0^11^1^10^.04^.006^.035^^0^0^0
+33 ;;^UTILITY(U,$J,112,2695,2)
+34 ;;=0^0^0^0^0^0^0^^0^.07^^^0^0^^10^0
+35 ;;^UTILITY(U,$J,112,2695,3)
+36 ;;=0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0^0
+37 ;;^UTILITY(U,$J,112,2695,4)
+38 ;;=^^^^^^0
+39 ;;^UTILITY(U,$J,112,2695,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2696,0)
+42 ;;=CARDOON, BOILED, DRAINED, W/SALT^11-756^oz.^28.3^100^N
+43 ;;^UTILITY(U,$J,112,2696,1)
+44 ;;=.76^.11^5.33^22^93.46^^^72^.73^43^23^392^412^.18^.029^.133^^118^1.7^.018
+45 ;;^UTILITY(U,$J,112,2696,2)
+46 ;;=.031^.294^.097^.042^21.6^0^.044^^0^.012^.02^.044^12^.34
+47 ;;^UTILITY(U,$J,112,2696,4)
+48 ;;=^^^.01^0^.002^.02
+49 ;;^UTILITY(U,$J,112,2696,20)
+50 ;;=USDA Std. Reference, Release 10
+51 ;;^UTILITY(U,$J,112,2697,0)
+52 ;;=CARDOON, BOILED, DRAINED, WO/SALT^11-123^oz.^28.3^100^N
+53 ;;^UTILITY(U,$J,112,2697,1)
+54 ;;=.76^.11^5.33^22^93.46^^^72^.73^43^23^392^176^.18^.029^.133^^118^1.7^.018
+55 ;;^UTILITY(U,$J,112,2697,2)
+56 ;;=.031^.294^.097^.042^21.6^0^.044^^0^.012^.02^.044^12^.34
+57 ;;^UTILITY(U,$J,112,2697,4)
+58 ;;=^^^.01^0^.002^.02
+59 ;;^UTILITY(U,$J,112,2697,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2698,0)
+62 ;;=CARDOON, RAW^11-122^cups^178^49^N
+63 ;;^UTILITY(U,$J,112,2698,1)
+64 ;;=.7^.1^4.89^20^94^^^70^.7^42^23^400^170^.17^.028^.128^^120^2^.02
+65 ;;^UTILITY(U,$J,112,2698,2)
+66 ;;=.03^.3^.099^.043^28.3^0^.041^^0^.011^.018^.041^12^.31^^^1.6
+67 ;;^UTILITY(U,$J,112,2698,4)
+68 ;;=^^^.009^0^.002^.018
+69 ;;^UTILITY(U,$J,112,2698,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,2699,0)
+72 ;;=CARIBOU, ROASTED^17-163^oz.^28.3^100^N
+73 ;;^UTILITY(U,$J,112,2699,1)
+74 ;;=29.77^4.42^0^167^62.43^^^22^6.17^27^233^310^60^5.26^.263^.087^^0^3^.25
+75 ;;^UTILITY(U,$J,112,2699,2)
+76 ;;=.9^5.79^2.68^.32^5^6.64^.31^.03^109^1.7^1.33^.62^0^1.5^^^0
+77 ;;^UTILITY(U,$J,112,2699,3)
+78 ;;=.458^1.273^1.347^2.457^2.697^.665^.214^1.324^.976^1.399^1.771^1.179^1.593^2.633^4.673^1.249^.925^1.047
+79 ;;^UTILITY(U,$J,112,2699,4)
+80 ;;=^^.12^.89^.11^.59^1.22^.18
+81 ;;^UTILITY(U,$J,112,2699,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,2700,0)
+84 ;;=CAROB FLAVOR BEVERAGE MIX, POWDER^14-168^tsp.^4^100^N
+85 ;;^UTILITY(U,$J,112,2700,1)
+86 ;;=1.8^.2^93.3^372^2.9^^^32^4.6^5^7^104^103^.08^.06^.063^^0^0^.009
+87 ;;^UTILITY(U,$J,112,2700,2)
+88 ;;=.001^.76^.006^.124^0^0^.066^.002^0^.03^.06^.068^0^1.9
+89 ;;^UTILITY(U,$J,112,2700,4)
+90 ;;=^^0^.024^.001^.005^.059
+91 ;;^UTILITY(U,$J,112,2700,20)
+92 ;;=USDA Std. Reference, Release 10
+93 ;;^UTILITY(U,$J,112,2701,0)
+94 ;;=CAROB FLAVOR BEVERAGE MIX, PREPARED FROM POWDER WITH MILK^14-169^cups^256^100^N
+95 ;;^UTILITY(U,$J,112,2701,1)
+96 ;;=3.2^3.2^8.8^76^84^^^114^.26^13^89^144^52^.36^.009^.002^^120^.9^.037
+97 ;;^UTILITY(U,$J,112,2701,2)
+98 ;;=.154^.116^.299^.046^4.8^.34^.075^.047^13^1.983^.923^.121^30^.8
+99 ;;^UTILITY(U,$J,112,2701,3)
+100 ;;=.044^.142^.19^.307^.249^.079^.029^.152^.152^.21^.113^.085^.108^.238^.657^.067^.304^.171
+101 ;;^UTILITY(U,$J,112,2701,4)
+102 ;;=.08^.09^.32^.839^.072^.386^.803
+103 ;;^UTILITY(U,$J,112,2701,20)
+104 ;;=USDA Std. Reference, Release 10
+105 ;;^UTILITY(U,$J,112,2702,0)
+106 ;;=CARP, COOKED, DRY HEAT^15-009^oz.^28.3^100^N
+107 ;;^UTILITY(U,$J,112,2702,1)
+108 ;;=22.86^7.17^0^162^69.63^^^52^1.59^38^531^427^63^1.9^.073^.05^^32^1.6^.14
+109 ;;^UTILITY(U,$J,112,2702,2)
+110 ;;=.07^2.1^.87^.219^17.3^1.471^.663^.346^84^1.388^2.985^1.835^9^1.87^^^0
+111 ;;^UTILITY(U,$J,112,2702,3)
+112 ;;=.256^1.002^1.054^1.858^2.1^.677^.245^.893^.772^1.178^1.368^.673^1.383^2.341^3.413^1.097^.808^.933
