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

FHINI07Z.m

Go to the documentation of this file.
FHINI07Z	; ; 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,2768,20)
	;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
	;;^UTILITY(U,$J,112,2769,0)
	;;=COWPEAS, COMMON(BLACK-EYED,CROWDER,SOUTHERN), CANNED W/PORK^16-065^cups^240^100^N
	;;^UTILITY(U,$J,112,2769,1)
	;;=2.74^1.6^16.53^83^77.59^^^17^1.42^43^96^178^350^1.04^.17^.392^^0^.2^.063
	;;^UTILITY(U,$J,112,2769,2)
	;;=.05^.431^.191^.045^51^0^.19^.039^7^.605^.656^.229^0^1.54^^^3.3
	;;^UTILITY(U,$J,112,2769,3)
	;;=.034^.104^.112^.21^.186^.039^.03^.16^.089^.131^.19^.085^.125^.331^.519^.113^.123^.137
	;;^UTILITY(U,$J,112,2769,4)
	;;=.001^.003^.02^.374^.039^.201^.603
	;;^UTILITY(U,$J,112,2769,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2770,0)
	;;=COWPEAS, COMMON(BLACK-EYED,CROWDER,SOUTHERN), BOILED, W/SALT^16-363^cups^172^100^N
	;;^UTILITY(U,$J,112,2770,1)
	;;=7.73^.53^20.77^116^70.04^^^24^2.51^53^156^278^240^1.29^.268^.475^^15^.4^.202
	;;^UTILITY(U,$J,112,2770,2)
	;;=.055^.495^.411^.1^207.9^0^.143^.083^0^.138^.044^.225^2^.94
	;;^UTILITY(U,$J,112,2770,3)
	;;=.095^.294^.314^.592^.523^.11^.085^.451^.25^.368^.535^.24^.352^.933^1.463^.319^.347^.387
	;;^UTILITY(U,$J,112,2770,4)
	;;=^0^.001^.106^.002^.022^.036
	;;^UTILITY(U,$J,112,2770,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2771,0)
	;;=COWPEAS, LEAFY TIPS, BOILED, DRAINED, W/SALT^11-780^cups^52^100^N
	;;^UTILITY(U,$J,112,2771,1)
	;;=4.67^.1^2.8^22^91.3^^^69^1.09^62^42^351^242^.24^.154^.412^^576^18.4^.256
	;;^UTILITY(U,$J,112,2771,2)
	;;=.142^1.008^.046^.135^60.4^0^.024^.017^0^.026^.009^.042^58^1.13
	;;^UTILITY(U,$J,112,2771,4)
	;;=^^0^.021^0^.003^.005
	;;^UTILITY(U,$J,112,2771,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2772,0)
	;;=COWPEAS, LEAFY TIPS, BOILED, DRAINED, WO/SALT^11-202^cups^52^100^N
	;;^UTILITY(U,$J,112,2772,1)
	;;=4.67^.1^2.8^22^91.3^^^69^1.09^62^42^351^6^.24^.154^.412^^576^18.4^.256
	;;^UTILITY(U,$J,112,2772,2)
	;;=.142^1.008^.046^.135^60.4^0^.024^.017^0^.026^.009^.042^58^1.13
	;;^UTILITY(U,$J,112,2772,4)
	;;=^^0^.021^0^.003^.005
	;;^UTILITY(U,$J,112,2772,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2773,0)
	;;=COWPEAS, YOUNG PODS W/SEEDS, BOILED, DRAINED, W/SALT^11-779^cups^94^100^N
	;;^UTILITY(U,$J,112,2773,1)
	;;=2.6^.3^7^34^89.5^^^55^.7^41^49^196^239^.24^.071^.219^^1400^17^.09
	;;^UTILITY(U,$J,112,2773,2)
	;;=.09^.8^.638^.123^25.6^0^.072^.052^0^.079^.027^.127^140^.6
	;;^UTILITY(U,$J,112,2773,4)
	;;=^^.001^.063^.001^.01^.016
	;;^UTILITY(U,$J,112,2773,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2774,0)
	;;=COWPEAS, YOUNG PODS W/SEEDS, BOILED, DRAINED, WO/SALT^11-198^cups^94^100^N
	;;^UTILITY(U,$J,112,2774,1)
	;;=2.6^.3^7^34^89.5^^^55^.7^41^49^196^3^.24^.071^.219^^1400^17^.09
	;;^UTILITY(U,$J,112,2774,2)
	;;=.09^.8^.638^.123^25.6^0^.072^.052^0^.079^.027^.127^140^.6
	;;^UTILITY(U,$J,112,2774,4)
	;;=^^.001^.063^.001^.01^.016
	;;^UTILITY(U,$J,112,2774,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2775,0)
	;;=CRAB, ALASKA KING, COOKED, MOIST HEAT^15-137^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2775,1)
	;;=19.35^1.54^0^97^77.55^^^59^.76^63^280^262^1072^7.62^1.182^.04^^29^7.6^.053
	;;^UTILITY(U,$J,112,2775,2)
	;;=.055^1.34^.4^.18^51^11.5^.02^.014^53^.133^.185^.536^9^1.85^^^0
	;;^UTILITY(U,$J,112,2775,3)
	;;=.269^.783^.938^1.536^1.684^.545^.217^.817^.644^.91^1.69^.393^1.096^2^3.3^1.167^.638^.762
	;;^UTILITY(U,$J,112,2775,4)
	;;=.003^.004^.015^.087^.041^.019^.089^.043
	;;^UTILITY(U,$J,112,2775,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2776,0)
	;;=CRAB, ALASKA KING, IMITATION, MADE FROM SURIMI^15-138^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2776,1)
	;;=12.02^1.31^10.22^102^73.7^^^13^.39^43^282^90^841^.33^.032^.011^^66^0^.032
	;;^UTILITY(U,$J,112,2776,2)
	;;=.027^.18^.07^.03^1.6^1.6^^^20^.26^.2^.67^20^2.75^^^0
	;;^UTILITY(U,$J,112,2776,3)
	;;=.073^.581^.562^.952^1.098^.408^.129^.471^.485^.61^.798^.277^.706^1.202^1.898^.465^.448^.525
	;;^UTILITY(U,$J,112,2776,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2777,0)
	;;=CRAYFISH, COOKED, MOIST HEAT^15-146^oz.^28.3^100^N
	;;^UTILITY(U,$J,112,2777,1)
	;;=16.77^1.2^0^88^79.37^^^60^.83^33^270^296^94^1.76^.685^.522^^50^.9^.05
	;;^UTILITY(U,$J,112,2777,2)
	;;=.085^2.28^.58^.076^44^2.15^.09^.028^133^.181^.244^.367^15^1.2^^^0
	;;^UTILITY(U,$J,112,2777,3)
	;;=.234^.676^.811^1.329^1.457^.472^.188^.706^.558^.786^1.463^.341^.947^1.731^2.856^1.009^.553^.66
	;;^UTILITY(U,$J,112,2777,4)
	;;=^^.005^.111^.027^.049^.147^.056
	;;^UTILITY(U,$J,112,2777,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,2778,0)
	;;=DEER, ROASTED^17-165^oz.^28.3^100^N