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

FHINI01N.m

Go to the documentation of this file.
FHINI01N	; ; 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,407,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,408,0)
	;;=CHICKEN, LIGHT MEAT, MEAT&SKIN, FRIED, FLR^5-031^oz.^28.35^72^N
	;;^UTILITY(U,$J,112,408,1)
	;;=30.45^12.09^1.82^246^54.66^^^16^1.21^27^213^239^77^1.26^.058^.026^^68^0^.076
	;;^UTILITY(U,$J,112,408,2)
	;;=.133^12.035^.97^.54^4^.33^2.33^.11^87^3.32^4.8^2.69^20^.98^^^.1
	;;^UTILITY(U,$J,112,408,3)
	;;=.344^1.262^1.537^2.231^2.487^.815^.405^1.192^.991^1.485^1.888^.904^1.745^2.703^4.534^1.86^1.447^1.074
	;;^UTILITY(U,$J,112,408,4)
	;;=0^.01^.09^2.35^.51^.8^4.13^.09
	;;^UTILITY(U,$J,112,408,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,409,0)
	;;=CHICKEN, LIGHT MEAT, MEAT&SKIN, ROASTED^5-032^oz.^28.35^71^N
	;;^UTILITY(U,$J,112,409,1)
	;;=29.02^10.85^0^222^60.51^^^15^1.14^25^200^227^75^1.23^.053^.018^^110^0^.06
	;;^UTILITY(U,$J,112,409,2)
	;;=.118^11.134^.926^.52^3^.32^1.98^.09^84^3.05^4.26^2.31^32^.93^^^0
	;;^UTILITY(U,$J,112,409,3)
	;;=.326^1.202^1.458^2.119^2.374^.776^.385^1.13^.94^1.412^1.811^.858^1.679^2.587^4.254^1.823^1.381^1.021
	;;^UTILITY(U,$J,112,409,4)
	;;=0^.01^.09^2.25^.57^.62^3.51^.09
	;;^UTILITY(U,$J,112,409,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,410,0)
	;;=CHICKEN, LIGHT MEAT, MEAT&SKIN, STEWED^5-033^oz.^28.35^71^N
	;;^UTILITY(U,$J,112,410,1)
	;;=26.14^9.97^0^201^65.13^^^13^.98^20^146^167^63^1.14^.044^.018^^96^0^.041
	;;^UTILITY(U,$J,112,410,2)
	;;=.112^6.935^.535^.27^3^.2^1.83^.08^74^2.8^3.92^2.12^28^.78^^^0
	;;^UTILITY(U,$J,112,410,3)
	;;=.294^1.084^1.316^1.91^2.142^.699^.347^1.019^.848^1.273^1.629^.774^1.509^2.33^3.835^1.629^1.238^.919
	;;^UTILITY(U,$J,112,410,4)
	;;=0^.01^.08^2.07^.53^.56^3.23^.08
	;;^UTILITY(U,$J,112,410,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,411,0)
	;;=CHICKEN, DARK MEAT, MEAT&SKIN, FRIED, BATTER^5-035^oz.^28.35^77^N
	;;^UTILITY(U,$J,112,411,1)
	;;=21.85^18.64^9.38^298^48.82^^^21^1.44^20^145^185^295^2.08^.08^.058^^103^0^.117
	;;^UTILITY(U,$J,112,411,2)
	;;=.218^5.607^.953^.25^9^.27^3.96^.21^89^4.95^7.58^4.43^31^1.31
	;;^UTILITY(U,$J,112,411,3)
	;;=.25^.895^1.094^1.605^1.713^.574^.302^.874^.711^1.067^1.333^.637^1.226^1.889^3.506^1.318^1.136^.806
	;;^UTILITY(U,$J,112,411,4)
	;;=0^.02^.11^3.29^.59^1.43^6.84^.11
	;;^UTILITY(U,$J,112,411,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,412,0)
	;;=CHICKEN, DARK MEAT, MEAT&SKIN, FRIED, FLR^5-036^oz.^28.35^70^N
	;;^UTILITY(U,$J,112,412,1)
	;;=27.22^16.91^4.08^285^50.82^^^17^1.5^24^176^230^89^2.6^.088^.039^^104^0^.095
	;;^UTILITY(U,$J,112,412,2)
	;;=.235^6.842^1.157^.32^8^.3^3.42^.17^92^4.58^6.66^3.91^31^.97
	;;^UTILITY(U,$J,112,412,3)
	;;=.308^1.123^1.37^1.994^2.202^.725^.365^1.071^.884^1.326^1.681^.804^1.553^2.401^4.13^1.662^1.323^.968
	;;^UTILITY(U,$J,112,412,4)
	;;=0^.03^.12^3.19^.74^1.12^5.73^.14
	;;^UTILITY(U,$J,112,412,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,413,0)
	;;=CHICKEN, DARK MEAT, MEAT&SKIN, ROASTED^5-037^oz.^28.35^64^N
	;;^UTILITY(U,$J,112,413,1)
	;;=25.97^15.78^0^253^58.63^^^15^1.36^22^168^220^87^2.49^.077^.021^^201^0^.066
	;;^UTILITY(U,$J,112,413,2)
	;;=.207^6.359^1.111^.31^7^.29^3.04^.14^91^4.37^6.19^3.49^58^.92^^^0
	;;^UTILITY(U,$J,112,413,3)
	;;=.289^1.071^1.288^1.883^2.105^.688^.348^1.007^.832^1.258^1.634^.759^1.523^2.316^3.787^1.718^1.277^.918
	;;^UTILITY(U,$J,112,413,4)
	;;=0^.03^.12^3.19^.86^.9^5.11^.14
	;;^UTILITY(U,$J,112,413,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,414,0)
	;;=CHICKEN, DARK MEAT, MEAT&SKIN, STEWED^5-038^oz.^28.35^62^N
	;;^UTILITY(U,$J,112,414,1)
	;;=23.5^14.66^0^233^62.99^^^14^1.31^18^133^166^70^2.26^.068^.019^^186^0^.05
	;;^UTILITY(U,$J,112,414,2)
	;;=.177^4.513^.773^.17^6^.2^2.82^.13^82^4.06^5.75^3.24^54^.74^^^0
	;;^UTILITY(U,$J,112,414,3)
	;;=.261^.969^1.167^1.705^1.906^.623^.314^.911^.754^1.139^1.477^.687^1.376^2.095^3.428^1.547^1.152^.83
	;;^UTILITY(U,$J,112,414,4)
	;;=0^.03^.11^2.97^.8^.83^4.74^.13
	;;^UTILITY(U,$J,112,414,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,415,0)
	;;=CHICKEN, LIGHT MEAT, MEAT ONLY, FRIED^5-040^oz.^28.35^59^N
	;;^UTILITY(U,$J,112,415,1)
	;;=32.82^5.54^.42^192^60.14^^^16^1.14^29^231^263^81^1.27^.054^.02^^30^0^.073
	;;^UTILITY(U,$J,112,415,2)
	;;=.126^13.365^1.03^.63^4^.36^.99^.05^90^1.52^1.97^1.26^9^1.09^^^0
	;;^UTILITY(U,$J,112,415,3)
	;;=.383^1.386^1.732^2.463^2.784^.908^.42^1.303^1.108^1.628^1.978^1.018^1.789^2.922^4.928^1.611^1.354^1.13
	;;^UTILITY(U,$J,112,415,4)
	;;=0^.01^.04^1^.17^.43^1.74^.09
	;;^UTILITY(U,$J,112,415,20)
	;;=USDA Std. Reference, Release 10
	;;^UTILITY(U,$J,112,416,0)
	;;=CHICKEN, LIGHT MEAT, MEAT ONLY, ROASTED^5-041^oz.^28.35^58^N