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

FHINI00R.m

Go to the documentation of this file.
FHINI00R	; ; 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,106,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,107,0)
	;;=WHEY, SWEET, DRIED^1-115^tbsp.^7.5^100^N
	;;^UTILITY(U,$J,112,107,1)
	;;=12.93^1.07^74.46^352.776^3.19^^^796.1^.88^176.1^931.7^2079.7^1079^1.97^.07^.009^^44^1.49^.519
	;;^UTILITY(U,$J,112,107,2)
	;;=2.208^1.258^5.62^.584^11.6^2.371^.025^.009^6^.684^.297^.034^10^8.35^^^0
	;;^UTILITY(U,$J,112,107,3)
	;;=.205^.817^.719^1.186^1.03^.241^.253^.407^.363^.697^.375^.237^.598^1.269^2.248^.28^.786^.622
	;;^UTILITY(U,$J,112,107,4)
	;;=.018^.012^.104^.326^.033^.097^.251^0
	;;^UTILITY(U,$J,112,107,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,108,0)
	;;=YOGURT, PLAIN, WHOLE MILK, 8 GRAMS PROTEIN PER 8 OZ^1-116^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,108,1)
	;;=3.47^3.25^4.66^61.419^87.9^^^120.7^.05^11.58^94.9^154.6^46.4^.59^.009^.004^^123^.53^.029
	;;^UTILITY(U,$J,112,108,2)
	;;=.142^.075^.389^.032^7.4^.372^.065^.027^12.7^2.096^.893^.092^30^.72^^^0
	;;^UTILITY(U,$J,112,108,3)
	;;=.02^.142^.189^.35^.311^.102^.032^.189^.175^.287^.104^.086^.148^.275^.679^.084^.411^.215
	;;^UTILITY(U,$J,112,108,4)
	;;=.093^.111^.343^.886^.071^.317^.743^0
	;;^UTILITY(U,$J,112,108,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,109,0)
	;;=YOGURT, PLAIN, LOWFAT, 12 GRAMS PROTEIN PER 8 OZ^1-117^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,109,1)
	;;=5.25^1.55^7.04^63.287^85.07^^^182.6^.08^17.45^143.5^233.8^70.2^.89^.013^.004^^66^.8^.044
	;;^UTILITY(U,$J,112,109,2)
	;;=.214^.114^.591^.049^11.2^.562^.031^.013^6.1^1^.426^.044^16^1.09^^^0
	;;^UTILITY(U,$J,112,109,3)
	;;=.03^.216^.286^.529^.471^.155^.048^.286^.265^.434^.158^.13^.225^.416^1.028^.127^.622^.325
	;;^UTILITY(U,$J,112,109,4)
	;;=.044^.053^.163^.422^.034^.151^.354^0^.3^3.3
	;;^UTILITY(U,$J,112,109,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,110,0)
	;;=YOGURT, PLAIN, SKIM MILK, 13 GRAMS PROTEIN PER 8 OZ^1-118^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,110,1)
	;;=5.73^.18^7.68^55.771^85.23^^^199.1^.09^19.1^156.5^254.9^76.5^.97^.015^.005^^7^.87^.048
	;;^UTILITY(U,$J,112,110,2)
	;;=.234^.124^.641^.053^12.2^.613^.004^.001^1.8^.116^.049^.005^2^1.18^^^0
	;;^UTILITY(U,$J,112,110,3)
	;;=.032^.235^.313^.577^.514^.169^.052^.313^.289^.474^.172^.142^.245^.454^1.122^.138^.679^.355
	;;^UTILITY(U,$J,112,110,4)
	;;=.005^.006^.019^.049^.004^.018^.041^0
	;;^UTILITY(U,$J,112,110,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,111,0)
	;;=YOGURT, COFFEE AND VANILLA, LOWFAT, 11 GM PROTEIN PER 8 OZ^1-119^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,111,1)
	;;=4.93^1.25^13.8^85.445^79^^^171.3^.07^16.43^134.6^219.3^65.8^.83^.013^.004^^54^.75^.042
	;;^UTILITY(U,$J,112,111,2)
	;;=.201^.107^.552^.045^10.5^.527^.025^.01^4.9^.806^.343^.036^13^1.02^^^0
	;;^UTILITY(U,$J,112,111,3)
	;;=.028^.202^.269^.497^.442^.145^.045^.269^.249^.408^.148^.122^.211^.391^.965^.119^.584^.305
	;;^UTILITY(U,$J,112,111,4)
	;;=.036^.043^.132^.341^.027^.122^.286^0
	;;^UTILITY(U,$J,112,111,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,112,0)
	;;=YOGURT, FRUIT, LOWFAT, 9 GRAMS PROTEIN PER 8 OZ^1-120^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,112,1)
	;;=3.98^1.15^18.64^99.24^75.3^^^138.3^.06^13.27^108.7^177.1^53.2^.67^.079^.064^^49^.6^.034
	;;^UTILITY(U,$J,112,112,2)
	;;=.162^.086^.446^.037^8.5^.426^.023^.01^4.5^.742^.316^.033^12^.93^^^0
	;;^UTILITY(U,$J,112,112,3)
	;;=.022^.163^.217^.401^.357^.117^.036^.217^.201^.329^.12^.099^.17^.316^.779^.096^.472^.246
	;;^UTILITY(U,$J,112,112,4)
	;;=.033^.039^.121^.313^.025^.112^.263^0
	;;^UTILITY(U,$J,112,112,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,113,0)
	;;=YOGURT, FRUIT, LOWFAT, 10 GRAMS PROTEIN PER 8 OZ^1-121^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,113,1)
	;;=4.37^1.08^19.05^101.877^74.48^^^151.9^.07^14.57^119.4^194.5^58.4^.74^.08^.065^^46^.66^.037
	;;^UTILITY(U,$J,112,113,2)
	;;=.178^.095^.489^.04^9.3^.467^.022^.009^4.2^.697^.297^.031^11^1.02^^^0
	;;^UTILITY(U,$J,112,113,3)
	;;=.025^.179^.238^.44^.392^.129^.04^.238^.221^.362^.132^.108^.187^.347^.856^.105^.518^.271
	;;^UTILITY(U,$J,112,113,4)
	;;=.031^.037^.114^.294^.024^.105^.247^0^.7
	;;^UTILITY(U,$J,112,113,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,114,0)
	;;=YOGURT, FRUIT, LOWFAT, 11 GRAMS PROTEIN PER 8 OZ^1-122^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,114,1)
	;;=4.86^1.41^18.6^105.128^74.1^^^168.9^.07^16.2^132.7^216.3^64.9^.82^.08^.065^^60^.74^.041
	;;^UTILITY(U,$J,112,114,2)
	;;=.198^.105^.544^.045^10.4^.52^.028^.012^5.5^.909^.387^.04^15^1.03^^^0
	;;^UTILITY(U,$J,112,114,3)
	;;=.027^.2^.265^.49^.436^.143^.044^.265^.245^.402^.146^.12^.208^.385^.951^.117^.576^.301