FHIPST10 ; HISC/NCA - Ingredient Items 2 ;5/1/95 12:29
;;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 ;;
;;GRAPEFRUIT, CND, SECTIONS, DIET JUICE PAK^1690^1
;;GRAVY MIX, BEEF, DIET LO NA^^1
;;GRAVY MIX, CHICKEN^2789^1
;;GRAVY MIX, BEEF^2788^1
;;GARLIC POWDER^278^1
;;GARLIC SALT^^1
;;GELATIN, PLAIN, UNFLAVORED^1229^1
;;GRAPES, CND, SEEDLESS, THOMPSON^1699^1
;;HONEY^1258^1
;;HORSERADISH, PREPARED, CREAM STYLE^1259^8.466
;;HOT SAUCE^^8.2
;;ITALIAN DRESSING^381^8.289
;;ITALIAN DRESSING, CREAM TYPE, IND^^.055
;;ITALIAN DRESSING, DIET, LO NA IND^388^.055
;;JELLY, GRAPE, DIET, IND^6419^.031
;;JELLY, ASSORTED REGULAR, IND^1264^.031
;;JUICE, APPLE, CND, UNSW, IND^1809^.41
;;JUICE, GRAPEFRUIT AND ORANGE, CND^1734^8.72
;;JUICE, GRAPEFRUIT, CND, UNSW, IND^1692^.409
;;JUICE, GRAPEFRUIT, CND, UNSW^1692^8.72
;;JUICE, LEMON^1708^8.607
;;JUICE, LEMON, IND^1708^.009
;;JUICE, PRUNE, CND, UNSW, IND^1790^.423
;;JUICE, TOMATO, CND, DIET, LOW NA^1943^8.607
;;MALTED MILK, POWDER, UNFLAV^95^1
;;MARGARINE, SALTED, PATS^372^.011
;;MARMALADE, ORANGE, IND^1331^.031
;;MARSHMALLOWS, MINIATURE^927^1
;;MAYONNAISE, BULK^360^7.76
;;MAYONNAISE, DIET, IND^1588^.055
;;MAYONNAISE, DIET, BULK^1588^8.819
;;MILK SHAKE MIX, VANILLA^^1
;;MILK, DRY, NONFAT^138^1
;;MILK, EVAPORATED, UNSW^137^1
;;MINCEMEAT, CND^^1
;;MOLASSES^1334^11.57
;;MONOSODIUM GLUTAMATE^^1
;;MUSTARD, DIET, LO NA, IND^^.033
;;MUSTARD, BULK^1359^8
;;MUSTARD, IND^1359^.022
;;NOODLES, CHOW MEIN^1365^1
;;NOODLES, EGG TYPE^1363^1
;;NOODLES, EGG TYPE, LASAGNA^1363^1
;;OLIVES, GREEN, STUFFED W/PIMENTO^1372^8.2
;;OLIVES, GREEN, W/PITS^1372^8.2
;;OLIVES, RIPE, W/PITS^1374^1
;;ONIONS, CND, TINY^2046^1
;;ORANGES, CND, MANDARIN, WP DIET^^1
;;OREGANO, GROUND^285^1
;;PANCAKE MIX, BUTTERMILK^^1
;;PANCAKE MIX, PLAIN^^1
;;PARSLEY, FLAKES^287^1
;;PEACH PUREE^6453^1
;;PEACHES, CND, HALVES, SYRUP-PAK^1750^1
;;PEACHES, CND, HALVES, DIET^1747^1
;;PEACHES, CND, SLICED CLINGSTONE, SYRUP-PAK^1750^1
;;PEACHES, CND, SLICED, DIET^1747^1
;;PEANUT BUTTER, DIET, LOW SODIUM^2023^1
;;PEANUT BUTTER^1409^1
;;PEANUTS, SPANISH, SALTED^2285^1
;;PEARS, CND, HALVES, SYRUP-PAK^1761^1
;;PEARS, CND, HALVES, DIET^1758^1
;;PEAS, BLACK-EYE, CND^1064^1
;;PEAS, CND^1416^1
;;PEAS, CHICK, CND, GARBANZO^2276^1
;;PECANS, UNSALTED, PIECES^2864^1
;;PEPPER SAUCE, TABASCO^1940^8.2
;;PEPPER, BLACK, GROUND^288^1
;;PEPPERS, SWEET, CND, DICED, RED BELL^2053^1
;;PICKLES, CUCUMBER, SWEET, WHOLE^1441^1
;;PICKLES, CUCUMBER, DILL, SLICES^1438^7.47
;;PIMIENTOS, CND, DICED^1484^1
;;PIMIENTOS, CND, SLICED^1484^1
;;PIMIENTOS, CND, WHOLE^1484^1
;;PINEAPPLE, CND, CHUNKS, DIET^1770^1
;;PINEAPPLE, CND, CRUSHED, SYRUP-PAK^1773^1
;;PINEAPPLE, CND, CRUSHED, DIET^1770^1
;;PINEAPPLE, CND, SLICED, DIET^1770^1
;;PINEAPPLE, CND, TIDBITS, SYRUP-PAK^1773^1
;;PLUMS, CND, PURPLE, SYRUP-PAK^1783^1
;;PLUMS, CND, PURPLE, DIET^1780^1
;;POTATO SALAD, CND, GERMAN STYLE^1531^1
;;POTATO SALAD, CND, MAYONNAISE STYLE^1531^1
;;POTATOES, AU GRATIN, DEHYD^2908^1
;;POTATOES, SWEET, CND^1914^1
;;POTATOES, WHITE, CND, WHOLE^1516^1
;;POTATOES, WHITE, DEHYD, DICED^^1
;;POTATOES, WHITE, INSTANT, MASHED^2913^1
;;POTATOES, WHITE, FROZEN, HASH BROWN^1524^1
;;POTATOES, WHITE, FROZEN, FRENCH STYLE^1525^1
;;PRUNES, DRIED, WHOLE, W/PITS^1787^1
;;PUDDING, CND, BUTTERSCOTCH^6616^1
;;PUDDING, CND, CHOCOLATE^6617^1
;;PUDDING, CND, VANILLA^6620^1
;;RAVIOLI WITH MEAT SAUCE, CND^^1
;;RELISH, PICKLE, SWEET, IND^1445^.02
;;RICE^2932^1
;;RUSSIAN DRESSING, DIET, IND^357^.055
;;SAGE, GROUND^296^1
;;SALAD DRESSING, MAYO-TYPE, BULK^354^8.289
;;SALAD DRESSING, DIET, (ZERO), IND^^.055
;;SALMON, CANNED^1591^1
;;SALMON, CND, DIET, WATER-PAK LO SODIUM^1592^1
;;SALT SUBSTITUTE, SEASONED^^1
;;SALT SUBSTITUTE, IND^6417^.002
;;SALT^1598^1
;;SARDINES, CND^1603^1
;;SOUP AND GRAVY BASE, CHICKEN^2789^1
;;SOUP AND GRAVY BASE, BEEF, DIET^^1
;;SOUP AND GRAVY BASE, CHICKEN, DIET^6637^1
;;SOUP AND GRAVY BASE, BEEF^^1
;;SOUP AND GRAVY BASE, VEGETABLE^^8.6
;;SOUP, COND, BEEF CONSOMME^2980^8.677
;;SOUP, COND, BEEF NOODLE^546^8.607
;;SOUP, COND, CHICKEN GUMBO^552^8.607
;;SOUP, COND, CHICKEN NOODLE^553^8.501
;;SOUP, COND, CHICKEN WITH RICE^2991^8.677
;;SOUP, COND, CREAM OF ASPARAGUS^542^8.607
;;SOUP, COND, CREAM OF CHICKEN^551^8.607
;;SOUP, COND, GREEN PEA^567^8.819
;;SOUP, COND, CREAM OF MUSHROOM^562^8.607
;;SOUP, COND, CREAM OF POTATO^570^8.607
;;SOUP, COND, TOMATO, DIET^^1
;;SOUP, COND, VEGETABLE WITH BEEF^579^8.607
;;SOUP, COND, VEGETABLE^3022^8.501
;;SPINACH PUREE, DIET, LO NA^6455^1
;;SPINACH, CND, DIET^1868^1
FHIPST10 ; HISC/NCA - Ingredient Items 2 ;5/1/95 12:29
+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 ;;GRAPEFRUIT, CND, SECTIONS, DIET JUICE PAK^1690^1
+2 ;;GRAVY MIX, BEEF, DIET LO NA^^1
+3 ;;GRAVY MIX, CHICKEN^2789^1
+4 ;;GRAVY MIX, BEEF^2788^1
+5 ;;GARLIC POWDER^278^1
+6 ;;GARLIC SALT^^1
+7 ;;GELATIN, PLAIN, UNFLAVORED^1229^1
+8 ;;GRAPES, CND, SEEDLESS, THOMPSON^1699^1
+9 ;;HONEY^1258^1
+10 ;;HORSERADISH, PREPARED, CREAM STYLE^1259^8.466
+11 ;;HOT SAUCE^^8.2
+12 ;;ITALIAN DRESSING^381^8.289
+13 ;;ITALIAN DRESSING, CREAM TYPE, IND^^.055
+14 ;;ITALIAN DRESSING, DIET, LO NA IND^388^.055
+15 ;;JELLY, GRAPE, DIET, IND^6419^.031
+16 ;;JELLY, ASSORTED REGULAR, IND^1264^.031
+17 ;;JUICE, APPLE, CND, UNSW, IND^1809^.41
+18 ;;JUICE, GRAPEFRUIT AND ORANGE, CND^1734^8.72
+19 ;;JUICE, GRAPEFRUIT, CND, UNSW, IND^1692^.409
+20 ;;JUICE, GRAPEFRUIT, CND, UNSW^1692^8.72
+21 ;;JUICE, LEMON^1708^8.607
+22 ;;JUICE, LEMON, IND^1708^.009
+23 ;;JUICE, PRUNE, CND, UNSW, IND^1790^.423
+24 ;;JUICE, TOMATO, CND, DIET, LOW NA^1943^8.607
+25 ;;MALTED MILK, POWDER, UNFLAV^95^1
+26 ;;MARGARINE, SALTED, PATS^372^.011
+27 ;;MARMALADE, ORANGE, IND^1331^.031
+28 ;;MARSHMALLOWS, MINIATURE^927^1
+29 ;;MAYONNAISE, BULK^360^7.76
+30 ;;MAYONNAISE, DIET, IND^1588^.055
+31 ;;MAYONNAISE, DIET, BULK^1588^8.819
+32 ;;MILK SHAKE MIX, VANILLA^^1
+33 ;;MILK, DRY, NONFAT^138^1
+34 ;;MILK, EVAPORATED, UNSW^137^1
+35 ;;MINCEMEAT, CND^^1
+36 ;;MOLASSES^1334^11.57
+37 ;;MONOSODIUM GLUTAMATE^^1
+38 ;;MUSTARD, DIET, LO NA, IND^^.033
+39 ;;MUSTARD, BULK^1359^8
+40 ;;MUSTARD, IND^1359^.022
+41 ;;NOODLES, CHOW MEIN^1365^1
+42 ;;NOODLES, EGG TYPE^1363^1
+43 ;;NOODLES, EGG TYPE, LASAGNA^1363^1
+44 ;;OLIVES, GREEN, STUFFED W/PIMENTO^1372^8.2
+45 ;;OLIVES, GREEN, W/PITS^1372^8.2
+46 ;;OLIVES, RIPE, W/PITS^1374^1
+47 ;;ONIONS, CND, TINY^2046^1
+48 ;;ORANGES, CND, MANDARIN, WP DIET^^1
+49 ;;OREGANO, GROUND^285^1
+50 ;;PANCAKE MIX, BUTTERMILK^^1
+51 ;;PANCAKE MIX, PLAIN^^1
+52 ;;PARSLEY, FLAKES^287^1
+53 ;;PEACH PUREE^6453^1
+54 ;;PEACHES, CND, HALVES, SYRUP-PAK^1750^1
+55 ;;PEACHES, CND, HALVES, DIET^1747^1
+56 ;;PEACHES, CND, SLICED CLINGSTONE, SYRUP-PAK^1750^1
+57 ;;PEACHES, CND, SLICED, DIET^1747^1
+58 ;;PEANUT BUTTER, DIET, LOW SODIUM^2023^1
+59 ;;PEANUT BUTTER^1409^1
+60 ;;PEANUTS, SPANISH, SALTED^2285^1
+61 ;;PEARS, CND, HALVES, SYRUP-PAK^1761^1
+62 ;;PEARS, CND, HALVES, DIET^1758^1
+63 ;;PEAS, BLACK-EYE, CND^1064^1
+64 ;;PEAS, CND^1416^1
+65 ;;PEAS, CHICK, CND, GARBANZO^2276^1
+66 ;;PECANS, UNSALTED, PIECES^2864^1
+67 ;;PEPPER SAUCE, TABASCO^1940^8.2
+68 ;;PEPPER, BLACK, GROUND^288^1
+69 ;;PEPPERS, SWEET, CND, DICED, RED BELL^2053^1
+70 ;;PICKLES, CUCUMBER, SWEET, WHOLE^1441^1
+71 ;;PICKLES, CUCUMBER, DILL, SLICES^1438^7.47
+72 ;;PIMIENTOS, CND, DICED^1484^1
+73 ;;PIMIENTOS, CND, SLICED^1484^1
+74 ;;PIMIENTOS, CND, WHOLE^1484^1
+75 ;;PINEAPPLE, CND, CHUNKS, DIET^1770^1
+76 ;;PINEAPPLE, CND, CRUSHED, SYRUP-PAK^1773^1
+77 ;;PINEAPPLE, CND, CRUSHED, DIET^1770^1
+78 ;;PINEAPPLE, CND, SLICED, DIET^1770^1
+79 ;;PINEAPPLE, CND, TIDBITS, SYRUP-PAK^1773^1
+80 ;;PLUMS, CND, PURPLE, SYRUP-PAK^1783^1
+81 ;;PLUMS, CND, PURPLE, DIET^1780^1
+82 ;;POTATO SALAD, CND, GERMAN STYLE^1531^1
+83 ;;POTATO SALAD, CND, MAYONNAISE STYLE^1531^1
+84 ;;POTATOES, AU GRATIN, DEHYD^2908^1
+85 ;;POTATOES, SWEET, CND^1914^1
+86 ;;POTATOES, WHITE, CND, WHOLE^1516^1
+87 ;;POTATOES, WHITE, DEHYD, DICED^^1
+88 ;;POTATOES, WHITE, INSTANT, MASHED^2913^1
+89 ;;POTATOES, WHITE, FROZEN, HASH BROWN^1524^1
+90 ;;POTATOES, WHITE, FROZEN, FRENCH STYLE^1525^1
+91 ;;PRUNES, DRIED, WHOLE, W/PITS^1787^1
+92 ;;PUDDING, CND, BUTTERSCOTCH^6616^1
+93 ;;PUDDING, CND, CHOCOLATE^6617^1
+94 ;;PUDDING, CND, VANILLA^6620^1
+95 ;;RAVIOLI WITH MEAT SAUCE, CND^^1
+96 ;;RELISH, PICKLE, SWEET, IND^1445^.02
+97 ;;RICE^2932^1
+98 ;;RUSSIAN DRESSING, DIET, IND^357^.055
+99 ;;SAGE, GROUND^296^1
+100 ;;SALAD DRESSING, MAYO-TYPE, BULK^354^8.289
+101 ;;SALAD DRESSING, DIET, (ZERO), IND^^.055
+102 ;;SALMON, CANNED^1591^1
+103 ;;SALMON, CND, DIET, WATER-PAK LO SODIUM^1592^1
+104 ;;SALT SUBSTITUTE, SEASONED^^1
+105 ;;SALT SUBSTITUTE, IND^6417^.002
+106 ;;SALT^1598^1
+107 ;;SARDINES, CND^1603^1
+108 ;;SOUP AND GRAVY BASE, CHICKEN^2789^1
+109 ;;SOUP AND GRAVY BASE, BEEF, DIET^^1
+110 ;;SOUP AND GRAVY BASE, CHICKEN, DIET^6637^1
+111 ;;SOUP AND GRAVY BASE, BEEF^^1
+112 ;;SOUP AND GRAVY BASE, VEGETABLE^^8.6
+113 ;;SOUP, COND, BEEF CONSOMME^2980^8.677
+114 ;;SOUP, COND, BEEF NOODLE^546^8.607
+115 ;;SOUP, COND, CHICKEN GUMBO^552^8.607
+116 ;;SOUP, COND, CHICKEN NOODLE^553^8.501
+117 ;;SOUP, COND, CHICKEN WITH RICE^2991^8.677
+118 ;;SOUP, COND, CREAM OF ASPARAGUS^542^8.607
+119 ;;SOUP, COND, CREAM OF CHICKEN^551^8.607
+120 ;;SOUP, COND, GREEN PEA^567^8.819
+121 ;;SOUP, COND, CREAM OF MUSHROOM^562^8.607
+122 ;;SOUP, COND, CREAM OF POTATO^570^8.607
+123 ;;SOUP, COND, TOMATO, DIET^^1
+124 ;;SOUP, COND, VEGETABLE WITH BEEF^579^8.607
+125 ;;SOUP, COND, VEGETABLE^3022^8.501
+126 ;;SPINACH PUREE, DIET, LO NA^6455^1
+127 ;;SPINACH, CND, DIET^1868^1
