FHINI0C3 ; ; 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,7823,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7824,0)
;;=FROZEN DINNERS,HAM,LE MENU^BC-01097^10-oz.^284
;;^UTILITY(U,$J,112,7824,1)
;;=6.444^3.556^10.915^101.408^^^^23.592^.775^^^150^523.239^^^^^2604.577^10.915^.204
;;^UTILITY(U,$J,112,7824,2)
;;=.102^1.585
;;^UTILITY(U,$J,112,7824,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7825,0)
;;=FROZEN DINNERS,HAM,MORTON^BC-01098^10-oz.^284
;;^UTILITY(U,$J,112,7825,1)
;;=5.282^1.408^17.254^102.113^^^^11.972^.352^^88.732^179.577^492.958^^^^^1170.775^64.437^.232
;;^UTILITY(U,$J,112,7825,2)
;;=.085^.81^^^^^^^15.845
;;^UTILITY(U,$J,112,7825,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7826,0)
;;=FROZEN DINNERS,MACARONI & BEEF,SWANSON BUDGET^BC-01099^12-oz.^340
;;^UTILITY(U,$J,112,7826,1)
;;=3.706^4.088^14.235^108.529^^^^37.059^.853^^^103.824^272.059^^^^^175^3.235^.035
;;^UTILITY(U,$J,112,7826,2)
;;=.068^.941
;;^UTILITY(U,$J,112,7826,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7827,0)
;;=FROZEN DINNERS,MACARONI & CHEESE,BANQUET^BC-01100^10-oz.^284
;;^UTILITY(U,$J,112,7827,1)
;;=4.93^7.042^16.197^147.887^^^^95.775^1.056^^^119.718^158.451^^^^^2671.831^2.465^.123
;;^UTILITY(U,$J,112,7827,2)
;;=.127^.845^^^^^^^10.563
;;^UTILITY(U,$J,112,7827,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7828,0)
;;=FROZEN DINNERS,MACARONI & CHEESE,SWANSON^BC-01101^12.2-oz.^347
;;^UTILITY(U,$J,112,7828,1)
;;=3.718^4.15^13.804^107.493^^^^68.876^.778^^^51.009^292.219^^^^^1038.905^1.729^.052
;;^UTILITY(U,$J,112,7828,2)
;;=.063^.519
;;^UTILITY(U,$J,112,7828,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7829,0)
;;=FROZEN DINNERS,MEATBALLS,SWEDISH,ARMOUR CLASSICS^BC-01102^11.25-oz.^319
;;^UTILITY(U,$J,112,7829,1)
;;=5.956^5.643^7.21^103.448^^^^35.11^.94^^64.263^144.201^225.705^^^^^820.063^3.135^.113
;;^UTILITY(U,$J,112,7829,2)
;;=.078^.752^^^^^^^25.078
;;^UTILITY(U,$J,112,7829,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7830,0)
;;=FROZEN DINNERS,MEATLOAF,ARMOUR CLASSICS^BC-01103^11.25-oz.^319
;;^UTILITY(U,$J,112,7830,1)
;;=6.27^5.329^10.031^112.853^^^^21.63^.94^^71.16^184.953^366.771^^^^^117.555^3.762^.097
;;^UTILITY(U,$J,112,7830,2)
;;=.097^1.003^^^^^^^20.376
;;^UTILITY(U,$J,112,7830,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7831,0)
;;=FROZEN DINNERS,MEATLOAF,BANQUET^BC-01104^11-oz.^312
;;^UTILITY(U,$J,112,7831,1)
;;=8.333^8.013^8.654^141.026^^^^21.154^1.282^^^288.462^246.795^^^^^490.064^7.372^.067
;;^UTILITY(U,$J,112,7831,2)
;;=.099^2.212
;;^UTILITY(U,$J,112,7831,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7832,0)
;;=FROZEN DINNERS,MEATLOAF,LE MENU^BC-01105^10-oz.^284
;;^UTILITY(U,$J,112,7832,1)
;;=6.268^4.683^9.613^105.634^^^^34.155^1.408^^^220.423^302.817^^^^^1645.07^1.761^.081
;;^UTILITY(U,$J,112,7832,2)
;;=.109^1.514
;;^UTILITY(U,$J,112,7832,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7833,0)
;;=FROZEN DINNERS,MEATLOAF,MORTON^BC-01106^10-oz.^284
;;^UTILITY(U,$J,112,7833,1)
;;=3.873^5.986^9.155^109.155^^^^20.07^.704^^69.366^214.789^535.211^^^^^1647.887^0^.067
;;^UTILITY(U,$J,112,7833,2)
;;=.06^.599^^^^^^^17.606
;;^UTILITY(U,$J,112,7833,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7834,0)
;;=FROZEN DINNERS,MEATLOAF,SWANSON^BC-01107^10.8-oz.^305
;;^UTILITY(U,$J,112,7834,1)
;;=5.803^6.361^13.803^135.738^^^^30.492^1.246^^^188.197^332.459^^^^^149.836^3.607^.062
;;^UTILITY(U,$J,112,7834,2)
;;=.066^1.311
;;^UTILITY(U,$J,112,7834,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7835,0)
;;=FROZEN DINNERS,MEATLOAF W/TOMATO SCE,SWANSON HUNGRY-MAN^BC-01108^16.5-oz.^468
;;^UTILITY(U,$J,112,7835,1)
;;=6.197^6.966^12.244^136.538^^^^38.248^1.261^^^219.231^388.248^^^^^178.205^6.197^.058
;;^UTILITY(U,$J,112,7835,2)
;;=.036^1.261
;;^UTILITY(U,$J,112,7835,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7836,0)
;;=FROZEN DINNERS,MEXICAN STYLE,BANQUET^BC-01109^12-oz.^340
;;^UTILITY(U,$J,112,7836,1)
;;=5.294^5.294^18.235^144.118^^^^32.353^.882^^^126.471^588.235^^^^^105.294^2.353^.115
;;^UTILITY(U,$J,112,7836,2)
;;=.047^.794
;;^UTILITY(U,$J,112,7836,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7837,0)
;;=FROZEN DINNERS,MEXICAN STYLE COMBINATION,BANQUET^BC-01110^12-oz.^340
FHINI0C3 ; ; 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,7823,20)
+2 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+3 ;;^UTILITY(U,$J,112,7824,0)
+4 ;;=FROZEN DINNERS,HAM,LE MENU^BC-01097^10-oz.^284
+5 ;;^UTILITY(U,$J,112,7824,1)
+6 ;;=6.444^3.556^10.915^101.408^^^^23.592^.775^^^150^523.239^^^^^2604.577^10.915^.204
+7 ;;^UTILITY(U,$J,112,7824,2)
+8 ;;=.102^1.585
+9 ;;^UTILITY(U,$J,112,7824,20)
+10 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+11 ;;^UTILITY(U,$J,112,7825,0)
+12 ;;=FROZEN DINNERS,HAM,MORTON^BC-01098^10-oz.^284
+13 ;;^UTILITY(U,$J,112,7825,1)
+14 ;;=5.282^1.408^17.254^102.113^^^^11.972^.352^^88.732^179.577^492.958^^^^^1170.775^64.437^.232
+15 ;;^UTILITY(U,$J,112,7825,2)
+16 ;;=.085^.81^^^^^^^15.845
+17 ;;^UTILITY(U,$J,112,7825,20)
+18 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+19 ;;^UTILITY(U,$J,112,7826,0)
+20 ;;=FROZEN DINNERS,MACARONI & BEEF,SWANSON BUDGET^BC-01099^12-oz.^340
+21 ;;^UTILITY(U,$J,112,7826,1)
+22 ;;=3.706^4.088^14.235^108.529^^^^37.059^.853^^^103.824^272.059^^^^^175^3.235^.035
+23 ;;^UTILITY(U,$J,112,7826,2)
+24 ;;=.068^.941
+25 ;;^UTILITY(U,$J,112,7826,20)
+26 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+27 ;;^UTILITY(U,$J,112,7827,0)
+28 ;;=FROZEN DINNERS,MACARONI & CHEESE,BANQUET^BC-01100^10-oz.^284
+29 ;;^UTILITY(U,$J,112,7827,1)
+30 ;;=4.93^7.042^16.197^147.887^^^^95.775^1.056^^^119.718^158.451^^^^^2671.831^2.465^.123
+31 ;;^UTILITY(U,$J,112,7827,2)
+32 ;;=.127^.845^^^^^^^10.563
+33 ;;^UTILITY(U,$J,112,7827,20)
+34 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+35 ;;^UTILITY(U,$J,112,7828,0)
+36 ;;=FROZEN DINNERS,MACARONI & CHEESE,SWANSON^BC-01101^12.2-oz.^347
+37 ;;^UTILITY(U,$J,112,7828,1)
+38 ;;=3.718^4.15^13.804^107.493^^^^68.876^.778^^^51.009^292.219^^^^^1038.905^1.729^.052
+39 ;;^UTILITY(U,$J,112,7828,2)
+40 ;;=.063^.519
+41 ;;^UTILITY(U,$J,112,7828,20)
+42 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+43 ;;^UTILITY(U,$J,112,7829,0)
+44 ;;=FROZEN DINNERS,MEATBALLS,SWEDISH,ARMOUR CLASSICS^BC-01102^11.25-oz.^319
+45 ;;^UTILITY(U,$J,112,7829,1)
+46 ;;=5.956^5.643^7.21^103.448^^^^35.11^.94^^64.263^144.201^225.705^^^^^820.063^3.135^.113
+47 ;;^UTILITY(U,$J,112,7829,2)
+48 ;;=.078^.752^^^^^^^25.078
+49 ;;^UTILITY(U,$J,112,7829,20)
+50 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+51 ;;^UTILITY(U,$J,112,7830,0)
+52 ;;=FROZEN DINNERS,MEATLOAF,ARMOUR CLASSICS^BC-01103^11.25-oz.^319
+53 ;;^UTILITY(U,$J,112,7830,1)
+54 ;;=6.27^5.329^10.031^112.853^^^^21.63^.94^^71.16^184.953^366.771^^^^^117.555^3.762^.097
+55 ;;^UTILITY(U,$J,112,7830,2)
+56 ;;=.097^1.003^^^^^^^20.376
+57 ;;^UTILITY(U,$J,112,7830,20)
+58 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+59 ;;^UTILITY(U,$J,112,7831,0)
+60 ;;=FROZEN DINNERS,MEATLOAF,BANQUET^BC-01104^11-oz.^312
+61 ;;^UTILITY(U,$J,112,7831,1)
+62 ;;=8.333^8.013^8.654^141.026^^^^21.154^1.282^^^288.462^246.795^^^^^490.064^7.372^.067
+63 ;;^UTILITY(U,$J,112,7831,2)
+64 ;;=.099^2.212
+65 ;;^UTILITY(U,$J,112,7831,20)
+66 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+67 ;;^UTILITY(U,$J,112,7832,0)
+68 ;;=FROZEN DINNERS,MEATLOAF,LE MENU^BC-01105^10-oz.^284
+69 ;;^UTILITY(U,$J,112,7832,1)
+70 ;;=6.268^4.683^9.613^105.634^^^^34.155^1.408^^^220.423^302.817^^^^^1645.07^1.761^.081
+71 ;;^UTILITY(U,$J,112,7832,2)
+72 ;;=.109^1.514
+73 ;;^UTILITY(U,$J,112,7832,20)
+74 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+75 ;;^UTILITY(U,$J,112,7833,0)
+76 ;;=FROZEN DINNERS,MEATLOAF,MORTON^BC-01106^10-oz.^284
+77 ;;^UTILITY(U,$J,112,7833,1)
+78 ;;=3.873^5.986^9.155^109.155^^^^20.07^.704^^69.366^214.789^535.211^^^^^1647.887^0^.067
+79 ;;^UTILITY(U,$J,112,7833,2)
+80 ;;=.06^.599^^^^^^^17.606
+81 ;;^UTILITY(U,$J,112,7833,20)
+82 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+83 ;;^UTILITY(U,$J,112,7834,0)
+84 ;;=FROZEN DINNERS,MEATLOAF,SWANSON^BC-01107^10.8-oz.^305
+85 ;;^UTILITY(U,$J,112,7834,1)
+86 ;;=5.803^6.361^13.803^135.738^^^^30.492^1.246^^^188.197^332.459^^^^^149.836^3.607^.062
+87 ;;^UTILITY(U,$J,112,7834,2)
+88 ;;=.066^1.311
+89 ;;^UTILITY(U,$J,112,7834,20)
+90 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+91 ;;^UTILITY(U,$J,112,7835,0)
+92 ;;=FROZEN DINNERS,MEATLOAF W/TOMATO SCE,SWANSON HUNGRY-MAN^BC-01108^16.5-oz.^468
+93 ;;^UTILITY(U,$J,112,7835,1)
+94 ;;=6.197^6.966^12.244^136.538^^^^38.248^1.261^^^219.231^388.248^^^^^178.205^6.197^.058
+95 ;;^UTILITY(U,$J,112,7835,2)
+96 ;;=.036^1.261
+97 ;;^UTILITY(U,$J,112,7835,20)
+98 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+99 ;;^UTILITY(U,$J,112,7836,0)
+100 ;;=FROZEN DINNERS,MEXICAN STYLE,BANQUET^BC-01109^12-oz.^340
+101 ;;^UTILITY(U,$J,112,7836,1)
+102 ;;=5.294^5.294^18.235^144.118^^^^32.353^.882^^^126.471^588.235^^^^^105.294^2.353^.115
+103 ;;^UTILITY(U,$J,112,7836,2)
+104 ;;=.047^.794
+105 ;;^UTILITY(U,$J,112,7836,20)
+106 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+107 ;;^UTILITY(U,$J,112,7837,0)
+108 ;;=FROZEN DINNERS,MEXICAN STYLE COMBINATION,BANQUET^BC-01110^12-oz.^340
