FHINI0AN ; ; 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,7133,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7134,0)
;;=SHERBET,FRUIT FLAVORS,LAND O'LAKES^BC-00407^1/2-cup^97
;;^UTILITY(U,$J,112,7134,1)
;;=1.237^1.753^28.144^130.928^^^^45.361^^^35.052^179.381^24.742^^^^^68.041^1.031
;;^UTILITY(U,$J,112,7134,2)
;;=.062^^^^^^^^4.124^1.031^.412^.103
;;^UTILITY(U,$J,112,7134,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7135,0)
;;=FROZEN DESSERTS,CHOCOLATE,SIMPLE PLEASURES^BC-00408^1/2-cup^89
;;^UTILITY(U,$J,112,7135,1)
;;=10^1.011^25.393^150.562^62.921^^^207.865^.674^25.843^160.674^213.483^82.022^.921^.079^^^564.045^^.045
;;^UTILITY(U,$J,112,7135,2)
;;=.326^.112^.337^.056^^.427^^^5.618^.562^.337^0^^^^^1.461
;;^UTILITY(U,$J,112,7135,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7136,0)
;;=FROZEN DESSERTS,CHOCOLATE CHIP,SIMPLE PLEASURES^BC-00409^1/2-cup^93
;;^UTILITY(U,$J,112,7136,1)
;;=6.989^2.473^26.237^154.839^63.441^^^184.946^.409^18.28^152.688^150.538^58.065^.043^.333^^^556.989^^.032
;;^UTILITY(U,$J,112,7136,2)
;;=.194^.108^.333^.043^^.667^^^13.978^.968^.645^.968
;;^UTILITY(U,$J,112,7136,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7137,0)
;;=FROZEN DESSERTS,COOKIES'N CREAM,SIMPLE PLEASURES^BC-00410^1/2-cup^90
;;^UTILITY(U,$J,112,7137,1)
;;=6.778^2.444^28^161.111^62.222^^^168.889^.489^17.778^126.667^138.889^94.444^.689^.044^^^567.778^0^.056
;;^UTILITY(U,$J,112,7137,2)
;;=.189^.444^.267^.044^^.456^^^12.222^.778^1.444^.222^^^^^1.333
;;^UTILITY(U,$J,112,7137,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7138,0)
;;=FROZEN DESSERTS,PEACH,SIMPLE PLEASURES^BC-00411^1/2-cup^89
;;^UTILITY(U,$J,112,7138,1)
;;=7.753^.449^24.382^132.584^66.292^^^162.921^.135^13.483^122.472^135.955^66.292^.607^^^^456.18^21.348^.034
;;^UTILITY(U,$J,112,7138,2)
;;=.247^.112^.236^.045^^.629^^^5.618^.449^.225^0
;;^UTILITY(U,$J,112,7138,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7139,0)
;;=FROZEN DESSERTS,STRAWBERRY,SIMPLE PLEASURES^BC-00412^1/2-cup^89
;;^UTILITY(U,$J,112,7139,1)
;;=7.865^.337^22.472^124.719^68.539^^^168.539^.225^13.483^120.225^135.955^64.045^.652^^^^433.708^7.865^.034
;;^UTILITY(U,$J,112,7139,2)
;;=.258^.225^.27^.056^^.719^^^5.618^.337^.225^.337
;;^UTILITY(U,$J,112,7139,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7140,0)
;;=FROZEN DESSERTS,VANILLA,SIMPLE PLEASURES^BC-00413^1/2-cup^89
;;^UTILITY(U,$J,112,7140,1)
;;=6.629^.787^23.708^130.337^68.539^^^182.022^.157^13.483^137.079^128.09^56.18^.753^^^^582.022^^.045
;;^UTILITY(U,$J,112,7140,2)
;;=.191^.112^.326^.056^.326^0^^^13.483^.225^.112^0
;;^UTILITY(U,$J,112,7140,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7141,0)
;;=FROZEN DESSERTS,CHOCOLATE (LIGHT),SIMPLE PLEASURES^BC-00414^1/2-cup^74
;;^UTILITY(U,$J,112,7141,1)
;;=7.297^.676^21.351^100^70.27^^^189.189^.838^31.081^170.27^386.486^100^.73^.108^^^491.892^0^.041
;;^UTILITY(U,$J,112,7141,2)
;;=.284^.27^.784^.081^.784^.608^^^13.514^.405^.135^0^^^^^1.757
;;^UTILITY(U,$J,112,7141,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7142,0)
;;=FROZEN DESSERTS,VANILLA (LIGHT),SIMPLE PLEASURES^BC-00415^1/2-cup^74
;;^UTILITY(U,$J,112,7142,1)
;;=6.216^.541^20.27^97.297^71.622^^^172.973^^17.568^141.892^271.622^91.892^.554^^^^467.568^0^.068
;;^UTILITY(U,$J,112,7142,2)
;;=.27^.135^.757^.068^^1.189^^^12.162^.27^.135^.135
;;^UTILITY(U,$J,112,7142,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7143,0)
;;=SORBET & CREAM,ORANGE & CREAM,HAAGEN-DAZS^BC-00416^1/2-cup^90
;;^UTILITY(U,$J,112,7143,1)
;;=2.444^7.444^28^187.778^61.889^^^57.778^.022^^54.444^107.778^30^^^^^356.667^6.667^.044
;;^UTILITY(U,$J,112,7143,2)
;;=.1^.778
;;^UTILITY(U,$J,112,7143,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7144,0)
;;=SORBET & CREAM,RASPBERRY & CREAM,HAAGEN-DAZS^BC-00417^1/2-cup^91
;;^UTILITY(U,$J,112,7144,1)
;;=2.418^6.154^24.835^163.736^66.044^^^62.637^.198^^58.242^105.495^27.473^^^^^354.945^^.022
;;^UTILITY(U,$J,112,7144,2)
;;=.121^.659
;;^UTILITY(U,$J,112,7144,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7145,0)
;;=APPLE BROWN BETTY,CAMPBELL'S FRESH KITCHEN^BC-00418^5-oz.^142
;;^UTILITY(U,$J,112,7145,1)
;;=1.197^5.563^33.732^189.437^^^^9.859^.423^^^69.014^42.958^^^^^0^0^.007
;;^UTILITY(U,$J,112,7145,2)
;;=.028^.493
FHINI0AN ; ; 11-OCT-1995
+1 ;;5.0;Dietetics;;Oct 11, 1995
+2 IF 'DIFQR(112)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
IF X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
IF $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,99)
IF $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,112,7133,20)
+2 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+3 ;;^UTILITY(U,$J,112,7134,0)
+4 ;;=SHERBET,FRUIT FLAVORS,LAND O'LAKES^BC-00407^1/2-cup^97
+5 ;;^UTILITY(U,$J,112,7134,1)
+6 ;;=1.237^1.753^28.144^130.928^^^^45.361^^^35.052^179.381^24.742^^^^^68.041^1.031
+7 ;;^UTILITY(U,$J,112,7134,2)
+8 ;;=.062^^^^^^^^4.124^1.031^.412^.103
+9 ;;^UTILITY(U,$J,112,7134,20)
+10 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+11 ;;^UTILITY(U,$J,112,7135,0)
+12 ;;=FROZEN DESSERTS,CHOCOLATE,SIMPLE PLEASURES^BC-00408^1/2-cup^89
+13 ;;^UTILITY(U,$J,112,7135,1)
+14 ;;=10^1.011^25.393^150.562^62.921^^^207.865^.674^25.843^160.674^213.483^82.022^.921^.079^^^564.045^^.045
+15 ;;^UTILITY(U,$J,112,7135,2)
+16 ;;=.326^.112^.337^.056^^.427^^^5.618^.562^.337^0^^^^^1.461
+17 ;;^UTILITY(U,$J,112,7135,20)
+18 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+19 ;;^UTILITY(U,$J,112,7136,0)
+20 ;;=FROZEN DESSERTS,CHOCOLATE CHIP,SIMPLE PLEASURES^BC-00409^1/2-cup^93
+21 ;;^UTILITY(U,$J,112,7136,1)
+22 ;;=6.989^2.473^26.237^154.839^63.441^^^184.946^.409^18.28^152.688^150.538^58.065^.043^.333^^^556.989^^.032
+23 ;;^UTILITY(U,$J,112,7136,2)
+24 ;;=.194^.108^.333^.043^^.667^^^13.978^.968^.645^.968
+25 ;;^UTILITY(U,$J,112,7136,20)
+26 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+27 ;;^UTILITY(U,$J,112,7137,0)
+28 ;;=FROZEN DESSERTS,COOKIES'N CREAM,SIMPLE PLEASURES^BC-00410^1/2-cup^90
+29 ;;^UTILITY(U,$J,112,7137,1)
+30 ;;=6.778^2.444^28^161.111^62.222^^^168.889^.489^17.778^126.667^138.889^94.444^.689^.044^^^567.778^0^.056
+31 ;;^UTILITY(U,$J,112,7137,2)
+32 ;;=.189^.444^.267^.044^^.456^^^12.222^.778^1.444^.222^^^^^1.333
+33 ;;^UTILITY(U,$J,112,7137,20)
+34 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+35 ;;^UTILITY(U,$J,112,7138,0)
+36 ;;=FROZEN DESSERTS,PEACH,SIMPLE PLEASURES^BC-00411^1/2-cup^89
+37 ;;^UTILITY(U,$J,112,7138,1)
+38 ;;=7.753^.449^24.382^132.584^66.292^^^162.921^.135^13.483^122.472^135.955^66.292^.607^^^^456.18^21.348^.034
+39 ;;^UTILITY(U,$J,112,7138,2)
+40 ;;=.247^.112^.236^.045^^.629^^^5.618^.449^.225^0
+41 ;;^UTILITY(U,$J,112,7138,20)
+42 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+43 ;;^UTILITY(U,$J,112,7139,0)
+44 ;;=FROZEN DESSERTS,STRAWBERRY,SIMPLE PLEASURES^BC-00412^1/2-cup^89
+45 ;;^UTILITY(U,$J,112,7139,1)
+46 ;;=7.865^.337^22.472^124.719^68.539^^^168.539^.225^13.483^120.225^135.955^64.045^.652^^^^433.708^7.865^.034
+47 ;;^UTILITY(U,$J,112,7139,2)
+48 ;;=.258^.225^.27^.056^^.719^^^5.618^.337^.225^.337
+49 ;;^UTILITY(U,$J,112,7139,20)
+50 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+51 ;;^UTILITY(U,$J,112,7140,0)
+52 ;;=FROZEN DESSERTS,VANILLA,SIMPLE PLEASURES^BC-00413^1/2-cup^89
+53 ;;^UTILITY(U,$J,112,7140,1)
+54 ;;=6.629^.787^23.708^130.337^68.539^^^182.022^.157^13.483^137.079^128.09^56.18^.753^^^^582.022^^.045
+55 ;;^UTILITY(U,$J,112,7140,2)
+56 ;;=.191^.112^.326^.056^.326^0^^^13.483^.225^.112^0
+57 ;;^UTILITY(U,$J,112,7140,20)
+58 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+59 ;;^UTILITY(U,$J,112,7141,0)
+60 ;;=FROZEN DESSERTS,CHOCOLATE (LIGHT),SIMPLE PLEASURES^BC-00414^1/2-cup^74
+61 ;;^UTILITY(U,$J,112,7141,1)
+62 ;;=7.297^.676^21.351^100^70.27^^^189.189^.838^31.081^170.27^386.486^100^.73^.108^^^491.892^0^.041
+63 ;;^UTILITY(U,$J,112,7141,2)
+64 ;;=.284^.27^.784^.081^.784^.608^^^13.514^.405^.135^0^^^^^1.757
+65 ;;^UTILITY(U,$J,112,7141,20)
+66 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+67 ;;^UTILITY(U,$J,112,7142,0)
+68 ;;=FROZEN DESSERTS,VANILLA (LIGHT),SIMPLE PLEASURES^BC-00415^1/2-cup^74
+69 ;;^UTILITY(U,$J,112,7142,1)
+70 ;;=6.216^.541^20.27^97.297^71.622^^^172.973^^17.568^141.892^271.622^91.892^.554^^^^467.568^0^.068
+71 ;;^UTILITY(U,$J,112,7142,2)
+72 ;;=.27^.135^.757^.068^^1.189^^^12.162^.27^.135^.135
+73 ;;^UTILITY(U,$J,112,7142,20)
+74 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+75 ;;^UTILITY(U,$J,112,7143,0)
+76 ;;=SORBET & CREAM,ORANGE & CREAM,HAAGEN-DAZS^BC-00416^1/2-cup^90
+77 ;;^UTILITY(U,$J,112,7143,1)
+78 ;;=2.444^7.444^28^187.778^61.889^^^57.778^.022^^54.444^107.778^30^^^^^356.667^6.667^.044
+79 ;;^UTILITY(U,$J,112,7143,2)
+80 ;;=.1^.778
+81 ;;^UTILITY(U,$J,112,7143,20)
+82 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+83 ;;^UTILITY(U,$J,112,7144,0)
+84 ;;=SORBET & CREAM,RASPBERRY & CREAM,HAAGEN-DAZS^BC-00417^1/2-cup^91
+85 ;;^UTILITY(U,$J,112,7144,1)
+86 ;;=2.418^6.154^24.835^163.736^66.044^^^62.637^.198^^58.242^105.495^27.473^^^^^354.945^^.022
+87 ;;^UTILITY(U,$J,112,7144,2)
+88 ;;=.121^.659
+89 ;;^UTILITY(U,$J,112,7144,20)
+90 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+91 ;;^UTILITY(U,$J,112,7145,0)
+92 ;;=APPLE BROWN BETTY,CAMPBELL'S FRESH KITCHEN^BC-00418^5-oz.^142
+93 ;;^UTILITY(U,$J,112,7145,1)
+94 ;;=1.197^5.563^33.732^189.437^^^^9.859^.423^^^69.014^42.958^^^^^0^0^.007
+95 ;;^UTILITY(U,$J,112,7145,2)
+96 ;;=.028^.493
