FHINI04J ; ; 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,1515,1)
;;=2.87^3.68^10.78^86^80.94^^^57^.57^19^63^378^335^.4^.163^.166^^135^10.6^.069
;;^UTILITY(U,$J,112,1515,2)
;;=.092^1.053^.514^.178^8.7^0^.105^.061^12^2.255^1.039^.166^19^1.73^^^1.9
;;^UTILITY(U,$J,112,1515,3)
;;=.042^.115^.144^.225^.192^.058^.034^.135^.121^.174^.118^.07^.094^.442^.579^.076^.202^.142
;;^UTILITY(U,$J,112,1515,4)
;;=.091^.103^.362^.958^.08^.44^.904
;;^UTILITY(U,$J,112,1515,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1516,0)
;;=POTATOES, CND WO/SALT^11-376^cups^180^100^N
;;^UTILITY(U,$J,112,1516,1)
;;=1.41^.21^13.61^60^84.28^^^5^1.26^14^28^229^260^.28^.057^.097^^0^5.1^.068
;;^UTILITY(U,$J,112,1516,2)
;;=.013^.915^.354^.188^6.2^0^.066^.021^0^.054^.005^.089^0^.86
;;^UTILITY(U,$J,112,1516,3)
;;=.022^.051^.057^.085^.086^.022^.018^.063^.052^.08^.065^.031^.043^.346^.237^.042^.051^.061
;;^UTILITY(U,$J,112,1516,4)
;;=.001^.007^.001^.033^.002^.007^.002^^^.9
;;^UTILITY(U,$J,112,1516,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1518,0)
;;=POTATOES, MASHED, PREP FR FLAKES W/MILK & MARG^11-379^cups^210^100^N
;;^UTILITY(U,$J,112,1518,1)
;;=1.9^5.6^15.02^113^76.3^^^49^.22^18^56^233^332^.18^.016^.114^^180^9.7^.111
;;^UTILITY(U,$J,112,1518,2)
;;=.05^.67^.12^.009^7.4^.078^.156^.092^14^3.434^1.583^.248^21^1.18^^^2.3
;;^UTILITY(U,$J,112,1518,3)
;;=.019^.085^.097^.15^.133^.032^.022^.09^.082^.119^.084^.046^.068^.294^.352^.056^.114^.088
;;^UTILITY(U,$J,112,1518,4)
;;=.138^.157^.552^1.458^.122^.67^1.378^^^1.4
;;^UTILITY(U,$J,112,1518,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1519,0)
;;=POTATO GRANULES, DRY FORM^11-380^cups^200^100^N
;;^UTILITY(U,$J,112,1519,1)
;;=8.22^.54^85.51^372^3.63^^^41^1.09^98^245^703^67^.91^.102^1.121^^9^37^.453
;;^UTILITY(U,$J,112,1519,2)
;;=.253^4.765^.345^.861^40^0^.18^.057^0^.138^.011^.238^1^2.1
;;^UTILITY(U,$J,112,1519,3)
;;=.084^.366^.418^.649^.574^.139^.096^.388^.355^.513^.363^.2^.295^1.272^1.522^.243^.495^.383
;;^UTILITY(U,$J,112,1519,4)
;;=.003^.019^.004^.091^.005^.02^.006
;;^UTILITY(U,$J,112,1519,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1520,0)
;;=POTATOES, MASHED, PREP FR GRAN W/MILK & MARG^11-381^cups^210^100^N
;;^UTILITY(U,$J,112,1520,1)
;;=2.05^4.96^14.36^108^77.49^^^35^.19^19^60^144^257^.25^.022^.003^^185^6^.079
;;^UTILITY(U,$J,112,1520,2)
;;=.077^.764^.128^.009^8^0^.144^.083^14^3.056^1.405^.227^19^1.14
;;^UTILITY(U,$J,112,1520,3)
;;=.023^.09^.11^.173^.147^.04^.022^.096^.091^.129^.083^.051^.071^.254^.39^.053^.148^.099
;;^UTILITY(U,$J,112,1520,4)
;;=.125^.144^.51^1.355^.115^.624^1.29^0
;;^UTILITY(U,$J,112,1520,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1522,0)
;;=POTATOES, MASHED, PREP FR GRAN W/MILK, WATER & MARG^11-383^cups^210^100^N
;;^UTILITY(U,$J,112,1522,1)
;;=2^2.2^13.1^79^81.4^^^31^.6^16^44^335^234^.25^.121^.102^^90^3^.03
;;^UTILITY(U,$J,112,1522,2)
;;=.05^.8^.411^.201^7.1^0^.542^.086^2^.679^.643^.632^13^1.3
;;^UTILITY(U,$J,112,1522,3)
;;=.018^.088^.094^.143^.132^.028^.025^.093^.082^.121^.093^.046^.072^.363^.351^.065^.094^.087
;;^UTILITY(U,$J,112,1522,4)
;;=.016^.035^.056^.361^.016^.161^.618
;;^UTILITY(U,$J,112,1522,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1524,0)
;;=POTATOES, FRZ, DICED, HASH BROWNED^11-391^cups^155^100^N
;;^UTILITY(U,$J,112,1524,1)
;;=3.16^11.5^28.1^218^56.1^^^15^1.51^17^72^436^34^.32^.152^.223^^0^6.3^.111
;;^UTILITY(U,$J,112,1524,2)
;;=.02^2.421^.446^.126^6.5^0^1.198^.126^^4.493^5.137^1.325^0^1.14^^^2
;;^UTILITY(U,$J,112,1524,3)
;;=.042^.143^.136^.19^.168^.035^.02^.135^.079^.161^.149^.053^.109^.731^.493^.114^.102^.114
;;^UTILITY(U,$J,112,1524,4)
;;=.012^.027^.149^2.728^.308^1.541^4.692
;;^UTILITY(U,$J,112,1524,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1525,0)
;;=POTATOES, FRZ, FRENCH FRIED, HEATED, WO/SALT ADDED^11-403^strips^5^100^N
;;^UTILITY(U,$J,112,1525,1)
;;=3.46^8.75^33.9^222^52.9^^^9^1.33^22^86^457^31^.41^.163^.295^^0^10.9^.122
;;^UTILITY(U,$J,112,1525,2)
;;=.03^2.3^.658^.232^16.5^0^.657^^0^4.158^3.554^.657^0^.98^^^3.2
;;^UTILITY(U,$J,112,1525,3)
;;=.047^.157^.149^.209^.184^.039^.022^.148^.087^.176^.164^.058^.12^.802^.541^.125^.111^.125
;;^UTILITY(U,$J,112,1525,4)
;;=^^^3.554^^.604^3.554^^5^.4
;;^UTILITY(U,$J,112,1525,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1529,0)
;;=POTATO CHIPS^11-411^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1529,1)
;;=6.42^35.38^51.86^523^2.53^^^24^1.19^59^153^1298^469^1.06^.201^.441^^0^41.6^.145
;;^UTILITY(U,$J,112,1529,2)
;;=.02^4.194^.402^.508^45.2^0^18.031^.07^0^9.067^6.232^18.171^0^3.81^^^4.8
FHINI04J ; ; 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,1515,1)
+2 ;;=2.87^3.68^10.78^86^80.94^^^57^.57^19^63^378^335^.4^.163^.166^^135^10.6^.069
+3 ;;^UTILITY(U,$J,112,1515,2)
+4 ;;=.092^1.053^.514^.178^8.7^0^.105^.061^12^2.255^1.039^.166^19^1.73^^^1.9
+5 ;;^UTILITY(U,$J,112,1515,3)
+6 ;;=.042^.115^.144^.225^.192^.058^.034^.135^.121^.174^.118^.07^.094^.442^.579^.076^.202^.142
+7 ;;^UTILITY(U,$J,112,1515,4)
+8 ;;=.091^.103^.362^.958^.08^.44^.904
+9 ;;^UTILITY(U,$J,112,1515,20)
+10 ;;=USDA Std. Reference, Release 10
+11 ;;^UTILITY(U,$J,112,1516,0)
+12 ;;=POTATOES, CND WO/SALT^11-376^cups^180^100^N
+13 ;;^UTILITY(U,$J,112,1516,1)
+14 ;;=1.41^.21^13.61^60^84.28^^^5^1.26^14^28^229^260^.28^.057^.097^^0^5.1^.068
+15 ;;^UTILITY(U,$J,112,1516,2)
+16 ;;=.013^.915^.354^.188^6.2^0^.066^.021^0^.054^.005^.089^0^.86
+17 ;;^UTILITY(U,$J,112,1516,3)
+18 ;;=.022^.051^.057^.085^.086^.022^.018^.063^.052^.08^.065^.031^.043^.346^.237^.042^.051^.061
+19 ;;^UTILITY(U,$J,112,1516,4)
+20 ;;=.001^.007^.001^.033^.002^.007^.002^^^.9
+21 ;;^UTILITY(U,$J,112,1516,20)
+22 ;;=USDA Std. Reference, Release 10
+23 ;;^UTILITY(U,$J,112,1518,0)
+24 ;;=POTATOES, MASHED, PREP FR FLAKES W/MILK & MARG^11-379^cups^210^100^N
+25 ;;^UTILITY(U,$J,112,1518,1)
+26 ;;=1.9^5.6^15.02^113^76.3^^^49^.22^18^56^233^332^.18^.016^.114^^180^9.7^.111
+27 ;;^UTILITY(U,$J,112,1518,2)
+28 ;;=.05^.67^.12^.009^7.4^.078^.156^.092^14^3.434^1.583^.248^21^1.18^^^2.3
+29 ;;^UTILITY(U,$J,112,1518,3)
+30 ;;=.019^.085^.097^.15^.133^.032^.022^.09^.082^.119^.084^.046^.068^.294^.352^.056^.114^.088
+31 ;;^UTILITY(U,$J,112,1518,4)
+32 ;;=.138^.157^.552^1.458^.122^.67^1.378^^^1.4
+33 ;;^UTILITY(U,$J,112,1518,20)
+34 ;;=USDA Std. Reference, Release 10
+35 ;;^UTILITY(U,$J,112,1519,0)
+36 ;;=POTATO GRANULES, DRY FORM^11-380^cups^200^100^N
+37 ;;^UTILITY(U,$J,112,1519,1)
+38 ;;=8.22^.54^85.51^372^3.63^^^41^1.09^98^245^703^67^.91^.102^1.121^^9^37^.453
+39 ;;^UTILITY(U,$J,112,1519,2)
+40 ;;=.253^4.765^.345^.861^40^0^.18^.057^0^.138^.011^.238^1^2.1
+41 ;;^UTILITY(U,$J,112,1519,3)
+42 ;;=.084^.366^.418^.649^.574^.139^.096^.388^.355^.513^.363^.2^.295^1.272^1.522^.243^.495^.383
+43 ;;^UTILITY(U,$J,112,1519,4)
+44 ;;=.003^.019^.004^.091^.005^.02^.006
+45 ;;^UTILITY(U,$J,112,1519,20)
+46 ;;=USDA Std. Reference, Release 10
+47 ;;^UTILITY(U,$J,112,1520,0)
+48 ;;=POTATOES, MASHED, PREP FR GRAN W/MILK & MARG^11-381^cups^210^100^N
+49 ;;^UTILITY(U,$J,112,1520,1)
+50 ;;=2.05^4.96^14.36^108^77.49^^^35^.19^19^60^144^257^.25^.022^.003^^185^6^.079
+51 ;;^UTILITY(U,$J,112,1520,2)
+52 ;;=.077^.764^.128^.009^8^0^.144^.083^14^3.056^1.405^.227^19^1.14
+53 ;;^UTILITY(U,$J,112,1520,3)
+54 ;;=.023^.09^.11^.173^.147^.04^.022^.096^.091^.129^.083^.051^.071^.254^.39^.053^.148^.099
+55 ;;^UTILITY(U,$J,112,1520,4)
+56 ;;=.125^.144^.51^1.355^.115^.624^1.29^0
+57 ;;^UTILITY(U,$J,112,1520,20)
+58 ;;=USDA Std. Reference, Release 10
+59 ;;^UTILITY(U,$J,112,1522,0)
+60 ;;=POTATOES, MASHED, PREP FR GRAN W/MILK, WATER & MARG^11-383^cups^210^100^N
+61 ;;^UTILITY(U,$J,112,1522,1)
+62 ;;=2^2.2^13.1^79^81.4^^^31^.6^16^44^335^234^.25^.121^.102^^90^3^.03
+63 ;;^UTILITY(U,$J,112,1522,2)
+64 ;;=.05^.8^.411^.201^7.1^0^.542^.086^2^.679^.643^.632^13^1.3
+65 ;;^UTILITY(U,$J,112,1522,3)
+66 ;;=.018^.088^.094^.143^.132^.028^.025^.093^.082^.121^.093^.046^.072^.363^.351^.065^.094^.087
+67 ;;^UTILITY(U,$J,112,1522,4)
+68 ;;=.016^.035^.056^.361^.016^.161^.618
+69 ;;^UTILITY(U,$J,112,1522,20)
+70 ;;=USDA Std. Reference, Release 10
+71 ;;^UTILITY(U,$J,112,1524,0)
+72 ;;=POTATOES, FRZ, DICED, HASH BROWNED^11-391^cups^155^100^N
+73 ;;^UTILITY(U,$J,112,1524,1)
+74 ;;=3.16^11.5^28.1^218^56.1^^^15^1.51^17^72^436^34^.32^.152^.223^^0^6.3^.111
+75 ;;^UTILITY(U,$J,112,1524,2)
+76 ;;=.02^2.421^.446^.126^6.5^0^1.198^.126^^4.493^5.137^1.325^0^1.14^^^2
+77 ;;^UTILITY(U,$J,112,1524,3)
+78 ;;=.042^.143^.136^.19^.168^.035^.02^.135^.079^.161^.149^.053^.109^.731^.493^.114^.102^.114
+79 ;;^UTILITY(U,$J,112,1524,4)
+80 ;;=.012^.027^.149^2.728^.308^1.541^4.692
+81 ;;^UTILITY(U,$J,112,1524,20)
+82 ;;=USDA Std. Reference, Release 10
+83 ;;^UTILITY(U,$J,112,1525,0)
+84 ;;=POTATOES, FRZ, FRENCH FRIED, HEATED, WO/SALT ADDED^11-403^strips^5^100^N
+85 ;;^UTILITY(U,$J,112,1525,1)
+86 ;;=3.46^8.75^33.9^222^52.9^^^9^1.33^22^86^457^31^.41^.163^.295^^0^10.9^.122
+87 ;;^UTILITY(U,$J,112,1525,2)
+88 ;;=.03^2.3^.658^.232^16.5^0^.657^^0^4.158^3.554^.657^0^.98^^^3.2
+89 ;;^UTILITY(U,$J,112,1525,3)
+90 ;;=.047^.157^.149^.209^.184^.039^.022^.148^.087^.176^.164^.058^.12^.802^.541^.125^.111^.125
+91 ;;^UTILITY(U,$J,112,1525,4)
+92 ;;=^^^3.554^^.604^3.554^^5^.4
+93 ;;^UTILITY(U,$J,112,1525,20)
+94 ;;=USDA Std. Reference, Release 10
+95 ;;^UTILITY(U,$J,112,1529,0)
+96 ;;=POTATO CHIPS^11-411^oz.^28.3^100^N
+97 ;;^UTILITY(U,$J,112,1529,1)
+98 ;;=6.42^35.38^51.86^523^2.53^^^24^1.19^59^153^1298^469^1.06^.201^.441^^0^41.6^.145
+99 ;;^UTILITY(U,$J,112,1529,2)
+100 ;;=.02^4.194^.402^.508^45.2^0^18.031^.07^0^9.067^6.232^18.171^0^3.81^^^4.8
