FHINI0D6 ; ; 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,8382,2)
;;=.221^1.327
;;^UTILITY(U,$J,112,8382,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8383,0)
;;=FISH,FILLETS,FRZN,BATTER-DIPPED,MRS. PAUL'S^BC-01656^6-oz.^170
;;^UTILITY(U,$J,112,8383,1)
;;=9.353^15.176^22.118^262.941^^^^29.412^.588^^^88.824^464.118^^^^^0^0^.071
;;^UTILITY(U,$J,112,8383,2)
;;=.071^1.412^^^^^^^24.118^3.118^^4.941
;;^UTILITY(U,$J,112,8383,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8384,0)
;;=FISH,FILLETS,FRZN,BUTTERED,MRS. PAUL'S^BC-01657^5-oz.^142
;;^UTILITY(U,$J,112,8384,1)
;;=14.296^5.775^1.338^114.789^^^^18.31^.493^^^201.408^285.915^^^^^0^0^.021
;;^UTILITY(U,$J,112,8384,2)
;;=.049^1.549
;;^UTILITY(U,$J,112,8384,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8385,0)
;;=FISH,FILLETS,CRISPY CRUNCHY,MRS. PAUL'S^BC-01658^4-oz.^113
;;^UTILITY(U,$J,112,8385,1)
;;=9.646^12.743^22.478^243.363^^^^28.319^1.239^^^166.372^430.973^^^^^0^0^.097
;;^UTILITY(U,$J,112,8385,2)
;;=.106^1.327^^^^^^^27.434^4.602^^5.221
;;^UTILITY(U,$J,112,8385,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8386,0)
;;=FISH,FILLETS,FRZN,LIGHTLY BATTERED,CRUNCHY,MRS. PAUL'S^BC-01659^4.5-oz.^128
;;^UTILITY(U,$J,112,8386,1)
;;=9.531^12.422^21.328^235.156^^^^25.781^.938^^^129.688^627.344^^^^^0^.781^.094
;;^UTILITY(U,$J,112,8386,2)
;;=.102^1.094^^^^^^^23.438^2.5^^3.438
;;^UTILITY(U,$J,112,8386,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8387,0)
;;=FISH,FILLETS,FRZN,LIGHTLY BATTERED,MRS. PAUL'S SUPREME^BC-01660^3.35-oz.^95
;;^UTILITY(U,$J,112,8387,1)
;;=9.789^11.053^17.684^209.474^^^^21.053^.737^^^136.842^460^^^^^0^0^.074
;;^UTILITY(U,$J,112,8387,2)
;;=.074^1.158
;;^UTILITY(U,$J,112,8387,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8388,0)
;;=FISH,FLORENTINE,FRZN,MRS. PAUL'S LIGHT^BC-01661^entrees^255
;;^UTILITY(U,$J,112,8388,1)
;;=10.667^4.784^4.314^103.137^^^^102.745^.667^^^220^289.804^^^^^610.196^.784^.035
;;^UTILITY(U,$J,112,8388,2)
;;=.094^.902
;;^UTILITY(U,$J,112,8388,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8389,0)
;;=FISH,FRZN,BANQUET PLATTER^BC-01662^entrees^248
;;^UTILITY(U,$J,112,8389,1)
;;=12.5^8.871^13.306^181.452^^^^31.452^.806^^145.565^395.161^^^^^^153.629^6.048^.056
;;^UTILITY(U,$J,112,8389,2)
;;=.032^1.694^^^^^^^38.306
;;^UTILITY(U,$J,112,8389,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8390,0)
;;=FISH,STICKS,FRZN,BATTERED DIPPED,VAN DE KAMP'S^BC-01663^4-pieces^113
;;^UTILITY(U,$J,112,8390,1)
;;=8.85^13.274^13.274^194.69^^^^^^^^^292.035
;;^UTILITY(U,$J,112,8390,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8391,0)
;;=FISH,STICKS,FRZN,CRISPY CRUNCHY,MRS. PAUL'S^BC-01664^3-oz.^85
;;^UTILITY(U,$J,112,8391,1)
;;=10.118^12.118^21.765^236.471^^^^27.059^1.059^^^127.059^432.941^^^^^0^0^.106
;;^UTILITY(U,$J,112,8391,2)
;;=.106^.941^^^^^^^37.647
;;^UTILITY(U,$J,112,8391,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8392,0)
;;=FISH,STICKS,FRZN,LIGHT & CRISPY,VAN DE KAMP'S^BC-01665^4-pieces^106
;;^UTILITY(U,$J,112,8392,1)
;;=9.434^18.868^14.151^254.717^^^^^^^^^283.019
;;^UTILITY(U,$J,112,8392,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8393,0)
;;=FISH,STICKS,LIGHTLY BATTERED,CRUNCHY,MRS. PAUL'S^BC-01666^3.5-oz.^99
;;^UTILITY(U,$J,112,8393,1)
;;=7.879^12.323^24.646^240.404^^^^21.212^.707^^^188.889^603.03^^^^^0^0^.081
;;^UTILITY(U,$J,112,8393,2)
;;=.131^.808^^^^^^^19.192
;;^UTILITY(U,$J,112,8393,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8394,0)
;;=FISH,FLATFISH,FRZN,FILLETS,AU NATURAL,MRS. PAUL'S^BC-01667^5-oz.^142
;;^UTILITY(U,$J,112,8394,1)
;;=15^1.056^.493^71.127^^^^21.831^.563^^^116.197^123.239^^^^^0^0^.225
;;^UTILITY(U,$J,112,8394,2)
;;=.085^2.042
;;^UTILITY(U,$J,112,8394,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8395,0)
;;=FISH,FLATFISH,FRZN,FILLETS,CRISPY CRUNCHY,MRS. PAUL'S^BC-01668^4-oz.^113
;;^UTILITY(U,$J,112,8395,1)
;;=10.265^13.186^21.504^245.133^^^^28.319^1.15^^^159.292^417.699^^^^^0^0^.088
;;^UTILITY(U,$J,112,8395,2)
;;=.133^1.504^^^^^^^28.319^2.655^^4.336
;;^UTILITY(U,$J,112,8395,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,8396,0)
;;=FISH,FLATFISH,FRZN W/LEMON BUTTER SCE,HEALTHY CHOICE^BC-01669^8.25-oz.^234
FHINI0D6 ; ; 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,8382,2)
+2 ;;=.221^1.327
+3 ;;^UTILITY(U,$J,112,8382,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,8383,0)
+6 ;;=FISH,FILLETS,FRZN,BATTER-DIPPED,MRS. PAUL'S^BC-01656^6-oz.^170
+7 ;;^UTILITY(U,$J,112,8383,1)
+8 ;;=9.353^15.176^22.118^262.941^^^^29.412^.588^^^88.824^464.118^^^^^0^0^.071
+9 ;;^UTILITY(U,$J,112,8383,2)
+10 ;;=.071^1.412^^^^^^^24.118^3.118^^4.941
+11 ;;^UTILITY(U,$J,112,8383,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,8384,0)
+14 ;;=FISH,FILLETS,FRZN,BUTTERED,MRS. PAUL'S^BC-01657^5-oz.^142
+15 ;;^UTILITY(U,$J,112,8384,1)
+16 ;;=14.296^5.775^1.338^114.789^^^^18.31^.493^^^201.408^285.915^^^^^0^0^.021
+17 ;;^UTILITY(U,$J,112,8384,2)
+18 ;;=.049^1.549
+19 ;;^UTILITY(U,$J,112,8384,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,8385,0)
+22 ;;=FISH,FILLETS,CRISPY CRUNCHY,MRS. PAUL'S^BC-01658^4-oz.^113
+23 ;;^UTILITY(U,$J,112,8385,1)
+24 ;;=9.646^12.743^22.478^243.363^^^^28.319^1.239^^^166.372^430.973^^^^^0^0^.097
+25 ;;^UTILITY(U,$J,112,8385,2)
+26 ;;=.106^1.327^^^^^^^27.434^4.602^^5.221
+27 ;;^UTILITY(U,$J,112,8385,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,8386,0)
+30 ;;=FISH,FILLETS,FRZN,LIGHTLY BATTERED,CRUNCHY,MRS. PAUL'S^BC-01659^4.5-oz.^128
+31 ;;^UTILITY(U,$J,112,8386,1)
+32 ;;=9.531^12.422^21.328^235.156^^^^25.781^.938^^^129.688^627.344^^^^^0^.781^.094
+33 ;;^UTILITY(U,$J,112,8386,2)
+34 ;;=.102^1.094^^^^^^^23.438^2.5^^3.438
+35 ;;^UTILITY(U,$J,112,8386,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,8387,0)
+38 ;;=FISH,FILLETS,FRZN,LIGHTLY BATTERED,MRS. PAUL'S SUPREME^BC-01660^3.35-oz.^95
+39 ;;^UTILITY(U,$J,112,8387,1)
+40 ;;=9.789^11.053^17.684^209.474^^^^21.053^.737^^^136.842^460^^^^^0^0^.074
+41 ;;^UTILITY(U,$J,112,8387,2)
+42 ;;=.074^1.158
+43 ;;^UTILITY(U,$J,112,8387,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,8388,0)
+46 ;;=FISH,FLORENTINE,FRZN,MRS. PAUL'S LIGHT^BC-01661^entrees^255
+47 ;;^UTILITY(U,$J,112,8388,1)
+48 ;;=10.667^4.784^4.314^103.137^^^^102.745^.667^^^220^289.804^^^^^610.196^.784^.035
+49 ;;^UTILITY(U,$J,112,8388,2)
+50 ;;=.094^.902
+51 ;;^UTILITY(U,$J,112,8388,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,8389,0)
+54 ;;=FISH,FRZN,BANQUET PLATTER^BC-01662^entrees^248
+55 ;;^UTILITY(U,$J,112,8389,1)
+56 ;;=12.5^8.871^13.306^181.452^^^^31.452^.806^^145.565^395.161^^^^^^153.629^6.048^.056
+57 ;;^UTILITY(U,$J,112,8389,2)
+58 ;;=.032^1.694^^^^^^^38.306
+59 ;;^UTILITY(U,$J,112,8389,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,8390,0)
+62 ;;=FISH,STICKS,FRZN,BATTERED DIPPED,VAN DE KAMP'S^BC-01663^4-pieces^113
+63 ;;^UTILITY(U,$J,112,8390,1)
+64 ;;=8.85^13.274^13.274^194.69^^^^^^^^^292.035
+65 ;;^UTILITY(U,$J,112,8390,20)
+66 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+67 ;;^UTILITY(U,$J,112,8391,0)
+68 ;;=FISH,STICKS,FRZN,CRISPY CRUNCHY,MRS. PAUL'S^BC-01664^3-oz.^85
+69 ;;^UTILITY(U,$J,112,8391,1)
+70 ;;=10.118^12.118^21.765^236.471^^^^27.059^1.059^^^127.059^432.941^^^^^0^0^.106
+71 ;;^UTILITY(U,$J,112,8391,2)
+72 ;;=.106^.941^^^^^^^37.647
+73 ;;^UTILITY(U,$J,112,8391,20)
+74 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+75 ;;^UTILITY(U,$J,112,8392,0)
+76 ;;=FISH,STICKS,FRZN,LIGHT & CRISPY,VAN DE KAMP'S^BC-01665^4-pieces^106
+77 ;;^UTILITY(U,$J,112,8392,1)
+78 ;;=9.434^18.868^14.151^254.717^^^^^^^^^283.019
+79 ;;^UTILITY(U,$J,112,8392,20)
+80 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+81 ;;^UTILITY(U,$J,112,8393,0)
+82 ;;=FISH,STICKS,LIGHTLY BATTERED,CRUNCHY,MRS. PAUL'S^BC-01666^3.5-oz.^99
+83 ;;^UTILITY(U,$J,112,8393,1)
+84 ;;=7.879^12.323^24.646^240.404^^^^21.212^.707^^^188.889^603.03^^^^^0^0^.081
+85 ;;^UTILITY(U,$J,112,8393,2)
+86 ;;=.131^.808^^^^^^^19.192
+87 ;;^UTILITY(U,$J,112,8393,20)
+88 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+89 ;;^UTILITY(U,$J,112,8394,0)
+90 ;;=FISH,FLATFISH,FRZN,FILLETS,AU NATURAL,MRS. PAUL'S^BC-01667^5-oz.^142
+91 ;;^UTILITY(U,$J,112,8394,1)
+92 ;;=15^1.056^.493^71.127^^^^21.831^.563^^^116.197^123.239^^^^^0^0^.225
+93 ;;^UTILITY(U,$J,112,8394,2)
+94 ;;=.085^2.042
+95 ;;^UTILITY(U,$J,112,8394,20)
+96 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+97 ;;^UTILITY(U,$J,112,8395,0)
+98 ;;=FISH,FLATFISH,FRZN,FILLETS,CRISPY CRUNCHY,MRS. PAUL'S^BC-01668^4-oz.^113
+99 ;;^UTILITY(U,$J,112,8395,1)
+100 ;;=10.265^13.186^21.504^245.133^^^^28.319^1.15^^^159.292^417.699^^^^^0^0^.088
+101 ;;^UTILITY(U,$J,112,8395,2)
+102 ;;=.133^1.504^^^^^^^28.319^2.655^^4.336
+103 ;;^UTILITY(U,$J,112,8395,20)
+104 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+105 ;;^UTILITY(U,$J,112,8396,0)
+106 ;;=FISH,FLATFISH,FRZN W/LEMON BUTTER SCE,HEALTHY CHOICE^BC-01669^8.25-oz.^234
