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

FHINI08K.m

Go to the documentation of this file.
FHINI08K	; ; 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,2964,1)
	;;=.54^.03^6.75^26^91.32^^^54^1.86^67^5^226^9^.58^.061^.373^^0^0^.005
	;;^UTILITY(U,$J,112,2964,2)
	;;=.022^.055^.302^.032^84.8^0^0^0^0^.006^.003^.01^0^1.36^^^.5
	;;^UTILITY(U,$J,112,2964,4)
	;;=^^0^.005^.001^0^.001^.001
	;;^UTILITY(U,$J,112,2964,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2965,0)
	;;=SEEDS, PUMPKIN AND SQUASH SEED KERNELS, ROASTED, W/SALT^12-516^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2965,1)
	;;=32.97^42.13^13.43^522^7.1^^^43^14.94^534^1172^806^575^7.44^1.384^3.016^^380^1.8^.21
	;;^UTILITY(U,$J,112,2965,2)
	;;=.319^1.742^.339^.09^57.4^0^19.02^.166^0^7.97^13.1^19.206^38^4.37^^^6.5
	;;^UTILITY(U,$J,112,2965,3)
	;;=.578^1.213^1.698^2.793^2.463^.74^.404^1.642^1.368^2.65^5.418^.914^1.555^3.328^5.797^2.413^1.344^1.543
	;;^UTILITY(U,$J,112,2965,4)
	;;=^.04^.048^5.156^.091^2.583^12.997
	;;^UTILITY(U,$J,112,2965,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2966,0)
	;;=SEEDS, PUMPKIN AND SQUASH SEED KERNELS, ROASTED, WO/SALT^12-016^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2966,1)
	;;=32.97^42.13^13.43^522^7.1^^^43^14.94^534^1172^806^18^7.44^1.384^3.016^^380^1.8^.21
	;;^UTILITY(U,$J,112,2966,2)
	;;=.319^1.742^.339^.09^57.4^0^19.02^.166^0^7.97^13.1^19.206^38^4.37
	;;^UTILITY(U,$J,112,2966,3)
	;;=.578^1.213^1.698^2.793^2.463^.74^.404^1.642^1.368^2.65^5.418^.914^1.555^3.328^5.797^2.413^1.344^1.543
	;;^UTILITY(U,$J,112,2966,4)
	;;=^.04^.048^5.156^.091^2.583^12.997
	;;^UTILITY(U,$J,112,2966,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2967,0)
	;;=SEEDS, PUMPKIN AND SQUASH SEEDS, WHOLE, ROASTED, W/SALT^12-663^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2967,1)
	;;=18.55^19.4^53.75^446^4.5^^^55^3.31^262^92^919^575^10.3^.69^.496^^62^.3^.034
	;;^UTILITY(U,$J,112,2967,2)
	;;=.052^.286^.056^.037^9^0^8.759^.077^0^3.67^6.032^8.844^6^3.8
	;;^UTILITY(U,$J,112,2967,3)
	;;=.326^.683^.956^1.572^1.386^.417^.228^.924^.77^1.491^3.049^.515^.875^1.873^3.262^1.358^.756^.868
	;;^UTILITY(U,$J,112,2967,4)
	;;=^.019^.022^2.374^.042^1.189^5.985
	;;^UTILITY(U,$J,112,2967,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2968,0)
	;;=SEEDS, PUMPKIN AND SQUASH SEEDS, WHOLE, ROASTED, WO/SALT^12-163^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2968,1)
	;;=18.55^19.4^53.75^446^4.5^^^55^3.31^262^92^919^18^10.3^.69^.496^^62^.3^.034
	;;^UTILITY(U,$J,112,2968,2)
	;;=.052^.286^.056^.037^9^0^8.759^.077^0^3.67^6.032^8.844^6^3.8
	;;^UTILITY(U,$J,112,2968,3)
	;;=.326^.683^.956^1.572^1.386^.417^.228^.924^.77^1.491^3.049^.515^.875^1.873^3.262^1.358^.756^.868
	;;^UTILITY(U,$J,112,2968,4)
	;;=^.019^.022^2.374^.042^1.189^5.985
	;;^UTILITY(U,$J,112,2968,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2969,0)
	;;=SEEDS, SAFFLOWER SEED KERNELS, DRIED^12-021^oz.^28.3^51^N
	;;^UTILITY(U,$J,112,2969,1)
	;;=16.18^38.45^34.29^517^5.62^^^78^4.9^353^644^687^3^5.05^1.747^2.014^^50^0^1.163
	;;^UTILITY(U,$J,112,2969,2)
	;;=.415^2.284^4.03^1.17^160.4^0^28.084^.111^0^3.682^4.848^28.223^5^5.47
	;;^UTILITY(U,$J,112,2969,3)
	;;=.183^.586^.717^1.154^.534^.284^.311^.806^.531^1.025^1.749^.452^.772^1.807^3.699^1.01^.726^.812
	;;^UTILITY(U,$J,112,2969,4)
	;;=^^.035^2.574^.037^.921^4.806
	;;^UTILITY(U,$J,112,2969,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2970,0)
	;;=SEEDS, SESAME SEED KERNELS, TOASTED, W/SALT ADDED^12-529^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2970,1)
	;;=16.96^48^26.04^567^5^^^131^7.78^346^774^406^588^10.23^1.457^1.427^^66^0^1.205
	;;^UTILITY(U,$J,112,2970,2)
	;;=.466^5.438^.68^.146^95.8^0^20.654^.363^0^6.722^18.127^21.039^7^4^^^16.9
	;;^UTILITY(U,$J,112,2970,3)
	;;=.371^.704^.73^1.299^.544^.56^.342^.899^.71^.947^2.515^.499^.886^1.574^3.782^1.162^.774^.925
	;;^UTILITY(U,$J,112,2970,4)
	;;=^^.12^4.292^.144^2.019^17.897
	;;^UTILITY(U,$J,112,2970,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2971,0)
	;;=SEEDS, SESAME SEED KERNELS, TOASTED, WO/SALT ADDED^12-029^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2971,1)
	;;=16.96^48^26.04^567^5^^^131^7.78^346^774^406^39^10.23^1.457^1.427^^66^0^1.205
	;;^UTILITY(U,$J,112,2971,2)
	;;=.466^5.438^.68^.146^95.8^0^20.654^.363^0^6.722^18.127^21.039^7^4^^^16.9
	;;^UTILITY(U,$J,112,2971,3)
	;;=.371^.704^.73^1.299^.544^.56^.342^.899^.71^.947^2.515^.499^.886^1.574^3.782^1.162^.774^.925
	;;^UTILITY(U,$J,112,2971,4)
	;;=^^.12^4.292^.144^2.019^17.897
	;;^UTILITY(U,$J,112,2971,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2972,0)
	;;=SEEDS, SESAME SEEDS, WHOLE, ROASTED AND TOASTED^12-024^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2972,1)
	;;=16.96^48^25.74^565^3.3^^^989^14.76^356^638^475^11^7.16^2.47^2.496^^9^0^.803