FHINI0BJ ; ; 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,7558,2)
;;=.2^2.706^^^^^^^51.765
;;^UTILITY(U,$J,112,7558,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7559,0)
;;=ENTREES,MOSTACCIOLI W/MEAT SCE,BANQUET (FAM)^BC-00832^7-oz.^198
;;^UTILITY(U,$J,112,7559,1)
;;=3.535^1.515^14.141^85.859^^^^17.677^1.818^^^166.667^595.96^^^^^551.515^.505^.217
;;^UTILITY(U,$J,112,7559,2)
;;=.116^1.414
;;^UTILITY(U,$J,112,7559,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7560,0)
;;=ENTREES,NOODLES ROMANOFF,STOUFFERS^BC-00833^3-oz.^85
;;^UTILITY(U,$J,112,7560,1)
;;=6.353^8.353^13.059^152.941^70^^^82.353^.6^^^90.588^640^^^^^120^0^.094
;;^UTILITY(U,$J,112,7560,2)
;;=.165^.588^^^^^^^16.471
;;^UTILITY(U,$J,112,7560,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7561,0)
;;=ENTREES,PASTA,DIJON,GARDEN GOURMET (MICRO)^BC-00834^9.5-oz.^269
;;^UTILITY(U,$J,112,7561,1)
;;=2.602^7.509^8.885^110.037^80^^^26.766^.401^^43.123^105.948^211.152^^^^^191.822^21.561^.048
;;^UTILITY(U,$J,112,7561,2)
;;=.059^.669^^^^^^^^^^^^^^^1.004
;;^UTILITY(U,$J,112,7561,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7562,0)
;;=ENTREES,PASTA,FLORENTINE,GARDEN GOURMET (MICRO)^BC-00835^9.5-oz.^269
;;^UTILITY(U,$J,112,7562,1)
;;=5.204^3.346^10.037^85.502^^^^^^^^107.807^312.268
;;^UTILITY(U,$J,112,7562,2)
;;=^^^^^^^^9.294^1.859^^.372
;;^UTILITY(U,$J,112,7562,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7563,0)
;;=ENTREES,PASTA,MARINARA,PILSBURY^BC-00836^6-oz.^170
;;^UTILITY(U,$J,112,7563,1)
;;=2.941^2.941^17.059^105.882^^^^^^^^200^429.412
;;^UTILITY(U,$J,112,7563,2)
;;=^^^^^^^^0^^^.588
;;^UTILITY(U,$J,112,7563,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7564,0)
;;=ENTREES,PASTA,PARMESAN W/SWEET PEAS,PILSBURY^BC-00837^5.5-oz.^156
;;^UTILITY(U,$J,112,7564,1)
;;=5.769^3.205^15.385^108.974^^^^^^^^102.564^326.923
;;^UTILITY(U,$J,112,7564,2)
;;=^^^^^^^^6.41^1.282^^0
;;^UTILITY(U,$J,112,7564,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7565,0)
;;=ENTREES,PASTA,ROMA,STOUFFERS^BC-00838^8-oz.^227
;;^UTILITY(U,$J,112,7565,1)
;;=5.595^2.599^10.881^89.868^79.515^^^45.374^1.198^^^210.132^276.211^^^^^304.846^4.846
;;^UTILITY(U,$J,112,7565,2)
;;=.132^1.586^^^^^^^10.573^.573^.529^.176^^^^^4.493
;;^UTILITY(U,$J,112,7565,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7566,0)
;;=ENTREES,PASTA W/CHEDDAR CHEESE SEASONING,PASTA ACCENTS^BC-00839^1/2-cup^76
;;^UTILITY(U,$J,112,7566,1)
;;=4.737^6.053^14.868^125^72.632^^^105.263^.895^^150^164.474^322.368^^^^^1864.474^17.105^.105
;;^UTILITY(U,$J,112,7566,2)
;;=.132^1.316^^^^^^^6.579^^^^^^^^1.974
;;^UTILITY(U,$J,112,7566,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7567,0)
;;=ENTREES,PASTA W/GARLIC SEASONING,PASTA ACCENTS^BC-00840^1/2-cup^76
;;^UTILITY(U,$J,112,7567,1)
;;=3.158^5.658^18.421^130.263^71.184^^^46.053^1.5^^64.474^163.158^285.526^^^^^1778.947^19.737^.079
;;^UTILITY(U,$J,112,7567,2)
;;=.092^1.184^^^^^^^6.579^2.632^^^^^^^1.974
;;^UTILITY(U,$J,112,7567,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7568,0)
;;=ENTREES,PASTA W/LEMON BUTTER SEASONING,PASTA ACCENTS^BC-00841^1/2-cup^76
;;^UTILITY(U,$J,112,7568,1)
;;=3.158^3.684^15.526^100^76.184^^^32.895^.684^^52.632^147.368^264.474^^^^^1701.316^26.316^.145
;;^UTILITY(U,$J,112,7568,2)
;;=.105^1.579^^^^^^^^^^^^^^^2.237
;;^UTILITY(U,$J,112,7568,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7569,0)
;;=ENTREES,PASTA W/PARMESAN CHEESE,PASTA ACCENTS^BC-00842^1/2-cup^76
;;^UTILITY(U,$J,112,7569,1)
;;=4.342^5.263^16.711^123.684^71.974^^^72.368^.895^^72.368^130.263^289.474^^^^^375^9.211^.118
;;^UTILITY(U,$J,112,7569,2)
;;=.145^1.316^^^^^^^^^^^^^^^2.105
;;^UTILITY(U,$J,112,7569,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7570,0)
;;=ENTREES,PASTA W/SOUR CREAM & HERB SEASONING,PASTA ACCENTS^BC-00843^1/2-cup^76
;;^UTILITY(U,$J,112,7570,1)
;;=3.947^7.763^16.447^146.053^70^^^85.526^.803^^80.263^189.474^346.053^^^^^1409.211^14.474^.132
;;^UTILITY(U,$J,112,7570,2)
;;=.158^1.447^^^^^^^^^^^^^^^1.447
;;^UTILITY(U,$J,112,7570,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7571,0)
;;=ENTREES,PASTA W/SOUTHWESTERN SEASONING,PASTA ACCENTS^BC-00844^1/2-cup^76
;;^UTILITY(U,$J,112,7571,1)
;;=2.895^6.974^10.526^113.158^78.421^^^50^.697^^63.158^189.474^146.053^^^^^484.211^28.947^.066
FHINI0BJ ; ; 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,7558,2)
+2 ;;=.2^2.706^^^^^^^51.765
+3 ;;^UTILITY(U,$J,112,7558,20)
+4 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+5 ;;^UTILITY(U,$J,112,7559,0)
+6 ;;=ENTREES,MOSTACCIOLI W/MEAT SCE,BANQUET (FAM)^BC-00832^7-oz.^198
+7 ;;^UTILITY(U,$J,112,7559,1)
+8 ;;=3.535^1.515^14.141^85.859^^^^17.677^1.818^^^166.667^595.96^^^^^551.515^.505^.217
+9 ;;^UTILITY(U,$J,112,7559,2)
+10 ;;=.116^1.414
+11 ;;^UTILITY(U,$J,112,7559,20)
+12 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+13 ;;^UTILITY(U,$J,112,7560,0)
+14 ;;=ENTREES,NOODLES ROMANOFF,STOUFFERS^BC-00833^3-oz.^85
+15 ;;^UTILITY(U,$J,112,7560,1)
+16 ;;=6.353^8.353^13.059^152.941^70^^^82.353^.6^^^90.588^640^^^^^120^0^.094
+17 ;;^UTILITY(U,$J,112,7560,2)
+18 ;;=.165^.588^^^^^^^16.471
+19 ;;^UTILITY(U,$J,112,7560,20)
+20 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+21 ;;^UTILITY(U,$J,112,7561,0)
+22 ;;=ENTREES,PASTA,DIJON,GARDEN GOURMET (MICRO)^BC-00834^9.5-oz.^269
+23 ;;^UTILITY(U,$J,112,7561,1)
+24 ;;=2.602^7.509^8.885^110.037^80^^^26.766^.401^^43.123^105.948^211.152^^^^^191.822^21.561^.048
+25 ;;^UTILITY(U,$J,112,7561,2)
+26 ;;=.059^.669^^^^^^^^^^^^^^^1.004
+27 ;;^UTILITY(U,$J,112,7561,20)
+28 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+29 ;;^UTILITY(U,$J,112,7562,0)
+30 ;;=ENTREES,PASTA,FLORENTINE,GARDEN GOURMET (MICRO)^BC-00835^9.5-oz.^269
+31 ;;^UTILITY(U,$J,112,7562,1)
+32 ;;=5.204^3.346^10.037^85.502^^^^^^^^107.807^312.268
+33 ;;^UTILITY(U,$J,112,7562,2)
+34 ;;=^^^^^^^^9.294^1.859^^.372
+35 ;;^UTILITY(U,$J,112,7562,20)
+36 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+37 ;;^UTILITY(U,$J,112,7563,0)
+38 ;;=ENTREES,PASTA,MARINARA,PILSBURY^BC-00836^6-oz.^170
+39 ;;^UTILITY(U,$J,112,7563,1)
+40 ;;=2.941^2.941^17.059^105.882^^^^^^^^200^429.412
+41 ;;^UTILITY(U,$J,112,7563,2)
+42 ;;=^^^^^^^^0^^^.588
+43 ;;^UTILITY(U,$J,112,7563,20)
+44 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+45 ;;^UTILITY(U,$J,112,7564,0)
+46 ;;=ENTREES,PASTA,PARMESAN W/SWEET PEAS,PILSBURY^BC-00837^5.5-oz.^156
+47 ;;^UTILITY(U,$J,112,7564,1)
+48 ;;=5.769^3.205^15.385^108.974^^^^^^^^102.564^326.923
+49 ;;^UTILITY(U,$J,112,7564,2)
+50 ;;=^^^^^^^^6.41^1.282^^0
+51 ;;^UTILITY(U,$J,112,7564,20)
+52 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+53 ;;^UTILITY(U,$J,112,7565,0)
+54 ;;=ENTREES,PASTA,ROMA,STOUFFERS^BC-00838^8-oz.^227
+55 ;;^UTILITY(U,$J,112,7565,1)
+56 ;;=5.595^2.599^10.881^89.868^79.515^^^45.374^1.198^^^210.132^276.211^^^^^304.846^4.846
+57 ;;^UTILITY(U,$J,112,7565,2)
+58 ;;=.132^1.586^^^^^^^10.573^.573^.529^.176^^^^^4.493
+59 ;;^UTILITY(U,$J,112,7565,20)
+60 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+61 ;;^UTILITY(U,$J,112,7566,0)
+62 ;;=ENTREES,PASTA W/CHEDDAR CHEESE SEASONING,PASTA ACCENTS^BC-00839^1/2-cup^76
+63 ;;^UTILITY(U,$J,112,7566,1)
+64 ;;=4.737^6.053^14.868^125^72.632^^^105.263^.895^^150^164.474^322.368^^^^^1864.474^17.105^.105
+65 ;;^UTILITY(U,$J,112,7566,2)
+66 ;;=.132^1.316^^^^^^^6.579^^^^^^^^1.974
+67 ;;^UTILITY(U,$J,112,7566,20)
+68 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+69 ;;^UTILITY(U,$J,112,7567,0)
+70 ;;=ENTREES,PASTA W/GARLIC SEASONING,PASTA ACCENTS^BC-00840^1/2-cup^76
+71 ;;^UTILITY(U,$J,112,7567,1)
+72 ;;=3.158^5.658^18.421^130.263^71.184^^^46.053^1.5^^64.474^163.158^285.526^^^^^1778.947^19.737^.079
+73 ;;^UTILITY(U,$J,112,7567,2)
+74 ;;=.092^1.184^^^^^^^6.579^2.632^^^^^^^1.974
+75 ;;^UTILITY(U,$J,112,7567,20)
+76 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+77 ;;^UTILITY(U,$J,112,7568,0)
+78 ;;=ENTREES,PASTA W/LEMON BUTTER SEASONING,PASTA ACCENTS^BC-00841^1/2-cup^76
+79 ;;^UTILITY(U,$J,112,7568,1)
+80 ;;=3.158^3.684^15.526^100^76.184^^^32.895^.684^^52.632^147.368^264.474^^^^^1701.316^26.316^.145
+81 ;;^UTILITY(U,$J,112,7568,2)
+82 ;;=.105^1.579^^^^^^^^^^^^^^^2.237
+83 ;;^UTILITY(U,$J,112,7568,20)
+84 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+85 ;;^UTILITY(U,$J,112,7569,0)
+86 ;;=ENTREES,PASTA W/PARMESAN CHEESE,PASTA ACCENTS^BC-00842^1/2-cup^76
+87 ;;^UTILITY(U,$J,112,7569,1)
+88 ;;=4.342^5.263^16.711^123.684^71.974^^^72.368^.895^^72.368^130.263^289.474^^^^^375^9.211^.118
+89 ;;^UTILITY(U,$J,112,7569,2)
+90 ;;=.145^1.316^^^^^^^^^^^^^^^2.105
+91 ;;^UTILITY(U,$J,112,7569,20)
+92 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+93 ;;^UTILITY(U,$J,112,7570,0)
+94 ;;=ENTREES,PASTA W/SOUR CREAM & HERB SEASONING,PASTA ACCENTS^BC-00843^1/2-cup^76
+95 ;;^UTILITY(U,$J,112,7570,1)
+96 ;;=3.947^7.763^16.447^146.053^70^^^85.526^.803^^80.263^189.474^346.053^^^^^1409.211^14.474^.132
+97 ;;^UTILITY(U,$J,112,7570,2)
+98 ;;=.158^1.447^^^^^^^^^^^^^^^1.447
+99 ;;^UTILITY(U,$J,112,7570,20)
+100 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+101 ;;^UTILITY(U,$J,112,7571,0)
+102 ;;=ENTREES,PASTA W/SOUTHWESTERN SEASONING,PASTA ACCENTS^BC-00844^1/2-cup^76
+103 ;;^UTILITY(U,$J,112,7571,1)
+104 ;;=2.895^6.974^10.526^113.158^78.421^^^50^.697^^63.158^189.474^146.053^^^^^484.211^28.947^.066
