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

FHINI0DQ.m

Go to the documentation of this file.
FHINI0DQ	; ; 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,8660,2)
	;;=.1^1.667^.192^.033^7.5^.117^^^5^^^^^^^^.833
	;;^UTILITY(U,$J,112,8660,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8661,0)
	;;=RICE W/ HERB BUTTER SCE,FRZN,RICE^BC-01934^1/2-cup^119
	;;^UTILITY(U,$J,112,8661,1)
	;;=2.437^4.202^19.58^126.05^72.689^^^15.126^1.504^^33.613^41.176^341.176^^^^^173.109^0^.202
	;;^UTILITY(U,$J,112,8661,2)
	;;=.034^2.101^^^^^^^^^^^^^^^.672
	;;^UTILITY(U,$J,112,8661,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8662,0)
	;;=RICE W/ HERBS & BUTTER,PREP,RICE-A-RONI^BC-01935^1/2-cup^120
	;;^UTILITY(U,$J,112,8662,1)
	;;=2.167^3.333^18.25^116.667^^^^21.667^.65^9.167^40^48.333^666.667^.283^.075^.317^^^0^.142
	;;^UTILITY(U,$J,112,8662,2)
	;;=.042^1.333^.183^.033^5.833^.042^^^.833^^^^^^^^.5
	;;^UTILITY(U,$J,112,8662,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8663,0)
	;;=RICE,SPANISH,PREP,RICE-A-RONI^BC-01936^1/2-cup^120
	;;^UTILITY(U,$J,112,8663,1)
	;;=2.667^3.333^18.5^125^^^^15.833^1.075^10.833^39.167^62.5^908.333^.308^.075^.275^^^1.667^.192
	;;^UTILITY(U,$J,112,8663,2)
	;;=.067^1.583^.125^.033^3.333^.042^^^.833^^^^^^^^.583
	;;^UTILITY(U,$J,112,8663,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8664,0)
	;;=RICE,WHITE,CKD,MINUTE^BC-01937^2/3-cup^124
	;;^UTILITY(U,$J,112,8664,1)
	;;=2.097^1.613^22.097^113.71^74.194^^^4.032^.871^4.839^27.419^.806^16.935^.298^.033^^^58.065^0^.121
	;;^UTILITY(U,$J,112,8664,2)
	;;=.008^.968^.081^.008^.806^0^^^4.032^.968^^.081^^^^^.403
	;;^UTILITY(U,$J,112,8664,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8665,0)
	;;=RICE,WHITE,LONG-GRAIN,CKD,MINUTE^BC-01938^1/2-cup^100
	;;^UTILITY(U,$J,112,8665,1)
	;;=2^0^21^94^^^^3^.7^2^21^5^4^^.04^^^^^.12
	;;^UTILITY(U,$J,112,8665,2)
	;;=.02^.8^.06^.02
	;;^UTILITY(U,$J,112,8665,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8666,0)
	;;=RICE,INST,PREP^BC-01939^cup^165
	;;^UTILITY(U,$J,112,8666,1)
	;;=2.061^.182^21.273^97.576^76.424^^^7.879^.63^5.455^13.939^4.242^2.424^.242^.065^.235^^^0^.073
	;;^UTILITY(U,$J,112,8666,2)
	;;=.048^.909^.176^.012^3.636^0^^^0^.061^.061^.061^^^^^.788
	;;^UTILITY(U,$J,112,8666,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8667,0)
	;;=RICE,PARBOILED,CKD^BC-01940^cup^175
	;;^UTILITY(U,$J,112,8667,1)
	;;=2.286^.286^24.743^113.714^72.514^^^18.857^1.126^11.429^41.714^37.714^3.429^.303^.094^.26^^^0^.251
	;;^UTILITY(U,$J,112,8667,2)
	;;=.017^1.429^.326^.017^3.429^0^^^0^.057^.057^.057^^^^^.514
	;;^UTILITY(U,$J,112,8667,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8668,0)
	;;=RICE,WHITE,LONG-GRAIN & WILD CKD,MINUTE^BC-01941^1/2-cup^115
	;;^UTILITY(U,$J,112,8668,1)
	;;=2.435^3.565^21.478^129.565^71.217^^^12.174^1.261^8.696^21.739^35.652^499.13^.252^.04^^^133.913^.87^.174
	;;^UTILITY(U,$J,112,8668,2)
	;;=.017^2.087^.113^.017^2.609^.009^^^8.696^2.087^^.174
	;;^UTILITY(U,$J,112,8668,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8669,0)
	;;=RICE,WHITE,LONG-GRAIN & WILD CKD,FRZN,PILSBURY^BC-01942^1/2-cup^113
	;;^UTILITY(U,$J,112,8669,1)
	;;=2.655^1.77^21.239^115.044^^^^^^^^48.673^477.876
	;;^UTILITY(U,$J,112,8669,2)
	;;=^^^^^^^^0^^^0
	;;^UTILITY(U,$J,112,8669,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8670,0)
	;;=RICE,WHITE LONG-GRAIN & WILD,FRZN,RICE ORIGINALS^BC-01943^1/2-cup^109
	;;^UTILITY(U,$J,112,8670,1)
	;;=2.385^1.927^20.642^110.092^74.037^^^12.844^1.303^^36.697^35.78^486.239^^^^^81.651^2.752^.193
	;;^UTILITY(U,$J,112,8670,2)
	;;=.028^1.193^^^^^^^^^^^^^^^.183
	;;^UTILITY(U,$J,112,8670,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8671,0)
	;;=RICE,WHITE LONG-GRAIN & WILD W/SCE,PREP,LIPTON^BC-01944^1/2-cup^34
	;;^UTILITY(U,$J,112,8671,1)
	;;=11.176^.588^76.765^355.882^^^^32.353^6.765^38.235^241.176^0^1558.824^1.765^.294^.882^^0^0^.882
	;;^UTILITY(U,$J,112,8671,2)
	;;=.294^10^^^^^^^0
	;;^UTILITY(U,$J,112,8671,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8672,0)
	;;=ROLLS,FROM REFRIG DOUGH,BUTTERFLAKE,PILSBURY^BC-01945^1.7-oz.^47
	;;^UTILITY(U,$J,112,8672,1)
	;;=6.596^10.426^42.553^293.617^36.17^^^23.404^2.617^^459.574^61.702^1106.383^^^^^0^0^.319
	;;^UTILITY(U,$J,112,8672,2)
	;;=.213^2.979
	;;^UTILITY(U,$J,112,8672,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,8673,0)
	;;=ROLLS,CRESCENT,PILSBURY^BC-01946^roll^28