FHINI06Q ; ; 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,2303,3)
;;=.103^.366^.384^.695^.597^.131^.095^.47^.245^.455^.539^.242^.365^1.052^1.327^.34^.369^.473
;;^UTILITY(U,$J,112,2303,4)
;;=^^0^.139^^.009^.05
;;^UTILITY(U,$J,112,2303,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2304,0)
;;=BEANS, PINTO, BOILED, W/SALT^16-343^cups^171^100^N
;;^UTILITY(U,$J,112,2304,1)
;;=8.21^.52^25.65^137^64.27^^^48^2.61^55^160^468^238^1.08^.257^.556^^2^2.1^.186
;;^UTILITY(U,$J,112,2304,2)
;;=.091^.4^.285^.155^172^0^.078^.109^0^.109^.106^.188^0^1.35
;;^UTILITY(U,$J,112,2304,3)
;;=.097^.346^.363^.656^.564^.124^.089^.444^.231^.43^.509^.229^.344^.993^1.252^.321^.348^.447
;;^UTILITY(U,$J,112,2304,4)
;;=^^0^.106^^.002^.106
;;^UTILITY(U,$J,112,2304,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2305,0)
;;=BEANS, SMALL WHITE, BOILED, W/SALT^16-346^cups^179^100^N
;;^UTILITY(U,$J,112,2305,1)
;;=8.97^.64^25.81^142^63.24^^^73^2.84^68^169^463^238^1.09^.149^.51^^0^0^.236
;;^UTILITY(U,$J,112,2305,2)
;;=.059^.272^.251^.127^136.9^0^.15^.126^0^.166^.056^.276^0^1.34
;;^UTILITY(U,$J,112,2305,3)
;;=.106^.377^.396^.716^.616^.135^.098^.485^.253^.469^.555^.25^.376^1.085^1.368^.35^.38^.488
;;^UTILITY(U,$J,112,2305,4)
;;=^^0^.155^^.01^.056
;;^UTILITY(U,$J,112,2305,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2306,0)
;;=BEANS, YELLOW, BOILED, W/SALT^16-348^cups^177^100^N
;;^UTILITY(U,$J,112,2306,1)
;;=9.16^1.08^25.27^144^62.98^^^62^2.48^74^183^325^241^1.06^.186^.455^^2^1.8^.187
;;^UTILITY(U,$J,112,2306,2)
;;=.103^.708^.229^.129^80.9^0^.253^.212^0^.279^.094^.466^0^1.5
;;^UTILITY(U,$J,112,2306,3)
;;=.108^.386^.405^.732^.629^.138^.1^.496^.258^.479^.567^.255^.384^1.108^1.397^.358^.388^.498
;;^UTILITY(U,$J,112,2306,4)
;;=^^.001^.262^^.017^.094
;;^UTILITY(U,$J,112,2306,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2307,0)
;;=BEANS, WHITE, BOILED, W/SALT^16-350^cups^179^100^N
;;^UTILITY(U,$J,112,2307,1)
;;=9.73^.35^25.1^139^63.08^^^90^3.7^63^113^561^242^1.38^.287^.636^^0^0^.118
;;^UTILITY(U,$J,112,2307,2)
;;=.046^.14^.229^.093^80.7^0^.083^.069^0^.091^.031^.152^0^1.75
;;^UTILITY(U,$J,112,2307,3)
;;=.115^.409^.429^.776^.668^.146^.106^.526^.274^.509^.602^.271^.408^1.176^1.483^.38^.412^.529
;;^UTILITY(U,$J,112,2307,4)
;;=^^0^.085^^.005^.031
;;^UTILITY(U,$J,112,2307,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2308,0)
;;=BROADBEANS (FAVA BEANS), BOILED, W/SALT^16-353^cups^170^100^N
;;^UTILITY(U,$J,112,2308,1)
;;=7.6^.4^19.65^110^71.54^^^36^1.5^43^125^268^241^1.01^.259^.421^^15^.3^.097
;;^UTILITY(U,$J,112,2308,2)
;;=.089^.711^.157^.072^104.1^0^.152^.012^0^.066^.079^.164^2^.81
;;^UTILITY(U,$J,112,2308,3)
;;=.072^.27^.306^.572^.486^.062^.097^.321^.241^.338^.702^.193^.311^.849^1.291^.319^.32^.348
;;^UTILITY(U,$J,112,2308,4)
;;=^.001^.001^.054^.001^.008^.078
;;^UTILITY(U,$J,112,2308,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2309,0)
;;=CHICKPEAS (GARBANZO BEANS, BENGAL GRAM), BOILED, W/SALT^16-357^cups^164^100^N
;;^UTILITY(U,$J,112,2309,1)
;;=8.86^2.59^27.41^164^60.21^^^49^2.89^48^168^291^243^1.53^.352^1.03^^27^1.3^.116
;;^UTILITY(U,$J,112,2309,2)
;;=.063^.526^.286^.139^172^0^1.113^.043^0^.269^.583^1.156^3^.92
;;^UTILITY(U,$J,112,2309,3)
;;=.085^.329^.38^.631^.593^.116^.119^.475^.22^.372^.835^.244^.38^1.042^1.55^.369^.366^.447
;;^UTILITY(U,$J,112,2309,4)
;;=^^.004^.215^.005^.037^.578
;;^UTILITY(U,$J,112,2309,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2310,0)
;;=LENTILS, BOILED, W/SALT^16-370^cups^198^100^N
;;^UTILITY(U,$J,112,2310,1)
;;=9.02^.38^20.14^116^69.64^^^19^3.33^36^180^369^238^1.27^.251^.494^^8^1.5^.169
;;^UTILITY(U,$J,112,2310,2)
;;=.073^1.06^.638^.178^180.8^0^.137^.037^0^.053^.064^.175^1^.83
;;^UTILITY(U,$J,112,2310,3)
;;=.081^.323^.39^.654^.63^.077^.118^.445^.241^.448^.697^.254^.377^.998^1.399^.367^.377^.416
;;^UTILITY(U,$J,112,2310,4)
;;=^^.001^.045^.001^.005^.061
;;^UTILITY(U,$J,112,2310,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2311,0)
;;=BEANS, LIMA, LARGE, BOILED, W/SALT^16-372^cups^188^100^N
;;^UTILITY(U,$J,112,2311,1)
;;=7.8^.38^20.89^115^69.79^^^17^2.39^43^111^508^238^.95^.235^.516^^0^0^.161
;;^UTILITY(U,$J,112,2311,2)
;;=.055^.421^.422^.161^83.1^0^.118^.052^0^.089^.034^.171^0^1.15
;;^UTILITY(U,$J,112,2311,3)
;;=.092^.337^.411^.673^.523^.099^.086^.449^.276^.469^.478^.238^.398^1.006^1.104^.329^.354^.519
;;^UTILITY(U,$J,112,2311,4)
;;=^0^.001^.065^.002^.018^.029
;;^UTILITY(U,$J,112,2311,20)
;;=USDA Std. Reference, Release 10
FHINI06Q ; ; 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,2303,3)
+2 ;;=.103^.366^.384^.695^.597^.131^.095^.47^.245^.455^.539^.242^.365^1.052^1.327^.34^.369^.473
+3 ;;^UTILITY(U,$J,112,2303,4)
+4 ;;=^^0^.139^^.009^.05
+5 ;;^UTILITY(U,$J,112,2303,20)
+6 ;;=USDA Std. Reference, Release 10
+7 ;;^UTILITY(U,$J,112,2304,0)
+8 ;;=BEANS, PINTO, BOILED, W/SALT^16-343^cups^171^100^N
+9 ;;^UTILITY(U,$J,112,2304,1)
+10 ;;=8.21^.52^25.65^137^64.27^^^48^2.61^55^160^468^238^1.08^.257^.556^^2^2.1^.186
+11 ;;^UTILITY(U,$J,112,2304,2)
+12 ;;=.091^.4^.285^.155^172^0^.078^.109^0^.109^.106^.188^0^1.35
+13 ;;^UTILITY(U,$J,112,2304,3)
+14 ;;=.097^.346^.363^.656^.564^.124^.089^.444^.231^.43^.509^.229^.344^.993^1.252^.321^.348^.447
+15 ;;^UTILITY(U,$J,112,2304,4)
+16 ;;=^^0^.106^^.002^.106
+17 ;;^UTILITY(U,$J,112,2304,20)
+18 ;;=USDA Std. Reference, Release 10
+19 ;;^UTILITY(U,$J,112,2305,0)
+20 ;;=BEANS, SMALL WHITE, BOILED, W/SALT^16-346^cups^179^100^N
+21 ;;^UTILITY(U,$J,112,2305,1)
+22 ;;=8.97^.64^25.81^142^63.24^^^73^2.84^68^169^463^238^1.09^.149^.51^^0^0^.236
+23 ;;^UTILITY(U,$J,112,2305,2)
+24 ;;=.059^.272^.251^.127^136.9^0^.15^.126^0^.166^.056^.276^0^1.34
+25 ;;^UTILITY(U,$J,112,2305,3)
+26 ;;=.106^.377^.396^.716^.616^.135^.098^.485^.253^.469^.555^.25^.376^1.085^1.368^.35^.38^.488
+27 ;;^UTILITY(U,$J,112,2305,4)
+28 ;;=^^0^.155^^.01^.056
+29 ;;^UTILITY(U,$J,112,2305,20)
+30 ;;=USDA Std. Reference, Release 10
+31 ;;^UTILITY(U,$J,112,2306,0)
+32 ;;=BEANS, YELLOW, BOILED, W/SALT^16-348^cups^177^100^N
+33 ;;^UTILITY(U,$J,112,2306,1)
+34 ;;=9.16^1.08^25.27^144^62.98^^^62^2.48^74^183^325^241^1.06^.186^.455^^2^1.8^.187
+35 ;;^UTILITY(U,$J,112,2306,2)
+36 ;;=.103^.708^.229^.129^80.9^0^.253^.212^0^.279^.094^.466^0^1.5
+37 ;;^UTILITY(U,$J,112,2306,3)
+38 ;;=.108^.386^.405^.732^.629^.138^.1^.496^.258^.479^.567^.255^.384^1.108^1.397^.358^.388^.498
+39 ;;^UTILITY(U,$J,112,2306,4)
+40 ;;=^^.001^.262^^.017^.094
+41 ;;^UTILITY(U,$J,112,2306,20)
+42 ;;=USDA Std. Reference, Release 10
+43 ;;^UTILITY(U,$J,112,2307,0)
+44 ;;=BEANS, WHITE, BOILED, W/SALT^16-350^cups^179^100^N
+45 ;;^UTILITY(U,$J,112,2307,1)
+46 ;;=9.73^.35^25.1^139^63.08^^^90^3.7^63^113^561^242^1.38^.287^.636^^0^0^.118
+47 ;;^UTILITY(U,$J,112,2307,2)
+48 ;;=.046^.14^.229^.093^80.7^0^.083^.069^0^.091^.031^.152^0^1.75
+49 ;;^UTILITY(U,$J,112,2307,3)
+50 ;;=.115^.409^.429^.776^.668^.146^.106^.526^.274^.509^.602^.271^.408^1.176^1.483^.38^.412^.529
+51 ;;^UTILITY(U,$J,112,2307,4)
+52 ;;=^^0^.085^^.005^.031
+53 ;;^UTILITY(U,$J,112,2307,20)
+54 ;;=USDA Std. Reference, Release 10
+55 ;;^UTILITY(U,$J,112,2308,0)
+56 ;;=BROADBEANS (FAVA BEANS), BOILED, W/SALT^16-353^cups^170^100^N
+57 ;;^UTILITY(U,$J,112,2308,1)
+58 ;;=7.6^.4^19.65^110^71.54^^^36^1.5^43^125^268^241^1.01^.259^.421^^15^.3^.097
+59 ;;^UTILITY(U,$J,112,2308,2)
+60 ;;=.089^.711^.157^.072^104.1^0^.152^.012^0^.066^.079^.164^2^.81
+61 ;;^UTILITY(U,$J,112,2308,3)
+62 ;;=.072^.27^.306^.572^.486^.062^.097^.321^.241^.338^.702^.193^.311^.849^1.291^.319^.32^.348
+63 ;;^UTILITY(U,$J,112,2308,4)
+64 ;;=^.001^.001^.054^.001^.008^.078
+65 ;;^UTILITY(U,$J,112,2308,20)
+66 ;;=USDA Std. Reference, Release 10
+67 ;;^UTILITY(U,$J,112,2309,0)
+68 ;;=CHICKPEAS (GARBANZO BEANS, BENGAL GRAM), BOILED, W/SALT^16-357^cups^164^100^N
+69 ;;^UTILITY(U,$J,112,2309,1)
+70 ;;=8.86^2.59^27.41^164^60.21^^^49^2.89^48^168^291^243^1.53^.352^1.03^^27^1.3^.116
+71 ;;^UTILITY(U,$J,112,2309,2)
+72 ;;=.063^.526^.286^.139^172^0^1.113^.043^0^.269^.583^1.156^3^.92
+73 ;;^UTILITY(U,$J,112,2309,3)
+74 ;;=.085^.329^.38^.631^.593^.116^.119^.475^.22^.372^.835^.244^.38^1.042^1.55^.369^.366^.447
+75 ;;^UTILITY(U,$J,112,2309,4)
+76 ;;=^^.004^.215^.005^.037^.578
+77 ;;^UTILITY(U,$J,112,2309,20)
+78 ;;=USDA Std. Reference, Release 10
+79 ;;^UTILITY(U,$J,112,2310,0)
+80 ;;=LENTILS, BOILED, W/SALT^16-370^cups^198^100^N
+81 ;;^UTILITY(U,$J,112,2310,1)
+82 ;;=9.02^.38^20.14^116^69.64^^^19^3.33^36^180^369^238^1.27^.251^.494^^8^1.5^.169
+83 ;;^UTILITY(U,$J,112,2310,2)
+84 ;;=.073^1.06^.638^.178^180.8^0^.137^.037^0^.053^.064^.175^1^.83
+85 ;;^UTILITY(U,$J,112,2310,3)
+86 ;;=.081^.323^.39^.654^.63^.077^.118^.445^.241^.448^.697^.254^.377^.998^1.399^.367^.377^.416
+87 ;;^UTILITY(U,$J,112,2310,4)
+88 ;;=^^.001^.045^.001^.005^.061
+89 ;;^UTILITY(U,$J,112,2310,20)
+90 ;;=USDA Std. Reference, Release 10
+91 ;;^UTILITY(U,$J,112,2311,0)
+92 ;;=BEANS, LIMA, LARGE, BOILED, W/SALT^16-372^cups^188^100^N
+93 ;;^UTILITY(U,$J,112,2311,1)
+94 ;;=7.8^.38^20.89^115^69.79^^^17^2.39^43^111^508^238^.95^.235^.516^^0^0^.161
+95 ;;^UTILITY(U,$J,112,2311,2)
+96 ;;=.055^.421^.422^.161^83.1^0^.118^.052^0^.089^.034^.171^0^1.15
+97 ;;^UTILITY(U,$J,112,2311,3)
+98 ;;=.092^.337^.411^.673^.523^.099^.086^.449^.276^.469^.478^.238^.398^1.006^1.104^.329^.354^.519
+99 ;;^UTILITY(U,$J,112,2311,4)
+100 ;;=^0^.001^.065^.002^.018^.029
+101 ;;^UTILITY(U,$J,112,2311,20)
+102 ;;=USDA Std. Reference, Release 10
