FHINI0C1 ; ; 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,7797,2)
;;=.062^2.304
;;^UTILITY(U,$J,112,7797,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7798,0)
;;=FROZEN DINNERS,CHICKEN NUGGETS,BBQ SCE,BANQUET EXTRA HELP^BC-01071^10-oz.^284
;;^UTILITY(U,$J,112,7798,1)
;;=10.211^12.676^19.718^225.352^^^^10.915^1.056^^145.775^271.127^489.437^^^^^148.944^5.634^.092
;;^UTILITY(U,$J,112,7798,2)
;;=.039^2.676
;;^UTILITY(U,$J,112,7798,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7799,0)
;;=FROZEN DINNERS,CHICKEN NUGGETS W/SWEET & SOUR SCE, BANQUET^BC-01072^10-oz.^284
;;^UTILITY(U,$J,112,7799,1)
;;=9.859^11.972^22.535^228.873^^^^8.451^.704^^143.31^250^^^^^^103.873^4.93^.092
;;^UTILITY(U,$J,112,7799,2)
;;=.039^2.641
;;^UTILITY(U,$J,112,7799,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7800,0)
;;=FROZEN DINNERS,CHICKEN ORIENTAL,ARMOUR CLASSICS LITE^BC-01073^10-oz.^284
;;^UTILITY(U,$J,112,7800,1)
;;=6.338^.352^8.451^63.38^^^^15.493^.352^^61.972^179.577^232.394^^^^^202.113^16.197^.056
;;^UTILITY(U,$J,112,7800,2)
;;=.07^1.796^^^^^^^12.324
;;^UTILITY(U,$J,112,7800,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7801,0)
;;=FROZEN DINNERS,CHICKEN ORIENTAL,HEALTHY CHOICE^BC-01074^11.25-oz.^319
;;^UTILITY(U,$J,112,7801,1)
;;=6.583^.627^9.718^68.966^^^^12.226^.313^^64.263^137.931^144.201^^^^^158.934^11.285^.063
;;^UTILITY(U,$J,112,7801,2)
;;=.069^1.661^^^^^^^17.241
;;^UTILITY(U,$J,112,7801,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7802,0)
;;=FROZEN DINNERS,CHICKEN ORIENTAL,LE MENU^BC-01075^10.5-oz.^298
;;^UTILITY(U,$J,112,7802,1)
;;=7.248^2.55^14.027^107.718^^^^22.148^.537^^^119.799^288.591^^^^^1036.577^3.356^.05
;;^UTILITY(U,$J,112,7802,2)
;;=.067^2.617
;;^UTILITY(U,$J,112,7802,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7803,0)
;;=FROZEN DINNERS,CHICKEN PARMIGIANA,ARMOUR CLASSICS^BC-01076^115.-oz.^356
;;^UTILITY(U,$J,112,7803,1)
;;=6.18^5.337^7.584^103.933^^^^42.135^.843^^87.079^151.685^297.753^^^^^266.854^2.809^.129
;;^UTILITY(U,$J,112,7803,2)
;;=.09^1.461^^^^^^^21.067
;;^UTILITY(U,$J,112,7803,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7804,0)
;;=FROZEN DINNERS,CHICKEN PARMIGIANA,HEALTHY CHOICE^BC-01077^11.5-oz.^326
;;^UTILITY(U,$J,112,7804,1)
;;=7.055^.92^11.656^85.89^^^^30.982^.613^^80.982^190.184^95.092^^^^^1388.037^12.883^.129
;;^UTILITY(U,$J,112,7804,2)
;;=.071^2.055^^^^^^^18.405^.613^^0
;;^UTILITY(U,$J,112,7804,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7805,0)
;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,ARMOUR CLASSIC LITE^BC-01078^11-oz.^312
;;^UTILITY(U,$J,112,7805,1)
;;=5.769^.641^12.5^76.923^^^^15.705^.321^^52.244^157.051^262.821^^^^^348.077^8.654^.051
;;^UTILITY(U,$J,112,7805,2)
;;=.054^1.506^^^^^^^11.218
;;^UTILITY(U,$J,112,7805,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7806,0)
;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,HEALTHY CHOICE^BC-01079^11.5-oz.^326
;;^UTILITY(U,$J,112,7806,1)
;;=6.748^.613^13.497^85.89^^^^11.656^.307^^67.485^144.172^79.755^^^^^95.399^26.074^.092
;;^UTILITY(U,$J,112,7806,2)
;;=.046^1.748^^^^^^^15.337
;;^UTILITY(U,$J,112,7806,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7807,0)
;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,LE MENU^BC-01080^10.5-oz.^298
;;^UTILITY(U,$J,112,7807,1)
;;=6.309^5.268^13.758^127.852^^^^26.846^.705^^^134.228^342.282^^^^^553.02^1.678^.047
;;^UTILITY(U,$J,112,7807,2)
;;=.081^1.846
;;^UTILITY(U,$J,112,7807,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7808,0)
;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,SWANSON^BC-01081^12-oz.^340
;;^UTILITY(U,$J,112,7808,1)
;;=6.294^3.412^13.941^112.059^^^^28.235^.588^^^97.353^157.059^^^^^310.588^2.941^.032
;;^UTILITY(U,$J,112,7808,2)
;;=.094^1.176
;;^UTILITY(U,$J,112,7808,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7809,0)
;;=FROZEN DINNERS,CHICKEN W/BBQ SCE,SWANSON^BC-01082^11.75-oz.^333
;;^UTILITY(U,$J,112,7809,1)
;;=8.769^4.084^16.907^139.339^^^^21.021^1.141^^^191.592^297.898^^^^^292.492^2.102^.066
;;^UTILITY(U,$J,112,7809,2)
;;=.105^1.381
;;^UTILITY(U,$J,112,7809,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7810,0)
;;=FROZEN DINNERS,CHICKEN W/WINE & MUSHROOM SCE,ARMOUR^BC-01083^10.75-oz.^305
;;^UTILITY(U,$J,112,7810,1)
;;=7.213^3.607^7.869^91.803^^^^26.885^.328^^76.393^180.328^295.082^^^^^630.164^7.541^.059
FHINI0C1 ; ; 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,7797,2)
+2 ;;=.062^2.304
+3 ;;^UTILITY(U,$J,112,7797,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7798,0)
+6 ;;=FROZEN DINNERS,CHICKEN NUGGETS,BBQ SCE,BANQUET EXTRA HELP^BC-01071^10-oz.^284
+7 ;;^UTILITY(U,$J,112,7798,1)
+8 ;;=10.211^12.676^19.718^225.352^^^^10.915^1.056^^145.775^271.127^489.437^^^^^148.944^5.634^.092
+9 ;;^UTILITY(U,$J,112,7798,2)
+10 ;;=.039^2.676
+11 ;;^UTILITY(U,$J,112,7798,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7799,0)
+14 ;;=FROZEN DINNERS,CHICKEN NUGGETS W/SWEET & SOUR SCE, BANQUET^BC-01072^10-oz.^284
+15 ;;^UTILITY(U,$J,112,7799,1)
+16 ;;=9.859^11.972^22.535^228.873^^^^8.451^.704^^143.31^250^^^^^^103.873^4.93^.092
+17 ;;^UTILITY(U,$J,112,7799,2)
+18 ;;=.039^2.641
+19 ;;^UTILITY(U,$J,112,7799,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7800,0)
+22 ;;=FROZEN DINNERS,CHICKEN ORIENTAL,ARMOUR CLASSICS LITE^BC-01073^10-oz.^284
+23 ;;^UTILITY(U,$J,112,7800,1)
+24 ;;=6.338^.352^8.451^63.38^^^^15.493^.352^^61.972^179.577^232.394^^^^^202.113^16.197^.056
+25 ;;^UTILITY(U,$J,112,7800,2)
+26 ;;=.07^1.796^^^^^^^12.324
+27 ;;^UTILITY(U,$J,112,7800,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7801,0)
+30 ;;=FROZEN DINNERS,CHICKEN ORIENTAL,HEALTHY CHOICE^BC-01074^11.25-oz.^319
+31 ;;^UTILITY(U,$J,112,7801,1)
+32 ;;=6.583^.627^9.718^68.966^^^^12.226^.313^^64.263^137.931^144.201^^^^^158.934^11.285^.063
+33 ;;^UTILITY(U,$J,112,7801,2)
+34 ;;=.069^1.661^^^^^^^17.241
+35 ;;^UTILITY(U,$J,112,7801,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7802,0)
+38 ;;=FROZEN DINNERS,CHICKEN ORIENTAL,LE MENU^BC-01075^10.5-oz.^298
+39 ;;^UTILITY(U,$J,112,7802,1)
+40 ;;=7.248^2.55^14.027^107.718^^^^22.148^.537^^^119.799^288.591^^^^^1036.577^3.356^.05
+41 ;;^UTILITY(U,$J,112,7802,2)
+42 ;;=.067^2.617
+43 ;;^UTILITY(U,$J,112,7802,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7803,0)
+46 ;;=FROZEN DINNERS,CHICKEN PARMIGIANA,ARMOUR CLASSICS^BC-01076^115.-oz.^356
+47 ;;^UTILITY(U,$J,112,7803,1)
+48 ;;=6.18^5.337^7.584^103.933^^^^42.135^.843^^87.079^151.685^297.753^^^^^266.854^2.809^.129
+49 ;;^UTILITY(U,$J,112,7803,2)
+50 ;;=.09^1.461^^^^^^^21.067
+51 ;;^UTILITY(U,$J,112,7803,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7804,0)
+54 ;;=FROZEN DINNERS,CHICKEN PARMIGIANA,HEALTHY CHOICE^BC-01077^11.5-oz.^326
+55 ;;^UTILITY(U,$J,112,7804,1)
+56 ;;=7.055^.92^11.656^85.89^^^^30.982^.613^^80.982^190.184^95.092^^^^^1388.037^12.883^.129
+57 ;;^UTILITY(U,$J,112,7804,2)
+58 ;;=.071^2.055^^^^^^^18.405^.613^^0
+59 ;;^UTILITY(U,$J,112,7804,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7805,0)
+62 ;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,ARMOUR CLASSIC LITE^BC-01078^11-oz.^312
+63 ;;^UTILITY(U,$J,112,7805,1)
+64 ;;=5.769^.641^12.5^76.923^^^^15.705^.321^^52.244^157.051^262.821^^^^^348.077^8.654^.051
+65 ;;^UTILITY(U,$J,112,7805,2)
+66 ;;=.054^1.506^^^^^^^11.218
+67 ;;^UTILITY(U,$J,112,7805,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7806,0)
+70 ;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,HEALTHY CHOICE^BC-01079^11.5-oz.^326
+71 ;;^UTILITY(U,$J,112,7806,1)
+72 ;;=6.748^.613^13.497^85.89^^^^11.656^.307^^67.485^144.172^79.755^^^^^95.399^26.074^.092
+73 ;;^UTILITY(U,$J,112,7806,2)
+74 ;;=.046^1.748^^^^^^^15.337
+75 ;;^UTILITY(U,$J,112,7806,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7807,0)
+78 ;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,LE MENU^BC-01080^10.5-oz.^298
+79 ;;^UTILITY(U,$J,112,7807,1)
+80 ;;=6.309^5.268^13.758^127.852^^^^26.846^.705^^^134.228^342.282^^^^^553.02^1.678^.047
+81 ;;^UTILITY(U,$J,112,7807,2)
+82 ;;=.081^1.846
+83 ;;^UTILITY(U,$J,112,7807,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7808,0)
+86 ;;=FROZEN DINNERS,CHICKEN,SWEET & SOUR,SWANSON^BC-01081^12-oz.^340
+87 ;;^UTILITY(U,$J,112,7808,1)
+88 ;;=6.294^3.412^13.941^112.059^^^^28.235^.588^^^97.353^157.059^^^^^310.588^2.941^.032
+89 ;;^UTILITY(U,$J,112,7808,2)
+90 ;;=.094^1.176
+91 ;;^UTILITY(U,$J,112,7808,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7809,0)
+94 ;;=FROZEN DINNERS,CHICKEN W/BBQ SCE,SWANSON^BC-01082^11.75-oz.^333
+95 ;;^UTILITY(U,$J,112,7809,1)
+96 ;;=8.769^4.084^16.907^139.339^^^^21.021^1.141^^^191.592^297.898^^^^^292.492^2.102^.066
+97 ;;^UTILITY(U,$J,112,7809,2)
+98 ;;=.105^1.381
+99 ;;^UTILITY(U,$J,112,7809,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7810,0)
+102 ;;=FROZEN DINNERS,CHICKEN W/WINE & MUSHROOM SCE,ARMOUR^BC-01083^10.75-oz.^305
+103 ;;^UTILITY(U,$J,112,7810,1)
+104 ;;=7.213^3.607^7.869^91.803^^^^26.885^.328^^76.393^180.328^295.082^^^^^630.164^7.541^.059
