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

FHINI0DP.m

Go to the documentation of this file.
FHINI0DP	; ; 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,8647,2)
	;;=.257^3.429
	;;^UTILITY(U,$J,112,8647,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8648,0)
	;;=RICE,CHINESE FRIED RICE,LACHOY^BC-01921^3/4-cup^116
	;;^UTILITY(U,$J,112,8648,1)
	;;=3.448^.862^35.345^163.793^^^^12.069^2.328^^^25.862^706.897^^^^^^^.129
	;;^UTILITY(U,$J,112,8648,2)
	;;=^3.448^^^^^^^0^.086^^.172^^^^^0
	;;^UTILITY(U,$J,112,8648,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8649,0)
	;;=RICE,FRIED RICE W/ALMONDS,PREP,RICE-A-RONI^BC-01922^1/2-cup^120
	;;^UTILITY(U,$J,112,8649,1)
	;;=2.583^4.167^17.917^116.667^^^^13.333^.942^10.833^35.833^60.833^591.667^.275^.067^.233^^^0^.158
	;;^UTILITY(U,$J,112,8649,2)
	;;=.058^1.333^.117^.025^4.167^.042^^^0^^^^^^^^.75
	;;^UTILITY(U,$J,112,8649,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8650,0)
	;;=RICE,FRIED RICE W/VERMICELLI,PREP,MINUTE^BC-01923^1/2-cup^97
	;;^UTILITY(U,$J,112,8650,1)
	;;=3.299^4.948^25.979^162.887^64.021^^^10.309^1.34^9.278^38.144^48.454^565.979^.381^.044^^^1.031^0^.165
	;;^UTILITY(U,$J,112,8650,2)
	;;=.01^1.443^.082^.021^2.062^0^^^0^.722^^1.856
	;;^UTILITY(U,$J,112,8650,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8651,0)
	;;=RICE,MEDLEY,FRZN,RICE ORIGINALS^BC-01924^1/2-cup^113
	;;^UTILITY(U,$J,112,8651,1)
	;;=2.566^2.389^18.761^107.08^75.398^^^12.389^1.602^^38.053^46.903^232.743^^^^^389.381^0^.292
	;;^UTILITY(U,$J,112,8651,2)
	;;=.027^2.124^^^^^^^^^^^^^^^.354
	;;^UTILITY(U,$J,112,8651,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8652,0)
	;;=RICE,PILAF,FRZN,PILLSBURY^BC-01925^1/2-cup^113
	;;^UTILITY(U,$J,112,8652,1)
	;;=1.77^.885^18.584^97.345^^^^^^^^48.673^469.027
	;;^UTILITY(U,$J,112,8652,2)
	;;=^^^^^^^^1.77^^^0
	;;^UTILITY(U,$J,112,8652,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8653,0)
	;;=RICE,PILAF,FRZN,RICE ORIGINALS^BC-01926^1/2-cup^113
	;;^UTILITY(U,$J,112,8653,1)
	;;=2.389^1.416^20^102.655^75.044^^^9.735^1.301^^30.088^75.221^459.292^^^^^30.088^.885^.221
	;;^UTILITY(U,$J,112,8653,2)
	;;=.027^2.212^^^^^^^^^^^^^^^.088
	;;^UTILITY(U,$J,112,8653,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8654,0)
	;;=RICE,PILAF,PREP,RICE-A-RONI^BC-01927^1/2-cup^120
	;;^UTILITY(U,$J,112,8654,1)
	;;=3.833^5^25^158.333^^^^30^.908^13.333^70.833^75^1016.667^.425^.1^.408^^^0^.192
	;;^UTILITY(U,$J,112,8654,2)
	;;=.092^2^.308^.058^18.333^.058^^^.833^^^^^^^^.75
	;;^UTILITY(U,$J,112,8654,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8655,0)
	;;=RICE,PILAF W/SCE,PREP,LIPTON^BC-01928^1/2-cup^32
	;;^UTILITY(U,$J,112,8655,1)
	;;=10.625^1.563^77.188^365.625^^^^40.625^4.063^28.125^212.5^181.25^1259.375^1.25^.313^0^^0^3.125^.625
	;;^UTILITY(U,$J,112,8655,2)
	;;=.313^7.188
	;;^UTILITY(U,$J,112,8655,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8656,0)
	;;=RICE W/BEEF FLAVOR,PREP,RICE-A-RONI^BC-01929^1/2-cup^120
	;;^UTILITY(U,$J,112,8656,1)
	;;=3.583^4.167^22.75^141.667^^^^9.167^1.108^14.167^63.333^88.333^775^^.092^.325^^^0^.225
	;;^UTILITY(U,$J,112,8656,2)
	;;=.117^2.333^.317^.075^14.167^.058^^^.833^^^^^^^^1.083
	;;^UTILITY(U,$J,112,8656,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8657,0)
	;;=RICE W/CAJUN SCE,PREP,LIPTON^BC-01930^1/2-cup^34
	;;^UTILITY(U,$J,112,8657,1)
	;;=11.471^1.176^76.471^361.765^^^^29.412^4.412^26.471^144.118^226.471^1752.941^.588^.294^0^^573.529^8.824^.882
	;;^UTILITY(U,$J,112,8657,2)
	;;=.294^10
	;;^UTILITY(U,$J,112,8657,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8658,0)
	;;=RICE W/CHICKEN FLAVOR,PREP,RICE-A-RONI^BC-01931^1/2-cup^120
	;;^UTILITY(U,$J,112,8658,1)
	;;=3.083^4.167^23.5^141.667^^^^10^1.233^12.5^41.667^50^650^.358^.092^.292^^^0^.233
	;;^UTILITY(U,$J,112,8658,2)
	;;=.067^1.917^.117^.025^4.167^.058^^^.833^^^^^^^^.667
	;;^UTILITY(U,$J,112,8658,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8659,0)
	;;=RICE W/ GARDEN PILAF,PREP,RICE-A-RONI^BC-01932^1/2-cup^120
	;;^UTILITY(U,$J,112,8659,1)
	;;=3^3.333^19.083^116.667^^^^9.167^1.208^9.167^52.5^72.5^833.333^.3^.092^.183^^^0^.167
	;;^UTILITY(U,$J,112,8659,2)
	;;=.067^2.083^.158^.05^11.667^0^^^.833^^^^^^^^.917
	;;^UTILITY(U,$J,112,8659,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8660,0)
	;;=RICE W/ GREEN BEAN ALMONDINE,PREP,RICE-A-RONI^BC-01933^1/2-cup^120
	;;^UTILITY(U,$J,112,8660,1)
	;;=4^3.333^18.583^116.667^^^^40.833^1.067^14.167^88.333^84.167^833.333^.433^.075^.2^^^.833^.158