FHINI08E ; ; 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,2908,4)
;;=.089^.091^.413^1.149^.107^.499^1.006
;;^UTILITY(U,$J,112,2908,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2909,0)
;;=POTATOES, AU GRATIN, HOME-PREPARED WITH MARGARINE^11-843^cups^244^100^N
;;^UTILITY(U,$J,112,2909,1)
;;=5.06^7.59^11.27^132^74^^^119^.64^20^113^396^433^.69^.16^.161^^264^9.9^.064
;;^UTILITY(U,$J,112,2909,2)
;;=.116^.993^.387^.174^8.1^0^.978^.102^15^3.53^2.587^1.076^38^2.09
;;^UTILITY(U,$J,112,2909,3)
;;=.07^.192^.284^.443^.381^.117^.044^.254^.23^.325^.203^.151^.156^.569^1.141^.113^.463^.275
;;^UTILITY(U,$J,112,2909,4)
;;=.092^.091^.479^1.698^.135^.773^2.388
;;^UTILITY(U,$J,112,2909,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2910,0)
;;=POTATOES, BAKED, FLESH AND SKIN, W/SALT^11-828^potatos^202^100^N
;;^UTILITY(U,$J,112,2910,1)
;;=2.3^.1^25.23^109^71.2^^^10^1.36^27^57^418^244^.32^.305^.229^^0^12.9^.107
;;^UTILITY(U,$J,112,2910,2)
;;=.033^1.645^.555^.347^11^0^.032^.01^0^.026^.002^.043^0^1.16
;;^UTILITY(U,$J,112,2910,3)
;;=.036^.084^.093^.138^.14^.036^.029^.102^.085^.13^.106^.05^.071^.563^.386^.068^.083^.1
;;^UTILITY(U,$J,112,2910,4)
;;=.001^.003^.001^.016^.001^.004^.001
;;^UTILITY(U,$J,112,2910,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2911,0)
;;=POTATOES, BAKED, FLESH, W/SALT^11-829^cups^122^77^N
;;^UTILITY(U,$J,112,2911,1)
;;=1.96^.1^21.56^93^75.42^^^5^.35^25^50^391^241^.29^.215^.161^^0^12.8^.105
;;^UTILITY(U,$J,112,2911,2)
;;=.021^1.395^.555^.301^9.1^0^.032^.01^0^.026^.002^.043^0^.97
;;^UTILITY(U,$J,112,2911,3)
;;=.03^.071^.08^.118^.119^.031^.025^.087^.073^.11^.09^.043^.06^.479^.328^.058^.07^.085
;;^UTILITY(U,$J,112,2911,4)
;;=.001^.003^.001^.016^.001^.004^.001
;;^UTILITY(U,$J,112,2911,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2912,0)
;;=POTATOES, BAKED, FLESH, WO/SALT^11-363^cups^122^77^N
;;^UTILITY(U,$J,112,2912,1)
;;=1.96^.1^21.56^93^75.42^^^5^.35^25^50^391^5^.29^.215^.161^^0^12.8^.105
;;^UTILITY(U,$J,112,2912,2)
;;=.021^1.395^.555^.301^9.1^0^.032^.01^0^.026^.002^.043^0^.97^^^1.5
;;^UTILITY(U,$J,112,2912,3)
;;=.03^.071^.08^.118^.119^.031^.025^.087^.073^.11^.09^.043^.06^.479^.328^.058^.07^.085
;;^UTILITY(U,$J,112,2912,4)
;;=.001^.003^.001^.016^.001^.004^.001^^.22
;;^UTILITY(U,$J,112,2912,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2913,0)
;;=POTATOES, MASHED, DEHYDRATED, FLAKES WO/MILK, DRY FORM^11-378^cups^44^100^N
;;^UTILITY(U,$J,112,2913,1)
;;=8.35^.39^81.21^354^6.51^^^25^1.2^65^154^1084^107^.68^.157^.102^^0^83.6^1.031
;;^UTILITY(U,$J,112,2913,2)
;;=.11^6.146^2.117^.762^40^0^.131^.041^0^.1^.008^.172^0^3.54^^^6.9
;;^UTILITY(U,$J,112,2913,3)
;;=.086^.372^.425^.659^.583^.142^.098^.394^.361^.521^.369^.203^.299^1.293^1.547^.247^.503^.389
;;^UTILITY(U,$J,112,2913,4)
;;=.003^.014^.003^.066^.003^.014^.005^^^26.3
;;^UTILITY(U,$J,112,2913,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2914,0)
;;=POTATOES, MASHED, DEHYDRATED, GRANULES W/MILK, DRY FORM^11-382^cups^200^100^N
;;^UTILITY(U,$J,112,2914,1)
;;=10.9^1.1^77.7^358^6.3^^^142^3.5^74^237^1848^82^1.2^.578^.488^^60^16^.19
;;^UTILITY(U,$J,112,2914,2)
;;=.3^4.2^1.864^.887^29.9^0^.21^.071^2^.461^.152^.285^9^4
;;^UTILITY(U,$J,112,2914,3)
;;=.098^.481^.514^.781^.72^.153^.134^.508^.448^.657^.509^.253^.392^1.978^1.913^.352^.511^.476
;;^UTILITY(U,$J,112,2914,4)
;;=.016^.035^.053^.227^.016^.08^.127
;;^UTILITY(U,$J,112,2914,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2915,0)
;;=POTATOES, MICROWAVED, COOKED IN SKIN, WO/SALT^11-675^potatos^202^100^N
;;^UTILITY(U,$J,112,2915,1)
;;=2.44^.1^24.13^105^72.04^^^11^1.24^27^105^447^8^.36^.334^.292^^0^15.1^.12
;;^UTILITY(U,$J,112,2915,2)
;;=.032^1.714^.454^.344^12^0^.032^.01^0^.026^.002^.043^0^1.18
;;^UTILITY(U,$J,112,2915,3)
;;=.038^.089^.099^.147^.149^.039^.031^.109^.091^.138^.113^.054^.075^.598^.41^.073^.088^.106
;;^UTILITY(U,$J,112,2915,4)
;;=.001^.003^.001^.016^.001^.004^.001
;;^UTILITY(U,$J,112,2915,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2916,0)
;;=POTATOES, MICROWAVED, COOKED IN SKIN, FLESH, W/SALT^11-835^cups^156^77^N
;;^UTILITY(U,$J,112,2916,1)
;;=2.1^.1^23.28^100^73.55^^^5^.41^25^109^411^243^.33^.237^.17^^0^15.1^.129
;;^UTILITY(U,$J,112,2916,2)
;;=.025^1.625^.597^.319^12.4^0^.032^.01^0^.026^.002^.043^0^.97
;;^UTILITY(U,$J,112,2916,3)
;;=.033^.076^.085^.126^.128^.033^.027^.093^.078^.118^.097^.046^.065^.514^.352^.062^.076^.091
;;^UTILITY(U,$J,112,2916,4)
;;=.001^.003^.001^.016^.001^.004^.001
;;^UTILITY(U,$J,112,2916,20)
;;=USDA Std. Reference, Release 10
FHINI08E ; ; 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,2908,4)
+2 ;;=.089^.091^.413^1.149^.107^.499^1.006
+3 ;;^UTILITY(U,$J,112,2908,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,2909,0)
+6 ;;=POTATOES, AU GRATIN, HOME-PREPARED WITH MARGARINE^11-843^cups^244^100^N
+7 ;;^UTILITY(U,$J,112,2909,1)
+8 ;;=5.06^7.59^11.27^132^74^^^119^.64^20^113^396^433^.69^.16^.161^^264^9.9^.064
+9 ;;^UTILITY(U,$J,112,2909,2)
+10 ;;=.116^.993^.387^.174^8.1^0^.978^.102^15^3.53^2.587^1.076^38^2.09
+11 ;;^UTILITY(U,$J,112,2909,3)
+12 ;;=.07^.192^.284^.443^.381^.117^.044^.254^.23^.325^.203^.151^.156^.569^1.141^.113^.463^.275
+13 ;;^UTILITY(U,$J,112,2909,4)
+14 ;;=.092^.091^.479^1.698^.135^.773^2.388
+15 ;;^UTILITY(U,$J,112,2909,20)
+16 ;;=USDA Std. Reference, Release 10
+17 ;;^UTILITY(U,$J,112,2910,0)
+18 ;;=POTATOES, BAKED, FLESH AND SKIN, W/SALT^11-828^potatos^202^100^N
+19 ;;^UTILITY(U,$J,112,2910,1)
+20 ;;=2.3^.1^25.23^109^71.2^^^10^1.36^27^57^418^244^.32^.305^.229^^0^12.9^.107
+21 ;;^UTILITY(U,$J,112,2910,2)
+22 ;;=.033^1.645^.555^.347^11^0^.032^.01^0^.026^.002^.043^0^1.16
+23 ;;^UTILITY(U,$J,112,2910,3)
+24 ;;=.036^.084^.093^.138^.14^.036^.029^.102^.085^.13^.106^.05^.071^.563^.386^.068^.083^.1
+25 ;;^UTILITY(U,$J,112,2910,4)
+26 ;;=.001^.003^.001^.016^.001^.004^.001
+27 ;;^UTILITY(U,$J,112,2910,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,2911,0)
+30 ;;=POTATOES, BAKED, FLESH, W/SALT^11-829^cups^122^77^N
+31 ;;^UTILITY(U,$J,112,2911,1)
+32 ;;=1.96^.1^21.56^93^75.42^^^5^.35^25^50^391^241^.29^.215^.161^^0^12.8^.105
+33 ;;^UTILITY(U,$J,112,2911,2)
+34 ;;=.021^1.395^.555^.301^9.1^0^.032^.01^0^.026^.002^.043^0^.97
+35 ;;^UTILITY(U,$J,112,2911,3)
+36 ;;=.03^.071^.08^.118^.119^.031^.025^.087^.073^.11^.09^.043^.06^.479^.328^.058^.07^.085
+37 ;;^UTILITY(U,$J,112,2911,4)
+38 ;;=.001^.003^.001^.016^.001^.004^.001
+39 ;;^UTILITY(U,$J,112,2911,20)
+40 ;;=USDA Std. Reference, Release 10
+41 ;;^UTILITY(U,$J,112,2912,0)
+42 ;;=POTATOES, BAKED, FLESH, WO/SALT^11-363^cups^122^77^N
+43 ;;^UTILITY(U,$J,112,2912,1)
+44 ;;=1.96^.1^21.56^93^75.42^^^5^.35^25^50^391^5^.29^.215^.161^^0^12.8^.105
+45 ;;^UTILITY(U,$J,112,2912,2)
+46 ;;=.021^1.395^.555^.301^9.1^0^.032^.01^0^.026^.002^.043^0^.97^^^1.5
+47 ;;^UTILITY(U,$J,112,2912,3)
+48 ;;=.03^.071^.08^.118^.119^.031^.025^.087^.073^.11^.09^.043^.06^.479^.328^.058^.07^.085
+49 ;;^UTILITY(U,$J,112,2912,4)
+50 ;;=.001^.003^.001^.016^.001^.004^.001^^.22
+51 ;;^UTILITY(U,$J,112,2912,20)
+52 ;;=USDA Std. Reference, Release 10
+53 ;;^UTILITY(U,$J,112,2913,0)
+54 ;;=POTATOES, MASHED, DEHYDRATED, FLAKES WO/MILK, DRY FORM^11-378^cups^44^100^N
+55 ;;^UTILITY(U,$J,112,2913,1)
+56 ;;=8.35^.39^81.21^354^6.51^^^25^1.2^65^154^1084^107^.68^.157^.102^^0^83.6^1.031
+57 ;;^UTILITY(U,$J,112,2913,2)
+58 ;;=.11^6.146^2.117^.762^40^0^.131^.041^0^.1^.008^.172^0^3.54^^^6.9
+59 ;;^UTILITY(U,$J,112,2913,3)
+60 ;;=.086^.372^.425^.659^.583^.142^.098^.394^.361^.521^.369^.203^.299^1.293^1.547^.247^.503^.389
+61 ;;^UTILITY(U,$J,112,2913,4)
+62 ;;=.003^.014^.003^.066^.003^.014^.005^^^26.3
+63 ;;^UTILITY(U,$J,112,2913,20)
+64 ;;=USDA Std. Reference, Release 10
+65 ;;^UTILITY(U,$J,112,2914,0)
+66 ;;=POTATOES, MASHED, DEHYDRATED, GRANULES W/MILK, DRY FORM^11-382^cups^200^100^N
+67 ;;^UTILITY(U,$J,112,2914,1)
+68 ;;=10.9^1.1^77.7^358^6.3^^^142^3.5^74^237^1848^82^1.2^.578^.488^^60^16^.19
+69 ;;^UTILITY(U,$J,112,2914,2)
+70 ;;=.3^4.2^1.864^.887^29.9^0^.21^.071^2^.461^.152^.285^9^4
+71 ;;^UTILITY(U,$J,112,2914,3)
+72 ;;=.098^.481^.514^.781^.72^.153^.134^.508^.448^.657^.509^.253^.392^1.978^1.913^.352^.511^.476
+73 ;;^UTILITY(U,$J,112,2914,4)
+74 ;;=.016^.035^.053^.227^.016^.08^.127
+75 ;;^UTILITY(U,$J,112,2914,20)
+76 ;;=USDA Std. Reference, Release 10
+77 ;;^UTILITY(U,$J,112,2915,0)
+78 ;;=POTATOES, MICROWAVED, COOKED IN SKIN, WO/SALT^11-675^potatos^202^100^N
+79 ;;^UTILITY(U,$J,112,2915,1)
+80 ;;=2.44^.1^24.13^105^72.04^^^11^1.24^27^105^447^8^.36^.334^.292^^0^15.1^.12
+81 ;;^UTILITY(U,$J,112,2915,2)
+82 ;;=.032^1.714^.454^.344^12^0^.032^.01^0^.026^.002^.043^0^1.18
+83 ;;^UTILITY(U,$J,112,2915,3)
+84 ;;=.038^.089^.099^.147^.149^.039^.031^.109^.091^.138^.113^.054^.075^.598^.41^.073^.088^.106
+85 ;;^UTILITY(U,$J,112,2915,4)
+86 ;;=.001^.003^.001^.016^.001^.004^.001
+87 ;;^UTILITY(U,$J,112,2915,20)
+88 ;;=USDA Std. Reference, Release 10
+89 ;;^UTILITY(U,$J,112,2916,0)
+90 ;;=POTATOES, MICROWAVED, COOKED IN SKIN, FLESH, W/SALT^11-835^cups^156^77^N
+91 ;;^UTILITY(U,$J,112,2916,1)
+92 ;;=2.1^.1^23.28^100^73.55^^^5^.41^25^109^411^243^.33^.237^.17^^0^15.1^.129
+93 ;;^UTILITY(U,$J,112,2916,2)
+94 ;;=.025^1.625^.597^.319^12.4^0^.032^.01^0^.026^.002^.043^0^.97
+95 ;;^UTILITY(U,$J,112,2916,3)
+96 ;;=.033^.076^.085^.126^.128^.033^.027^.093^.078^.118^.097^.046^.065^.514^.352^.062^.076^.091
+97 ;;^UTILITY(U,$J,112,2916,4)
+98 ;;=.001^.003^.001^.016^.001^.004^.001
+99 ;;^UTILITY(U,$J,112,2916,20)
+100 ;;=USDA Std. Reference, Release 10
