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

FHINI0GN.m

Go to the documentation of this file.
FHINI0GN	; ; 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,10099,1)
	;;=3.263^6.526^14.947^131.579^74.105^^^27.368^.642^22.105^44.211^165.263^375.789^.253^.051^^^931.579^10.526^.095
	;;^UTILITY(U,$J,112,10099,2)
	;;=.084^.632^.263^.116^30.526^.011^^^0^1.263^^1.684
	;;^UTILITY(U,$J,112,10099,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10100,0)
	;;=ONION RINGS,FROZEN,MRS. PAUL'S^BC-03373^2.5-oz.^71
	;;^UTILITY(U,$J,112,10100,1)
	;;=3.944^14.366^33.944^281.69^^^^28.169^1.268^^^74.648^516.901^^^^^33.803^1.408^.127
	;;^UTILITY(U,$J,112,10100,2)
	;;=.07^1.268
	;;^UTILITY(U,$J,112,10100,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10101,0)
	;;=ONION RINGS,FROZEN,ORE-LDA^BC-03374^2-oz.^57
	;;^UTILITY(U,$J,112,10101,1)
	;;=3.158^12.456^31.053^249.123^51.754^^^21.053^.947^^^182.456^226.316^^^^^100^5.263^.088
	;;^UTILITY(U,$J,112,10101,2)
	;;=.053^1.228^^^^^^^^2.105^4.561^5.789
	;;^UTILITY(U,$J,112,10101,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10102,0)
	;;=ONION RINGS,FRZN,CHOPPED,ORE-LDA^BC-03375^2-oz.^57
	;;^UTILITY(U,$J,112,10102,1)
	;;=1.053^0^7.368^35.088^91.053^^^0^^^^159.649^14.035^^^^^^3.509^.053
	;;^UTILITY(U,$J,112,10102,2)
	;;=.018^.877^^^^^^^0^0^0^0
	;;^UTILITY(U,$J,112,10102,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10103,0)
	;;=ONION RINGS,FRZN,SMALL,WHOLE,BIRDS EYE^BC-03376^1/2-cup^113
	;;^UTILITY(U,$J,112,10103,1)
	;;=.885^.088^8.496^35.398^90.177^^^35.398^.46^10.619^23.009^138.053^8.85^.115^.05^^^16.814^7.965^.027
	;;^UTILITY(U,$J,112,10103,2)
	;;=.027^.177^.097^.088^21.239^0^^^0^0^^0
	;;^UTILITY(U,$J,112,10103,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10104,0)
	;;=ONION RINGS,FRZN,SMALL W/CREAM SCE,BIRDS EYE^BC-03377^1/2-cup^85
	;;^UTILITY(U,$J,112,10104,1)
	;;=1.882^6.941^12.706^117.647^76.941^^^64.706^.424^14.118^64.706^197.647^405.882^.141^.045^^^295.294^7.059^.035
	;;^UTILITY(U,$J,112,10104,2)
	;;=.118^.235^.282^.094^17.647^.259^^^1.176^1.412^^1.294
	;;^UTILITY(U,$J,112,10104,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10105,0)
	;;=VEGETABLE,ORIENTAL STYLE,FROZEN,GARDEN GOURMET^BC-03378^9.5-oz.^269
	;;^UTILITY(U,$J,112,10105,1)
	;;=2.9^.149^17.286^73.978^78.513^^^15.985^^^53.903^123.048^260.967^^^^^40.149^2.23
	;;^UTILITY(U,$J,112,10105,2)
	;;=.082^^^^^^^^^^^^^^^^2.007
	;;^UTILITY(U,$J,112,10105,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10106,0)
	;;=VEGETABLE,PASTA PRIMAVERA STYLE,FRZN,BIRDS EYE^BC-03379^1/2-cup^95
	;;^UTILITY(U,$J,112,10106,1)
	;;=5.263^5.474^15.053^128.421^72.632^^^100^1^21.053^102.105^181.053^355.789^.558^.071^^^4504.211^17.895^.147
	;;^UTILITY(U,$J,112,10106,2)
	;;=.137^1.158^.242^.105^30.526^.137^^^3.158^1.474^^.947
	;;^UTILITY(U,$J,112,10106,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10107,0)
	;;=PEAS & ONION,CND,PILLSBURY^BC-03380^1/2-cup^120
	;;^UTILITY(U,$J,112,10107,1)
	;;=2.917^.25^9^50^86^^^16.667^.8^^51.667^95.833^441.667^^^^^465^8.333^.092
	;;^UTILITY(U,$J,112,10107,2)
	;;=.067^1.417
	;;^UTILITY(U,$J,112,10107,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10108,0)
	;;=PEAS & PEARL ONIONS,FRZN,BIRD EYE^BC-03381^1/2-cup^95
	;;^UTILITY(U,$J,112,10108,1)
	;;=4.842^.211^14.211^74.737^79.579^^^15.789^.895^18.947^62.105^181.053^465.263^.505^.087^^^669.474^20^.253
	;;^UTILITY(U,$J,112,10108,2)
	;;=.084^1.895^.179^13.684^46.316^0^^^0^0^^.105^^^^^3.684
	;;^UTILITY(U,$J,112,10108,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10109,0)
	;;=PEAS & PEARL ONIONS,FRZN W/CHEESE SCE,BIRDS EYE^BC-03382^1/2-cup^142
	;;^UTILITY(U,$J,112,10109,1)
	;;=4.014^3.451^12.746^96.479^78.592^^^53.521^.859^17.606^76.761^152.817^314.085^.507^.066^^^1510.563^10.563^.155
	;;^UTILITY(U,$J,112,10109,2)
	;;=.113^1.056^.204^.092^30.282^.162^^^2.817^1.056^^.563
	;;^UTILITY(U,$J,112,10109,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10110,0)
	;;=PEAS & POTATOES W/CREAM SCE,FRZN,BIRDS EYE^BC-03383^1/2-cup^76
	;;^UTILITY(U,$J,112,10110,1)
	;;=4.474^8.158^19.474^167.105^65.789^^^55.263^.974^27.632^110.526^273.684^513.158^.632^.122^^^684.211^7.895^.197
	;;^UTILITY(U,$J,112,10110,2)
	;;=.171^1.184^.434^.158^34.211^.303^^^1.316^1.711^^1.447
	;;^UTILITY(U,$J,112,10110,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,10111,0)
	;;=PEAS ONIONS & CARROTS W/BUTTER SCE,FROZEN,LE SUEUR^BC-03384^1/2-cup^120