- FHSELA2 ;Hines OIFO/RTK - Map GMR Allergy file to Food Prefs ; 9/12/19 11:38am
- ;;5.5;DIETETICS;**8,13,23,25,28,35,37,39,40,41,42,44,45,46,48,51,52**;Jan 28, 2005;Build 4
- ;
- ;10/9/2009 SLC/GDU FH*5.5*23
- ; Remedy 317642 FGH - patient food allergy not mapping to N&FS food preferences
- ; Adding the following food allergies:
- ; Arugula, Capers, Curry, Gooseberries, Meat Tenderizer, Olestra, Orange Dye
- ; Pomegranates, Pudding, Saffron, Stevia, Water Chestnuts
- ;6/22/2011 SLC/GDU FH*5.5*28
- ; Remedy 490577 - Need N&FS patch to add OCTOPUS, KIDNEY BEANS as food allergies
- ; Adding the following food allergies: Kidney Beans, Octopus
- ;3/5/2013 SLC/GDU FH*5.5*35
- ; Remedy 742739 - FGH - SAGE FOOD ALLERGY
- ; Adding the following food allergy: Sage
- ;9/13/2013 SLC/GDU FH*5.5*37
- ; Remedy 905481 - PSPO 1380 changes needed due to NTRT
- ; Adding the following food allergies:
- ; Margarine, Raw Onions, Raw Vegetables, Turmeric, Canola Oil, Erythritol,
- ; Kale, Agave, Hemp Milk, Taro Root
- ;6/2/2015 SLC/GDU FH*5.5*39
- ; Remedy 1260817 - PSPO 1380 changes needed due to NTRT
- ; Adding the following food allergies:
- ; PAWPAW, MULBERRY, MOLASSES
- ;10/26/2015 SLC/GDU FH*5.5*40 Adding/Updating the following food allergies:
- ; SORBITOL,IODINE
- ;3/10/2016 SLC/GDU FH*5.5*41 Adding the following food allergies:
- ; MALTITOL, MANNITOL, XYLITOL, SASSAFRAS
- ;7/5/2016 SLC/GDU FH*5.5*42 Adding the following food allergies:
- ; BAY LEAVES, CARAWAY SEEDS, FRUTOSE
- ;5/1/2017 SLC/GDU FH*5.*44 Adding the following food allergy: BEAN SPROUTS
- ;1/4/2018 DAL/JLC FH*5.5*45 Adding the following food allergy: ARROWROOT
- ;10/3/2018 ALB/JLG FH*5.5*46 Adding the following food allergies:
- ; DAIRY FOODS,FRESH FRUITS,FRUITS,MINT HERB,PEPPERMINT HERB,PEPPERMINT OIL,RABBIT MEAT
- ;12/20/2018 SLC/GDU FH*5.5*48 Adding the following food allergies:
- ;MEAT, MAMMALIAN HOOVED, STARFRUIT, CANNABIS
- ;6/4/2019 SLC/GDU FH*5.5*51 Adding the following drug,food allergy: CHRYSANTHEMUM
- ;7/26/2019 SLC/GDU FH*5.5*52 Adding the following food allergies: RAW APPLES, RAW CHERRIES
- TMPGL ; Create ^TMP Global
- K ^TMP($J,"FHALG") S FHK=0
- F S FHK=FHK+1,FHFPS=$T(FPS+FHK),FHZ1=$P(FHFPS,";",3) Q:FHZ1="" D
- .S ^TMP($J,"FHALG",FHZ1)=$P(FHFPS,";",3,99)
- EXIT K FHK,FHFPS,FHZ1
- Q
- FPS ;;
- ;;ALCOHOL;ALCOHOL
- ;;ALCOHOL, BEER;HOPS
- ;;ALCOHOL, GIN;GIN
- ;;ALCOHOL, RUM;RUM
- ;;ALCOHOL, SCOTCH;SCOTCH
- ;;ALCOHOL, TEQUILA;TEQUILA
- ;;ALCOHOL, VODKA;VODKA
- ;;ALCOHOL, WINE;WINE
- ;;ALCOHOL, WINE, WHITE;WHITE WINE
- ;;ALFALFA SPROUTS;ALFALFA SPROUTS
- ;;ALMONDS;ALMONDS
- ;;ANISE OIL;ANISE OIL
- ;;APPLES;APPLE JUICE;APPLES
- ;;APRICOTS;APRICOTS
- ;;ARTICHOKES;ARTICHOKES
- ;;ARTIFICIAL COLORS;ARTIFICIAL COLORS;BLACK DYES;BLUE DYES;FD&C BLUE DYE #2;FD&C GREEN DYE #6;GREEN DYES;PINK DYES;PURPLE DYES
- ;;ASPARAGUS;ASPARAGUS
- ;;AVOCADOS;AVOCADOS
- ;;BACON;BACON
- ;;BANANAS;BANANAS
- ;;BARBEQUE SAUCE;BARBEQUE SAUCE;BARBECUE SAUCE
- ;;BARLEY;BARLEY;MALT BARLEY
- ;;BASIL;BASIL
- ;;BEANS;BEANS;LEGUMES
- ;;BEANS, BAKED;BAKED BEANS
- ;;BEANS, FAVA;FAVA BEANS (BROAD BEANS)
- ;;BEANS, GREEN;GREEN BEANS
- ;;BEANS, LENTILS;LENTILS
- ;;BEANS, LIMA;LIMA BEANS
- ;;BEANS, PINTO;PINTO BEANS
- ;;BEANS, SOY;SOYBEANS
- ;;BEANS, STRING;STRING BEANS
- ;;BEANS, WHITE;WHITE BEANS
- ;;BEEF;BEEF;BEEF PRODUCTS
- ;;BEEF, CORNED;CORNED BEEF
- ;;BEETS;BEETS
- ;;BEETS, PICKLES;PICKLED BEETS
- ;;BERRIES;BERRIES
- ;;BLACKBERRIES;BLACKBERRIES
- ;;BLUEBERRIES;BLUEBERRIES
- ;;BROCCOLI;BROCCOLI
- ;;BRUSSELS SPROUTS;BRUSSELS SPROUTS
- ;;BUCKWHEAT;BUCKWHEAT
- ;;BUTTER;BUTTER
- ;;CABBAGE;CABBAGE
- ;;CAFFEINE;CAFFEINE;COFFEE;COFFEE BEANS
- ;;CAFFEINE, COLAS;COLA DRINKS
- ;;CANTALOUPE;CANTALOUPE
- ;;CARBONATED BEVERAGES;CARBONATED BEVERAGES;SOFT DRINKS
- ;;CARROTS;CARROTS
- ;;CATSUP;CATSUP
- ;;CAULIFLOWER;CAULIFLOWER
- ;;CAVIAR;CAVIAR
- ;;CELERY;CELERY
- ;;CEREAL;CEREALS
- ;;CEREAL, CORNFLAKES;CORNFLAKES
- ;;CEREAL, CRM OF WHEAT;CREAM OF WHEAT
- ;;CEREAL, GRITS;GRITS
- ;;CEREAL, OATMEAL;OATMEAL
- ;;CHEESE;CHEESE
- ;;CHEESE, BLUE;BLUE CHEESE
- ;;CHEESE, CHEDDAR;CHEDDAR CHEESE
- ;;CHEESE, COTTAGE;COTTAGE CHEESE
- ;;CHEESE, FETA;FETA CHEESE
- ;;CHEESE, GOAT;GOAT CHEESE
- ;;CHEESE, PARMESAN;PARMESAN CHEESE
- ;;CHEESE, RICOTTA;RICOTTA CHEESE
- ;;CHEESE, SWISS;SWISS CHEESE
- ;;CHERRIES;CHERRIES;CHERRY JUICE
- ;;CHICKEN;CHICKEN
- ;;CHICKPEAS;CHICKPEAS
- ;;CHICORY;CHICORY
- ;;CHILI;CHILI
- ;;CHIVES;CHIVES
- ;;CHOCOLATE;CHOCOLATE;COCOA
- ;;CILANTRO;CILANTRO;CUMIN
- ;;CINNAMON;CINNAMON;CINNAMON OIL
- ;;CITRUS;CITRUS;CITRUS FRUIT;CITRUS JUICE
- ;;CLOVES;CLOVES
- ;;COCONUT;COCONUTS
- ;;COLA;COLA DRINKS
- ;;CORN;CORN
- ;;CRACKERS;CRACKERS
- ;;CRACKERS, GRAHAM;GRAHAM CRACKERS
- ;;CRANBERRIES;CRANBERRIES
- ;;CREAM, SOUR;SOUR CREAM
- ;;CREAMER, NON-DAIRY;NON-DAIRY CREAMER
- ;;CREAMER, POWDER;POWDERED CREAMER
- ;;CUCUMBERS;CUCUMBERS
- ;;DAIRY PRODUCTS;DAIRY PRODUCTS
- ;;DATES;DATES
- ;;DILL;DILL
- ;;DUCK;DUCK;WATERFOWL
- ;;DYES, VEGETABLES;VEGETABLE DYES
- ;;EGGNOG;EGGNOG
- ;;EGGPLANT;EGGPLANT
- ;;EGGS;EGGS;EGG PRODUCTS;EGG WHITES;EGG YOLKS
- ;;EGGS, SUBSTITUTES;EGG, SUBSTITUTES;EGG SUBSTITUTES
- ;;FAT EMULSIONS;FAT EMULSIONS
- ;;FIGS;FIGS
- ;;FISH;FISH
- ;;FISH, ABALONE;ABALONE
- ;;FISH, ANCHOVIES;ANCHOVIES
- ;;FISH, CATFISH;CATFISH
- ;;FISH, COD;CODFISH
- ;;FISH, FLOUNDER;FLOUNDER
- ;;FISH, HERRING;HERRING
- ;;FISH, MACKEREL;MACKEREL
- ;;FISH, PERCH;PERCH
- ;;FISH, RED SNAPPER;RED SNAPPER
- ;;FISH, SALMON;SALMON
- ;;FISH, SARDINES;SARDINES
- ;;FISH, SHARK;SHARK
- ;;FISH, SWORDFISH;SWORDFISH
- ;;FISH, TROUT;TROUT
- ;;FISH, TUNA;TUNA
- ;;FISH, WHITE;WHITE FISH
- ;;FLAVORING, HICKORY;HICKORY
- ;;FLAVORING, LICORICE;LICORICE
- ;;FLAVORING, VANILLA;VANILLA
- ;;FOOD PRESERVATIVES;FOOD PRESERVATIVES
- ;;FRUIT, FRESH;FRESH FRUIT
- ;;FROG;FROG LEGS;FROGS
- ;;FRUIT;FRUIT
- ;;FRUIT JUICE;FRUIT JUICE
- ;;FRUITCAKES;FRUITCAKES
- ;;GARLIC;GARLIC
- ;;GELATIN;GELATIN
- ;;GINGER;GINGER
- ;;GLUTEN;GLUTENS
- ;;GRAINS;GRAINS
- ;;GRAPEFRUIT;GRAPEFRUIT
- ;;GRAPES;GRAPES
- ;;GRAVY;GRAVY
- ;;GREENS, COLLARD;COLLARD GREENS
- ;;GREENS, MUSTARD;MUSTARD GREENS
- ;;GREENS, TURNIP;TURNIP GREENS
- ;;GREEN LEAFY VEG;GREEN LEAFY VEGETABLES
- ;;GUAVA;GUAVA
- ;;HOMINY;HOMINY
- ;;HONEY;HONEY
- ;;HONEYDEW;HONEYDEW
- ;;HORSERADISH;HORSERADISH
- ;;IODINE;IODIZED SALT;IODINE
- ;;JUICE;JUICE
- ;;KIWI;KIWI FRUIT
- ;;LACTOSE;LACTOSE
- ;;LEEKS;LEEKS
- ;;LEMON;LEMON JUICE;LEMONS
- ;;LETTUCE;LETTUCE
- ;;LIMES;LIMES
- ;;LYCHEE NUTS;LYCHEES
- ;;MALTOSE;MALTOSE
- ;;MANGOS;MANGOS
- ;;MARSHMALLOWS;MARSHMALLOWS
- ;;MAYONNAISE;MAYONNAISE
- ;;MEAT;MEAT
- ;;MEAT, LAMB;LAMB
- ;;MEAT, LIVER;LIVER
- ;;MEAT, PROCESSED;PROCESSED MEATS
- ;;MEAT, RED;RED MEAT
- ;;MEAT, VENISON;VENISON
- ;;MELONS;MELONS
- ;;MELONS, MUSK;MUSK MELONS
- ;;MELONS, WATER;WATERMELONS
- ;;MILK;MILK;DAIRY PRODUCTS
- ;;MILK, BUTTER;BUTTERMILK
- ;;MILK, GOAT;GOAT MILK
- ;;MILK, YOGURT;YOGURT
- ;;MINT;MINT
- ;;MODIFIED FOOD STARCH;MODIFIED FOOD STARCH;FOOD STARCH, MODIFIED
- ;;MSG;MONOSODIUM GLUTAMATE
- ;;MUSHROOMS;MUSHROOMS
- ;;MUSTARD;MUSTARD
- ;;MUTTON/LAMB;MUTTON
- ;;NECTARINES;NECTARINES
- ;;NITRITES;NITRITES
- ;;NON-FOOD RELATED;EGGSHELLS
- ;;NUTMEG;NUTMEG
- ;;NUTS;BRAZIL NUTS;CASHEWS;CHESTNUTS;HAZELNUTS;MACADAMIA NUTS;NUTS;PECANS
- ;;NUTS, PEANUT;PEANUT BUTTER;PEANUT OIL;PEANUTS
- ;;NUTS, PINE;PINE NUTS
- ;;NUTS, PISTACHIOS;PISTACHIOS
- ;;NUTS, TREE;PECANS;TREE NUTS
- ;;NUTS, WALNUT;WALNUTS
- ;;OATS;OATS
- ;;OIL, COCONUT;COCONUT OIL
- ;;OIL, COTTONSEED;COTTONSEED OIL
- ;;OIL, PALM;PALM OIL
- ;;OIL, SAFFLOWER;SAFFLOWER OIL
- ;;OIL, SOY;SOYBEAN OIL
- ;;OIL, SUNFLOWER;SUNFLOWER OIL
- ;;OKRA;OKRA
- ;;OLIVES;BLACK OLIVES;OLIVES
- ;;ONIONS;ONIONS
- ;;ONIONS, RED;RED ONIONS
- ;;ORANGE;ORANGE;ORANGES;ORANGE JUICE;ORANGE OIL
- ;;OREGANO;OREGANO
- ;;OYSTERS;OYSTERS
- ;;PAPAYAS;PAPAYAS
- ;;PAPRIKA;PAPRIKA
- ;;PARSLEY;PARSLEY
- ;;PARSNIP;PARSNIP
- ;;PASSION FRUIT;PASSION FRUIT
- ;;PEACHES;PEACHES
- ;;PEARS;PEARS
- ;;PEAS;PEAS
- ;;PEAS, BLACK-EYED;BLACK-EYED PEAS
- ;;PEAS, ENGLISH;ENGLISH PEAS
- ;;PEAS, SNOW;SNOW PEAS
- ;;PEPPER;PEPPER;WHITE PEPPER
- ;;PEPPER, BLACK;BLACK PEPPER;PEPPER
- ;;PEPPERMINT;PEPPERMINT
- ;;PEPPERONI;PEPPERONI
- ;;PEPPERS;BELL PEPPERS;PEPPERS
- ;;PEPPERS, CHILI;CHILI PEPPER;CHILI PEPPERS
- ;;PEPPERS, GREEN;GREEN BELL PEPPERS;PEPPERS
- ;;PEPPERS, HOT;CAPSAICIN;CAYENNE PEPPER;HOT PEPPER;HOT PEPPERS;JALAPENO PEPPERS
- ;;PEPPERS, RED;RED BELL PEPPERS
- ;;PERSIMMONS;PERSIMMONS
- ;;PHEASANT;PHEASANT
- ;;PICKLES;PICKLES
- ;;PIMENTOS;PIMENTOS
- ;;PINEAPPLE;PINEAPPLES
- ;;PIZZA;PIZZA
- ;;PLUMS;PLUMS
- ;;POPCORN;POPCORN
- ;;POPPY SEEDS;POPPY SEEDS
- ;;PORK;PORK;PORK PRODUCTS;HAM
- ;;PORK, HAM;HAM
- ;;POTATOES;POTATOES
- ;;POTATOES, SALAD;POTATO SALAD
- ;;POTATOES, SWEET/YAMS;SWEET POTATOES;YAMS
- ;;POULTRY;FOWL;POULTRY
- ;;PRUNES;PRUNES
- ;;PUDDING, TAPIOCA;TAPIOCA PUDDING
- ;;PUMPKIN;PUMPKINS
- ;;RABBIT;RABBIT
- ;;RADISH;RADISHES
- ;;RAISINS;RAISINS
- ;;RASPBERRIES;RASPBERRIES
- ;;RED DYES;FD&C RED DYE #1;FD&C RED DYE #2;FD&C RED DYE #3;FD&C RED DYE #40;FD&C RED DYE #40 LAKE;FD&C RED DYE #5;RED DYES
- ;;RHUBARB;RHUBARB
- ;;RICE;RICE;WHITE RICE
- ;;ROSEMARY;ROSEMARY
- ;;RUTABAGAS;RUTABAGAS
- ;;RYE;RYE
- ;;SALAD DRESSING, ITAL;ITALIAN DRESSING
- ;;SALT;NON-IODIZED SALT;SALT
- ;;SALT, SUBSTITUTES;SALT SUBSTITUTES
- ;;SAUERKRAUT;SAUERKRAUT
- ;;SAUSAGES;SAUSAGES
- ;;SEAFOOD;SEAFOOD
- ;;SEEDS;SEEDS
- ;;SEEDS, SUNFLOWER;SUNFLOWER SEEDS
- ;;SESAME;SESAME;SESAME OIL;SESAME SEEDS
- ;;SHELLFISH;CLAMS;CRAB;CRAWFISH;CRUSTACEANS;LOBSTER;MUSSELS;SCALLOPS;SHELL FISH;SHELLFISH
- ;;SHERBET;SHERBET
- ;;SHRIMP;SHRIMP
- ;;SNAILS;SNAILS
- ;;SOUR CREAM;SOUR CREAM
- ;;SOY;SOY;SOY MILK;SOY PRODUCTS;SOY SAUCE;SOYBEANS;TOFU
- ;;SOY SAUCE;SOY SAUCE
- ;;SPAGHETTI;SPAGHETTI
- ;;SPAM;SPAM
- ;;SPICES;CONDIMENTS;SPICES
- ;;SPINACH;SPINACH
- ;;SQUASH;SQUASH
- ;;SQUID;SQUID
- ;;STARCHY FOODS;STARCHES
- ;;STRAWBERRIES;STRAWBERRIES;STRAWBERRIES PLUS
- ;;SUCRALOSE;SUCRALOSE
- ;;SUGAR;SUGAR;SUGAR BEETS;WHITE SUGAR
- ;;SUGAR SUB;ARTIFICIAL SWEETENERS
- ;;SUGAR SUB, ASPARTAME;ASPARTAME
- ;;SUGAR SUB, SACCHARIN;SACCHARIN;SWEET'N LOW
- ;;SUGAR, BROWN;BROWN SUGAR
- ;;SULFITES;SULFITES
- ;;SYRUP, MAPLE;MAPLE SYRUP
- ;;TANGERINES;TANGERINES
- ;;TARRAGON;TARRAGON
- ;;TEA;TEA
- ;;TOFFEE;TOFFEE
- ;;TOMATO;TOMATO;TOMATO JUICE;TOMATO PRODUCTS;TOMATO SAUCE;TOMATOES
- ;;TOMATOES, FRESH;FRESH TOMATOES
- ;;TUMERIC;TUMERIC
- ;;TURKEY;TURKEY
- ;;TURNIPS;TURNIPS
- ;;VEAL;VEAL
- ;;VEGETABLES;VEGETABLES
- ;;VEGETABLES, GREEN;GREEN VEGETABLES
- ;;VINEGAR;VINEGAR
- ;;WATERFOWL;WATERFOWL
- ;;WHEAT;FLOUR;WHEAT
- ;;WHEY;WHEY
- ;;WINE, RED;RED WINE
- ;;YEAST;YEAST
- ;;YELLOW DYES;FD&C YELLOW DYE #10;FD&C YELLOW DYE #2;FD&C YELLOW DYE #5;FD&C YELLOW DYE #6;FD&C YELLOW DYE #6 LAKE;TARTRAZINE;YELLOW DYES
- ;;ZUCCHINI;ZUCCHINI
- ;;ARUGULA;ARUGULA
- ;;CAPERS;CAPERS
- ;;CURRY;CURRY
- ;;GOOSEBERRIES;GOOSEBERRIES;GOOSE BERRIES;GOOSE BERRY;GOOSEBERRY
- ;;MEAT TENDERIZER;MEAT TENDERIZER
- ;;OLESTRA;OLESTRA;OLEAN
- ;;ORANGE DYE;ORANGE DYE
- ;;POMEGRANATES;POMEGRANATES
- ;;PUDDING;PUDDING
- ;;SAFFRON;SAFFRON
- ;;STEVIA;STEVIA
- ;;WATER CHESTNUTS;WATER CHESTNUTS
- ;;BEANS, KIDNEY;KIDNEY BEANS
- ;;OCTOPUS;OCTOPUS
- ;;SAGE;SAGE
- ;;MARGARINE;MARGARINE
- ;;ONIONS, RAW;RAW ONIONS
- ;;VEGETABLES, RAW;RAW VEGETABLES
- ;;TURMERIC;TURMERIC
- ;;OIL, CANOLA;CANOLA OIL
- ;;ERYTHRITOL;ERYTHRITOL
- ;;KALE;KALE
- ;;AGAVE;AGAVE
- ;;MILK, HEMP;HEMP MILK
- ;;ROOT, TARO;TARO ROOT
- ;;PAWPAW;PAWPAW
- ;;MULBERRY;MULBERRY
- ;;MOLASSES;MOLASSES
- ;;SORBITOL;SORBITOL
- ;;MALTITOL;MALTITOL
- ;;MANNITOL;MANNITOL
- ;;XYLITOL;XYLITOL
- ;;SASSAFRAS;SASSAFRAS
- ;;BAY LEAVES;BAY LEAVES
- ;;CARAWAY SEEDS;CARAWAY SEEDS
- ;;FRUCTOSE;FRUCTOSE
- ;;BEAN SPROUTS;BEAN SPROUTS
- ;;ARROWROOT;ARROWROOT
- ;;DAIRY FOODS;DAIRY FOODS
- ;;FRESH FRUITS;FRESH FRUITS
- ;;FRUITS;FRUITS
- ;;MINT HERB;MINT HERB
- ;;PEPPERMINT HERB;PEPPERMINT HERB
- ;;PEPPERMINT OIL;PEPPERMINT OIL
- ;;RABBIT MEAT;RABBITS
- ;;MEAT, MAMMAL HOOVED;MEAT, MAMMALIAN HOOVED
- ;;STARFRUIT;STARFRUIT
- ;;CANNABIS;CANNABIS
- ;;CHRYSANTHEMUM;CHRYSANTHEMUM
- ;;APPLES, RAW;RAW APPLES
- ;;CHERRIES, RAW;RAW CHERRIES
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HFHSELA2 12026 printed Dec 13, 2024@01:55:04 Page 2
- FHSELA2 ;Hines OIFO/RTK - Map GMR Allergy file to Food Prefs ; 9/12/19 11:38am
- +1 ;;5.5;DIETETICS;**8,13,23,25,28,35,37,39,40,41,42,44,45,46,48,51,52**;Jan 28, 2005;Build 4
- +2 ;
- +3 ;10/9/2009 SLC/GDU FH*5.5*23
- +4 ; Remedy 317642 FGH - patient food allergy not mapping to N&FS food preferences
- +5 ; Adding the following food allergies:
- +6 ; Arugula, Capers, Curry, Gooseberries, Meat Tenderizer, Olestra, Orange Dye
- +7 ; Pomegranates, Pudding, Saffron, Stevia, Water Chestnuts
- +8 ;6/22/2011 SLC/GDU FH*5.5*28
- +9 ; Remedy 490577 - Need N&FS patch to add OCTOPUS, KIDNEY BEANS as food allergies
- +10 ; Adding the following food allergies: Kidney Beans, Octopus
- +11 ;3/5/2013 SLC/GDU FH*5.5*35
- +12 ; Remedy 742739 - FGH - SAGE FOOD ALLERGY
- +13 ; Adding the following food allergy: Sage
- +14 ;9/13/2013 SLC/GDU FH*5.5*37
- +15 ; Remedy 905481 - PSPO 1380 changes needed due to NTRT
- +16 ; Adding the following food allergies:
- +17 ; Margarine, Raw Onions, Raw Vegetables, Turmeric, Canola Oil, Erythritol,
- +18 ; Kale, Agave, Hemp Milk, Taro Root
- +19 ;6/2/2015 SLC/GDU FH*5.5*39
- +20 ; Remedy 1260817 - PSPO 1380 changes needed due to NTRT
- +21 ; Adding the following food allergies:
- +22 ; PAWPAW, MULBERRY, MOLASSES
- +23 ;10/26/2015 SLC/GDU FH*5.5*40 Adding/Updating the following food allergies:
- +24 ; SORBITOL,IODINE
- +25 ;3/10/2016 SLC/GDU FH*5.5*41 Adding the following food allergies:
- +26 ; MALTITOL, MANNITOL, XYLITOL, SASSAFRAS
- +27 ;7/5/2016 SLC/GDU FH*5.5*42 Adding the following food allergies:
- +28 ; BAY LEAVES, CARAWAY SEEDS, FRUTOSE
- +29 ;5/1/2017 SLC/GDU FH*5.*44 Adding the following food allergy: BEAN SPROUTS
- +30 ;1/4/2018 DAL/JLC FH*5.5*45 Adding the following food allergy: ARROWROOT
- +31 ;10/3/2018 ALB/JLG FH*5.5*46 Adding the following food allergies:
- +32 ; DAIRY FOODS,FRESH FRUITS,FRUITS,MINT HERB,PEPPERMINT HERB,PEPPERMINT OIL,RABBIT MEAT
- +33 ;12/20/2018 SLC/GDU FH*5.5*48 Adding the following food allergies:
- +34 ;MEAT, MAMMALIAN HOOVED, STARFRUIT, CANNABIS
- +35 ;6/4/2019 SLC/GDU FH*5.5*51 Adding the following drug,food allergy: CHRYSANTHEMUM
- +36 ;7/26/2019 SLC/GDU FH*5.5*52 Adding the following food allergies: RAW APPLES, RAW CHERRIES
- TMPGL ; Create ^TMP Global
- +1 KILL ^TMP($JOB,"FHALG")
- SET FHK=0
- +2 FOR
- SET FHK=FHK+1
- SET FHFPS=$TEXT(FPS+FHK)
- SET FHZ1=$PIECE(FHFPS,";",3)
- if FHZ1=""
- QUIT
- Begin DoDot:1
- +3 SET ^TMP($JOB,"FHALG",FHZ1)=$PIECE(FHFPS,";",3,99)
- End DoDot:1
- EXIT KILL FHK,FHFPS,FHZ1
- +1 QUIT
- FPS ;;
- +1 ;;ALCOHOL;ALCOHOL
- +2 ;;ALCOHOL, BEER;HOPS
- +3 ;;ALCOHOL, GIN;GIN
- +4 ;;ALCOHOL, RUM;RUM
- +5 ;;ALCOHOL, SCOTCH;SCOTCH
- +6 ;;ALCOHOL, TEQUILA;TEQUILA
- +7 ;;ALCOHOL, VODKA;VODKA
- +8 ;;ALCOHOL, WINE;WINE
- +9 ;;ALCOHOL, WINE, WHITE;WHITE WINE
- +10 ;;ALFALFA SPROUTS;ALFALFA SPROUTS
- +11 ;;ALMONDS;ALMONDS
- +12 ;;ANISE OIL;ANISE OIL
- +13 ;;APPLES;APPLE JUICE;APPLES
- +14 ;;APRICOTS;APRICOTS
- +15 ;;ARTICHOKES;ARTICHOKES
- +16 ;;ARTIFICIAL COLORS;ARTIFICIAL COLORS;BLACK DYES;BLUE DYES;FD&C BLUE DYE #2;FD&C GREEN DYE #6;GREEN DYES;PINK DYES;PURPLE DYES
- +17 ;;ASPARAGUS;ASPARAGUS
- +18 ;;AVOCADOS;AVOCADOS
- +19 ;;BACON;BACON
- +20 ;;BANANAS;BANANAS
- +21 ;;BARBEQUE SAUCE;BARBEQUE SAUCE;BARBECUE SAUCE
- +22 ;;BARLEY;BARLEY;MALT BARLEY
- +23 ;;BASIL;BASIL
- +24 ;;BEANS;BEANS;LEGUMES
- +25 ;;BEANS, BAKED;BAKED BEANS
- +26 ;;BEANS, FAVA;FAVA BEANS (BROAD BEANS)
- +27 ;;BEANS, GREEN;GREEN BEANS
- +28 ;;BEANS, LENTILS;LENTILS
- +29 ;;BEANS, LIMA;LIMA BEANS
- +30 ;;BEANS, PINTO;PINTO BEANS
- +31 ;;BEANS, SOY;SOYBEANS
- +32 ;;BEANS, STRING;STRING BEANS
- +33 ;;BEANS, WHITE;WHITE BEANS
- +34 ;;BEEF;BEEF;BEEF PRODUCTS
- +35 ;;BEEF, CORNED;CORNED BEEF
- +36 ;;BEETS;BEETS
- +37 ;;BEETS, PICKLES;PICKLED BEETS
- +38 ;;BERRIES;BERRIES
- +39 ;;BLACKBERRIES;BLACKBERRIES
- +40 ;;BLUEBERRIES;BLUEBERRIES
- +41 ;;BROCCOLI;BROCCOLI
- +42 ;;BRUSSELS SPROUTS;BRUSSELS SPROUTS
- +43 ;;BUCKWHEAT;BUCKWHEAT
- +44 ;;BUTTER;BUTTER
- +45 ;;CABBAGE;CABBAGE
- +46 ;;CAFFEINE;CAFFEINE;COFFEE;COFFEE BEANS
- +47 ;;CAFFEINE, COLAS;COLA DRINKS
- +48 ;;CANTALOUPE;CANTALOUPE
- +49 ;;CARBONATED BEVERAGES;CARBONATED BEVERAGES;SOFT DRINKS
- +50 ;;CARROTS;CARROTS
- +51 ;;CATSUP;CATSUP
- +52 ;;CAULIFLOWER;CAULIFLOWER
- +53 ;;CAVIAR;CAVIAR
- +54 ;;CELERY;CELERY
- +55 ;;CEREAL;CEREALS
- +56 ;;CEREAL, CORNFLAKES;CORNFLAKES
- +57 ;;CEREAL, CRM OF WHEAT;CREAM OF WHEAT
- +58 ;;CEREAL, GRITS;GRITS
- +59 ;;CEREAL, OATMEAL;OATMEAL
- +60 ;;CHEESE;CHEESE
- +61 ;;CHEESE, BLUE;BLUE CHEESE
- +62 ;;CHEESE, CHEDDAR;CHEDDAR CHEESE
- +63 ;;CHEESE, COTTAGE;COTTAGE CHEESE
- +64 ;;CHEESE, FETA;FETA CHEESE
- +65 ;;CHEESE, GOAT;GOAT CHEESE
- +66 ;;CHEESE, PARMESAN;PARMESAN CHEESE
- +67 ;;CHEESE, RICOTTA;RICOTTA CHEESE
- +68 ;;CHEESE, SWISS;SWISS CHEESE
- +69 ;;CHERRIES;CHERRIES;CHERRY JUICE
- +70 ;;CHICKEN;CHICKEN
- +71 ;;CHICKPEAS;CHICKPEAS
- +72 ;;CHICORY;CHICORY
- +73 ;;CHILI;CHILI
- +74 ;;CHIVES;CHIVES
- +75 ;;CHOCOLATE;CHOCOLATE;COCOA
- +76 ;;CILANTRO;CILANTRO;CUMIN
- +77 ;;CINNAMON;CINNAMON;CINNAMON OIL
- +78 ;;CITRUS;CITRUS;CITRUS FRUIT;CITRUS JUICE
- +79 ;;CLOVES;CLOVES
- +80 ;;COCONUT;COCONUTS
- +81 ;;COLA;COLA DRINKS
- +82 ;;CORN;CORN
- +83 ;;CRACKERS;CRACKERS
- +84 ;;CRACKERS, GRAHAM;GRAHAM CRACKERS
- +85 ;;CRANBERRIES;CRANBERRIES
- +86 ;;CREAM, SOUR;SOUR CREAM
- +87 ;;CREAMER, NON-DAIRY;NON-DAIRY CREAMER
- +88 ;;CREAMER, POWDER;POWDERED CREAMER
- +89 ;;CUCUMBERS;CUCUMBERS
- +90 ;;DAIRY PRODUCTS;DAIRY PRODUCTS
- +91 ;;DATES;DATES
- +92 ;;DILL;DILL
- +93 ;;DUCK;DUCK;WATERFOWL
- +94 ;;DYES, VEGETABLES;VEGETABLE DYES
- +95 ;;EGGNOG;EGGNOG
- +96 ;;EGGPLANT;EGGPLANT
- +97 ;;EGGS;EGGS;EGG PRODUCTS;EGG WHITES;EGG YOLKS
- +98 ;;EGGS, SUBSTITUTES;EGG, SUBSTITUTES;EGG SUBSTITUTES
- +99 ;;FAT EMULSIONS;FAT EMULSIONS
- +100 ;;FIGS;FIGS
- +101 ;;FISH;FISH
- +102 ;;FISH, ABALONE;ABALONE
- +103 ;;FISH, ANCHOVIES;ANCHOVIES
- +104 ;;FISH, CATFISH;CATFISH
- +105 ;;FISH, COD;CODFISH
- +106 ;;FISH, FLOUNDER;FLOUNDER
- +107 ;;FISH, HERRING;HERRING
- +108 ;;FISH, MACKEREL;MACKEREL
- +109 ;;FISH, PERCH;PERCH
- +110 ;;FISH, RED SNAPPER;RED SNAPPER
- +111 ;;FISH, SALMON;SALMON
- +112 ;;FISH, SARDINES;SARDINES
- +113 ;;FISH, SHARK;SHARK
- +114 ;;FISH, SWORDFISH;SWORDFISH
- +115 ;;FISH, TROUT;TROUT
- +116 ;;FISH, TUNA;TUNA
- +117 ;;FISH, WHITE;WHITE FISH
- +118 ;;FLAVORING, HICKORY;HICKORY
- +119 ;;FLAVORING, LICORICE;LICORICE
- +120 ;;FLAVORING, VANILLA;VANILLA
- +121 ;;FOOD PRESERVATIVES;FOOD PRESERVATIVES
- +122 ;;FRUIT, FRESH;FRESH FRUIT
- +123 ;;FROG;FROG LEGS;FROGS
- +124 ;;FRUIT;FRUIT
- +125 ;;FRUIT JUICE;FRUIT JUICE
- +126 ;;FRUITCAKES;FRUITCAKES
- +127 ;;GARLIC;GARLIC
- +128 ;;GELATIN;GELATIN
- +129 ;;GINGER;GINGER
- +130 ;;GLUTEN;GLUTENS
- +131 ;;GRAINS;GRAINS
- +132 ;;GRAPEFRUIT;GRAPEFRUIT
- +133 ;;GRAPES;GRAPES
- +134 ;;GRAVY;GRAVY
- +135 ;;GREENS, COLLARD;COLLARD GREENS
- +136 ;;GREENS, MUSTARD;MUSTARD GREENS
- +137 ;;GREENS, TURNIP;TURNIP GREENS
- +138 ;;GREEN LEAFY VEG;GREEN LEAFY VEGETABLES
- +139 ;;GUAVA;GUAVA
- +140 ;;HOMINY;HOMINY
- +141 ;;HONEY;HONEY
- +142 ;;HONEYDEW;HONEYDEW
- +143 ;;HORSERADISH;HORSERADISH
- +144 ;;IODINE;IODIZED SALT;IODINE
- +145 ;;JUICE;JUICE
- +146 ;;KIWI;KIWI FRUIT
- +147 ;;LACTOSE;LACTOSE
- +148 ;;LEEKS;LEEKS
- +149 ;;LEMON;LEMON JUICE;LEMONS
- +150 ;;LETTUCE;LETTUCE
- +151 ;;LIMES;LIMES
- +152 ;;LYCHEE NUTS;LYCHEES
- +153 ;;MALTOSE;MALTOSE
- +154 ;;MANGOS;MANGOS
- +155 ;;MARSHMALLOWS;MARSHMALLOWS
- +156 ;;MAYONNAISE;MAYONNAISE
- +157 ;;MEAT;MEAT
- +158 ;;MEAT, LAMB;LAMB
- +159 ;;MEAT, LIVER;LIVER
- +160 ;;MEAT, PROCESSED;PROCESSED MEATS
- +161 ;;MEAT, RED;RED MEAT
- +162 ;;MEAT, VENISON;VENISON
- +163 ;;MELONS;MELONS
- +164 ;;MELONS, MUSK;MUSK MELONS
- +165 ;;MELONS, WATER;WATERMELONS
- +166 ;;MILK;MILK;DAIRY PRODUCTS
- +167 ;;MILK, BUTTER;BUTTERMILK
- +168 ;;MILK, GOAT;GOAT MILK
- +169 ;;MILK, YOGURT;YOGURT
- +170 ;;MINT;MINT
- +171 ;;MODIFIED FOOD STARCH;MODIFIED FOOD STARCH;FOOD STARCH, MODIFIED
- +172 ;;MSG;MONOSODIUM GLUTAMATE
- +173 ;;MUSHROOMS;MUSHROOMS
- +174 ;;MUSTARD;MUSTARD
- +175 ;;MUTTON/LAMB;MUTTON
- +176 ;;NECTARINES;NECTARINES
- +177 ;;NITRITES;NITRITES
- +178 ;;NON-FOOD RELATED;EGGSHELLS
- +179 ;;NUTMEG;NUTMEG
- +180 ;;NUTS;BRAZIL NUTS;CASHEWS;CHESTNUTS;HAZELNUTS;MACADAMIA NUTS;NUTS;PECANS
- +181 ;;NUTS, PEANUT;PEANUT BUTTER;PEANUT OIL;PEANUTS
- +182 ;;NUTS, PINE;PINE NUTS
- +183 ;;NUTS, PISTACHIOS;PISTACHIOS
- +184 ;;NUTS, TREE;PECANS;TREE NUTS
- +185 ;;NUTS, WALNUT;WALNUTS
- +186 ;;OATS;OATS
- +187 ;;OIL, COCONUT;COCONUT OIL
- +188 ;;OIL, COTTONSEED;COTTONSEED OIL
- +189 ;;OIL, PALM;PALM OIL
- +190 ;;OIL, SAFFLOWER;SAFFLOWER OIL
- +191 ;;OIL, SOY;SOYBEAN OIL
- +192 ;;OIL, SUNFLOWER;SUNFLOWER OIL
- +193 ;;OKRA;OKRA
- +194 ;;OLIVES;BLACK OLIVES;OLIVES
- +195 ;;ONIONS;ONIONS
- +196 ;;ONIONS, RED;RED ONIONS
- +197 ;;ORANGE;ORANGE;ORANGES;ORANGE JUICE;ORANGE OIL
- +198 ;;OREGANO;OREGANO
- +199 ;;OYSTERS;OYSTERS
- +200 ;;PAPAYAS;PAPAYAS
- +201 ;;PAPRIKA;PAPRIKA
- +202 ;;PARSLEY;PARSLEY
- +203 ;;PARSNIP;PARSNIP
- +204 ;;PASSION FRUIT;PASSION FRUIT
- +205 ;;PEACHES;PEACHES
- +206 ;;PEARS;PEARS
- +207 ;;PEAS;PEAS
- +208 ;;PEAS, BLACK-EYED;BLACK-EYED PEAS
- +209 ;;PEAS, ENGLISH;ENGLISH PEAS
- +210 ;;PEAS, SNOW;SNOW PEAS
- +211 ;;PEPPER;PEPPER;WHITE PEPPER
- +212 ;;PEPPER, BLACK;BLACK PEPPER;PEPPER
- +213 ;;PEPPERMINT;PEPPERMINT
- +214 ;;PEPPERONI;PEPPERONI
- +215 ;;PEPPERS;BELL PEPPERS;PEPPERS
- +216 ;;PEPPERS, CHILI;CHILI PEPPER;CHILI PEPPERS
- +217 ;;PEPPERS, GREEN;GREEN BELL PEPPERS;PEPPERS
- +218 ;;PEPPERS, HOT;CAPSAICIN;CAYENNE PEPPER;HOT PEPPER;HOT PEPPERS;JALAPENO PEPPERS
- +219 ;;PEPPERS, RED;RED BELL PEPPERS
- +220 ;;PERSIMMONS;PERSIMMONS
- +221 ;;PHEASANT;PHEASANT
- +222 ;;PICKLES;PICKLES
- +223 ;;PIMENTOS;PIMENTOS
- +224 ;;PINEAPPLE;PINEAPPLES
- +225 ;;PIZZA;PIZZA
- +226 ;;PLUMS;PLUMS
- +227 ;;POPCORN;POPCORN
- +228 ;;POPPY SEEDS;POPPY SEEDS
- +229 ;;PORK;PORK;PORK PRODUCTS;HAM
- +230 ;;PORK, HAM;HAM
- +231 ;;POTATOES;POTATOES
- +232 ;;POTATOES, SALAD;POTATO SALAD
- +233 ;;POTATOES, SWEET/YAMS;SWEET POTATOES;YAMS
- +234 ;;POULTRY;FOWL;POULTRY
- +235 ;;PRUNES;PRUNES
- +236 ;;PUDDING, TAPIOCA;TAPIOCA PUDDING
- +237 ;;PUMPKIN;PUMPKINS
- +238 ;;RABBIT;RABBIT
- +239 ;;RADISH;RADISHES
- +240 ;;RAISINS;RAISINS
- +241 ;;RASPBERRIES;RASPBERRIES
- +242 ;;RED DYES;FD&C RED DYE #1;FD&C RED DYE #2;FD&C RED DYE #3;FD&C RED DYE #40;FD&C RED DYE #40 LAKE;FD&C RED DYE #5;RED DYES
- +243 ;;RHUBARB;RHUBARB
- +244 ;;RICE;RICE;WHITE RICE
- +245 ;;ROSEMARY;ROSEMARY
- +246 ;;RUTABAGAS;RUTABAGAS
- +247 ;;RYE;RYE
- +248 ;;SALAD DRESSING, ITAL;ITALIAN DRESSING
- +249 ;;SALT;NON-IODIZED SALT;SALT
- +250 ;;SALT, SUBSTITUTES;SALT SUBSTITUTES
- +251 ;;SAUERKRAUT;SAUERKRAUT
- +252 ;;SAUSAGES;SAUSAGES
- +253 ;;SEAFOOD;SEAFOOD
- +254 ;;SEEDS;SEEDS
- +255 ;;SEEDS, SUNFLOWER;SUNFLOWER SEEDS
- +256 ;;SESAME;SESAME;SESAME OIL;SESAME SEEDS
- +257 ;;SHELLFISH;CLAMS;CRAB;CRAWFISH;CRUSTACEANS;LOBSTER;MUSSELS;SCALLOPS;SHELL FISH;SHELLFISH
- +258 ;;SHERBET;SHERBET
- +259 ;;SHRIMP;SHRIMP
- +260 ;;SNAILS;SNAILS
- +261 ;;SOUR CREAM;SOUR CREAM
- +262 ;;SOY;SOY;SOY MILK;SOY PRODUCTS;SOY SAUCE;SOYBEANS;TOFU
- +263 ;;SOY SAUCE;SOY SAUCE
- +264 ;;SPAGHETTI;SPAGHETTI
- +265 ;;SPAM;SPAM
- +266 ;;SPICES;CONDIMENTS;SPICES
- +267 ;;SPINACH;SPINACH
- +268 ;;SQUASH;SQUASH
- +269 ;;SQUID;SQUID
- +270 ;;STARCHY FOODS;STARCHES
- +271 ;;STRAWBERRIES;STRAWBERRIES;STRAWBERRIES PLUS
- +272 ;;SUCRALOSE;SUCRALOSE
- +273 ;;SUGAR;SUGAR;SUGAR BEETS;WHITE SUGAR
- +274 ;;SUGAR SUB;ARTIFICIAL SWEETENERS
- +275 ;;SUGAR SUB, ASPARTAME;ASPARTAME
- +276 ;;SUGAR SUB, SACCHARIN;SACCHARIN;SWEET'N LOW
- +277 ;;SUGAR, BROWN;BROWN SUGAR
- +278 ;;SULFITES;SULFITES
- +279 ;;SYRUP, MAPLE;MAPLE SYRUP
- +280 ;;TANGERINES;TANGERINES
- +281 ;;TARRAGON;TARRAGON
- +282 ;;TEA;TEA
- +283 ;;TOFFEE;TOFFEE
- +284 ;;TOMATO;TOMATO;TOMATO JUICE;TOMATO PRODUCTS;TOMATO SAUCE;TOMATOES
- +285 ;;TOMATOES, FRESH;FRESH TOMATOES
- +286 ;;TUMERIC;TUMERIC
- +287 ;;TURKEY;TURKEY
- +288 ;;TURNIPS;TURNIPS
- +289 ;;VEAL;VEAL
- +290 ;;VEGETABLES;VEGETABLES
- +291 ;;VEGETABLES, GREEN;GREEN VEGETABLES
- +292 ;;VINEGAR;VINEGAR
- +293 ;;WATERFOWL;WATERFOWL
- +294 ;;WHEAT;FLOUR;WHEAT
- +295 ;;WHEY;WHEY
- +296 ;;WINE, RED;RED WINE
- +297 ;;YEAST;YEAST
- +298 ;;YELLOW DYES;FD&C YELLOW DYE #10;FD&C YELLOW DYE #2;FD&C YELLOW DYE #5;FD&C YELLOW DYE #6;FD&C YELLOW DYE #6 LAKE;TARTRAZINE;YELLOW DYES
- +299 ;;ZUCCHINI;ZUCCHINI
- +300 ;;ARUGULA;ARUGULA
- +301 ;;CAPERS;CAPERS
- +302 ;;CURRY;CURRY
- +303 ;;GOOSEBERRIES;GOOSEBERRIES;GOOSE BERRIES;GOOSE BERRY;GOOSEBERRY
- +304 ;;MEAT TENDERIZER;MEAT TENDERIZER
- +305 ;;OLESTRA;OLESTRA;OLEAN
- +306 ;;ORANGE DYE;ORANGE DYE
- +307 ;;POMEGRANATES;POMEGRANATES
- +308 ;;PUDDING;PUDDING
- +309 ;;SAFFRON;SAFFRON
- +310 ;;STEVIA;STEVIA
- +311 ;;WATER CHESTNUTS;WATER CHESTNUTS
- +312 ;;BEANS, KIDNEY;KIDNEY BEANS
- +313 ;;OCTOPUS;OCTOPUS
- +314 ;;SAGE;SAGE
- +315 ;;MARGARINE;MARGARINE
- +316 ;;ONIONS, RAW;RAW ONIONS
- +317 ;;VEGETABLES, RAW;RAW VEGETABLES
- +318 ;;TURMERIC;TURMERIC
- +319 ;;OIL, CANOLA;CANOLA OIL
- +320 ;;ERYTHRITOL;ERYTHRITOL
- +321 ;;KALE;KALE
- +322 ;;AGAVE;AGAVE
- +323 ;;MILK, HEMP;HEMP MILK
- +324 ;;ROOT, TARO;TARO ROOT
- +325 ;;PAWPAW;PAWPAW
- +326 ;;MULBERRY;MULBERRY
- +327 ;;MOLASSES;MOLASSES
- +328 ;;SORBITOL;SORBITOL
- +329 ;;MALTITOL;MALTITOL
- +330 ;;MANNITOL;MANNITOL
- +331 ;;XYLITOL;XYLITOL
- +332 ;;SASSAFRAS;SASSAFRAS
- +333 ;;BAY LEAVES;BAY LEAVES
- +334 ;;CARAWAY SEEDS;CARAWAY SEEDS
- +335 ;;FRUCTOSE;FRUCTOSE
- +336 ;;BEAN SPROUTS;BEAN SPROUTS
- +337 ;;ARROWROOT;ARROWROOT
- +338 ;;DAIRY FOODS;DAIRY FOODS
- +339 ;;FRESH FRUITS;FRESH FRUITS
- +340 ;;FRUITS;FRUITS
- +341 ;;MINT HERB;MINT HERB
- +342 ;;PEPPERMINT HERB;PEPPERMINT HERB
- +343 ;;PEPPERMINT OIL;PEPPERMINT OIL
- +344 ;;RABBIT MEAT;RABBITS
- +345 ;;MEAT, MAMMAL HOOVED;MEAT, MAMMALIAN HOOVED
- +346 ;;STARFRUIT;STARFRUIT
- +347 ;;CANNABIS;CANNABIS
- +348 ;;CHRYSANTHEMUM;CHRYSANTHEMUM
- +349 ;;APPLES, RAW;RAW APPLES
- +350 ;;CHERRIES, RAW;RAW CHERRIES