FHINI0BD ; ; 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,7478,2)
;;=.062^2.988^^^^^^^20.747
;;^UTILITY(U,$J,112,7478,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7479,0)
;;=ENTREES,CHICKEN,GLAZED,LEAN CUISINE^BC-00752^8.5-oz.^241
;;^UTILITY(U,$J,112,7479,1)
;;=10.788^3.32^9.544^112.033^^^^8.299^.299^^^161.826^294.606^^^^^41.494^8.299^.05
;;^UTILITY(U,$J,112,7479,2)
;;=.041^3.32^^^^^^^24.896^.415^^1.66
;;^UTILITY(U,$J,112,7479,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7480,0)
;;=ENTREES,CHICKEN,GLAZED,STOUFFERS^BC-00753^4-oz.^113
;;^UTILITY(U,$J,112,7480,1)
;;=11.327^3.805^2.743^90.265^80.973^^^4.425^.204^^^169.912^360.177^^^^^20.354^.885^.699
;;^UTILITY(U,$J,112,7480,2)
;;=.071^3.717^^^^^^^28.319
;;^UTILITY(U,$J,112,7480,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7481,0)
;;=ENTREES,CHICKEN IMPERIAL,CHUN KING^BC-00754^13-oz.^369
;;^UTILITY(U,$J,112,7481,1)
;;=4.607^.271^14.634^81.301^^^^13.279^.542^^42.818^70.461^417.344^^^^^347.425^2.439^.054
;;^UTILITY(U,$J,112,7481,2)
;;=.127^.65
;;^UTILITY(U,$J,112,7481,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7482,0)
;;=ENTREES,CHICKEN IN HERB SCE,LEAN CUISINE^BC-00755^9.5-oz.^269
;;^UTILITY(U,$J,112,7482,1)
;;=8.55^3.717^7.063^96.654^^^^37.175^.401^^^171.004^312.268^^^^^464.684^.743^.056
;;^UTILITY(U,$J,112,7482,2)
;;=.126^2.974^^^^^^^29.74^1.115^^.743
;;^UTILITY(U,$J,112,7482,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7483,0)
;;=ENTREES,CHICKEN ITALIENNE,STOUFFERS^BC-00756^4-oz.^113
;;^UTILITY(U,$J,112,7483,1)
;;=8.23^3.009^3.894^75.221^83.009^^^22.124^.602^^^190.265^400^^^^^260.177^7.08^.044
;;^UTILITY(U,$J,112,7483,2)
;;=.088^1.681^^^^^^^20.354
;;^UTILITY(U,$J,112,7483,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7484,0)
;;=ENTREES,CHICKEN KIEV,LE MENU^BC-00757^8-oz.^227
;;^UTILITY(U,$J,112,7484,1)
;;=7.974^13.921^14.802^216.3^^^^19.383^.529^^^103.965^342.291^^^^^709.692^.881^.066
;;^UTILITY(U,$J,112,7484,2)
;;=.07^3.216
;;^UTILITY(U,$J,112,7484,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7485,0)
;;=ENTREES,CHICKEN MARSALA,LEAN CUISINE^BC-00758^8.1-oz.^230
;;^UTILITY(U,$J,112,7485,1)
;;=10.87^2.174^4.783^82.609^^^^8.696^.47^^^173.913^369.565^^^^^652.174^3.913^.065
;;^UTILITY(U,$J,112,7485,2)
;;=.074^3.478^^^^^^^32.609^.435^^.435
;;^UTILITY(U,$J,112,7485,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7486,0)
;;=ENTREES,CHICKEN MEXICALI,STOUFFERS^BC-00759^6-oz.^170
;;^UTILITY(U,$J,112,7486,1)
;;=4.882^2.882^6.294^70^85^^^40.588^.629^^^241.176^170^^^^^1012.941^24.118^.059
;;^UTILITY(U,$J,112,7486,2)
;;=.088^2^^^^^^^17.059^.471^.765^.529^^^^^1.176
;;^UTILITY(U,$J,112,7486,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7487,0)
;;=ENTREES,CHICKEN ORIENTAL,LEAN CUISINE^BC-00760^9.4-oz.^266
;;^UTILITY(U,$J,112,7487,1)
;;=8.647^2.256^8.647^90.226^^^^22.556^.677^^^150.376^394.737^^^^^75.188^5.639^.056
;;^UTILITY(U,$J,112,7487,2)
;;=.098^3.008^^^^^^^37.594^.376^^.752
;;^UTILITY(U,$J,112,7487,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7488,0)
;;=ENTREES,CHICKEN PARMESAN,LEAN CUISINE^BC-00761^10-oz.^283
;;^UTILITY(U,$J,112,7488,1)
;;=8.834^2.827^6.714^88.339^^^^53.004^.509^^^265.018^300.353^^^^^176.678^2.12^.081
;;^UTILITY(U,$J,112,7488,2)
;;=.092^2.473^^^^^^^24.735^.707^^.707
;;^UTILITY(U,$J,112,7488,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7489,0)
;;=ENTREES,CHICKEN PRIMAVERA,STOUFFERS^BC-00762^4-oz.^113
;;^UTILITY(U,$J,112,7489,1)
;;=5.929^2.035^4.071^58.407^86.991^^^15.044^.504^^^139.823^400^^^^^900^7.08^.044
;;^UTILITY(U,$J,112,7489,2)
;;=.08^1.062^^^^^^^15.044
;;^UTILITY(U,$J,112,7489,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7490,0)
;;=ENTREES,CHICKEN STEW,SWANSON MAIN DISH^BC-00763^7.6-oz.^216
;;^UTILITY(U,$J,112,7490,1)
;;=4.444^3.194^7.13^75^^^^13.426^.509^^^137.5^454.167^^^^^2775.463^2.778^.019
;;^UTILITY(U,$J,112,7490,2)
;;=.042^1.435
;;^UTILITY(U,$J,112,7490,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7491,0)
;;=ENTREES,CHICKEN,SWEET & SOUR,GREEN GIANT^BC-00764^5-oz.^142
;;^UTILITY(U,$J,112,7491,1)
;;=5.634^2.113^21.127^126.761^^^^10.563^.423^^56.338^125.352^165.493^^^^^389.437^9.859^.021
;;^UTILITY(U,$J,112,7491,2)
;;=.021^2.465^^^^^^^14.789^.423^^.704
FHINI0BD ; ; 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,7478,2)
+2 ;;=.062^2.988^^^^^^^20.747
+3 ;;^UTILITY(U,$J,112,7478,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7479,0)
+6 ;;=ENTREES,CHICKEN,GLAZED,LEAN CUISINE^BC-00752^8.5-oz.^241
+7 ;;^UTILITY(U,$J,112,7479,1)
+8 ;;=10.788^3.32^9.544^112.033^^^^8.299^.299^^^161.826^294.606^^^^^41.494^8.299^.05
+9 ;;^UTILITY(U,$J,112,7479,2)
+10 ;;=.041^3.32^^^^^^^24.896^.415^^1.66
+11 ;;^UTILITY(U,$J,112,7479,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7480,0)
+14 ;;=ENTREES,CHICKEN,GLAZED,STOUFFERS^BC-00753^4-oz.^113
+15 ;;^UTILITY(U,$J,112,7480,1)
+16 ;;=11.327^3.805^2.743^90.265^80.973^^^4.425^.204^^^169.912^360.177^^^^^20.354^.885^.699
+17 ;;^UTILITY(U,$J,112,7480,2)
+18 ;;=.071^3.717^^^^^^^28.319
+19 ;;^UTILITY(U,$J,112,7480,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7481,0)
+22 ;;=ENTREES,CHICKEN IMPERIAL,CHUN KING^BC-00754^13-oz.^369
+23 ;;^UTILITY(U,$J,112,7481,1)
+24 ;;=4.607^.271^14.634^81.301^^^^13.279^.542^^42.818^70.461^417.344^^^^^347.425^2.439^.054
+25 ;;^UTILITY(U,$J,112,7481,2)
+26 ;;=.127^.65
+27 ;;^UTILITY(U,$J,112,7481,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7482,0)
+30 ;;=ENTREES,CHICKEN IN HERB SCE,LEAN CUISINE^BC-00755^9.5-oz.^269
+31 ;;^UTILITY(U,$J,112,7482,1)
+32 ;;=8.55^3.717^7.063^96.654^^^^37.175^.401^^^171.004^312.268^^^^^464.684^.743^.056
+33 ;;^UTILITY(U,$J,112,7482,2)
+34 ;;=.126^2.974^^^^^^^29.74^1.115^^.743
+35 ;;^UTILITY(U,$J,112,7482,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7483,0)
+38 ;;=ENTREES,CHICKEN ITALIENNE,STOUFFERS^BC-00756^4-oz.^113
+39 ;;^UTILITY(U,$J,112,7483,1)
+40 ;;=8.23^3.009^3.894^75.221^83.009^^^22.124^.602^^^190.265^400^^^^^260.177^7.08^.044
+41 ;;^UTILITY(U,$J,112,7483,2)
+42 ;;=.088^1.681^^^^^^^20.354
+43 ;;^UTILITY(U,$J,112,7483,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7484,0)
+46 ;;=ENTREES,CHICKEN KIEV,LE MENU^BC-00757^8-oz.^227
+47 ;;^UTILITY(U,$J,112,7484,1)
+48 ;;=7.974^13.921^14.802^216.3^^^^19.383^.529^^^103.965^342.291^^^^^709.692^.881^.066
+49 ;;^UTILITY(U,$J,112,7484,2)
+50 ;;=.07^3.216
+51 ;;^UTILITY(U,$J,112,7484,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7485,0)
+54 ;;=ENTREES,CHICKEN MARSALA,LEAN CUISINE^BC-00758^8.1-oz.^230
+55 ;;^UTILITY(U,$J,112,7485,1)
+56 ;;=10.87^2.174^4.783^82.609^^^^8.696^.47^^^173.913^369.565^^^^^652.174^3.913^.065
+57 ;;^UTILITY(U,$J,112,7485,2)
+58 ;;=.074^3.478^^^^^^^32.609^.435^^.435
+59 ;;^UTILITY(U,$J,112,7485,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7486,0)
+62 ;;=ENTREES,CHICKEN MEXICALI,STOUFFERS^BC-00759^6-oz.^170
+63 ;;^UTILITY(U,$J,112,7486,1)
+64 ;;=4.882^2.882^6.294^70^85^^^40.588^.629^^^241.176^170^^^^^1012.941^24.118^.059
+65 ;;^UTILITY(U,$J,112,7486,2)
+66 ;;=.088^2^^^^^^^17.059^.471^.765^.529^^^^^1.176
+67 ;;^UTILITY(U,$J,112,7486,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7487,0)
+70 ;;=ENTREES,CHICKEN ORIENTAL,LEAN CUISINE^BC-00760^9.4-oz.^266
+71 ;;^UTILITY(U,$J,112,7487,1)
+72 ;;=8.647^2.256^8.647^90.226^^^^22.556^.677^^^150.376^394.737^^^^^75.188^5.639^.056
+73 ;;^UTILITY(U,$J,112,7487,2)
+74 ;;=.098^3.008^^^^^^^37.594^.376^^.752
+75 ;;^UTILITY(U,$J,112,7487,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7488,0)
+78 ;;=ENTREES,CHICKEN PARMESAN,LEAN CUISINE^BC-00761^10-oz.^283
+79 ;;^UTILITY(U,$J,112,7488,1)
+80 ;;=8.834^2.827^6.714^88.339^^^^53.004^.509^^^265.018^300.353^^^^^176.678^2.12^.081
+81 ;;^UTILITY(U,$J,112,7488,2)
+82 ;;=.092^2.473^^^^^^^24.735^.707^^.707
+83 ;;^UTILITY(U,$J,112,7488,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7489,0)
+86 ;;=ENTREES,CHICKEN PRIMAVERA,STOUFFERS^BC-00762^4-oz.^113
+87 ;;^UTILITY(U,$J,112,7489,1)
+88 ;;=5.929^2.035^4.071^58.407^86.991^^^15.044^.504^^^139.823^400^^^^^900^7.08^.044
+89 ;;^UTILITY(U,$J,112,7489,2)
+90 ;;=.08^1.062^^^^^^^15.044
+91 ;;^UTILITY(U,$J,112,7489,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7490,0)
+94 ;;=ENTREES,CHICKEN STEW,SWANSON MAIN DISH^BC-00763^7.6-oz.^216
+95 ;;^UTILITY(U,$J,112,7490,1)
+96 ;;=4.444^3.194^7.13^75^^^^13.426^.509^^^137.5^454.167^^^^^2775.463^2.778^.019
+97 ;;^UTILITY(U,$J,112,7490,2)
+98 ;;=.042^1.435
+99 ;;^UTILITY(U,$J,112,7490,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7491,0)
+102 ;;=ENTREES,CHICKEN,SWEET & SOUR,GREEN GIANT^BC-00764^5-oz.^142
+103 ;;^UTILITY(U,$J,112,7491,1)
+104 ;;=5.634^2.113^21.127^126.761^^^^10.563^.423^^56.338^125.352^165.493^^^^^389.437^9.859^.021
+105 ;;^UTILITY(U,$J,112,7491,2)
+106 ;;=.021^2.465^^^^^^^14.789^.423^^.704