FHINI0B5 ; ; 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,7370,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7371,0)
;;=ENTREES,BOX,NOODLES W/ALFREDO SCE,LIPTON^BC-00644^1/4-cup^33
;;^UTILITY(U,$J,112,7371,1)
;;=16.364^10.303^64.242^396.97^^^^184.848^3.636^48.485^354.545^315.152^1639.394^1.515^.303^^^118.182^0^.909
;;^UTILITY(U,$J,112,7371,2)
;;=.606^6.667
;;^UTILITY(U,$J,112,7371,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7372,0)
;;=ENTREES,BOX,NOODLES W/BEEF FLAVOR,HEARTY^BC-00645^1/2-pkg.^29
;;^UTILITY(U,$J,112,7372,1)
;;=12.069^4.828^69.655^368.966^^^^41.379^3.448^41.379^165.517^272.414^2406.897^.69^0^.345^^2500^10.345^.69
;;^UTILITY(U,$J,112,7372,2)
;;=.345^6.552^^^^^^^0
;;^UTILITY(U,$J,112,7372,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7373,0)
;;=ENTREES,BOX,NOODLES W/BUTTER SCE,LIPTON^BC-00646^1/4-pkg.^35
;;^UTILITY(U,$J,112,7373,1)
;;=16.571^11.143^66^434.286^^^^45.714^3.143^48.571^208.571^^1280^1.429^.286^.571^^231.429^0^.857
;;^UTILITY(U,$J,112,7373,2)
;;=.571^8.857
;;^UTILITY(U,$J,112,7373,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7374,0)
;;=ENTREES,BOX,NOODLES W/BUTTER & HERB SCE,LIPTON^BC-00647^1/4-pkg.^34
;;^UTILITY(U,$J,112,7374,1)
;;=14.412^9.412^64.412^400^^^^61.765^2.941^41.176^191.176^^1347.059^1.176^0^^^208.824^0^.882
;;^UTILITY(U,$J,112,7374,2)
;;=.588^7.353
;;^UTILITY(U,$J,112,7374,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7375,0)
;;=ENTREES,BOX,NOODLES W/CHEESE SCE,LIPTON^BC-00648^1/4-pkg.^36
;;^UTILITY(U,$J,112,7375,1)
;;=15^6.111^68.889^391.667^^^^122.222^3.056^47.222^283.333^^1305.556^1.667^.278^.556^^169.444^0^.833
;;^UTILITY(U,$J,112,7375,2)
;;=.556^7.5
;;^UTILITY(U,$J,112,7375,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7376,0)
;;=ENTREES,BOX,NOODLES W/CHICKEN FLAVOR SCE,LIPTON^BC-00649^1/4-pkg.^33
;;^UTILITY(U,$J,112,7376,1)
;;=15.758^5.758^66.061^378.788^^^^45.455^3.333^48.485^209.091^206.061^1184.848^1.212^.303^.606^^100^0^.909
;;^UTILITY(U,$J,112,7376,2)
;;=.606^7.576
;;^UTILITY(U,$J,112,7376,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7377,0)
;;=ENTREES,BOX,NOODLES W/PARMESAN SCE,LIPTON^BC-00650^1/4-pkg.^34
;;^UTILITY(U,$J,112,7377,1)
;;=16.176^12.059^62.059^420.588^^^^135.294^3.235^50^300^291.176^1202.941^1.471^.294^.588^^376.471^0^.882
;;^UTILITY(U,$J,112,7377,2)
;;=.588^7.353
;;^UTILITY(U,$J,112,7377,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7378,0)
;;=ENTREES,BOX,NOODLES W/SOUR CREAM & CHIVE SCE,LIPTON^BC-00651^1/4-pkg.^35
;;^UTILITY(U,$J,112,7378,1)
;;=14.571^9.714^64.571^405.714^^^^57.143^3.143^51.429^228.571^^1262.857^^^.571^^197.143^0^.857
;;^UTILITY(U,$J,112,7378,2)
;;=.571^6.857
;;^UTILITY(U,$J,112,7378,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7379,0)
;;=ENTREES,BOX,NOODLES W/STROGANOFF SCE,LIPTON^BC-00652^1/4-pkg.^30
;;^UTILITY(U,$J,112,7379,1)
;;=14^6.333^63.667^366.667^^^^53.333^4.333^50^216.667^^1153.333^1.333^.333^.667^^533.333^0^1
;;^UTILITY(U,$J,112,7379,2)
;;=.333^8.333
;;^UTILITY(U,$J,112,7379,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7380,0)
;;=ENTREES,BOX,PASTA SALAD,CREAMY BROCCOLI,LIPTON^BC-00653^1/4-pkg.^32
;;^UTILITY(U,$J,112,7380,1)
;;=14.688^4.063^69.375^375^^^^71.875^4.688^59.375^184.375^390.625^368.75^1.25^.313^.938^^618.75^9.375^1.25
;;^UTILITY(U,$J,112,7380,2)
;;=^10.938
;;^UTILITY(U,$J,112,7380,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7381,0)
;;=ENTREES,BOX,PASTA SALAD,ROBUST ITALIAN,LIPTON^BC-00654^1/4-pkg.^35
;;^UTILITY(U,$J,112,7381,1)
;;=14^2.571^70^360^^^^102.857^3.714^51.429^177.143^348.571^977.143^1.143^.286^.857^^1114.286^2.857^.571
;;^UTILITY(U,$J,112,7381,2)
;;=.286^5.429
;;^UTILITY(U,$J,112,7381,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7382,0)
;;=ENTREES,BOX,PASTA SHELLS & CHEDDAR PREP,VELVEETA^BC-00655^3/4-cup^150
;;^UTILITY(U,$J,112,7382,1)
;;=8.067^6.533^21.2^174^62.6^^^124^1.273^20^289.333^78^572^.973^.09^.22^^248^0^.153
;;^UTILITY(U,$J,112,7382,2)
;;=.173^1.2^.24^.033^14.667^.26^^^16.667^3.6^^.467
;;^UTILITY(U,$J,112,7382,20)
;;=Bowes & Church's Food Values, Sixteenth Edition.
;;^UTILITY(U,$J,112,7383,0)
;;=ENTREES,BOX,PASTA W/CHEDDAR BROCCOLI SCE,LIPTON^BC-00656^1/4-pkg.^36
;;^UTILITY(U,$J,112,7383,1)
;;=15.833^5^66.389^375^^^^144.444^3.333^50^352.778^361.111^1244.444^1.389^.278^.556^^172.222^2.778^1.111
FHINI0B5 ; ; 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,7370,20)
+2 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+3 ;;^UTILITY(U,$J,112,7371,0)
+4 ;;=ENTREES,BOX,NOODLES W/ALFREDO SCE,LIPTON^BC-00644^1/4-cup^33
+5 ;;^UTILITY(U,$J,112,7371,1)
+6 ;;=16.364^10.303^64.242^396.97^^^^184.848^3.636^48.485^354.545^315.152^1639.394^1.515^.303^^^118.182^0^.909
+7 ;;^UTILITY(U,$J,112,7371,2)
+8 ;;=.606^6.667
+9 ;;^UTILITY(U,$J,112,7371,20)
+10 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+11 ;;^UTILITY(U,$J,112,7372,0)
+12 ;;=ENTREES,BOX,NOODLES W/BEEF FLAVOR,HEARTY^BC-00645^1/2-pkg.^29
+13 ;;^UTILITY(U,$J,112,7372,1)
+14 ;;=12.069^4.828^69.655^368.966^^^^41.379^3.448^41.379^165.517^272.414^2406.897^.69^0^.345^^2500^10.345^.69
+15 ;;^UTILITY(U,$J,112,7372,2)
+16 ;;=.345^6.552^^^^^^^0
+17 ;;^UTILITY(U,$J,112,7372,20)
+18 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+19 ;;^UTILITY(U,$J,112,7373,0)
+20 ;;=ENTREES,BOX,NOODLES W/BUTTER SCE,LIPTON^BC-00646^1/4-pkg.^35
+21 ;;^UTILITY(U,$J,112,7373,1)
+22 ;;=16.571^11.143^66^434.286^^^^45.714^3.143^48.571^208.571^^1280^1.429^.286^.571^^231.429^0^.857
+23 ;;^UTILITY(U,$J,112,7373,2)
+24 ;;=.571^8.857
+25 ;;^UTILITY(U,$J,112,7373,20)
+26 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+27 ;;^UTILITY(U,$J,112,7374,0)
+28 ;;=ENTREES,BOX,NOODLES W/BUTTER & HERB SCE,LIPTON^BC-00647^1/4-pkg.^34
+29 ;;^UTILITY(U,$J,112,7374,1)
+30 ;;=14.412^9.412^64.412^400^^^^61.765^2.941^41.176^191.176^^1347.059^1.176^0^^^208.824^0^.882
+31 ;;^UTILITY(U,$J,112,7374,2)
+32 ;;=.588^7.353
+33 ;;^UTILITY(U,$J,112,7374,20)
+34 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+35 ;;^UTILITY(U,$J,112,7375,0)
+36 ;;=ENTREES,BOX,NOODLES W/CHEESE SCE,LIPTON^BC-00648^1/4-pkg.^36
+37 ;;^UTILITY(U,$J,112,7375,1)
+38 ;;=15^6.111^68.889^391.667^^^^122.222^3.056^47.222^283.333^^1305.556^1.667^.278^.556^^169.444^0^.833
+39 ;;^UTILITY(U,$J,112,7375,2)
+40 ;;=.556^7.5
+41 ;;^UTILITY(U,$J,112,7375,20)
+42 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+43 ;;^UTILITY(U,$J,112,7376,0)
+44 ;;=ENTREES,BOX,NOODLES W/CHICKEN FLAVOR SCE,LIPTON^BC-00649^1/4-pkg.^33
+45 ;;^UTILITY(U,$J,112,7376,1)
+46 ;;=15.758^5.758^66.061^378.788^^^^45.455^3.333^48.485^209.091^206.061^1184.848^1.212^.303^.606^^100^0^.909
+47 ;;^UTILITY(U,$J,112,7376,2)
+48 ;;=.606^7.576
+49 ;;^UTILITY(U,$J,112,7376,20)
+50 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+51 ;;^UTILITY(U,$J,112,7377,0)
+52 ;;=ENTREES,BOX,NOODLES W/PARMESAN SCE,LIPTON^BC-00650^1/4-pkg.^34
+53 ;;^UTILITY(U,$J,112,7377,1)
+54 ;;=16.176^12.059^62.059^420.588^^^^135.294^3.235^50^300^291.176^1202.941^1.471^.294^.588^^376.471^0^.882
+55 ;;^UTILITY(U,$J,112,7377,2)
+56 ;;=.588^7.353
+57 ;;^UTILITY(U,$J,112,7377,20)
+58 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+59 ;;^UTILITY(U,$J,112,7378,0)
+60 ;;=ENTREES,BOX,NOODLES W/SOUR CREAM & CHIVE SCE,LIPTON^BC-00651^1/4-pkg.^35
+61 ;;^UTILITY(U,$J,112,7378,1)
+62 ;;=14.571^9.714^64.571^405.714^^^^57.143^3.143^51.429^228.571^^1262.857^^^.571^^197.143^0^.857
+63 ;;^UTILITY(U,$J,112,7378,2)
+64 ;;=.571^6.857
+65 ;;^UTILITY(U,$J,112,7378,20)
+66 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+67 ;;^UTILITY(U,$J,112,7379,0)
+68 ;;=ENTREES,BOX,NOODLES W/STROGANOFF SCE,LIPTON^BC-00652^1/4-pkg.^30
+69 ;;^UTILITY(U,$J,112,7379,1)
+70 ;;=14^6.333^63.667^366.667^^^^53.333^4.333^50^216.667^^1153.333^1.333^.333^.667^^533.333^0^1
+71 ;;^UTILITY(U,$J,112,7379,2)
+72 ;;=.333^8.333
+73 ;;^UTILITY(U,$J,112,7379,20)
+74 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+75 ;;^UTILITY(U,$J,112,7380,0)
+76 ;;=ENTREES,BOX,PASTA SALAD,CREAMY BROCCOLI,LIPTON^BC-00653^1/4-pkg.^32
+77 ;;^UTILITY(U,$J,112,7380,1)
+78 ;;=14.688^4.063^69.375^375^^^^71.875^4.688^59.375^184.375^390.625^368.75^1.25^.313^.938^^618.75^9.375^1.25
+79 ;;^UTILITY(U,$J,112,7380,2)
+80 ;;=^10.938
+81 ;;^UTILITY(U,$J,112,7380,20)
+82 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+83 ;;^UTILITY(U,$J,112,7381,0)
+84 ;;=ENTREES,BOX,PASTA SALAD,ROBUST ITALIAN,LIPTON^BC-00654^1/4-pkg.^35
+85 ;;^UTILITY(U,$J,112,7381,1)
+86 ;;=14^2.571^70^360^^^^102.857^3.714^51.429^177.143^348.571^977.143^1.143^.286^.857^^1114.286^2.857^.571
+87 ;;^UTILITY(U,$J,112,7381,2)
+88 ;;=.286^5.429
+89 ;;^UTILITY(U,$J,112,7381,20)
+90 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+91 ;;^UTILITY(U,$J,112,7382,0)
+92 ;;=ENTREES,BOX,PASTA SHELLS & CHEDDAR PREP,VELVEETA^BC-00655^3/4-cup^150
+93 ;;^UTILITY(U,$J,112,7382,1)
+94 ;;=8.067^6.533^21.2^174^62.6^^^124^1.273^20^289.333^78^572^.973^.09^.22^^248^0^.153
+95 ;;^UTILITY(U,$J,112,7382,2)
+96 ;;=.173^1.2^.24^.033^14.667^.26^^^16.667^3.6^^.467
+97 ;;^UTILITY(U,$J,112,7382,20)
+98 ;;=Bowes & Church's Food Values, Sixteenth Edition.
+99 ;;^UTILITY(U,$J,112,7383,0)
+100 ;;=ENTREES,BOX,PASTA W/CHEDDAR BROCCOLI SCE,LIPTON^BC-00656^1/4-pkg.^36
+101 ;;^UTILITY(U,$J,112,7383,1)
+102 ;;=15.833^5^66.389^375^^^^144.444^3.333^50^352.778^361.111^1244.444^1.389^.278^.556^^172.222^2.778^1.111
