FHINI0BP ; ; 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,7638,2)
;;=.111^2.787^^^^^^^^^^^^^^^2.328
;;^UTILITY(U,$J,112,7638,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7639,0)
;;=ENTREES,CHICKEN BREAST FRIED & WHIPPED POTATOES,STOUFFERS^BC-00912^7.1-oz.^202
;;^UTILITY(U,$J,112,7639,1)
;;=8.416^8.911^14.851^173.267^^^^^^^^^445.545
;;^UTILITY(U,$J,112,7639,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7640,0)
;;=ENTREES,CHICKEN BREAST PARMESAN & SPAGHETTI,CAMPBELL'S^BC-00913^10-oz.^284
;;^UTILITY(U,$J,112,7640,1)
;;=11.725^6.127^10.317^143.31^^^^67.254^1.232^^^222.183^246.831^^^^^361.268^.704^.025
;;^UTILITY(U,$J,112,7640,2)
;;=.063^2.817
;;^UTILITY(U,$J,112,7640,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7641,0)
;;=ENTREES,CHICKEN BREAST PATTIE ON BUN,BANQUET (MICRO)^BC-00914^4-oz.^113
;;^UTILITY(U,$J,112,7641,1)
;;=13.274^12.389^28.319^274.336^^^^23.009^.885^^160.177^194.69^592.92^^^^^0^1.77^.248
;;^UTILITY(U,$J,112,7641,2)
;;=.15^4.513
;;^UTILITY(U,$J,112,7641,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7642,0)
;;=ENTREES,CHICKEN BREAST PATTIE,SOUTHERN FRIED,BANQUET^BC-00915^4-oz.^113
;;^UTILITY(U,$J,112,7642,1)
;;=10.619^12.389^32.743^283.186^^^^23.894^.885^^295.575^194.69^867.257^^^^^0^1.77^.345
;;^UTILITY(U,$J,112,7642,2)
;;=.177^3.805
;;^UTILITY(U,$J,112,7642,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7643,0)
;;=ENTREES,CHICKEN BREAST W/GRAVY & VEG MEDLEY,STOUFFERS^BC-00916^7.4-oz.^209
;;^UTILITY(U,$J,112,7643,1)
;;=10.526^2.871^5.263^90.909^^^^^^^^^267.943
;;^UTILITY(U,$J,112,7643,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7644,0)
;;=ENTREES,CHICKEN & WHIPPED POTATOES,SWANSON^BC-00917^7-oz.^198
;;^UTILITY(U,$J,112,7644,1)
;;=9.242^10.303^16.061^193.939^^^^23.737^1.364^^^206.566^545.455^^^^^7.576^2.525^.091
;;^UTILITY(U,$J,112,7644,2)
;;=.111^3.333
;;^UTILITY(U,$J,112,7644,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7645,0)
;;=ENTREES,CHICKEN NIBBLES & FRENCH FRIED POTATOES,SWANSON^BC-00918^4.3-oz.^121
;;^UTILITY(U,$J,112,7645,1)
;;=9.256^15.537^22.81^267.769^^^^23.14^1.405^^^261.157^594.215^^^^^0^2.479^.116
;;^UTILITY(U,$J,112,7645,2)
;;=.099^2.893
;;^UTILITY(U,$J,112,7645,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7646,0)
;;=ENTREES,CHICKEN NUGGETS & FRENCH FRIED POTATOES,SWANSON^BC-00919^4.8-oz.^135
;;^UTILITY(U,$J,112,7646,1)
;;=9.556^9.926^21.926^215.556^^^^15.556^1.111^^^284.444^411.111^^^^^28.889^0^.111
;;^UTILITY(U,$J,112,7646,2)
;;=.074^3.63
;;^UTILITY(U,$J,112,7646,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7647,0)
;;=ENTREES,CHICKEN PARMIGIANA & PASTA ALFREDO,STOUFFERS^BC-00920^9.8-oz.^279
;;^UTILITY(U,$J,112,7647,1)
;;=11.111^5.376^8.602^129.032^^^^^^^^^354.839
;;^UTILITY(U,$J,112,7647,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7648,0)
;;=ENTREES,FISH 'N CHIPS,SWANSON^BC-00921^6.5-oz.^184
;;^UTILITY(U,$J,112,7648,1)
;;=7.609^8.967^21.413^197.283^^^^19.022^1.141^^^292.935^377.174^^^^^0^2.717^.098
;;^UTILITY(U,$J,112,7648,2)
;;=.082^1.522
;;^UTILITY(U,$J,112,7648,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7649,0)
;;=ENTREES,MEATBALLS,SWEDISH & NOODLES,SWANSON^BC-00922^8.5-oz.^241
;;^UTILITY(U,$J,112,7649,1)
;;=7.593^7.884^10.498^143.568^^^^34.855^1.286^^^190.456^317.012^^^^^174.274^.415^.066
;;^UTILITY(U,$J,112,7649,2)
;;=.071^1.701
;;^UTILITY(U,$J,112,7649,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7650,0)
;;=ENTREES,MEATLOAF W/GRAVY & WHIPPED POTATOES,STOUFFERS^BC-00923^9.8-oz.^279
;;^UTILITY(U,$J,112,7650,1)
;;=7.168^7.168^9.319^129.032^^^^^^^^^347.67
;;^UTILITY(U,$J,112,7650,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7651,0)
;;=ENTREES,SALISBURY STEAK W/GRAVY & MACARONI&CHEESE,STOUFFERS^BC-00924^8.6-oz.^244
;;^UTILITY(U,$J,112,7651,1)
;;=10.246^7.377^9.016^143.443^^^^^^^^^389.344
;;^UTILITY(U,$J,112,7651,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7652,0)
;;=ENTREES,SALISBURY STEAK W/GRAVY & MASHED POTATOES,SWANSON^BC-00925^9-oz.^255
;;^UTILITY(U,$J,112,7652,1)
;;=8.157^6.353^8.784^125.098^^^^20.784^1.333^^^280.784^384.314^^^^^0^0^.027
;;^UTILITY(U,$J,112,7652,2)
;;=.118^2.118
;;^UTILITY(U,$J,112,7652,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
FHINI0BP ; ; 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,7638,2)
+2 ;;=.111^2.787^^^^^^^^^^^^^^^2.328
+3 ;;^UTILITY(U,$J,112,7638,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7639,0)
+6 ;;=ENTREES,CHICKEN BREAST FRIED & WHIPPED POTATOES,STOUFFERS^BC-00912^7.1-oz.^202
+7 ;;^UTILITY(U,$J,112,7639,1)
+8 ;;=8.416^8.911^14.851^173.267^^^^^^^^^445.545
+9 ;;^UTILITY(U,$J,112,7639,20)
+10 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+11 ;;^UTILITY(U,$J,112,7640,0)
+12 ;;=ENTREES,CHICKEN BREAST PARMESAN & SPAGHETTI,CAMPBELL'S^BC-00913^10-oz.^284
+13 ;;^UTILITY(U,$J,112,7640,1)
+14 ;;=11.725^6.127^10.317^143.31^^^^67.254^1.232^^^222.183^246.831^^^^^361.268^.704^.025
+15 ;;^UTILITY(U,$J,112,7640,2)
+16 ;;=.063^2.817
+17 ;;^UTILITY(U,$J,112,7640,20)
+18 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+19 ;;^UTILITY(U,$J,112,7641,0)
+20 ;;=ENTREES,CHICKEN BREAST PATTIE ON BUN,BANQUET (MICRO)^BC-00914^4-oz.^113
+21 ;;^UTILITY(U,$J,112,7641,1)
+22 ;;=13.274^12.389^28.319^274.336^^^^23.009^.885^^160.177^194.69^592.92^^^^^0^1.77^.248
+23 ;;^UTILITY(U,$J,112,7641,2)
+24 ;;=.15^4.513
+25 ;;^UTILITY(U,$J,112,7641,20)
+26 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+27 ;;^UTILITY(U,$J,112,7642,0)
+28 ;;=ENTREES,CHICKEN BREAST PATTIE,SOUTHERN FRIED,BANQUET^BC-00915^4-oz.^113
+29 ;;^UTILITY(U,$J,112,7642,1)
+30 ;;=10.619^12.389^32.743^283.186^^^^23.894^.885^^295.575^194.69^867.257^^^^^0^1.77^.345
+31 ;;^UTILITY(U,$J,112,7642,2)
+32 ;;=.177^3.805
+33 ;;^UTILITY(U,$J,112,7642,20)
+34 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+35 ;;^UTILITY(U,$J,112,7643,0)
+36 ;;=ENTREES,CHICKEN BREAST W/GRAVY & VEG MEDLEY,STOUFFERS^BC-00916^7.4-oz.^209
+37 ;;^UTILITY(U,$J,112,7643,1)
+38 ;;=10.526^2.871^5.263^90.909^^^^^^^^^267.943
+39 ;;^UTILITY(U,$J,112,7643,20)
+40 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+41 ;;^UTILITY(U,$J,112,7644,0)
+42 ;;=ENTREES,CHICKEN & WHIPPED POTATOES,SWANSON^BC-00917^7-oz.^198
+43 ;;^UTILITY(U,$J,112,7644,1)
+44 ;;=9.242^10.303^16.061^193.939^^^^23.737^1.364^^^206.566^545.455^^^^^7.576^2.525^.091
+45 ;;^UTILITY(U,$J,112,7644,2)
+46 ;;=.111^3.333
+47 ;;^UTILITY(U,$J,112,7644,20)
+48 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+49 ;;^UTILITY(U,$J,112,7645,0)
+50 ;;=ENTREES,CHICKEN NIBBLES & FRENCH FRIED POTATOES,SWANSON^BC-00918^4.3-oz.^121
+51 ;;^UTILITY(U,$J,112,7645,1)
+52 ;;=9.256^15.537^22.81^267.769^^^^23.14^1.405^^^261.157^594.215^^^^^0^2.479^.116
+53 ;;^UTILITY(U,$J,112,7645,2)
+54 ;;=.099^2.893
+55 ;;^UTILITY(U,$J,112,7645,20)
+56 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+57 ;;^UTILITY(U,$J,112,7646,0)
+58 ;;=ENTREES,CHICKEN NUGGETS & FRENCH FRIED POTATOES,SWANSON^BC-00919^4.8-oz.^135
+59 ;;^UTILITY(U,$J,112,7646,1)
+60 ;;=9.556^9.926^21.926^215.556^^^^15.556^1.111^^^284.444^411.111^^^^^28.889^0^.111
+61 ;;^UTILITY(U,$J,112,7646,2)
+62 ;;=.074^3.63
+63 ;;^UTILITY(U,$J,112,7646,20)
+64 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+65 ;;^UTILITY(U,$J,112,7647,0)
+66 ;;=ENTREES,CHICKEN PARMIGIANA & PASTA ALFREDO,STOUFFERS^BC-00920^9.8-oz.^279
+67 ;;^UTILITY(U,$J,112,7647,1)
+68 ;;=11.111^5.376^8.602^129.032^^^^^^^^^354.839
+69 ;;^UTILITY(U,$J,112,7647,20)
+70 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+71 ;;^UTILITY(U,$J,112,7648,0)
+72 ;;=ENTREES,FISH 'N CHIPS,SWANSON^BC-00921^6.5-oz.^184
+73 ;;^UTILITY(U,$J,112,7648,1)
+74 ;;=7.609^8.967^21.413^197.283^^^^19.022^1.141^^^292.935^377.174^^^^^0^2.717^.098
+75 ;;^UTILITY(U,$J,112,7648,2)
+76 ;;=.082^1.522
+77 ;;^UTILITY(U,$J,112,7648,20)
+78 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+79 ;;^UTILITY(U,$J,112,7649,0)
+80 ;;=ENTREES,MEATBALLS,SWEDISH & NOODLES,SWANSON^BC-00922^8.5-oz.^241
+81 ;;^UTILITY(U,$J,112,7649,1)
+82 ;;=7.593^7.884^10.498^143.568^^^^34.855^1.286^^^190.456^317.012^^^^^174.274^.415^.066
+83 ;;^UTILITY(U,$J,112,7649,2)
+84 ;;=.071^1.701
+85 ;;^UTILITY(U,$J,112,7649,20)
+86 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+87 ;;^UTILITY(U,$J,112,7650,0)
+88 ;;=ENTREES,MEATLOAF W/GRAVY & WHIPPED POTATOES,STOUFFERS^BC-00923^9.8-oz.^279
+89 ;;^UTILITY(U,$J,112,7650,1)
+90 ;;=7.168^7.168^9.319^129.032^^^^^^^^^347.67
+91 ;;^UTILITY(U,$J,112,7650,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7651,0)
+94 ;;=ENTREES,SALISBURY STEAK W/GRAVY & MACARONI&CHEESE,STOUFFERS^BC-00924^8.6-oz.^244
+95 ;;^UTILITY(U,$J,112,7651,1)
+96 ;;=10.246^7.377^9.016^143.443^^^^^^^^^389.344
+97 ;;^UTILITY(U,$J,112,7651,20)
+98 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+99 ;;^UTILITY(U,$J,112,7652,0)
+100 ;;=ENTREES,SALISBURY STEAK W/GRAVY & MASHED POTATOES,SWANSON^BC-00925^9-oz.^255
+101 ;;^UTILITY(U,$J,112,7652,1)
+102 ;;=8.157^6.353^8.784^125.098^^^^20.784^1.333^^^280.784^384.314^^^^^0^0^.027
+103 ;;^UTILITY(U,$J,112,7652,2)
+104 ;;=.118^2.118
+105 ;;^UTILITY(U,$J,112,7652,20)
+106 ;;=Bowes & Church's Food Values, Sixteenth Edition.
