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

FHINI08F.m

Go to the documentation of this file.
FHINI08F	; ; 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,2917,0)
	;;=POTATOES, MICROWAVED, COOKED IN SKIN, FLESH, WO/SALT^11-368^cups^156^77^N
	;;^UTILITY(U,$J,112,2917,1)
	;;=2.1^.1^23.28^100^73.55^^^5^.41^25^109^411^7^.33^.237^.17^^0^15.1^.129
	;;^UTILITY(U,$J,112,2917,2)
	;;=.025^1.625^.597^.319^12.4^0^.032^.01^0^.026^.002^.043^0^.97
	;;^UTILITY(U,$J,112,2917,3)
	;;=.033^.076^.085^.126^.128^.033^.027^.093^.078^.118^.097^.046^.065^.514^.352^.062^.076^.091
	;;^UTILITY(U,$J,112,2917,4)
	;;=.001^.003^.001^.016^.001^.004^.001
	;;^UTILITY(U,$J,112,2917,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2918,0)
	;;=POTATOES, MICROWAVED, COOKED IN SKIN, W/SALT^11-834^potatos^202^100^N
	;;^UTILITY(U,$J,112,2918,1)
	;;=2.44^.1^24.13^105^72.04^^^11^1.24^27^105^447^244^.36^.334^.292^^0^15.1^.12
	;;^UTILITY(U,$J,112,2918,2)
	;;=.032^1.714^.454^.344^12^0^.032^.01^0^.026^.002^.043^0^1.18
	;;^UTILITY(U,$J,112,2918,3)
	;;=.038^.089^.099^.147^.149^.039^.031^.109^.091^.138^.113^.054^.075^.598^.41^.073^.088^.106
	;;^UTILITY(U,$J,112,2918,4)
	;;=.001^.003^.001^.016^.001^.004^.001
	;;^UTILITY(U,$J,112,2918,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2919,0)
	;;=POTATOES, O'BRIEN, HOME-PREPARED^11-671^cups^194^100^N
	;;^UTILITY(U,$J,112,2919,1)
	;;=2.35^1.28^15.47^81^79.6^^^36^.47^18^50^266^217^.3^.129^.121^^481^16.7^.075
	;;^UTILITY(U,$J,112,2919,2)
	;;=.056^1.008^.436^.213^8.3^0^.037^.018^4^.797^.347^.055^57^1.29
	;;^UTILITY(U,$J,112,2919,3)
	;;=.035^.089^.11^.169^.144^.043^.03^.106^.092^.133^.109^.054^.076^.376^.47^.067^.15^.112
	;;^UTILITY(U,$J,112,2919,4)
	;;=.025^.025^.125^.365^.036^.152^.302
	;;^UTILITY(U,$J,112,2919,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2920,0)
	;;=POTATOES, SCALLOPED, DRY MIX, PPD W/ WATER,MILK,BUTTER^11-387^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2920,1)
	;;=2.12^4.3^12.77^93^79.17^^^36^.38^14^56^203^341^.25^.049^.181^^148^3.3^.019
	;;^UTILITY(U,$J,112,2920,2)
	;;=.056^1.029^.327^.042^9.5^0^.122^.071^^2.633^1.213^.194^21^1.64^^^1.1
	;;^UTILITY(U,$J,112,2920,4)
	;;=.106^.121^.423^1.119^.094^.514^1.056
	;;^UTILITY(U,$J,112,2920,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2921,0)
	;;=POTATOES, SCALLOPED, HOME-PREPARED WITH MARGARINE^11-844^cups^244^100^N
	;;^UTILITY(U,$J,112,2921,1)
	;;=2.87^3.68^10.78^86^80.94^^^57^.57^19^63^378^335^.4^.163^.166^^135^10.6^.069
	;;^UTILITY(U,$J,112,2921,2)
	;;=.092^1.053^.514^.178^8.7^0^.693^.06^6^1.377^1.352^.746^19^1.73
	;;^UTILITY(U,$J,112,2921,3)
	;;=.042^.115^.144^.225^.192^.058^.034^.135^.121^.174^.118^.07^.094^.442^.579^.076^.202^.142
	;;^UTILITY(U,$J,112,2921,4)
	;;=.038^.043^.161^.665^.038^.335^1.296
	;;^UTILITY(U,$J,112,2921,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2922,0)
	;;=POULTRY FOOD PRODUCTS, GROUND TURKEY, COOKED^5-306^patties^82.4^100^N
	;;^UTILITY(U,$J,112,2922,1)
	;;=27.36^13.15^0^235^59.42^^^25^1.93^24^196^270^107^2.86^.09^.02^^0^0^.054
	;;^UTILITY(U,$J,112,2922,2)
	;;=.168^4.819^.813^.39^7^.33^2.91^.15^102^3.39^4.89^3.23^0^1.19^^^0
	;;^UTILITY(U,$J,112,2922,3)
	;;=.306^1.204^1.405^2.154^2.548^.784^.28^1.073^1.068^1.436^1.887^.845^1.672^2.627^4.413^1.34^1.125^1.204
	;;^UTILITY(U,$J,112,2922,4)
	;;=^0^.13^2.34^.58^.91^4.25^.12
	;;^UTILITY(U,$J,112,2922,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2923,0)
	;;=RABBIT, DOMESTICATED, ROASTED^17-178^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2923,1)
	;;=29.06^8.05^0^197^60.61^^^19^2.27^21^263^383^47^2.27^.189^.032^^0^0^.09
	;;^UTILITY(U,$J,112,2923,2)
	;;=.21^8.43^.93^.47^11^8.3^1.24^.32^82^2.4^2.17^1.56^0^1.04^^^0
	;;^UTILITY(U,$J,112,2923,3)
	;;=.384^1.3^1.379^2.264^2.544^.727^.365^1.193^1.035^1.477^1.795^.815^1.753^2.839^4.662^1.578^1.42^1.288
	;;^UTILITY(U,$J,112,2923,4)
	;;=^^.21^1.81^.26^.38^1.86
	;;^UTILITY(U,$J,112,2923,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2924,0)
	;;=RABBIT, WILD, STEWED^17-181^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2924,1)
	;;=33.02^3.51^0^173^61.37^^^18^4.85^31^240^343^45^^^^^0^0^.02
	;;^UTILITY(U,$J,112,2924,2)
	;;=.07^6.4^^^^^.54^.14^123^1.05^.95^.68^0^1.7^^^0
	;;^UTILITY(U,$J,112,2924,3)
	;;=.436^1.477^1.567^2.573^2.891^.826^.415^1.355^1.176^1.678^2.04^.926^1.992^3.226^5.297^1.793^1.614^1.463
	;;^UTILITY(U,$J,112,2924,4)
	;;=^^.09^.79^.12^.16^.81
	;;^UTILITY(U,$J,112,2924,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2925,0)
	;;=RACCOON, ROASTED^17-182^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2925,1)
	;;=29.2^14.5^0^255^54.3^^^^^^^^^^^^^0^0^.59
	;;^UTILITY(U,$J,112,2925,2)
	;;=.52^^^^^^^^^^^^0^1.5^^^0
	;;^UTILITY(U,$J,112,2925,20)
	;;=USDA Std. Reference, Release 10