FHINI06P ; ; 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,2295,0)
;;=SOY FLOUR, DEFATTED^16-117^cups^100^100^N
;;^UTILITY(U,$J,112,2295,1)
;;=47.01^1.22^38.37^329^7.25^^^241^9.24^290^674^2384^20^2.46^4.065^3.018^^40^0^.698
;;^UTILITY(U,$J,112,2295,2)
;;=.253^2.612^1.995^.574^305.4^0^.47^.063^0^.136^.208^.533^4^6.15^^^17.5
;;^UTILITY(U,$J,112,2295,3)
;;=.683^2.042^2.281^3.828^3.129^.634^.757^2.453^1.778^2.346^3.647^1.268^2.215^5.911^9.106^2.174^2.75^2.725
;;^UTILITY(U,$J,112,2295,4)
;;=^^.003^.1^.003^.034^.206
;;^UTILITY(U,$J,112,2295,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2296,0)
;;=SOY FLOUR, LOW-FAT^16-118^cups^88^100^N
;;^UTILITY(U,$J,112,2296,1)
;;=46.53^6.7^37.98^326^2.7^^^188^5.99^229^593^2570^18^1.18^5.08^3.08^^40^0^.38
;;^UTILITY(U,$J,112,2296,2)
;;=.285^2.16^1.82^.522^410^0^3.335^.447^0^.969^1.48^3.782^4^6.09^^^10.2
;;^UTILITY(U,$J,112,2296,3)
;;=.676^2.021^2.257^3.789^3.097^.627^.75^2.428^1.76^2.322^3.61^1.255^2.192^5.851^9.013^2.151^2.722^2.697
;;^UTILITY(U,$J,112,2296,4)
;;=^^.019^.711^.019^.239^1.461
;;^UTILITY(U,$J,112,2296,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2297,0)
;;=SOY SAUCE, MADE FROM SOY + WHEAT (SHOYU)^16-123^tbsp.^18^100^N
;;^UTILITY(U,$J,112,2297,1)
;;=5.17^.08^8.51^53^71.09^^^17^2.02^34^110^180^5715^.37^.115^.424^^0^0^.05
;;^UTILITY(U,$J,112,2297,2)
;;=.13^3.36^.32^.17^15.5^0^.032^.004^0^.01^.012^.036^0^15.15^^^.8
;;^UTILITY(U,$J,112,2297,3)
;;=.074^.209^.245^.414^.294^.075^.091^.272^.188^.256^.357^.134^.227^.555^1.218^.229^.38^.299
;;^UTILITY(U,$J,112,2297,4)
;;=^^0^.008^0^.001^.011
;;^UTILITY(U,$J,112,2297,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2298,0)
;;=FALAFEL^16-138^ea.^17^100^N
;;^UTILITY(U,$J,112,2298,1)
;;=13.31^17.8^31.84^333^34.62^^^54^3.42^82^192^585^294^1.5^.258^.691^^13^1.6^.146
;;^UTILITY(U,$J,112,2298,2)
;;=.166^1.044^.292^.125^77.6^0^.495^.111^0^2.383^10.171^4.16^1^2.43
;;^UTILITY(U,$J,112,2298,3)
;;=.134^.492^.567^.944^.856^.187^.183^.707^.339^.562^1.28^.364^.573^1.531^2.341^.567^.545^.667
;;^UTILITY(U,$J,112,2298,4)
;;=^^.011^1.782^.095^.529^9.67
;;^UTILITY(U,$J,112,2298,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2299,0)
;;=BEANS, CRANBERRY (ROMAN), BOILED, W/SALT^16-320^cups^177^100^N
;;^UTILITY(U,$J,112,2299,1)
;;=9.34^.46^24.46^136^64.65^^^50^2.09^50^135^387^237^1.14^.231^.37^^0^0^.21
;;^UTILITY(U,$J,112,2299,2)
;;=.069^.515^.24^.081^206.8^0^.108^.091^0^.119^.04^.199^0^1.09
;;^UTILITY(U,$J,112,2299,3)
;;=.111^.393^.412^.746^.641^.14^.102^.505^.263^.489^.578^.26^.391^1.129^1.424^.365^.396^.508
;;^UTILITY(U,$J,112,2299,4)
;;=^^0^.112^^.007^.04
;;^UTILITY(U,$J,112,2299,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2300,0)
;;=BEANS, GREAT NORTHERN, BOILED, W/SALT^16-325^cups^177^100^N
;;^UTILITY(U,$J,112,2300,1)
;;=8.33^.45^21.09^118^69^^^68^2.13^50^165^391^238^.88^.247^.518^^1^1.3^.158
;;^UTILITY(U,$J,112,2300,2)
;;=.059^.681^.266^.117^102.2^0^.103^.084^0^.14^.021^.187^0^1.14
;;^UTILITY(U,$J,112,2300,3)
;;=.099^.351^.368^.665^.572^.125^.091^.451^.235^.436^.516^.232^.349^1.008^1.27^.325^.353^.453
;;^UTILITY(U,$J,112,2300,4)
;;=^^^.132^^.008^.021
;;^UTILITY(U,$J,112,2300,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2301,0)
;;=BEANS, KIDNEY, ALL TYPES, BOILED, W/SALT^16-328^cups^177^100^N
;;^UTILITY(U,$J,112,2301,1)
;;=8.67^.5^22.81^127^66.94^^^28^2.94^45^142^403^238^1.07^.242^.477^^0^1.2^.16
;;^UTILITY(U,$J,112,2301,2)
;;=.058^.578^.22^.12^129.6^0^.107^.168^0^.072^.039^.275^0^1.09
;;^UTILITY(U,$J,112,2301,3)
;;=.103^.365^.383^.693^.595^.13^.094^.469^.244^.454^.537^.242^.364^1.049^1.323^.339^.368^.472
;;^UTILITY(U,$J,112,2301,4)
;;=^^^.064^^.008^.039
;;^UTILITY(U,$J,112,2301,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2302,0)
;;=BEANS, KIDNEY, RED, BOILED, W/SALT^16-333^cups^177^100^N
;;^UTILITY(U,$J,112,2302,1)
;;=8.67^.5^22.81^127^66.94^^^28^2.94^45^142^403^238^1.07^.242^.477^^0^1.2^.16
;;^UTILITY(U,$J,112,2302,2)
;;=.058^.578^.22^.12^129.6^0^.107^.168^0^.072^.039^.275^0^1.09
;;^UTILITY(U,$J,112,2302,3)
;;=.103^.365^.383^.693^.595^.13^.094^.469^.244^.454^.537^.242^.364^1.049^1.323^.339^.368^.472
;;^UTILITY(U,$J,112,2302,4)
;;=^^^.064^^.008^.039
;;^UTILITY(U,$J,112,2302,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,2303,0)
;;=BEANS, NAVY, BOILED, W/SALT^16-338^cups^182^100^N
;;^UTILITY(U,$J,112,2303,1)
;;=8.7^.57^26.31^142^63.18^^^70^2.48^59^157^368^237^1.06^.295^.556^^2^.9^.202
;;^UTILITY(U,$J,112,2303,2)
;;=.061^.531^.255^.164^139.9^0^.134^.112^0^.148^.05^.246^0^1.23
FHINI06P ; ; 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,2295,0)
+2 ;;=SOY FLOUR, DEFATTED^16-117^cups^100^100^N
+3 ;;^UTILITY(U,$J,112,2295,1)
+4 ;;=47.01^1.22^38.37^329^7.25^^^241^9.24^290^674^2384^20^2.46^4.065^3.018^^40^0^.698
+5 ;;^UTILITY(U,$J,112,2295,2)
+6 ;;=.253^2.612^1.995^.574^305.4^0^.47^.063^0^.136^.208^.533^4^6.15^^^17.5
+7 ;;^UTILITY(U,$J,112,2295,3)
+8 ;;=.683^2.042^2.281^3.828^3.129^.634^.757^2.453^1.778^2.346^3.647^1.268^2.215^5.911^9.106^2.174^2.75^2.725
+9 ;;^UTILITY(U,$J,112,2295,4)
+10 ;;=^^.003^.1^.003^.034^.206
+11 ;;^UTILITY(U,$J,112,2295,20)
+12 ;;=USDA Std. Reference, Release 10
+13 ;;^UTILITY(U,$J,112,2296,0)
+14 ;;=SOY FLOUR, LOW-FAT^16-118^cups^88^100^N
+15 ;;^UTILITY(U,$J,112,2296,1)
+16 ;;=46.53^6.7^37.98^326^2.7^^^188^5.99^229^593^2570^18^1.18^5.08^3.08^^40^0^.38
+17 ;;^UTILITY(U,$J,112,2296,2)
+18 ;;=.285^2.16^1.82^.522^410^0^3.335^.447^0^.969^1.48^3.782^4^6.09^^^10.2
+19 ;;^UTILITY(U,$J,112,2296,3)
+20 ;;=.676^2.021^2.257^3.789^3.097^.627^.75^2.428^1.76^2.322^3.61^1.255^2.192^5.851^9.013^2.151^2.722^2.697
+21 ;;^UTILITY(U,$J,112,2296,4)
+22 ;;=^^.019^.711^.019^.239^1.461
+23 ;;^UTILITY(U,$J,112,2296,20)
+24 ;;=USDA Std. Reference, Release 10
+25 ;;^UTILITY(U,$J,112,2297,0)
+26 ;;=SOY SAUCE, MADE FROM SOY + WHEAT (SHOYU)^16-123^tbsp.^18^100^N
+27 ;;^UTILITY(U,$J,112,2297,1)
+28 ;;=5.17^.08^8.51^53^71.09^^^17^2.02^34^110^180^5715^.37^.115^.424^^0^0^.05
+29 ;;^UTILITY(U,$J,112,2297,2)
+30 ;;=.13^3.36^.32^.17^15.5^0^.032^.004^0^.01^.012^.036^0^15.15^^^.8
+31 ;;^UTILITY(U,$J,112,2297,3)
+32 ;;=.074^.209^.245^.414^.294^.075^.091^.272^.188^.256^.357^.134^.227^.555^1.218^.229^.38^.299
+33 ;;^UTILITY(U,$J,112,2297,4)
+34 ;;=^^0^.008^0^.001^.011
+35 ;;^UTILITY(U,$J,112,2297,20)
+36 ;;=USDA Std. Reference, Release 10
+37 ;;^UTILITY(U,$J,112,2298,0)
+38 ;;=FALAFEL^16-138^ea.^17^100^N
+39 ;;^UTILITY(U,$J,112,2298,1)
+40 ;;=13.31^17.8^31.84^333^34.62^^^54^3.42^82^192^585^294^1.5^.258^.691^^13^1.6^.146
+41 ;;^UTILITY(U,$J,112,2298,2)
+42 ;;=.166^1.044^.292^.125^77.6^0^.495^.111^0^2.383^10.171^4.16^1^2.43
+43 ;;^UTILITY(U,$J,112,2298,3)
+44 ;;=.134^.492^.567^.944^.856^.187^.183^.707^.339^.562^1.28^.364^.573^1.531^2.341^.567^.545^.667
+45 ;;^UTILITY(U,$J,112,2298,4)
+46 ;;=^^.011^1.782^.095^.529^9.67
+47 ;;^UTILITY(U,$J,112,2298,20)
+48 ;;=USDA Std. Reference, Release 10
+49 ;;^UTILITY(U,$J,112,2299,0)
+50 ;;=BEANS, CRANBERRY (ROMAN), BOILED, W/SALT^16-320^cups^177^100^N
+51 ;;^UTILITY(U,$J,112,2299,1)
+52 ;;=9.34^.46^24.46^136^64.65^^^50^2.09^50^135^387^237^1.14^.231^.37^^0^0^.21
+53 ;;^UTILITY(U,$J,112,2299,2)
+54 ;;=.069^.515^.24^.081^206.8^0^.108^.091^0^.119^.04^.199^0^1.09
+55 ;;^UTILITY(U,$J,112,2299,3)
+56 ;;=.111^.393^.412^.746^.641^.14^.102^.505^.263^.489^.578^.26^.391^1.129^1.424^.365^.396^.508
+57 ;;^UTILITY(U,$J,112,2299,4)
+58 ;;=^^0^.112^^.007^.04
+59 ;;^UTILITY(U,$J,112,2299,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,2300,0)
+62 ;;=BEANS, GREAT NORTHERN, BOILED, W/SALT^16-325^cups^177^100^N
+63 ;;^UTILITY(U,$J,112,2300,1)
+64 ;;=8.33^.45^21.09^118^69^^^68^2.13^50^165^391^238^.88^.247^.518^^1^1.3^.158
+65 ;;^UTILITY(U,$J,112,2300,2)
+66 ;;=.059^.681^.266^.117^102.2^0^.103^.084^0^.14^.021^.187^0^1.14
+67 ;;^UTILITY(U,$J,112,2300,3)
+68 ;;=.099^.351^.368^.665^.572^.125^.091^.451^.235^.436^.516^.232^.349^1.008^1.27^.325^.353^.453
+69 ;;^UTILITY(U,$J,112,2300,4)
+70 ;;=^^^.132^^.008^.021
+71 ;;^UTILITY(U,$J,112,2300,20)
+72 ;;=USDA Std. Reference, Release 10
+73 ;;^UTILITY(U,$J,112,2301,0)
+74 ;;=BEANS, KIDNEY, ALL TYPES, BOILED, W/SALT^16-328^cups^177^100^N
+75 ;;^UTILITY(U,$J,112,2301,1)
+76 ;;=8.67^.5^22.81^127^66.94^^^28^2.94^45^142^403^238^1.07^.242^.477^^0^1.2^.16
+77 ;;^UTILITY(U,$J,112,2301,2)
+78 ;;=.058^.578^.22^.12^129.6^0^.107^.168^0^.072^.039^.275^0^1.09
+79 ;;^UTILITY(U,$J,112,2301,3)
+80 ;;=.103^.365^.383^.693^.595^.13^.094^.469^.244^.454^.537^.242^.364^1.049^1.323^.339^.368^.472
+81 ;;^UTILITY(U,$J,112,2301,4)
+82 ;;=^^^.064^^.008^.039
+83 ;;^UTILITY(U,$J,112,2301,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,2302,0)
+86 ;;=BEANS, KIDNEY, RED, BOILED, W/SALT^16-333^cups^177^100^N
+87 ;;^UTILITY(U,$J,112,2302,1)
+88 ;;=8.67^.5^22.81^127^66.94^^^28^2.94^45^142^403^238^1.07^.242^.477^^0^1.2^.16
+89 ;;^UTILITY(U,$J,112,2302,2)
+90 ;;=.058^.578^.22^.12^129.6^0^.107^.168^0^.072^.039^.275^0^1.09
+91 ;;^UTILITY(U,$J,112,2302,3)
+92 ;;=.103^.365^.383^.693^.595^.13^.094^.469^.244^.454^.537^.242^.364^1.049^1.323^.339^.368^.472
+93 ;;^UTILITY(U,$J,112,2302,4)
+94 ;;=^^^.064^^.008^.039
+95 ;;^UTILITY(U,$J,112,2302,20)
+96 ;;=USDA Std. Reference, Release 10
+97 ;;^UTILITY(U,$J,112,2303,0)
+98 ;;=BEANS, NAVY, BOILED, W/SALT^16-338^cups^182^100^N
+99 ;;^UTILITY(U,$J,112,2303,1)
+100 ;;=8.7^.57^26.31^142^63.18^^^70^2.48^59^157^368^237^1.06^.295^.556^^2^.9^.202
+101 ;;^UTILITY(U,$J,112,2303,2)
+102 ;;=.061^.531^.255^.164^139.9^0^.134^.112^0^.148^.05^.246^0^1.23
