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

FHINI0F4.m

Go to the documentation of this file.
FHINI0F4	; ; 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,9330,1)
	;;=16.814^8.85^21.239^230.088^^^^11.504^^^192.92^256.637^495.575^^^^^0^1.77^.177
	;;^UTILITY(U,$J,112,9330,2)
	;;=.071^5.133
	;;^UTILITY(U,$J,112,9330,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9331,0)
	;;=CHICKEN,CND,CHUNKS O' CHICKEN,SWANSON^BC-02604^2.5-oz.^71
	;;^UTILITY(U,$J,112,9331,1)
	;;=26.338^4.225^.423^143.662^^^^11.268^1.268^^^156.338^332.394^^^^^0^0^.014
	;;^UTILITY(U,$J,112,9331,2)
	;;=.155^6.197
	;;^UTILITY(U,$J,112,9331,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9332,0)
	;;=CHICKEN,CND,CHUNK WHITE W/ WATER,SWANSON^BC-02605^2.5-oz.^71
	;;^UTILITY(U,$J,112,9332,1)
	;;=23.662^1.69^.563^112.676^^^^7.042^.563^^^125.352^349.296^^^^^0^0^.014
	;;^UTILITY(U,$J,112,9332,2)
	;;=.07^6.761^^^^^^^45.07
	;;^UTILITY(U,$J,112,9332,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9333,0)
	;;=CHICKEN,CND,CHUNK W/ WATER,SWANSON^BC-02606^2.5-oz.^71
	;;^UTILITY(U,$J,112,9333,1)
	;;=21.549^3.521^.563^119.718^^^^8.451^.986^^^101.408^347.887^^^^^0^0^.014
	;;^UTILITY(U,$J,112,9333,2)
	;;=.099^3.944^^^^^^^53.521
	;;^UTILITY(U,$J,112,9333,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9334,0)
	;;=CHICKEN,CND,MIXIN CHICKEN W/ BROTH,SWANSON^BC-02607^2.5-oz.^71
	;;^UTILITY(U,$J,112,9334,1)
	;;=19.155^10.423^.423^173.239^^^^50.704^1.549^^^145.07^315.493^^^^^0^0^.014
	;;^UTILITY(U,$J,112,9334,2)
	;;=.113^4.085
	;;^UTILITY(U,$J,112,9334,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9335,0)
	;;=CHICKEN,CHUNKS,FROZEN,COUNTRY PRIDE^BC-02608^3-oz.^85
	;;^UTILITY(U,$J,112,9335,1)
	;;=11.765^17.647^17.647^282.353^^^^10.588^1.176^^156.471^164.706^658.824^^^^^^2.353^.106
	;;^UTILITY(U,$J,112,9335,2)
	;;=.118^2.118
	;;^UTILITY(U,$J,112,9335,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9336,0)
	;;=CHICKEN,CHUNKS,SOUTHERN FRIED,FRZN,COUNTRY PRIDE^BC-02609^3-oz.^85
	;;^UTILITY(U,$J,112,9336,1)
	;;=11.765^23.529^16.471^329.412^^^^10.588^^^171.765^176.471^811.765^^^^^^2.353^.118
	;;^UTILITY(U,$J,112,9336,2)
	;;=.129^2.471
	;;^UTILITY(U,$J,112,9336,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9337,0)
	;;=CHICKEN,CUTLETS,PLUMP JUICY,FROZEN,SWANSON^BC-02610^3-oz.^85
	;;^UTILITY(U,$J,112,9337,1)
	;;=14.588^14^12.353^232.941^^^^12.941^1.059^^^165.882^396.471^^^^^0^0^.094
	;;^UTILITY(U,$J,112,9337,2)
	;;=.118^5.176
	;;^UTILITY(U,$J,112,9337,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9338,0)
	;;=CHICKEN,DRUMLETS,PLUMP & JUICY,FRZN,SWANSON^BC-02611^3-oz.^85
	;;^UTILITY(U,$J,112,9338,1)
	;;=15.294^15.647^12.118^250.588^^^^15.294^1.176^^^230.588^427.059^^^^^0^0^.094
	;;^UTILITY(U,$J,112,9338,2)
	;;=.129^5.529
	;;^UTILITY(U,$J,112,9338,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9339,0)
	;;=CHICKEN,DRUM-SNACKERS,FROZEN,BANQUET HOT BITES^BC-02612^2.63-oz.^75
	;;^UTILITY(U,$J,112,9339,1)
	;;=13.333^20^17.333^293.333^^^^12^^^172^186.667^706.667^^^^^0^2.667^.12
	;;^UTILITY(U,$J,112,9339,2)
	;;=.133^2.4
	;;^UTILITY(U,$J,112,9339,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9340,0)
	;;=CHICKEN,DRUM-SNACKERS,FROZEN,BANQUET PLATTER^BC-02613^7-oz.^198
	;;^UTILITY(U,$J,112,9340,1)
	;;=10.101^9.596^24.747^217.172^^^^17.172^1.01^^33.333^303.03^348.485^^^^^154.545^7.071^.086
	;;^UTILITY(U,$J,112,9340,2)
	;;=.066^3.939
	;;^UTILITY(U,$J,112,9340,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9341,0)
	;;=CHICKEN,FRIED,EXTRA CRISPY PLUMP & JUICY,FROZEN,SWANSON^BC-02614^3-oz.^85
	;;^UTILITY(U,$J,112,9341,1)
	;;=14.353^18.824^16.706^292.941^^^^22.353^2.118^^^263.529^375.294^^^^^0^0^.118
	;;^UTILITY(U,$J,112,9341,2)
	;;=.106^5.294
	;;^UTILITY(U,$J,112,9341,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9342,0)
	;;=CHICKEN,FRIED,FRZN,BANQUET^BC-02615^6.4-oz.^181
	;;^UTILITY(U,$J,112,9342,1)
	;;=9.945^10.497^16.022^182.32^^^^11.602^.552^^^79.558^668.508^^^^^46.961^0^.044
	;;^UTILITY(U,$J,112,9342,2)
	;;=.055^2.652
	;;^UTILITY(U,$J,112,9342,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.
	;;^UTILITY(U,$J,112,9343,0)
	;;=CHICKEN,FRIED,FROZEN,SWANSON SOUTHERN STYLE^BC-02616^3.2-oz.^92
	;;^UTILITY(U,$J,112,9343,1)
	;;=15.543^17.391^17.717^290.217^^^^27.174^1.522^^^181.522^747.826^^^^^0^0^.12
	;;^UTILITY(U,$J,112,9343,2)
	;;=.13^4.239
	;;^UTILITY(U,$J,112,9343,20)
	;;=Bowes & Church's Food Values, Sixteenth Edition.