FHIPST15 ; HISC/NCA - Ingredient Items 7 ;5/1/95 12:03
;;5.0;Dietetics;;Oct 11, 1995
F I=1:1 S A=$P($T(ITEMS+I),";",3,99) Q:A="" I $P(A,"^",2) S ^TMP($J,"FHING",CTR)=A,CTR=CTR+1
Q
ITEMS ;;
;;BEANS, FRENCH CUT GREEN, CND^715^1
;;PINEAPPLE, CND, TIDBITS, DIET^1770^1
;;PRUNES, CND, DIET^^1
;;CHEESE, AMERICAN SLICED^42^1
;;CAKE, ANGELFOOD, FRESH^880^1.579
;;PIE, APPLE, FZN^1470^.203
;;APPLES, FRESH^1611^.304
;;BACON, PREFRIED^213^1
;;POTATOES, BAKING, FRESH^1503^.499
;;BANANAS, FRESH^1635^.251
;;BEEF LIVER^1310^1
;;BEEF, TOP RND, FRESH^2149^1
;;BISCUITS FRZN^803^1
;;BOLOGNA^627^1
;;BREAD, WHITE, SLICED^823^.055
;;BEANS, BUTTER, FZN^2277^1
;;BUTTERMILK, IND^85^.529
;;CABBAGE, FRESH^845^1
;;CARAWAY SEEDS^263^1
;;CARROTS, FRESH, STIX^934^1
;;CARROTS, FRESH, SHREDDED^934^1
;;CAYENNE PEPPER^289^1
;;CELERY CRESCENTS, FRESH^951^1
;;CELERY STIX, FRESH^950^1
;;CHEESE, COTTAGE^12^1
;;CHEESE, AMER/SWISS, SLICED^44^1
;;CHICKEN, DRUMS, FZN^^1
;;CHICKEN THIGHS, FZN^444^1
;;ICE CREAM, CHOCOLATE, IND^60^.148
;;MILK, CHOCOLATE, LOWFAT^100^8.819
;;CELERY, CHOPPED FRESH^951^1
;;ONIONS, CHOPPED, FRESH^1378^1
;;COD RAW BREADED^1225^1
;;CREAMER, NONDAIRY LIQUID, BULK^66^8.466
;;TOPPING, NONDAIRY, FROZEN^71^1
;;CUCUMBERS, FRESH^1089^1
;;CURRY POWDER^273^1
;;DANISH, DEMI, FRESH^1569^.093
;;CAKE, DEVILSFOOD, FZN^858^.209
;;ROLLS, SOFT DINNER, FRESH^1567^.062
;;DONUTS, FRESH^1096^.093
;;EGGPLANT^1098^1
;;EGGS, SHELL, FRESH^6498^.097
;;ENDIVE^1100^1
;;ESCAROLE^1100^1
;;FRENCH TOAST, FZN^6427^1
;;FRANKFURTERS, FRESH^1610^1
;;FRENCH BREAD, FRESH^812^.033
;;OKRA, FRZ^1370^1
;;PANCAKE BATTER, FZN^^1
;;CAKE, GERMAN CHOC, FZN^859^.209
;;ONIONS, GREEN FRESH^1385^1
;;PEPPERS, GREEN, FRESH^1434^1
;;GRAPES, FRESH^1696^1
;;GRAPEFRUIT SECTIONS^2785^8.113
;;GREENS MUSTARD, FZN^1353^1
;;HAM SMKD, BONELESS^221^1
;;ROLLS, HAMBURGER, FRESH^1568^.088
;;ROLLS, FRANKFURTER, FRESH^1568^.088
;;SAUSAGE, ITALIAN^656^1
;;KNOCKWURST^642^1
;;LAMB LEG ROAST, BONELESS, FRESH^1281^1
;;LETTUCE, LEAF^1308^1
;;LEMON WEDGES, FRESH^2806^.128
;;LEMONS, FRESH^2806^.128
;;LETTUCE, ICEBERG^1307^1
;;SHERBET, LIME, IND^65^.214
;;BREAD, LO NA, SLICED^6502^.057
;;MARJORAM^281^1
;;MILK, LOWFAT, IND^76^.538
;;MILK, WHOLE, IND^74^.538
;;ORANGES, NAVAL^1728^.309
;;SHERBET, ORANGE, IND^65^.214
;;ORANGE SECTIONS^1726^6.349
;;PARSLEY, FRESH^2048^1
;;PIE, PEACH, FZN^1460^.207
;;PEARS, FRESH^1757^.366
;;PIE, PINAPPLE, FZN^1462^.26
;;PORK, BOSTON BUTT, BONELESS^195^1
;;POTATOES, DEHYD QUARTERED^^1
;;POULTRY SEASONING^292^1
;;CAKE, POUND, FZN^871^.141
;;ONIONS, DEHYD QUARTERED^1384^1
;;ROMAINE^1308^1
;;BREAD, RYE, SLICED^818^.055
;;SALAMI^653^1
;;SAUSAGE PATTIES, RAW FZN^650^1
;;CHICKEN, PULLED, UNSALTED^404^1
;;TURKEY BREAST, UNSALTED^487^1
;;SOUR CREAM^56^8.113
;;CAKE, SPONGE^872^.146
;;ICE CREAM, STRAWBERRY, IND^60^.148
;;COOKIES, SUGAR, ARCHWAY^1022^1
;;POTATOES, SWEET, FRESH^1909^1
;;TANGERINES, FRESH^1735^.185
;;TOMATOES, FRESH^1929^1
;;TRAUMA CAL^6001^.551
;;ICE CREAM, VANILLA, IND^60^.148
;;VINEGAR PKT, IND^1986^.033
;;ROLLS, WHITE HARD, FRESH^1567^.088
;;FOOD COLORING, YELLOW^^8
;;WATER, TAP^2021^8.36
;;LEMON JUICE^1708^8.607
;;CLOVE, GRD^269^1
;;BAY LEAVES, WHOLE^262^0
;;THYME, GROUND^300^1
;;BASIL, DRIED^261^1
;;PORK SLICES^199^.265
;;LO PRO PASTA^6494^1
;;POTATOES, PREPEELED, QUARTERED^1506^1
;;CHIVES, DEHYD^2751^1
;;JUICE, OR/GRAPEFRUIT, FRZ, IND^1734^.272
;;JUICE, PINE/GRPFT, FRZ, IND^1485^.276
;;MACE, GROUND^280^1
;;MILK, LOWFAT, FRESH^76^8.607
;;ONIONS, QUARTERED FRESH^1378^1
;;JUICE, ORANGE, FRESH^1730^8.748
;;CEREAL, CREAM OF WHEAT^1163^1
;;LIQUID SMOKE^^8
;;GINGER, GROUND^279^1
;;CARROTS, FRESH, DICED^935^1
;;BREADCRUMBS^827^1
;;CHEESE, LOW FAT^29^1
;;PASTA, LOW PROTEIN^6503^1
;;POTATOES, PREPEELED, SLICED^1506^1
;;POTATOES, PREPEELED, DICED^1506^1
;;BREAD, WHOLE WHEAT^825^.063
;;JUICE, PRUNE, FZN, IND^1790^.282
;;PIE, PUMPKIN^1465^.207
;;ALLSPICE^259^1
;;CELERY SEED^265^1
;;ONIONS, SLICED FRESH^1378^1
;;TABASCO SAUCE^1940^1
;;PORK, GROUND FROZEN^199^1
;;BRAN, UNPROCESSED^2006^1
;;LIVER, BEEF, FRESH FROZEN^1310^1
;;SAUSAGE, SMOKED^655^1
;;HAM, COOKED, FRZ^221^1
;;CHICKEN, FROZEN, BROILER OR FRYER, READY TO COOK^401^1
;;BEEF, PATTIES, FRZ^2173^.187
;;TUNA, CND, LIGHT, CHUNK STYLE^1955^1
;;CRANBERRY-ORANGE SAUCE, CND, JELLIED OR STRAINED^1662^1
;;GRAPES, CND, SEEDLESS, THOMPSON^1699^1
;;PRUNES, DRIED, WHOLE, PITTED^1787^1
;;PRUNES, DRIED, CND, WHOLE, STEWED^1786^1
;;FRUIT SALAD, CND, JUICE PAK, DIET^1679^1
FHIPST15 ; HISC/NCA - Ingredient Items 7 ;5/1/95 12:03
+1 ;;5.0;Dietetics;;Oct 11, 1995
+2 FOR I=1:1
SET A=$PIECE($TEXT(ITEMS+I),";",3,99)
IF A=""
QUIT
IF $PIECE(A,"^",2)
SET ^TMP($JOB,"FHING",CTR)=A
SET CTR=CTR+1
+3 QUIT
ITEMS ;;
+1 ;;BEANS, FRENCH CUT GREEN, CND^715^1
+2 ;;PINEAPPLE, CND, TIDBITS, DIET^1770^1
+3 ;;PRUNES, CND, DIET^^1
+4 ;;CHEESE, AMERICAN SLICED^42^1
+5 ;;CAKE, ANGELFOOD, FRESH^880^1.579
+6 ;;PIE, APPLE, FZN^1470^.203
+7 ;;APPLES, FRESH^1611^.304
+8 ;;BACON, PREFRIED^213^1
+9 ;;POTATOES, BAKING, FRESH^1503^.499
+10 ;;BANANAS, FRESH^1635^.251
+11 ;;BEEF LIVER^1310^1
+12 ;;BEEF, TOP RND, FRESH^2149^1
+13 ;;BISCUITS FRZN^803^1
+14 ;;BOLOGNA^627^1
+15 ;;BREAD, WHITE, SLICED^823^.055
+16 ;;BEANS, BUTTER, FZN^2277^1
+17 ;;BUTTERMILK, IND^85^.529
+18 ;;CABBAGE, FRESH^845^1
+19 ;;CARAWAY SEEDS^263^1
+20 ;;CARROTS, FRESH, STIX^934^1
+21 ;;CARROTS, FRESH, SHREDDED^934^1
+22 ;;CAYENNE PEPPER^289^1
+23 ;;CELERY CRESCENTS, FRESH^951^1
+24 ;;CELERY STIX, FRESH^950^1
+25 ;;CHEESE, COTTAGE^12^1
+26 ;;CHEESE, AMER/SWISS, SLICED^44^1
+27 ;;CHICKEN, DRUMS, FZN^^1
+28 ;;CHICKEN THIGHS, FZN^444^1
+29 ;;ICE CREAM, CHOCOLATE, IND^60^.148
+30 ;;MILK, CHOCOLATE, LOWFAT^100^8.819
+31 ;;CELERY, CHOPPED FRESH^951^1
+32 ;;ONIONS, CHOPPED, FRESH^1378^1
+33 ;;COD RAW BREADED^1225^1
+34 ;;CREAMER, NONDAIRY LIQUID, BULK^66^8.466
+35 ;;TOPPING, NONDAIRY, FROZEN^71^1
+36 ;;CUCUMBERS, FRESH^1089^1
+37 ;;CURRY POWDER^273^1
+38 ;;DANISH, DEMI, FRESH^1569^.093
+39 ;;CAKE, DEVILSFOOD, FZN^858^.209
+40 ;;ROLLS, SOFT DINNER, FRESH^1567^.062
+41 ;;DONUTS, FRESH^1096^.093
+42 ;;EGGPLANT^1098^1
+43 ;;EGGS, SHELL, FRESH^6498^.097
+44 ;;ENDIVE^1100^1
+45 ;;ESCAROLE^1100^1
+46 ;;FRENCH TOAST, FZN^6427^1
+47 ;;FRANKFURTERS, FRESH^1610^1
+48 ;;FRENCH BREAD, FRESH^812^.033
+49 ;;OKRA, FRZ^1370^1
+50 ;;PANCAKE BATTER, FZN^^1
+51 ;;CAKE, GERMAN CHOC, FZN^859^.209
+52 ;;ONIONS, GREEN FRESH^1385^1
+53 ;;PEPPERS, GREEN, FRESH^1434^1
+54 ;;GRAPES, FRESH^1696^1
+55 ;;GRAPEFRUIT SECTIONS^2785^8.113
+56 ;;GREENS MUSTARD, FZN^1353^1
+57 ;;HAM SMKD, BONELESS^221^1
+58 ;;ROLLS, HAMBURGER, FRESH^1568^.088
+59 ;;ROLLS, FRANKFURTER, FRESH^1568^.088
+60 ;;SAUSAGE, ITALIAN^656^1
+61 ;;KNOCKWURST^642^1
+62 ;;LAMB LEG ROAST, BONELESS, FRESH^1281^1
+63 ;;LETTUCE, LEAF^1308^1
+64 ;;LEMON WEDGES, FRESH^2806^.128
+65 ;;LEMONS, FRESH^2806^.128
+66 ;;LETTUCE, ICEBERG^1307^1
+67 ;;SHERBET, LIME, IND^65^.214
+68 ;;BREAD, LO NA, SLICED^6502^.057
+69 ;;MARJORAM^281^1
+70 ;;MILK, LOWFAT, IND^76^.538
+71 ;;MILK, WHOLE, IND^74^.538
+72 ;;ORANGES, NAVAL^1728^.309
+73 ;;SHERBET, ORANGE, IND^65^.214
+74 ;;ORANGE SECTIONS^1726^6.349
+75 ;;PARSLEY, FRESH^2048^1
+76 ;;PIE, PEACH, FZN^1460^.207
+77 ;;PEARS, FRESH^1757^.366
+78 ;;PIE, PINAPPLE, FZN^1462^.26
+79 ;;PORK, BOSTON BUTT, BONELESS^195^1
+80 ;;POTATOES, DEHYD QUARTERED^^1
+81 ;;POULTRY SEASONING^292^1
+82 ;;CAKE, POUND, FZN^871^.141
+83 ;;ONIONS, DEHYD QUARTERED^1384^1
+84 ;;ROMAINE^1308^1
+85 ;;BREAD, RYE, SLICED^818^.055
+86 ;;SALAMI^653^1
+87 ;;SAUSAGE PATTIES, RAW FZN^650^1
+88 ;;CHICKEN, PULLED, UNSALTED^404^1
+89 ;;TURKEY BREAST, UNSALTED^487^1
+90 ;;SOUR CREAM^56^8.113
+91 ;;CAKE, SPONGE^872^.146
+92 ;;ICE CREAM, STRAWBERRY, IND^60^.148
+93 ;;COOKIES, SUGAR, ARCHWAY^1022^1
+94 ;;POTATOES, SWEET, FRESH^1909^1
+95 ;;TANGERINES, FRESH^1735^.185
+96 ;;TOMATOES, FRESH^1929^1
+97 ;;TRAUMA CAL^6001^.551
+98 ;;ICE CREAM, VANILLA, IND^60^.148
+99 ;;VINEGAR PKT, IND^1986^.033
+100 ;;ROLLS, WHITE HARD, FRESH^1567^.088
+101 ;;FOOD COLORING, YELLOW^^8
+102 ;;WATER, TAP^2021^8.36
+103 ;;LEMON JUICE^1708^8.607
+104 ;;CLOVE, GRD^269^1
+105 ;;BAY LEAVES, WHOLE^262^0
+106 ;;THYME, GROUND^300^1
+107 ;;BASIL, DRIED^261^1
+108 ;;PORK SLICES^199^.265
+109 ;;LO PRO PASTA^6494^1
+110 ;;POTATOES, PREPEELED, QUARTERED^1506^1
+111 ;;CHIVES, DEHYD^2751^1
+112 ;;JUICE, OR/GRAPEFRUIT, FRZ, IND^1734^.272
+113 ;;JUICE, PINE/GRPFT, FRZ, IND^1485^.276
+114 ;;MACE, GROUND^280^1
+115 ;;MILK, LOWFAT, FRESH^76^8.607
+116 ;;ONIONS, QUARTERED FRESH^1378^1
+117 ;;JUICE, ORANGE, FRESH^1730^8.748
+118 ;;CEREAL, CREAM OF WHEAT^1163^1
+119 ;;LIQUID SMOKE^^8
+120 ;;GINGER, GROUND^279^1
+121 ;;CARROTS, FRESH, DICED^935^1
+122 ;;BREADCRUMBS^827^1
+123 ;;CHEESE, LOW FAT^29^1
+124 ;;PASTA, LOW PROTEIN^6503^1
+125 ;;POTATOES, PREPEELED, SLICED^1506^1
+126 ;;POTATOES, PREPEELED, DICED^1506^1
+127 ;;BREAD, WHOLE WHEAT^825^.063
+128 ;;JUICE, PRUNE, FZN, IND^1790^.282
+129 ;;PIE, PUMPKIN^1465^.207
+130 ;;ALLSPICE^259^1
+131 ;;CELERY SEED^265^1
+132 ;;ONIONS, SLICED FRESH^1378^1
+133 ;;TABASCO SAUCE^1940^1
+134 ;;PORK, GROUND FROZEN^199^1
+135 ;;BRAN, UNPROCESSED^2006^1
+136 ;;LIVER, BEEF, FRESH FROZEN^1310^1
+137 ;;SAUSAGE, SMOKED^655^1
+138 ;;HAM, COOKED, FRZ^221^1
+139 ;;CHICKEN, FROZEN, BROILER OR FRYER, READY TO COOK^401^1
+140 ;;BEEF, PATTIES, FRZ^2173^.187
+141 ;;TUNA, CND, LIGHT, CHUNK STYLE^1955^1
+142 ;;CRANBERRY-ORANGE SAUCE, CND, JELLIED OR STRAINED^1662^1
+143 ;;GRAPES, CND, SEEDLESS, THOMPSON^1699^1
+144 ;;PRUNES, DRIED, WHOLE, PITTED^1787^1
+145 ;;PRUNES, DRIED, CND, WHOLE, STEWED^1786^1
+146 ;;FRUIT SALAD, CND, JUICE PAK, DIET^1679^1