Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: FHINI08G

FHINI08G.m

Go to the documentation of this file.
FHINI08G	; ; 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,2926,0)
	;;=RICE FLOUR, BROWN^20-090^cups^158^100^N
	;;^UTILITY(U,$J,112,2926,1)
	;;=7.23^2.78^76.48^363^11.97^^^11^1.98^112^337^289^8^2.45^.23^4.013^^0^0^.443
	;;^UTILITY(U,$J,112,2926,2)
	;;=.08^6.34^1.591^.736^16^0^.954^.042^0^.557^1.008^.996^0^1.54^^^4.6
	;;^UTILITY(U,$J,112,2926,3)
	;;=.092^.265^.306^.598^.276^.163^.088^.373^.271^.424^.548^.184^.422^.677^1.473^.356^.339^.374
	;;^UTILITY(U,$J,112,2926,4)
	;;=^.003^.01^.475^.01^.05^.998^^.04
	;;^UTILITY(U,$J,112,2926,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2927,0)
	;;=RICE FLOUR, WHITE^20-061^cups^158^100^N
	;;^UTILITY(U,$J,112,2927,1)
	;;=5.95^1.42^80.13^366^11.89^^^10^.35^35^98^76^0^.8^.13^1.2^^0^0^.138
	;;^UTILITY(U,$J,112,2927,2)
	;;=.021^2.59^.819^.436^4^0^.313^.067^0^.386^.442^.379^0^.61^^^2.4
	;;^UTILITY(U,$J,112,2927,3)
	;;=.072^.21^.244^.488^.207^.144^.107^.317^.314^.348^.516^.149^.332^.549^1.097^.267^.278^.31
	;;^UTILITY(U,$J,112,2927,4)
	;;=^^.008^.345^.005^.026^.436^^.04
	;;^UTILITY(U,$J,112,2927,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2929,0)
	;;=RICE, WHITE, LONG-GRAIN, PARBOILED, COOKED, ENRICHED^20-047^cups^176^364^N
	;;^UTILITY(U,$J,112,2929,1)
	;;=2.29^.27^24.73^114^72.49^^^19^1.13^12^42^37^3^.31^.094^.26^^0^0^.25
	;;^UTILITY(U,$J,112,2929,2)
	;;=.018^1.4^.324^.019^4^0^.059^.013^0^.073^.084^.072^0^.22^^^.4
	;;^UTILITY(U,$J,112,2929,3)
	;;=.027^.082^.099^.19^.083^.054^.047^.122^.077^.14^.191^.054^.133^.215^.447^.104^.108^.121
	;;^UTILITY(U,$J,112,2929,4)
	;;=^^.002^.065^.001^.005^.083^^^8.2
	;;^UTILITY(U,$J,112,2929,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2930,0)
	;;=RICE, WHITE, LONG-GRAIN, PARBOILED, COOKED, UNENRICHED^20-447^cups^176^364^N
	;;^UTILITY(U,$J,112,2930,1)
	;;=2.29^.27^24.73^114^72.49^^^19^.2^12^42^37^3^.31^.094^.26^^^0^.02
	;;^UTILITY(U,$J,112,2930,2)
	;;=.018^1.4^.324^.019^4^0^.059^.013^0^.073^.084^.072^^.22
	;;^UTILITY(U,$J,112,2930,3)
	;;=.027^.082^.099^.19^.083^.054^.047^.122^.077^.14^.191^.054^.133^.215^.447^.104^.108^.121
	;;^UTILITY(U,$J,112,2930,4)
	;;=^^.002^.065^.001^.005^.083
	;;^UTILITY(U,$J,112,2930,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2931,0)
	;;=RICE, WHITE, LONG-GRAIN, REGULAR, COOKED, UNENR W/ SALT^20-545^cups^204^320^N
	;;^UTILITY(U,$J,112,2931,1)
	;;=2.69^.28^28.17^130^68.44^^^10^.2^12^43^35^382^.49^.069^.472^^0^0^.02
	;;^UTILITY(U,$J,112,2931,2)
	;;=.013^.4^.39^.093^3^0^.062^.013^0^.077^.088^.076^0^.41^^^.4
	;;^UTILITY(U,$J,112,2931,3)
	;;=.031^.096^.116^.222^.097^.063^.055^.144^.09^.164^.224^.063^.156^.253^.524^.122^.127^.141
	;;^UTILITY(U,$J,112,2931,4)
	;;=^^.002^.069^.001^.005^.087
	;;^UTILITY(U,$J,112,2931,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2932,0)
	;;=RICE, WHITE, LONG-GRAIN, REGULAR, COOKED, UNENR WO/ SALT^20-445^cups^204^320^N
	;;^UTILITY(U,$J,112,2932,1)
	;;=2.69^.28^28.17^130^68.44^^^10^.2^12^43^35^1^.49^.069^.472^^0^0^.02
	;;^UTILITY(U,$J,112,2932,2)
	;;=.013^.4^.39^.093^3^0^.062^.013^0^.077^.088^.076^0^.41^^^.4
	;;^UTILITY(U,$J,112,2932,3)
	;;=.031^.096^.116^.222^.097^.063^.055^.144^.09^.164^.224^.063^.156^.253^.524^.122^.127^.141
	;;^UTILITY(U,$J,112,2932,4)
	;;=^^.002^.069^.001^.005^.087
	;;^UTILITY(U,$J,112,2932,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2934,0)
	;;=RICE, WHITE, MEDIUM-GRAIN, COOKED, UNENRICHED^20-451^cups^204^319^N
	;;^UTILITY(U,$J,112,2934,1)
	;;=2.38^.21^28.59^130^68.61^^^3^.2^13^37^29^0^.42^.038^.377^^0^0^.02
	;;^UTILITY(U,$J,112,2934,2)
	;;=.016^.4^.411^.05^2^0^.046^.01^0^.057^.065^.056^0^.21
	;;^UTILITY(U,$J,112,2934,3)
	;;=.028^.085^.103^.197^.086^.056^.049^.127^.08^.145^.198^.056^.138^.224^.464^.108^.112^.125
	;;^UTILITY(U,$J,112,2934,4)
	;;=^^.001^.051^.001^.004^.064
	;;^UTILITY(U,$J,112,2934,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2935,0)
	;;=RICE, WHITE, SHORT-GRAIN, COOKED, ENRICHED^20-053^cups^204^318^N
	;;^UTILITY(U,$J,112,2935,1)
	;;=2.36^.19^28.73^130^68.53^^^1^1.46^8^33^26^0^.4^.072^.357^^0^0^.164
	;;^UTILITY(U,$J,112,2935,2)
	;;=.016^1.493^.397^.059^2^0^.041^.009^0^.051^.058^.05^0^.2
	;;^UTILITY(U,$J,112,2935,3)
	;;=.027^.084^.102^.195^.085^.056^.048^.126^.079^.144^.197^.056^.137^.222^.46^.108^.111^.124
	;;^UTILITY(U,$J,112,2935,4)
	;;=^^.001^.046^.001^.003^.058^^^7.5
	;;^UTILITY(U,$J,112,2935,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2936,0)
	;;=RICE, WHITE, WITH PASTA, COOKED^20-057^cups^202^354^N
	;;^UTILITY(U,$J,112,2936,1)
	;;=2.54^2.82^21.43^122^71.74^^^8^.94^12^37^42^568^.28^.02^.209^^0^.2^.123
	;;^UTILITY(U,$J,112,2936,2)
	;;=.077^1.78^.287^.097^7^.061^.903^.044^1^.541^1.119^.947^0^1.47^^^3.9