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

FHINI0EZ.m

Go to the documentation of this file.
FHINI0EZ	; ; 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,9261,2)
	;;=.714^3.214^^.107^35.714^^^^0^4.286^^11.786
	;;^UTILITY(U,$J,112,9261,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9262,0)
	;;=ALMONDS,BLANCHED,SILVERED,BLUE DIAMOND^BC-02535^oz.^28
	;;^UTILITY(U,$J,112,9262,1)
	;;=21.071^51.429^19.643^614.286^4.643^^^253.571^3.714^307.143^539.286^639.286^7.143^3.5^1.179^^^^^.179
	;;^UTILITY(U,$J,112,9262,2)
	;;=.679^3.214^^.107^35.714^^^^0^3.571^33.214^11.071^^^^^9.286
	;;^UTILITY(U,$J,112,9262,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9263,0)
	;;=ALMONDS,CHEESE,BLUE DIAMOND^BC-02536^oz.^28
	;;^UTILITY(U,$J,112,9263,1)
	;;=21.786^44.643^26.429^557.143^1.429^^^364.286^3.714^^^450^339.286^^^^^^^.107
	;;^UTILITY(U,$J,112,9263,2)
	;;=1.214^2.857
	;;^UTILITY(U,$J,112,9263,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9264,0)
	;;=ALMONDS,CHOPPED,BLUE DIAMOND^BC-02537^oz.^28
	;;^UTILITY(U,$J,112,9264,1)
	;;=21.429^52.143^17.857^625^4.643^^^275^4.107^303.571^539.286^621.429^0^3.286^1.071^^^^^.214
	;;^UTILITY(U,$J,112,9264,2)
	;;=.714^3.214^^.107^35.714^^^^0^4.286^^11.786
	;;^UTILITY(U,$J,112,9264,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9265,0)
	;;=ALMONDS,DRY ROASTED,HICKORY SMOKE,BLUE DIAMOND^BC-02538^oz.^28
	;;^UTILITY(U,$J,112,9265,1)
	;;=21.071^53.571^17.5^592.857^2.5^^^417.857^4.679^^^389.286^432.143^^^^^^^.286
	;;^UTILITY(U,$J,112,9265,2)
	;;=1.5^5
	;;^UTILITY(U,$J,112,9265,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9266,0)
	;;=ALMONDS,DRY ROASTED LIGHTLY SALTED,BLUE DIAMOND^BC-02539^oz.^28
	;;^UTILITY(U,$J,112,9266,1)
	;;=22.143^54.643^18.929^614.286^1.429^^^317.857^3.571^289.286^496.429^746.429^432.143^3.214^4.643^^^^^.107
	;;^UTILITY(U,$J,112,9266,2)
	;;=1.214^3.214^^^^^^^0^3.929^31.786^13.214^^^^^10.714
	;;^UTILITY(U,$J,112,9266,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9267,0)
	;;=ALMONDS,DRY ROASTED,UNSALTED,BLUE DIAMOND^BC-02540^oz.^28
	;;^UTILITY(U,$J,112,9267,1)
	;;=21.429^53.929^19.286^603.571^2.143^^^328.571^4.821^325^517.857^714.286^3.571^5.714^4.643^^^^^.036
	;;^UTILITY(U,$J,112,9267,2)
	;;=1.429^2.143^^^^^^^0^4.286^33.214^10.714^^^^^11.071
	;;^UTILITY(U,$J,112,9267,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9268,0)
	;;=ALMONDS,HONEY ROASTED,BLUE DIAMOND^BC-02541^oz.^28
	;;^UTILITY(U,$J,112,9268,1)
	;;=18.571^50.357^28.214^603.571^1.786^^^267.857^2.857^242.857^403.571^567.857^132.143^2.643^1^^^^^.107
	;;^UTILITY(U,$J,112,9268,2)
	;;=.964^2.857^^^^^^^0^3.571^27.857^12.857^^^^^9.286
	;;^UTILITY(U,$J,112,9268,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9269,0)
	;;=ALMONDS,LIGHTLY ROASTED,SALTED,BLUE DIAMOND^BC-02542^oz.^28
	;;^UTILITY(U,$J,112,9269,1)
	;;=22.5^58.571^12.857^628.571^1.786^^^310.714^3.821^260.714^507.143^600^457.143^3.179^.821^^^^^.107
	;;^UTILITY(U,$J,112,9269,2)
	;;=1.107^3.571^^^^^^^0^4.286^33.929^13.929^^^^^9.286
	;;^UTILITY(U,$J,112,9269,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9270,0)
	;;=ALMONDS,OIL ROASTED,BLANCHED,SALTED,BLUE DIAMOND^BC-02543^oz.^28
	;;^UTILITY(U,$J,112,9270,1)
	;;=21.071^58.214^14.286^621.429^2.5^^^232.143^5^^^589.286^250^^^^^^^.071
	;;^UTILITY(U,$J,112,9270,2)
	;;=1.429^4.286
	;;^UTILITY(U,$J,112,9270,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9271,0)
	;;=ALMONDS,OIL ROASTED,SALTED,BLUE DIAMOND^BC-02544^oz.^28
	;;^UTILITY(U,$J,112,9271,1)
	;;=22.5^58.571^12.143^621.429^1.429^^^310.714^3.821^^^471.429^339.286^^^^^^^.107
	;;^UTILITY(U,$J,112,9271,2)
	;;=1.107^3.571
	;;^UTILITY(U,$J,112,9271,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9272,0)
	;;=ALMONDS,ONION GARLIC,BLUE DIAMOND^BC-02545^oz.^28
	;;^UTILITY(U,$J,112,9272,1)
	;;=21.786^48.571^22.5^571.429^1.786^^^446.429^4^^^400^600^^^^^^^.071
	;;^UTILITY(U,$J,112,9272,2)
	;;=1.143^3.214
	;;^UTILITY(U,$J,112,9272,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9273,0)
	;;=ALMONDS,RAW,FISHER^BC-02546^oz.^28
	;;^UTILITY(U,$J,112,9273,1)
	;;=21.429^53.571^21.429^607.143^^^^^^^^^0
	;;^UTILITY(U,$J,112,9273,2)
	;;=^^^^^^^^0^3.571^39.286^10.714
	;;^UTILITY(U,$J,112,9273,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9274,0)
	;;=ALMONDS,SLICED,NATURAL,BLUE DIAMOND^BC-02547^oz.^28
	;;^UTILITY(U,$J,112,9274,1)
	;;=21.071^51.429^18.929^610.714^4.643^^^275^4.107^303.571^539.286^621.429^0^3.286^1.071^^^^^.214