FHINI0BK ; ; 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,7571,2)
;;=.105^1.184^^^^^^^^^^^^^^^1.053
;;^UTILITY(U,$J,112,7571,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7572,0)
;;=ENTREES,PEPPER STEAK,ORIENTAL,DINING LITE^BC-00845^9-oz.^255
;;^UTILITY(U,$J,112,7572,1)
;;=7.059^2.353^12.941^101.961^^^^11.373^.392^^^160.784^411.765^^^^^72.157^3.529^.071
;;^UTILITY(U,$J,112,7572,2)
;;=.098^1.255^^^^^^^15.686
;;^UTILITY(U,$J,112,7572,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7573,0)
;;=ENTREES,PORK,SWEET & SOUR,CHUN KING^BC-00846^13-oz.^369
;;^UTILITY(U,$J,112,7573,1)
;;=2.981^1.355^21.138^108.401^^^^9.214^.271^^39.295^89.431^395.664^^^^^440.379^3.523^.127
;;^UTILITY(U,$J,112,7573,2)
;;=.046^.596
;;^UTILITY(U,$J,112,7573,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7574,0)
;;=ENTREES,POT PIE,BEEF,BANQUET^BC-00847^7-oz.^198
;;^UTILITY(U,$J,112,7574,1)
;;=6.061^16.667^19.697^257.576^^^^19.697^1.01^^69.192^95.96^439.394^^^^^277.273^1.01^.162
;;^UTILITY(U,$J,112,7574,2)
;;=.136^2.323^^^^^^^12.626
;;^UTILITY(U,$J,112,7574,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7575,0)
;;=ENTREES,POT PIE,BEEF,MORTON^BC-00848^7-oz.^198
;;^UTILITY(U,$J,112,7575,1)
;;=5.556^15.657^13.636^217.172^^^^15.152^1.01^^59.091^90.909^373.737^^^^^134.848^1.01^.116
;;^UTILITY(U,$J,112,7575,2)
;;=.106^2.02^^^^^^^15.152
;;^UTILITY(U,$J,112,7575,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7576,0)
;;=ENTREES,POT PIE,BEEF SINGLE CRUST,BANQUET SUPREME (MICRO)^BC-00849^7-oz.^198
;;^UTILITY(U,$J,112,7576,1)
;;=7.071^14.646^15.152^222.222^^^^17.172^1.01^^75.253^111.111^368.687^^^^^375.253^1.01^.131
;;^UTILITY(U,$J,112,7576,2)
;;=.126^2.323^^^^^^^17.677
;;^UTILITY(U,$J,112,7576,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7577,0)
;;=ENTREES,POT PIE,BEEF,SWANSON^BC-00850^7-oz.^198
;;^UTILITY(U,$J,112,7577,1)
;;=6.111^9.596^18.182^183.838^^^^12.626^1.414^^^102.525^357.576^^^^^729.798^1.01^.141
;;^UTILITY(U,$J,112,7577,2)
;;=.121^1.768
;;^UTILITY(U,$J,112,7577,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7578,0)
;;=ENTREES,POT PIE,BEEF,SWANSON CHUNKY^BC-00851^10-oz.^284
;;^UTILITY(U,$J,112,7578,1)
;;=7.077^10.282^20.458^202.465^^^^10.563^1.479^^^87.324^328.169^^^^^1141.549^.704^.137
;;^UTILITY(U,$J,112,7578,2)
;;=.141^2.113
;;^UTILITY(U,$J,112,7578,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7579,0)
;;=ENTREES,POT PIE,BEEF,SWANSON HUNGRY-MAN^BC-00852^14-oz.^397
;;^UTILITY(U,$J,112,7579,1)
;;=6.121^7.783^14.786^153.652^^^^10.076^1.335^^^107.809^343.325^^^^^757.935^1.259^.123
;;^UTILITY(U,$J,112,7579,2)
;;=.123^1.662
;;^UTILITY(U,$J,112,7579,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7580,0)
;;=ENTREES,POT PIE,CHICKEN,BANQUET^BC-00853^7-oz.^198
;;^UTILITY(U,$J,112,7580,1)
;;=7.576^18.182^19.697^277.778^^^^18.687^1.01^^72.222^95.96^434.343^^^^^170.202^0^.152
;;^UTILITY(U,$J,112,7580,2)
;;=.136^3.03^^^^^^^17.677
;;^UTILITY(U,$J,112,7580,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7581,0)
;;=ENTREES,POT PIE,CHICKEN,MORTON^BC-00854^7-oz.^198
;;^UTILITY(U,$J,112,7581,1)
;;=7.071^14.141^13.636^212.121^^^^14.646^.505^^63.636^95.96^373.737^^^^^118.182^.505^.111
;;^UTILITY(U,$J,112,7581,2)
;;=.111^2.626^^^^^^^17.677
;;^UTILITY(U,$J,112,7581,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7582,0)
;;=ENTREES,POT PIE,CHICKEN,SINGLE CRUST,BANQUET SUPREME^BC-00855^7-oz.^198
;;^UTILITY(U,$J,112,7582,1)
;;=7.576^14.141^15.152^217.172^^^^16.162^.505^^73.737^116.162^373.737^^^^^379.293^1.01^.131
;;^UTILITY(U,$J,112,7582,2)
;;=.121^3.131^^^^^^^20.202
;;^UTILITY(U,$J,112,7582,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7583,0)
;;=ENTREES,POT PIE,CHICKEN,SWANSON^BC-00856^7-oz.^198
;;^UTILITY(U,$J,112,7583,1)
;;=5.606^10.96^17.626^191.414^^^^16.162^1.111^^^81.313^372.222^^^^^1027.778^1.01^.141
;;^UTILITY(U,$J,112,7583,2)
;;=.121^1.869
;;^UTILITY(U,$J,112,7583,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7584,0)
;;=ENTREES,POT PIE,CHICKEN,SWANSON CHUNKY^BC-00857^10-oz.^284
;;^UTILITY(U,$J,112,7584,1)
;;=6.866^11.408^19.965^209.859^^^^15.493^1.127^^^73.592^332.746^^^^^1522.535^.352^.144
;;^UTILITY(U,$J,112,7584,2)
;;=.12^2.183
;;^UTILITY(U,$J,112,7584,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
FHINI0BK ; ; 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,7571,2)
+2 ;;=.105^1.184^^^^^^^^^^^^^^^1.053
+3 ;;^UTILITY(U,$J,112,7571,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7572,0)
+6 ;;=ENTREES,PEPPER STEAK,ORIENTAL,DINING LITE^BC-00845^9-oz.^255
+7 ;;^UTILITY(U,$J,112,7572,1)
+8 ;;=7.059^2.353^12.941^101.961^^^^11.373^.392^^^160.784^411.765^^^^^72.157^3.529^.071
+9 ;;^UTILITY(U,$J,112,7572,2)
+10 ;;=.098^1.255^^^^^^^15.686
+11 ;;^UTILITY(U,$J,112,7572,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7573,0)
+14 ;;=ENTREES,PORK,SWEET & SOUR,CHUN KING^BC-00846^13-oz.^369
+15 ;;^UTILITY(U,$J,112,7573,1)
+16 ;;=2.981^1.355^21.138^108.401^^^^9.214^.271^^39.295^89.431^395.664^^^^^440.379^3.523^.127
+17 ;;^UTILITY(U,$J,112,7573,2)
+18 ;;=.046^.596
+19 ;;^UTILITY(U,$J,112,7573,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7574,0)
+22 ;;=ENTREES,POT PIE,BEEF,BANQUET^BC-00847^7-oz.^198
+23 ;;^UTILITY(U,$J,112,7574,1)
+24 ;;=6.061^16.667^19.697^257.576^^^^19.697^1.01^^69.192^95.96^439.394^^^^^277.273^1.01^.162
+25 ;;^UTILITY(U,$J,112,7574,2)
+26 ;;=.136^2.323^^^^^^^12.626
+27 ;;^UTILITY(U,$J,112,7574,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7575,0)
+30 ;;=ENTREES,POT PIE,BEEF,MORTON^BC-00848^7-oz.^198
+31 ;;^UTILITY(U,$J,112,7575,1)
+32 ;;=5.556^15.657^13.636^217.172^^^^15.152^1.01^^59.091^90.909^373.737^^^^^134.848^1.01^.116
+33 ;;^UTILITY(U,$J,112,7575,2)
+34 ;;=.106^2.02^^^^^^^15.152
+35 ;;^UTILITY(U,$J,112,7575,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7576,0)
+38 ;;=ENTREES,POT PIE,BEEF SINGLE CRUST,BANQUET SUPREME (MICRO)^BC-00849^7-oz.^198
+39 ;;^UTILITY(U,$J,112,7576,1)
+40 ;;=7.071^14.646^15.152^222.222^^^^17.172^1.01^^75.253^111.111^368.687^^^^^375.253^1.01^.131
+41 ;;^UTILITY(U,$J,112,7576,2)
+42 ;;=.126^2.323^^^^^^^17.677
+43 ;;^UTILITY(U,$J,112,7576,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7577,0)
+46 ;;=ENTREES,POT PIE,BEEF,SWANSON^BC-00850^7-oz.^198
+47 ;;^UTILITY(U,$J,112,7577,1)
+48 ;;=6.111^9.596^18.182^183.838^^^^12.626^1.414^^^102.525^357.576^^^^^729.798^1.01^.141
+49 ;;^UTILITY(U,$J,112,7577,2)
+50 ;;=.121^1.768
+51 ;;^UTILITY(U,$J,112,7577,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7578,0)
+54 ;;=ENTREES,POT PIE,BEEF,SWANSON CHUNKY^BC-00851^10-oz.^284
+55 ;;^UTILITY(U,$J,112,7578,1)
+56 ;;=7.077^10.282^20.458^202.465^^^^10.563^1.479^^^87.324^328.169^^^^^1141.549^.704^.137
+57 ;;^UTILITY(U,$J,112,7578,2)
+58 ;;=.141^2.113
+59 ;;^UTILITY(U,$J,112,7578,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7579,0)
+62 ;;=ENTREES,POT PIE,BEEF,SWANSON HUNGRY-MAN^BC-00852^14-oz.^397
+63 ;;^UTILITY(U,$J,112,7579,1)
+64 ;;=6.121^7.783^14.786^153.652^^^^10.076^1.335^^^107.809^343.325^^^^^757.935^1.259^.123
+65 ;;^UTILITY(U,$J,112,7579,2)
+66 ;;=.123^1.662
+67 ;;^UTILITY(U,$J,112,7579,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7580,0)
+70 ;;=ENTREES,POT PIE,CHICKEN,BANQUET^BC-00853^7-oz.^198
+71 ;;^UTILITY(U,$J,112,7580,1)
+72 ;;=7.576^18.182^19.697^277.778^^^^18.687^1.01^^72.222^95.96^434.343^^^^^170.202^0^.152
+73 ;;^UTILITY(U,$J,112,7580,2)
+74 ;;=.136^3.03^^^^^^^17.677
+75 ;;^UTILITY(U,$J,112,7580,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7581,0)
+78 ;;=ENTREES,POT PIE,CHICKEN,MORTON^BC-00854^7-oz.^198
+79 ;;^UTILITY(U,$J,112,7581,1)
+80 ;;=7.071^14.141^13.636^212.121^^^^14.646^.505^^63.636^95.96^373.737^^^^^118.182^.505^.111
+81 ;;^UTILITY(U,$J,112,7581,2)
+82 ;;=.111^2.626^^^^^^^17.677
+83 ;;^UTILITY(U,$J,112,7581,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7582,0)
+86 ;;=ENTREES,POT PIE,CHICKEN,SINGLE CRUST,BANQUET SUPREME^BC-00855^7-oz.^198
+87 ;;^UTILITY(U,$J,112,7582,1)
+88 ;;=7.576^14.141^15.152^217.172^^^^16.162^.505^^73.737^116.162^373.737^^^^^379.293^1.01^.131
+89 ;;^UTILITY(U,$J,112,7582,2)
+90 ;;=.121^3.131^^^^^^^20.202
+91 ;;^UTILITY(U,$J,112,7582,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7583,0)
+94 ;;=ENTREES,POT PIE,CHICKEN,SWANSON^BC-00856^7-oz.^198
+95 ;;^UTILITY(U,$J,112,7583,1)
+96 ;;=5.606^10.96^17.626^191.414^^^^16.162^1.111^^^81.313^372.222^^^^^1027.778^1.01^.141
+97 ;;^UTILITY(U,$J,112,7583,2)
+98 ;;=.121^1.869
+99 ;;^UTILITY(U,$J,112,7583,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7584,0)
+102 ;;=ENTREES,POT PIE,CHICKEN,SWANSON CHUNKY^BC-00857^10-oz.^284
+103 ;;^UTILITY(U,$J,112,7584,1)
+104 ;;=6.866^11.408^19.965^209.859^^^^15.493^1.127^^^73.592^332.746^^^^^1522.535^.352^.144
+105 ;;^UTILITY(U,$J,112,7584,2)
+106 ;;=.12^2.183
+107 ;;^UTILITY(U,$J,112,7584,20)
+108 ;;=Bowes & Church's Food Values, Sixteenth Edition.
