FHINI05L ; ; 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,1913,4)
;;=.054^.06^.216^.58^.048^.263^.547
;;^UTILITY(U,$J,112,1913,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1914,0)
;;=SWEET POTATOES, CND, REG PACK, IN SYRUP^11-645^cups^196^100^N
;;^UTILITY(U,$J,112,1914,1)
;;=.98^.2^20.93^89^77.39^^^15^.8^13^27^185^44^.19^.124^.507^^5719^10.5^.024
;;^UTILITY(U,$J,112,1914,2)
;;=.046^.456^.33^.051^6.5^0^.075^.014^0^.043^.008^.089^572^.5^^^1.8
;;^UTILITY(U,$J,112,1914,3)
;;=.012^.049^.049^.072^.048^.024^.008^.059^.04^.064^.046^.018^.054^.168^.096^.044^.043^.051
;;^UTILITY(U,$J,112,1914,4)
;;=^^^.039^^.004^.008
;;^UTILITY(U,$J,112,1914,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1916,0)
;;=SWEET POTATOES, CND, VACUUM OR SOLID PACK^11-512^cups^200^100^N
;;^UTILITY(U,$J,112,1916,1)
;;=1.65^.2^21.13^91^76.03^^^22^.89^22^49^312^53^.18^.139^.455^^7983^26.4^.037
;;^UTILITY(U,$J,112,1916,2)
;;=.057^.741^.523^.19^16.6^0^.075^.014^0^.043^.008^.089^798^1^^^3
;;^UTILITY(U,$J,112,1916,3)
;;=.02^.082^.083^.121^.081^.041^.013^.099^.068^.108^.077^.031^.09^.283^.162^.075^.073^.086
;;^UTILITY(U,$J,112,1916,4)
;;=^^^.039^^.004^.008^^4^.7
;;^UTILITY(U,$J,112,1916,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1917,0)
;;=SWEET POTATOES, DEHYDRATED FLAKES, DRY FORM^2255-0^cups^120^100^N
;;^UTILITY(U,$J,112,1917,1)
;;=4.2^.6^90^379^2.8^^^60^2.2^^80^562^181^^^^^47000^45^.06
;;^UTILITY(U,$J,112,1917,2)
;;=.13^1.3^^^^^0^^0^0^^^^2.4
;;^UTILITY(U,$J,112,1917,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1917,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1918,0)
;;=SWEET POTATOES, DEHYDRATED FLAKED, PREP W/WATER^2256-0^cups^255^100^N
;;^UTILITY(U,$J,112,1918,1)
;;=1^.1^22.6^95^75.7^^^15^.6^^20^140^45^^^^^12000^11^.02
;;^UTILITY(U,$J,112,1918,2)
;;=.03^.3^^^^^0^^0^0^^^^.6
;;^UTILITY(U,$J,112,1918,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1918,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1919,0)
;;=TANGELO JUICE, RAW^2261-0^fl oz.^30.9^100^N
;;^UTILITY(U,$J,112,1919,1)
;;=.5^.1^9.7^41^89.4^^^18^.2^^14^178^1^^^^^420^27^.06
;;^UTILITY(U,$J,112,1919,2)
;;=.02^.1^^^^^0^^0^0^^^^.3
;;^UTILITY(U,$J,112,1919,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1919,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1921,0)
;;=TAPIOCA, PEARL, DRY^20-068^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1921,1)
;;=.19^.02^88.69^341^10.99^^^20^1.58^1^7^11^1^.12^.02^.11^^0^0^.004
;;^UTILITY(U,$J,112,1921,2)
;;=0^0^.135^.008^4^0^^^0^^^^0^.11^^^.5
;;^UTILITY(U,$J,112,1921,3)
;;=.003^.004^.004^.006^.006^.002^.004^.004^.002^.005^.019^.003^.005^.011^.029^.004^.005^.005
;;^UTILITY(U,$J,112,1921,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1922,0)
;;=TAPIOCA DESSERTS, APPLE^2269-0^cups^250^100^N
;;^UTILITY(U,$J,112,1922,1)
;;=.2^.1^29.4^117^70.1^^^3^.2^^4^26^51^^^^^10^0^0
;;^UTILITY(U,$J,112,1922,2)
;;=0^0^^^^^0^^0^0^^^^.2
;;^UTILITY(U,$J,112,1922,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1922,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1923,0)
;;=TAPIOCA DESSERTS, CREAM PUDDING^19-200^cups^165^100^N
;;^UTILITY(U,$J,112,1923,1)
;;=4.7^4.3^17^125^72.9^^^104^.32^13^105^142^190^.49^.016^.01^^207^.6^.036
;;^UTILITY(U,$J,112,1923,2)
;;=.212^.079^.442^.052^9^.37^.25^.05^82^2.18^1.4^.33^57^1.1
;;^UTILITY(U,$J,112,1923,3)
;;=.06^.213^.266^.424^.349^.128^.072^.232^.206^.295^.216^.118^.202^.4^.798^.123^.326^.291
;;^UTILITY(U,$J,112,1923,4)
;;=.07^.08^.28^1.11^.11^.47^1.28^.02
;;^UTILITY(U,$J,112,1923,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1924,0)
;;=SAUCE, TARTAR SAUCE, REGULAR^2273-0^tbsp.^14^100^N
;;^UTILITY(U,$J,112,1924,1)
;;=1.4^57.8^4.2^531^34.4^^^18^.9^^32^78^707^^^^^220^1^.01
;;^UTILITY(U,$J,112,1924,2)
;;=.03^0^^^^^29^^51^11^^^^2.2
;;^UTILITY(U,$J,112,1924,4)
;;=^^^^^^12
;;^UTILITY(U,$J,112,1924,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1925,0)
;;=SAUCE, TARTAR SAUCE, DIETARY, 10 CAL/TSP^2274-0^tbsp.^14^100^N
;;^UTILITY(U,$J,112,1925,1)
;;=.6^22.4^6.7^224^68.1^^^18^.9^^32^78^707^^^^^220^1^.01
;;^UTILITY(U,$J,112,1925,2)
;;=.03^0^^^^^11^^51^4^^^^2.2
;;^UTILITY(U,$J,112,1925,4)
;;=^^^^^^5
;;^UTILITY(U,$J,112,1925,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1926,0)
;;=TEA, INSTANT, CARBOHYDRATE ADDED, DRY POWDER^14-366^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1926,1)
;;=11.7^.4^57^256^5.3^^^55^4.04^363^442^6596^130^3.2^.801^74.042^^0^0^.054
;;^UTILITY(U,$J,112,1926,2)
;;=.693^12.562^3.67^.728^102.9^0^.04^.082^0^.05^.015^.122^0^17.1^^4352^3.7
FHINI05L ; ; 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,1913,4)
+2 ;;=.054^.06^.216^.58^.048^.263^.547
+3 ;;^UTILITY(U,$J,112,1913,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,1914,0)
+6 ;;=SWEET POTATOES, CND, REG PACK, IN SYRUP^11-645^cups^196^100^N
+7 ;;^UTILITY(U,$J,112,1914,1)
+8 ;;=.98^.2^20.93^89^77.39^^^15^.8^13^27^185^44^.19^.124^.507^^5719^10.5^.024
+9 ;;^UTILITY(U,$J,112,1914,2)
+10 ;;=.046^.456^.33^.051^6.5^0^.075^.014^0^.043^.008^.089^572^.5^^^1.8
+11 ;;^UTILITY(U,$J,112,1914,3)
+12 ;;=.012^.049^.049^.072^.048^.024^.008^.059^.04^.064^.046^.018^.054^.168^.096^.044^.043^.051
+13 ;;^UTILITY(U,$J,112,1914,4)
+14 ;;=^^^.039^^.004^.008
+15 ;;^UTILITY(U,$J,112,1914,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,1916,0)
+18 ;;=SWEET POTATOES, CND, VACUUM OR SOLID PACK^11-512^cups^200^100^N
+19 ;;^UTILITY(U,$J,112,1916,1)
+20 ;;=1.65^.2^21.13^91^76.03^^^22^.89^22^49^312^53^.18^.139^.455^^7983^26.4^.037
+21 ;;^UTILITY(U,$J,112,1916,2)
+22 ;;=.057^.741^.523^.19^16.6^0^.075^.014^0^.043^.008^.089^798^1^^^3
+23 ;;^UTILITY(U,$J,112,1916,3)
+24 ;;=.02^.082^.083^.121^.081^.041^.013^.099^.068^.108^.077^.031^.09^.283^.162^.075^.073^.086
+25 ;;^UTILITY(U,$J,112,1916,4)
+26 ;;=^^^.039^^.004^.008^^4^.7
+27 ;;^UTILITY(U,$J,112,1916,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,1917,0)
+30 ;;=SWEET POTATOES, DEHYDRATED FLAKES, DRY FORM^2255-0^cups^120^100^N
+31 ;;^UTILITY(U,$J,112,1917,1)
+32 ;;=4.2^.6^90^379^2.8^^^60^2.2^^80^562^181^^^^^47000^45^.06
+33 ;;^UTILITY(U,$J,112,1917,2)
+34 ;;=.13^1.3^^^^^0^^0^0^^^^2.4
+35 ;;^UTILITY(U,$J,112,1917,4)
+36 ;;=^^^^^^0
+37 ;;^UTILITY(U,$J,112,1917,20)
+38 ;;=USDA Std. Reference, Release 8
+39 ;;^UTILITY(U,$J,112,1918,0)
+40 ;;=SWEET POTATOES, DEHYDRATED FLAKED, PREP W/WATER^2256-0^cups^255^100^N
+41 ;;^UTILITY(U,$J,112,1918,1)
+42 ;;=1^.1^22.6^95^75.7^^^15^.6^^20^140^45^^^^^12000^11^.02
+43 ;;^UTILITY(U,$J,112,1918,2)
+44 ;;=.03^.3^^^^^0^^0^0^^^^.6
+45 ;;^UTILITY(U,$J,112,1918,4)
+46 ;;=^^^^^^0
+47 ;;^UTILITY(U,$J,112,1918,20)
+48 ;;=USDA Std. Reference, Release 8
+49 ;;^UTILITY(U,$J,112,1919,0)
+50 ;;=TANGELO JUICE, RAW^2261-0^fl oz.^30.9^100^N
+51 ;;^UTILITY(U,$J,112,1919,1)
+52 ;;=.5^.1^9.7^41^89.4^^^18^.2^^14^178^1^^^^^420^27^.06
+53 ;;^UTILITY(U,$J,112,1919,2)
+54 ;;=.02^.1^^^^^0^^0^0^^^^.3
+55 ;;^UTILITY(U,$J,112,1919,4)
+56 ;;=^^^^^^0
+57 ;;^UTILITY(U,$J,112,1919,20)
+58 ;;=USDA Std. Reference, Release 8
+59 ;;^UTILITY(U,$J,112,1921,0)
+60 ;;=TAPIOCA, PEARL, DRY^20-068^oz.^28.3^100^N
+61 ;;^UTILITY(U,$J,112,1921,1)
+62 ;;=.19^.02^88.69^341^10.99^^^20^1.58^1^7^11^1^.12^.02^.11^^0^0^.004
+63 ;;^UTILITY(U,$J,112,1921,2)
+64 ;;=0^0^.135^.008^4^0^^^0^^^^0^.11^^^.5
+65 ;;^UTILITY(U,$J,112,1921,3)
+66 ;;=.003^.004^.004^.006^.006^.002^.004^.004^.002^.005^.019^.003^.005^.011^.029^.004^.005^.005
+67 ;;^UTILITY(U,$J,112,1921,20)
+68 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+69 ;;^UTILITY(U,$J,112,1922,0)
+70 ;;=TAPIOCA DESSERTS, APPLE^2269-0^cups^250^100^N
+71 ;;^UTILITY(U,$J,112,1922,1)
+72 ;;=.2^.1^29.4^117^70.1^^^3^.2^^4^26^51^^^^^10^0^0
+73 ;;^UTILITY(U,$J,112,1922,2)
+74 ;;=0^0^^^^^0^^0^0^^^^.2
+75 ;;^UTILITY(U,$J,112,1922,4)
+76 ;;=^^^^^^0
+77 ;;^UTILITY(U,$J,112,1922,20)
+78 ;;=USDA Std. Reference, Release 8
+79 ;;^UTILITY(U,$J,112,1923,0)
+80 ;;=TAPIOCA DESSERTS, CREAM PUDDING^19-200^cups^165^100^N
+81 ;;^UTILITY(U,$J,112,1923,1)
+82 ;;=4.7^4.3^17^125^72.9^^^104^.32^13^105^142^190^.49^.016^.01^^207^.6^.036
+83 ;;^UTILITY(U,$J,112,1923,2)
+84 ;;=.212^.079^.442^.052^9^.37^.25^.05^82^2.18^1.4^.33^57^1.1
+85 ;;^UTILITY(U,$J,112,1923,3)
+86 ;;=.06^.213^.266^.424^.349^.128^.072^.232^.206^.295^.216^.118^.202^.4^.798^.123^.326^.291
+87 ;;^UTILITY(U,$J,112,1923,4)
+88 ;;=.07^.08^.28^1.11^.11^.47^1.28^.02
+89 ;;^UTILITY(U,$J,112,1923,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,1924,0)
+92 ;;=SAUCE, TARTAR SAUCE, REGULAR^2273-0^tbsp.^14^100^N
+93 ;;^UTILITY(U,$J,112,1924,1)
+94 ;;=1.4^57.8^4.2^531^34.4^^^18^.9^^32^78^707^^^^^220^1^.01
+95 ;;^UTILITY(U,$J,112,1924,2)
+96 ;;=.03^0^^^^^29^^51^11^^^^2.2
+97 ;;^UTILITY(U,$J,112,1924,4)
+98 ;;=^^^^^^12
+99 ;;^UTILITY(U,$J,112,1924,20)
+100 ;;=USDA Std. Reference, Release 8
+101 ;;^UTILITY(U,$J,112,1925,0)
+102 ;;=SAUCE, TARTAR SAUCE, DIETARY, 10 CAL/TSP^2274-0^tbsp.^14^100^N
+103 ;;^UTILITY(U,$J,112,1925,1)
+104 ;;=.6^22.4^6.7^224^68.1^^^18^.9^^32^78^707^^^^^220^1^.01
+105 ;;^UTILITY(U,$J,112,1925,2)
+106 ;;=.03^0^^^^^11^^51^4^^^^2.2
+107 ;;^UTILITY(U,$J,112,1925,4)
+108 ;;=^^^^^^5
+109 ;;^UTILITY(U,$J,112,1925,20)
+110 ;;=USDA Std. Reference, Release 8
+111 ;;^UTILITY(U,$J,112,1926,0)
+112 ;;=TEA, INSTANT, CARBOHYDRATE ADDED, DRY POWDER^14-366^oz.^28.3^100^N
+113 ;;^UTILITY(U,$J,112,1926,1)
+114 ;;=11.7^.4^57^256^5.3^^^55^4.04^363^442^6596^130^3.2^.801^74.042^^0^0^.054
+115 ;;^UTILITY(U,$J,112,1926,2)
+116 ;;=.693^12.562^3.67^.728^102.9^0^.04^.082^0^.05^.015^.122^0^17.1^^4352^3.7
