FHINI03T ; ; 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,1224,1)
;;=14.1^3.7^7.3^124^72.2^^^11^.4^^167^348^177^^^^^0^0^.07
;;^UTILITY(U,$J,112,1224,2)
;;=.62^2.2^^^^^1^^40^1^^^^2.7
;;^UTILITY(U,$J,112,1224,4)
;;=^^^^^^1
;;^UTILITY(U,$J,112,1224,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1225,0)
;;=FISH STICKS, FRZ, CKD^15-027^sticks^28.35^100^N
;;^UTILITY(U,$J,112,1225,1)
;;=15.65^12.23^23.75^272^46.32^^^20^.74^25^181^261^582^.66^.101^.236^^106^0^.127
;;^UTILITY(U,$J,112,1225,2)
;;=.178^2.129^.333^.06^18.2^1.797^2.738^.172^112^3.149^5.067^3.166^31^2.63^^^0
;;^UTILITY(U,$J,112,1225,3)
;;=.194^.646^.745^1.266^1.123^.424^.227^.699^.538^.835^.847^.419^.832^1.373^3.18^.679^.921^.758
;;^UTILITY(U,$J,112,1225,4)
;;=^^.069^1.868^.058^1.184^4.989^.018^^16.6
;;^UTILITY(U,$J,112,1225,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1226,0)
;;=FLATFISH (FLOUNDER AND SOLE SPECIES), COOKED, DRY HEAT^15-029^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1226,1)
;;=24.16^1.53^0^117^73.16^^^18^.34^58^289^344^105^.63^.026^.02^^38^0^.08
;;^UTILITY(U,$J,112,1226,2)
;;=.114^2.179^.58^.24^9.2^2.509^.014^.016^68^.363^.309^.412^11^1.5^^^0
;;^UTILITY(U,$J,112,1226,3)
;;=.271^1.059^1.113^1.963^2.219^.715^.259^.943^.816^1.245^1.446^.711^1.461^2.474^3.606^1.16^.854^.986
;;^UTILITY(U,$J,112,1226,4)
;;=^^.057^.226^.067^.055^.154^.048^^58.2
;;^UTILITY(U,$J,112,1226,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1227,0)
;;=FROG LEGS, RAW^1020-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1227,1)
;;=16.4^.3^0^73^81.9^^^18^1.5^^147^285^58^^^^^0^0^.14
;;^UTILITY(U,$J,112,1227,2)
;;=.25^1.2^^^^^0^^50^0^^^^1.1
;;^UTILITY(U,$J,112,1227,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1227,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1228,0)
;;=GARLIC, CLOVES, RAW^11-215^cloves^3^87^N
;;^UTILITY(U,$J,112,1228,1)
;;=6.36^.5^33.07^149^58.58^^^181^1.7^25^153^401^17^1.16^.299^1.672^^0^31.2^.2
;;^UTILITY(U,$J,112,1228,2)
;;=.11^.7^.596^1.235^3.1^0^.229^.02^0^.089^.011^.249^0^1.5^^^2.1
;;^UTILITY(U,$J,112,1228,3)
;;=.066^.157^.217^.308^.273^.076^.065^.183^.081^.291^.634^.113^.132^.489^.805^.2^.1^.19
;;^UTILITY(U,$J,112,1228,4)
;;=.002^^^.087^^^.011^^^14.2
;;^UTILITY(U,$J,112,1228,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1229,0)
;;=GELATIN, DRY^19-177^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1229,1)
;;=85.6^.1^0^335^13^^^55^1.11^22^39^16^196^.14^2.161^.105^^0^0^.025
;;^UTILITY(U,$J,112,1229,2)
;;=.23^.085^.125^.007^30^0^0^0^0^.07^.06^.01^0^1.3^^^0
;;^UTILITY(U,$J,112,1229,3)
;;=0^1.475^1.158^2.454^3.46^.606^0^1.737^.303^2.081^6.616^.662^8.009^5.265^8.753^19.049^12.295^2.605
;;^UTILITY(U,$J,112,1229,4)
;;=^0^.01^.04^.01^.03^.05^^^39.5
;;^UTILITY(U,$J,112,1229,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1230,0)
;;=GELATIN, DESSERT POWDER^19-172^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1230,1)
;;=7.8^0^90.5^381^1^^^3^.15^2^142^7^254^.01^.118^.016^^0^0^.002
;;^UTILITY(U,$J,112,1230,2)
;;=.021^.008^.011^.01^3^0^^^0^^^^0^.7^^^0
;;^UTILITY(U,$J,112,1230,3)
;;=0^.151^.118^.251^.354^.062^0^.177^.031^.213^.676^.068^.818^.538^.894^1.947^1.256^.266
;;^UTILITY(U,$J,112,1230,4)
;;=^^^^^^0^^^6.7
;;^UTILITY(U,$J,112,1230,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1231,0)
;;=GELATIN, DESSERT, MADE W/WATER, PLAIN^19-173^cups^240^100^N
;;^UTILITY(U,$J,112,1231,1)
;;=1.2^0^14^59^84.6^^^2^.03^1^22^1^42^.03^.024^.003^^0^0^0
;;^UTILITY(U,$J,112,1231,2)
;;=.003^.001^.002^.002^0^0^^^0^^^^0^.2^^^0
;;^UTILITY(U,$J,112,1231,3)
;;=0^.023^.018^.039^.055^.01^0^.027^.005^.033^.105^.01^.127^.083^.138^.301^.194^.041
;;^UTILITY(U,$J,112,1231,4)
;;=^^^^^^0^^^.3
;;^UTILITY(U,$J,112,1231,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1232,0)
;;=GELATIN, DESSERT, MADE W/WATER, W/FRUIT ADDED^19-174^cups^240^100^N
;;^UTILITY(U,$J,112,1232,1)
;;=1.1^.2^16.9^69^81.5^^^5^.13^7^21^104^28^.05^.051^.039^^28^3.7^.027
;;^UTILITY(U,$J,112,1232,2)
;;=.03^.152^.049^.119^4^0^.04^.01^0^.07^.01^.05^3^.3
;;^UTILITY(U,$J,112,1232,3)
;;=.003^.025^.019^.04^.047^.013^.005^.027^.01^.033^.088^.025^.097^.091^.139^.211^.141^.042
;;^UTILITY(U,$J,112,1232,4)
;;=0^0^0^.06^0^.01^.01
;;^UTILITY(U,$J,112,1232,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1233,0)
;;=GINGER ROOT, CRYSTALLIZED, CANDIED^1034-0^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1233,1)
;;=.3^.2^87.1^340^12^^^230^21^^360^2640^60^^^^^100^40^.2
;;^UTILITY(U,$J,112,1233,2)
;;=.4^7^^^^^0^^0^0^^^^.4
;;^UTILITY(U,$J,112,1233,4)
;;=^^^^^^0
;;^UTILITY(U,$J,112,1233,20)
;;=USDA Std. Reference, Release 8
FHINI03T ; ; 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,1224,1)
+2 ;;=14.1^3.7^7.3^124^72.2^^^11^.4^^167^348^177^^^^^0^0^.07
+3 ;;^UTILITY(U,$J,112,1224,2)
+4 ;;=.62^2.2^^^^^1^^40^1^^^^2.7
+5 ;;^UTILITY(U,$J,112,1224,4)
+6 ;;=^^^^^^1
+7 ;;^UTILITY(U,$J,112,1224,20)
+8 ;;=USDA Std. Reference, Release 8
+9 ;;^UTILITY(U,$J,112,1225,0)
+10 ;;=FISH STICKS, FRZ, CKD^15-027^sticks^28.35^100^N
+11 ;;^UTILITY(U,$J,112,1225,1)
+12 ;;=15.65^12.23^23.75^272^46.32^^^20^.74^25^181^261^582^.66^.101^.236^^106^0^.127
+13 ;;^UTILITY(U,$J,112,1225,2)
+14 ;;=.178^2.129^.333^.06^18.2^1.797^2.738^.172^112^3.149^5.067^3.166^31^2.63^^^0
+15 ;;^UTILITY(U,$J,112,1225,3)
+16 ;;=.194^.646^.745^1.266^1.123^.424^.227^.699^.538^.835^.847^.419^.832^1.373^3.18^.679^.921^.758
+17 ;;^UTILITY(U,$J,112,1225,4)
+18 ;;=^^.069^1.868^.058^1.184^4.989^.018^^16.6
+19 ;;^UTILITY(U,$J,112,1225,20)
+20 ;;=USDA Std. Reference, Release 10
+21 ;;^UTILITY(U,$J,112,1226,0)
+22 ;;=FLATFISH (FLOUNDER AND SOLE SPECIES), COOKED, DRY HEAT^15-029^oz.^28.3^100^N
+23 ;;^UTILITY(U,$J,112,1226,1)
+24 ;;=24.16^1.53^0^117^73.16^^^18^.34^58^289^344^105^.63^.026^.02^^38^0^.08
+25 ;;^UTILITY(U,$J,112,1226,2)
+26 ;;=.114^2.179^.58^.24^9.2^2.509^.014^.016^68^.363^.309^.412^11^1.5^^^0
+27 ;;^UTILITY(U,$J,112,1226,3)
+28 ;;=.271^1.059^1.113^1.963^2.219^.715^.259^.943^.816^1.245^1.446^.711^1.461^2.474^3.606^1.16^.854^.986
+29 ;;^UTILITY(U,$J,112,1226,4)
+30 ;;=^^.057^.226^.067^.055^.154^.048^^58.2
+31 ;;^UTILITY(U,$J,112,1226,20)
+32 ;;=USDA Std. Reference, Release 10
+33 ;;^UTILITY(U,$J,112,1227,0)
+34 ;;=FROG LEGS, RAW^1020-0^oz.^28.3^100^N
+35 ;;^UTILITY(U,$J,112,1227,1)
+36 ;;=16.4^.3^0^73^81.9^^^18^1.5^^147^285^58^^^^^0^0^.14
+37 ;;^UTILITY(U,$J,112,1227,2)
+38 ;;=.25^1.2^^^^^0^^50^0^^^^1.1
+39 ;;^UTILITY(U,$J,112,1227,4)
+40 ;;=^^^^^^0
+41 ;;^UTILITY(U,$J,112,1227,20)
+42 ;;=USDA Std. Reference, Release 8
+43 ;;^UTILITY(U,$J,112,1228,0)
+44 ;;=GARLIC, CLOVES, RAW^11-215^cloves^3^87^N
+45 ;;^UTILITY(U,$J,112,1228,1)
+46 ;;=6.36^.5^33.07^149^58.58^^^181^1.7^25^153^401^17^1.16^.299^1.672^^0^31.2^.2
+47 ;;^UTILITY(U,$J,112,1228,2)
+48 ;;=.11^.7^.596^1.235^3.1^0^.229^.02^0^.089^.011^.249^0^1.5^^^2.1
+49 ;;^UTILITY(U,$J,112,1228,3)
+50 ;;=.066^.157^.217^.308^.273^.076^.065^.183^.081^.291^.634^.113^.132^.489^.805^.2^.1^.19
+51 ;;^UTILITY(U,$J,112,1228,4)
+52 ;;=.002^^^.087^^^.011^^^14.2
+53 ;;^UTILITY(U,$J,112,1228,20)
+54 ;;=USDA Std. Reference, Release 10
+55 ;;^UTILITY(U,$J,112,1229,0)
+56 ;;=GELATIN, DRY^19-177^oz.^28.3^100^N
+57 ;;^UTILITY(U,$J,112,1229,1)
+58 ;;=85.6^.1^0^335^13^^^55^1.11^22^39^16^196^.14^2.161^.105^^0^0^.025
+59 ;;^UTILITY(U,$J,112,1229,2)
+60 ;;=.23^.085^.125^.007^30^0^0^0^0^.07^.06^.01^0^1.3^^^0
+61 ;;^UTILITY(U,$J,112,1229,3)
+62 ;;=0^1.475^1.158^2.454^3.46^.606^0^1.737^.303^2.081^6.616^.662^8.009^5.265^8.753^19.049^12.295^2.605
+63 ;;^UTILITY(U,$J,112,1229,4)
+64 ;;=^0^.01^.04^.01^.03^.05^^^39.5
+65 ;;^UTILITY(U,$J,112,1229,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,1230,0)
+68 ;;=GELATIN, DESSERT POWDER^19-172^oz.^28.3^100^N
+69 ;;^UTILITY(U,$J,112,1230,1)
+70 ;;=7.8^0^90.5^381^1^^^3^.15^2^142^7^254^.01^.118^.016^^0^0^.002
+71 ;;^UTILITY(U,$J,112,1230,2)
+72 ;;=.021^.008^.011^.01^3^0^^^0^^^^0^.7^^^0
+73 ;;^UTILITY(U,$J,112,1230,3)
+74 ;;=0^.151^.118^.251^.354^.062^0^.177^.031^.213^.676^.068^.818^.538^.894^1.947^1.256^.266
+75 ;;^UTILITY(U,$J,112,1230,4)
+76 ;;=^^^^^^0^^^6.7
+77 ;;^UTILITY(U,$J,112,1230,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,1231,0)
+80 ;;=GELATIN, DESSERT, MADE W/WATER, PLAIN^19-173^cups^240^100^N
+81 ;;^UTILITY(U,$J,112,1231,1)
+82 ;;=1.2^0^14^59^84.6^^^2^.03^1^22^1^42^.03^.024^.003^^0^0^0
+83 ;;^UTILITY(U,$J,112,1231,2)
+84 ;;=.003^.001^.002^.002^0^0^^^0^^^^0^.2^^^0
+85 ;;^UTILITY(U,$J,112,1231,3)
+86 ;;=0^.023^.018^.039^.055^.01^0^.027^.005^.033^.105^.01^.127^.083^.138^.301^.194^.041
+87 ;;^UTILITY(U,$J,112,1231,4)
+88 ;;=^^^^^^0^^^.3
+89 ;;^UTILITY(U,$J,112,1231,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,1232,0)
+92 ;;=GELATIN, DESSERT, MADE W/WATER, W/FRUIT ADDED^19-174^cups^240^100^N
+93 ;;^UTILITY(U,$J,112,1232,1)
+94 ;;=1.1^.2^16.9^69^81.5^^^5^.13^7^21^104^28^.05^.051^.039^^28^3.7^.027
+95 ;;^UTILITY(U,$J,112,1232,2)
+96 ;;=.03^.152^.049^.119^4^0^.04^.01^0^.07^.01^.05^3^.3
+97 ;;^UTILITY(U,$J,112,1232,3)
+98 ;;=.003^.025^.019^.04^.047^.013^.005^.027^.01^.033^.088^.025^.097^.091^.139^.211^.141^.042
+99 ;;^UTILITY(U,$J,112,1232,4)
+100 ;;=0^0^0^.06^0^.01^.01
+101 ;;^UTILITY(U,$J,112,1232,20)
+102 ;;=USDA Std. Reference, Release 10
+103 ;;^UTILITY(U,$J,112,1233,0)
+104 ;;=GINGER ROOT, CRYSTALLIZED, CANDIED^1034-0^oz.^28.3^100^N
+105 ;;^UTILITY(U,$J,112,1233,1)
+106 ;;=.3^.2^87.1^340^12^^^230^21^^360^2640^60^^^^^100^40^.2
+107 ;;^UTILITY(U,$J,112,1233,2)
+108 ;;=.4^7^^^^^0^^0^0^^^^.4
+109 ;;^UTILITY(U,$J,112,1233,4)
+110 ;;=^^^^^^0
+111 ;;^UTILITY(U,$J,112,1233,20)
+112 ;;=USDA Std. Reference, Release 8
