**********************************************************************************
** This is practically code for code the Derwent standard. However, with these
** commands the order they are executed is key and has been changed. The following
** is a list of other changes:
** 1) Processing for und and et removed.
** 2) LIMITED -> LTD added by BHH
** 3) various US changes by BHH
** 4) space before and after added by BHH
***********************************************************************************

replace standard_name = subinstr( standard_name," A B "," AB ",1)
replace standard_name = subinstr( standard_name," A CALIFORNIA CORP "," CORP ",1)
replace standard_name = subinstr( standard_name," A DELAWARE CORP "," CORP ",1)
replace standard_name = subinstr( standard_name," AKTIEBOLAGET "," AB ",1)
replace standard_name = subinstr( standard_name," AKTIEBOLAG "," AB ",1)
replace standard_name = subinstr( standard_name," ACADEMY "," ACAD ",1)
replace standard_name = subinstr( standard_name," ACTIEN GESELLSCHAFT "," AG ",1)
replace standard_name = subinstr( standard_name," ACTIENGESELLSCHAFT "," AG ",1)
replace standard_name = subinstr( standard_name," AKTIEN GESELLSCHAFT "," AG ",1)
replace standard_name = subinstr( standard_name," AKTIENGESELLSCHAFT "," AG ",1)
replace standard_name = subinstr( standard_name," AGRICOLAS "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICOLA "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICOLES "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICOLE "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICOLI "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICOLTURE "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICULTURA "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICULTURAL "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AGRICULTURE "," AGRIC ",1)
replace standard_name = subinstr( standard_name," AKADEMIA "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIEI "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIE "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMII "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIJA "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIYA "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIYAKH "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIYAM "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIYAMI "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMIYU "," AKAD ",1)
replace standard_name = subinstr( standard_name," AKADEMI "," AKAD ",1)
replace standard_name = subinstr( standard_name," ALLGEMEINER "," ALLG ",1)
replace standard_name = subinstr( standard_name," ALLGEMEINE "," ALLG ",1)
replace standard_name = subinstr( standard_name," ANTREPRIZA "," ANTR ",1)
replace standard_name = subinstr( standard_name," APARARII "," APAR ",1)
replace standard_name = subinstr( standard_name," APARATELOR "," APAR ",1)
replace standard_name = subinstr( standard_name," APPARATEBAU "," APP ",1)
replace standard_name = subinstr( standard_name," APPARATUS "," APP ",1)
replace standard_name = subinstr( standard_name," APPARECHHI "," APP ",1)
replace standard_name = subinstr( standard_name," APPAREILLAGES "," APP ",1)
replace standard_name = subinstr( standard_name," APPAREILLAGE "," APP ",1)
replace standard_name = subinstr( standard_name," APPAREILS "," APP ",1)
replace standard_name = subinstr( standard_name," APPAREIL "," APP ",1)
replace standard_name = subinstr( standard_name," APARATE "," APAR ",1)
replace standard_name = subinstr( standard_name," APPARATE "," APP ",1)
replace standard_name = subinstr( standard_name," APPLICATIONS "," APPL ",1)
replace standard_name = subinstr( standard_name," APPLICATION "," APPL ",1)
replace standard_name = subinstr( standard_name," APPLICAZIONE "," APPL ",1)
replace standard_name = subinstr( standard_name," APPLICAZIONI "," APPL ",1)
replace standard_name = subinstr( standard_name," ANPARTSSELSKABET "," APS ",1)
replace standard_name = subinstr( standard_name," ANPARTSSELSKAB "," APS ",1)
replace standard_name = subinstr( standard_name," A/S "," AS ",1)
replace standard_name = subinstr( standard_name," AKTIESELSKABET "," AS ",1)
replace standard_name = subinstr( standard_name," AKTIESELSKAB "," AS ",1)
replace standard_name = subinstr( standard_name," ASSOCIACAO "," ASSOC ",1)
replace standard_name = subinstr( standard_name," ASSOCIATED "," ASSOC ",1)
replace standard_name = subinstr( standard_name," ASSOCIATES "," ASSOCIATES ",1)
replace standard_name = subinstr( standard_name," ASSOCIATE "," ASSOCIATES ",1)
replace standard_name = subinstr( standard_name," ASSOCIATION "," ASSOC ",1)
replace standard_name = subinstr( standard_name," BETEILIGUNGSGESELLSCHAFT MBH "," BET GMBH ",1)
replace standard_name = subinstr( standard_name," BETEILIGUNGS GESELLSCHAFT MIT "," BET GMBH ",1)
replace standard_name = subinstr( standard_name," BETEILIGUNGSGESELLSCHAFT "," BET GES ",1)
replace standard_name = subinstr( standard_name," BESCHRANKTER HAFTUNG "," BET GMBH ",1)
replace standard_name = subinstr( standard_name," BROEDERNA "," BRDR ",1)
replace standard_name = subinstr( standard_name," BROEDRENE "," BRDR ",1)
replace standard_name = subinstr( standard_name," BRODERNA "," BRDR ",1)
replace standard_name = subinstr( standard_name," BRODRENE "," BRDR ",1)
replace standard_name = subinstr( standard_name," BROTHERS "," BROS ",1)
replace standard_name = subinstr( standard_name," BESLOTEN VENNOOTSCHAP MET "," BV ",1)
replace standard_name = subinstr( standard_name," BESLOTEN VENNOOTSCHAP "," BV ",1)
replace standard_name = subinstr( standard_name," BEPERKTE AANSPRAKELIJKHEID "," BV ",1)
replace standard_name = subinstr( standard_name," CLOSE CORPORATION "," CC ",1)
replace standard_name = subinstr( standard_name," CENTER "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRAAL "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRALA "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRALES "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRALE "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRAL "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRAUX "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRE "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRO "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRUL "," CENT ",1)
replace standard_name = subinstr( standard_name," CENTRUM "," CENT ",1)
replace standard_name = subinstr( standard_name," CERCETARE "," CERC ",1)
replace standard_name = subinstr( standard_name," CERCETARI "," CERC ",1)
replace standard_name = subinstr( standard_name," CHEMICALS "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICAL "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICKEJ "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICKE "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICKYCH "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICKY "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICZNE "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMICZNY "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMIE "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMII "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMISCHE "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMISCH "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMISKEJ "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHEMISTRY "," CHEM ",1)
replace standard_name = subinstr( standard_name," CHIMICA "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMICE "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMICI "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMICO "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIC "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIEI "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIE "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIESKOJ "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMII "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIKO "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIQUES "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIQUE "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIYAKH "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIYAMI "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIYAM "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIYA "," CHIM ",1)
replace standard_name = subinstr( standard_name," CHIMIYU "," CHIM ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE FRANCAISE "," CIE FR ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE GENERALE "," CIE GEN ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE INDUSTRIALE "," CIE IND ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE INDUSTRIELLE "," CIE IND ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE INDUSTRIELLES "," CIE IND ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE INTERNATIONALE "," CIE INT ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE NATIONALE "," CIE NAT ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE PARISIENNE "," CIE PARIS ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE PARISIENN "," CIE PARIS ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE PARISIEN "," CIE PARIS ",1)
replace standard_name = subinstr( standard_name," COMPANIES "," CO ",1)
replace standard_name = subinstr( standard_name," COMPAGNIA "," CIA ",1)
replace standard_name = subinstr( standard_name," COMPANHIA "," CIA ",1)
replace standard_name = subinstr( standard_name," COMPAGNIE "," CIE ",1)
replace standard_name = subinstr( standard_name," COMPANY "," CO ",1)
replace standard_name = subinstr( standard_name," COMBINATUL "," COMB ",1)
replace standard_name = subinstr( standard_name," COMMERCIALE "," COMML ",1)
replace standard_name = subinstr( standard_name," COMMERCIAL "," COMML ",1)
replace standard_name = subinstr( standard_name," CONSOLIDATED "," CONSOL ",1)
replace standard_name = subinstr( standard_name," CONSTRUCCIONES "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCCIONE "," CONSTR ",1) 
replace standard_name = subinstr( standard_name," CONSTRUCCION "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTIE "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTII "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTIILOR "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTIONS "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTION "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTORTUL "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTORUL "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CONSTRUCTOR "," CONSTR ",1)
replace standard_name = subinstr( standard_name," CO OPERATIVES "," COOP ",1)
replace standard_name = subinstr( standard_name," CO OPERATIVE "," COOP ",1)
replace standard_name = subinstr( standard_name," COOPERATIEVE "," COOP ",1)
replace standard_name = subinstr( standard_name," COOPERATIVA "," COOP ",1)
replace standard_name = subinstr( standard_name," COOPERATIVES "," COOP ",1)
replace standard_name = subinstr( standard_name," COOPERATIVE "," COOP ",1)
replace standard_name = subinstr( standard_name," INCORPORATED "," INC ",1)
replace standard_name = subinstr( standard_name," INCORPORATION "," INC ",1)
replace standard_name = subinstr( standard_name," CORPORATE "," CORP ",1)
replace standard_name = subinstr( standard_name," CORPORATION OF AMERICA "," CORP ",1)
replace standard_name = subinstr( standard_name," CORPORATION "," CORP ",1)
replace standard_name = subinstr( standard_name," CORPORASTION "," CORP ",1)
replace standard_name = subinstr( standard_name," CORPORATIOON "," CORP ",1)
replace standard_name = subinstr( standard_name," COSTRUZIONI "," COSTR ",1)
replace standard_name = subinstr( standard_name," DEUTSCHEN "," DDR ",1)
replace standard_name = subinstr( standard_name," DEUTSCHE "," DDR ",1)
replace standard_name = subinstr( standard_name," DEMOKRATISCHEN REPUBLIK "," DDR ",1)
replace standard_name = subinstr( standard_name," DEMOKRATISCHE REPUBLIK "," DDR ",1)
replace standard_name = subinstr( standard_name," DEPARTEMENT "," DEPT ",1)
replace standard_name = subinstr( standard_name," DEPARTMENT "," DEPT ",1)
replace standard_name = subinstr( standard_name," DEUTSCHES "," DEUT ",1)
replace standard_name = subinstr( standard_name," DEUTSCHEN "," DEUT ",1)
replace standard_name = subinstr( standard_name," DEUTSCHER "," DEUT ",1)
replace standard_name = subinstr( standard_name," DEUTSCHLAND "," DEUT ",1)
replace standard_name = subinstr( standard_name," DEUTSCHE "," DEUT ",1)
replace standard_name = subinstr( standard_name," DEUTSCH "," DEUT ",1)
replace standard_name = subinstr( standard_name," DEVELOPMENTS "," DEV ",1)
replace standard_name = subinstr( standard_name," DEVELOPMENT "," DEV ",1)
replace standard_name = subinstr( standard_name," DEVELOPPEMENTS "," DEV ",1)
replace standard_name = subinstr( standard_name," DEVELOPPEMENT "," DEV ",1)
replace standard_name = subinstr( standard_name," DEVELOP "," DEV ",1)
replace standard_name = subinstr( standard_name," DIVISIONE "," DIV ",1)
replace standard_name = subinstr( standard_name," DIVISION "," DIV ",1)
replace standard_name = subinstr( standard_name," ENGINEERING "," ENG ",1)
replace standard_name = subinstr( standard_name," EQUIPEMENTS "," EQUIP ",1)
replace standard_name = subinstr( standard_name," EQUIPEMENT "," EQUIP ",1)
replace standard_name = subinstr( standard_name," EQUIPMENTS "," EQUIP ",1)
replace standard_name = subinstr( standard_name," EQUIPMENT "," EQUIP ",1)
replace standard_name = subinstr( standard_name," ESTABLISHMENTS "," ESTAB ",1)
replace standard_name = subinstr( standard_name," ESTABLISHMENT "," ESTAB ",1)
replace standard_name = subinstr( standard_name," ESTABLISSEMENTS "," ESTAB ",1)
replace standard_name = subinstr( standard_name," ESTABLISSEMENT "," ESTAB ",1)
replace standard_name = subinstr( standard_name," ETABLISSEMENTS "," ETAB ",1)
replace standard_name = subinstr( standard_name," ETABLISSEMENT "," ETAB ",1)
replace standard_name = subinstr( standard_name," ETABS "," ETAB ",1)
replace standard_name = subinstr( standard_name," ETS "," ETAB ",1)
replace standard_name = subinstr( standard_name," ETUDES "," ETUD ",1)
replace standard_name = subinstr( standard_name," ETUDE "," ETUD ",1)
replace standard_name = subinstr( standard_name," EUROPAEISCHEN "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPAEISCHES "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPAEISCHE "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPAISCHEN "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPAISCHES "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPAISCHE "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPEAN "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPEENNE "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPEEN "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPEA "," EURO ",1)
replace standard_name = subinstr( standard_name," EUROPE "," EURO ",1)
replace standard_name = subinstr( standard_name," EINGETRAGENER VEREIN "," EV ",1)
replace standard_name = subinstr( standard_name," EXPLOATERINGS "," EXPL ",1)
replace standard_name = subinstr( standard_name," EXPLOATERING "," EXPL ",1)
replace standard_name = subinstr( standard_name," EXPLOITATIE "," EXPL ",1)
replace standard_name = subinstr( standard_name," EXPLOITATIONS "," EXPL ",1)
replace standard_name = subinstr( standard_name," EXPLOITATION "," EXPL ",1)
replace standard_name = subinstr( standard_name," FIRMA "," FA ",1)
replace standard_name = subinstr( standard_name," FABBRICAZIONI "," FAB ",1)
replace standard_name = subinstr( standard_name," FABBRICHE "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRICATIONS "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRICATION "," FAB ",1)
replace standard_name = subinstr( standard_name," FABBRICA "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRICA "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIEKEN "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIEK "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIKER "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIK "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIQUES "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIQUE "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRIZIO "," FAB ",1)
replace standard_name = subinstr( standard_name," FABRYKA "," FAB ",1)
replace standard_name = subinstr( standard_name," FARMACEUTICA "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEUTICE "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEUTICHE "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEUTICI "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEUTICOS "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEUTICO "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEUTISK "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACEVTSKIH "," FARM ",1)
replace standard_name = subinstr( standard_name," FARMACIE "," FARM ",1)
replace standard_name = subinstr( standard_name," FONDATION "," FOND ",1)
replace standard_name = subinstr( standard_name," FONDAZIONE "," FOND ",1)
replace standard_name = subinstr( standard_name," FOUNDATIONS "," FOUND ",1)
replace standard_name = subinstr( standard_name," FOUNDATION "," FOUND ",1)
replace standard_name = subinstr( standard_name," FRANCAISE "," FR ",1)
replace standard_name = subinstr( standard_name," FRANCAIS "," FR ",1)
replace standard_name = subinstr( standard_name," F LLI "," FRAT ",1)
replace standard_name = subinstr( standard_name," FLLI "," FRAT ",1)
replace standard_name = subinstr( standard_name," FRATELLI "," FRAT ",1)
replace standard_name = subinstr( standard_name," GEBRODERS "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBRODER "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBROEDERS "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBROEDER "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBRUDERS "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBRUDER "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBRUEDERS "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEBRUEDER "," GEBR ",1)
replace standard_name = subinstr( standard_name," GEB "," GEBR ",1)
replace standard_name = subinstr( standard_name," GENERALA "," GEN ",1)
replace standard_name = subinstr( standard_name," GENERALES "," GEN ",1)
replace standard_name = subinstr( standard_name," GENERALE "," GEN ",1)
replace standard_name = subinstr( standard_name," GENERAL "," GEN ",1)
replace standard_name = subinstr( standard_name," GENERAUX "," GEN ",1)
replace standard_name = subinstr( standard_name," GESELLSCHAFT "," GES ",1)
replace standard_name = subinstr( standard_name," GEWERKSCHAFT "," GEW ",1)
replace standard_name = subinstr( standard_name," GAKKO HOJIN "," GH ",1)
replace standard_name = subinstr( standard_name," GAKKO HOUJIN "," GH ",1)
replace standard_name = subinstr( standard_name," GUTEHOFFNUNGSCHUETTE "," GHH ",1)
replace standard_name = subinstr( standard_name," GUTEHOFFNUNGSCHUTTE "," GHH ",1)
replace standard_name = subinstr( standard_name," GOMEI GAISHA "," GK ",1)
replace standard_name = subinstr( standard_name," GOMEI KAISHA "," GK ",1)
replace standard_name = subinstr( standard_name," GOSHI KAISHA "," GK ",1)
replace standard_name = subinstr( standard_name," GOUSHI GAISHA "," GK ",1)
replace standard_name = subinstr( standard_name," GESELLSCHAFT MBH "," GMBH ",1)
replace standard_name = subinstr( standard_name," GESELLSCHAFT MIT BESCHRANKTER HAFTUNG "," GMBH ",1)
replace standard_name = subinstr( standard_name," GROUPEMENT "," GRP ",1)
replace standard_name = subinstr( standard_name," GROUPMENT "," GRP ",1)
replace standard_name = subinstr( standard_name," HANDELSMAATSCHAPPIJ "," HANDL ",1)
replace standard_name = subinstr( standard_name," HANDELSMIJ "," HANDL ",1)
replace standard_name = subinstr( standard_name," HANDELS BOLAGET "," HB ",1)
replace standard_name = subinstr( standard_name," HANDELSBOLAGET "," HB ",1)
replace standard_name = subinstr( standard_name," HER MAJESTY THE QUEEN IN RIGHT OF CANADA AS REPRESENTED BY THE MINISTER OF "," CANADA MIN OF ",1)
replace standard_name = subinstr( standard_name," HER MAJESTY THE QUEEN "," UK ",1)
replace standard_name = subinstr( standard_name," INDUSTRIAS "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIALS "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIAL "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIALA "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIALE "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIALIZARE "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIALIZAREA "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIALI "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIEELE "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIEI "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIELS "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIELLES "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIELLE "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIELL "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIEL "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIER "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIES "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRII "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIJ "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIYAKH "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIYAM "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIYAMI "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIYA "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIYU "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIA "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRIE "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRI "," IND ",1)
replace standard_name = subinstr( standard_name," INDUSTRY "," IND ",1)
replace standard_name = subinstr( standard_name," INGENIERIA "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIER "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURS "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURBUERO "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURBUREAU "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURBURO "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURGESELLSCHAFT "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURSBUREAU "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURTECHNISCHES "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEURTECHNISCHE "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIEUR "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIOERFIRMAET "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIORSFIRMAN "," ING ",1)
replace standard_name = subinstr( standard_name," INGENIORSFIRMA "," ING ",1)
replace standard_name = subinstr( standard_name," INGENJORSFIRMA "," ING ",1)
replace standard_name = subinstr( standard_name," INGINERIE "," ING ",1)
replace standard_name = subinstr( standard_name," INSTITUTE FRANCAISE "," INST FR ",1)
replace standard_name = subinstr( standard_name," INSTITUT FRANCAIS "," INST FR ",1)
replace standard_name = subinstr( standard_name," INSTITUTE NATIONALE "," INST NAT ",1)
replace standard_name = subinstr( standard_name," INSTITUT NATIONAL "," INST NAT ",1)
replace standard_name = subinstr( standard_name," INSTITUTAMI "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTAMKH "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTAM "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTA "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTES "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTET "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTE "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTOM "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTOV "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTO "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTT "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTUL "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTU "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUTY "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUT "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITUUT "," INST ",1)
replace standard_name = subinstr( standard_name," INSTITZHT "," INST ",1)
replace standard_name = subinstr( standard_name," INSTYTUT "," INST ",1)
replace standard_name = subinstr( standard_name," INSINOORITOMISTO "," INSTMSTO ",1)
replace standard_name = subinstr( standard_name," INSTRUMENTS "," INSTR ",1)
replace standard_name = subinstr( standard_name," INSTRUMENTATION "," INSTR ",1)
replace standard_name = subinstr( standard_name," INSTRUMENTE "," INSTR ",1)
replace standard_name = subinstr( standard_name," INSTRUMENT "," INSTR ",1)
replace standard_name = subinstr( standard_name," INTERNATL "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNACIONAL "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNATIONAL "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNATIONALEN "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNATIONALE "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNATIONAUX "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNATIONELLA "," INT ",1)
replace standard_name = subinstr( standard_name," INTERNAZIONALE "," INT ",1)
replace standard_name = subinstr( standard_name," INTL "," INT ",1)
replace standard_name = subinstr( standard_name," INTREPRINDEREA "," INTR ",1)
replace standard_name = subinstr( standard_name," ISTITUTO "," IST ",1)
replace standard_name = subinstr( standard_name," ITALIANA "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIANE "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIANI "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIANO "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIENNE "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIEN "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIAN "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALIA "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALI "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALO "," ITAL ",1)
replace standard_name = subinstr( standard_name," ITALY "," ITAL ",1)
replace standard_name = subinstr( standard_name," JUNIOR "," JR ",1)
replace standard_name = subinstr( standard_name," KOMMANDIT BOLAG "," KB ",1)
replace standard_name = subinstr( standard_name," KOMMANDIT BOLAGET "," KB ",1)
replace standard_name = subinstr( standard_name," KOMMANDITBOLAGET "," KB ",1)
replace standard_name = subinstr( standard_name," KOMMANDITBOLAG "," KB ",1)
replace standard_name = subinstr( standard_name," KOMMANDIT GESELLSCHAFT "," KG ",1)
replace standard_name = subinstr( standard_name," KOMMANDITGESELLSCHAFT "," KG ",1)
replace standard_name = subinstr( standard_name," KOMMANDIT GESELLSCHAFT AUF AKTIEN "," KGAA ",1)
replace standard_name = subinstr( standard_name," KOMMANDITGESELLSCHAFT AUF AKTIEN "," KGAA ",1)
replace standard_name = subinstr( standard_name," KUTATO INTEZETE "," KI ",1)
replace standard_name = subinstr( standard_name," KUTATO INTEZET "," KI ",1)
replace standard_name = subinstr( standard_name," KUTATOINTEZETE "," KI ",1)
replace standard_name = subinstr( standard_name," KUTATOINTEZET "," KI ",1)
replace standard_name = subinstr( standard_name," KABUSHIKI GAISHA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKI KAISHA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKI GAISYA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKI KAISYA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKIGAISHA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKIKAISHA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKIGAISYA "," KK ",1)
replace standard_name = subinstr( standard_name," KABUSHIKIKAISYA "," KK ",1)
replace standard_name = subinstr( standard_name," KOMBINATU "," KOMB ",1)
replace standard_name = subinstr( standard_name," KOMBINATY "," KOMB ",1)
replace standard_name = subinstr( standard_name," KOMBINAT "," KOMB ",1)
replace standard_name = subinstr( standard_name," KONINKLIJKE "," KONINK ",1)
replace standard_name = subinstr( standard_name," KONCERNOVY PODNIK "," KP ",1)
replace standard_name = subinstr( standard_name," KUNSTSTOFFTECHNIK "," KUNST ",1)
replace standard_name = subinstr( standard_name," KUNSTSTOFF "," KUNST ",1)
replace standard_name = subinstr( standard_name," LABORATOIRES "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATOIRE "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATOIR "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORIEI "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORIES "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORII "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORIJ "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORIOS "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORIO "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORIUM "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORI "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORATORY "," LAB ",1)
replace standard_name = subinstr( standard_name," LABORTORI "," LAB ",1)
replace standard_name = subinstr( standard_name," LAVORAZA "," LAVORAZ ",1)
replace standard_name = subinstr( standard_name," LAVORAZIONE "," LAVORAZ ",1)
replace standard_name = subinstr( standard_name," LAVORAZIONI "," LAVORAZ ",1)
replace standard_name = subinstr( standard_name," LAVORAZIO "," LAVORAZ ",1)
replace standard_name = subinstr( standard_name," LAVORAZI "," LAVORAZ ",1)
replace standard_name = subinstr( standard_name," LIMITED PARTNERSHIP "," LP ",1)
replace standard_name = subinstr( standard_name," LIMITED "," LTD ",1)
replace standard_name = subinstr( standard_name," LTD LTEE "," LTD ",1)
replace standard_name = subinstr( standard_name," MASCHINENVERTRIEB "," MASCH ",1)
replace standard_name = subinstr( standard_name," MASCHINENBAUANSTALT "," MASCHBAU ",1)
replace standard_name = subinstr( standard_name," MASCHINENBAU "," MASCHBAU ",1)
replace standard_name = subinstr( standard_name," MASCHINENFABRIEK "," MASCHFAB ",1)
replace standard_name = subinstr( standard_name," MASCHINENFABRIKEN "," MASCHFAB ",1)
replace standard_name = subinstr( standard_name," MASCHINENFABRIK "," MASCHFAB ",1)
replace standard_name = subinstr( standard_name," MASCHINENFAB "," MASCHFAB ",1)
replace standard_name = subinstr( standard_name," MASCHINEN "," MASCH ",1)
replace standard_name = subinstr( standard_name," MASCHIN "," MASCH ",1)
replace standard_name = subinstr( standard_name," MIT BESCHRANKTER HAFTUNG "," MBH ",1)
replace standard_name = subinstr( standard_name," MANUFACTURINGS "," MFG ",1)
replace standard_name = subinstr( standard_name," MANUFACTURING "," MFG ",1)
replace standard_name = subinstr( standard_name," MANIFATTURAS "," MFR ",1)
replace standard_name = subinstr( standard_name," MANIFATTURA "," MFR ",1)
replace standard_name = subinstr( standard_name," MANIFATTURE "," MFR ",1)
replace standard_name = subinstr( standard_name," MANUFACTURAS "," MFR ",1)
replace standard_name = subinstr( standard_name," MANUFACTURERS "," MFR ",1)
replace standard_name = subinstr( standard_name," MANUFACTURER "," MFR ",1)
replace standard_name = subinstr( standard_name," MANUFACTURES "," MFR ",1)
replace standard_name = subinstr( standard_name," MANUFACTURE "," MFR ",1)
replace standard_name = subinstr( standard_name," MANUFATURA "," MFR ",1)
replace standard_name = subinstr( standard_name," MAATSCHAPPIJ "," MIJ ",1)
replace standard_name = subinstr( standard_name," MEDICAL "," MED ",1)
replace standard_name = subinstr( standard_name," MINISTERE "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERIUM "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERO "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVAKH "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVAM "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVAMI "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVA "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVE "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVO "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVOM "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTVU "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTV "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERSTWO "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTERUL "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTRE "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTRY "," MIN ",1)
replace standard_name = subinstr( standard_name," MINISTER "," MIN ",1)
replace standard_name = subinstr( standard_name," MAGYAR TUDOMANYOS AKADEMIA "," MTA ",1)
replace standard_name = subinstr( standard_name," NATIONAAL "," NAT ",1)
replace standard_name = subinstr( standard_name," NATIONAL "," NAT ",1)
replace standard_name = subinstr( standard_name," NATIONALE "," NAT ",1)
replace standard_name = subinstr( standard_name," NATIONAUX "," NAT ",1)
replace standard_name = subinstr( standard_name," NATL "," NAT ",1)
replace standard_name = subinstr( standard_name," NAZIONALE "," NAZ ",1)
replace standard_name = subinstr( standard_name," NAZIONALI "," NAZ ",1)
replace standard_name = subinstr( standard_name," NORDDEUTSCH "," NORDDEUT ",1)
replace standard_name = subinstr( standard_name," NORDDEUTSCHE "," NORDDEUT ",1)
replace standard_name = subinstr( standard_name," NORDDEUTSCHER "," NORDDEUT ",1)
replace standard_name = subinstr( standard_name," NORDDEUTSCHES "," NORDDEUT ",1)
replace standard_name = subinstr( standard_name," NARODNI PODNIK "," NP ",1)
replace standard_name = subinstr( standard_name," NARODNIJ PODNIK "," NP ",1)
replace standard_name = subinstr( standard_name," NARODNY PODNIK "," NP ",1)
replace standard_name = subinstr( standard_name," NAAMLOOSE VENOOTSCHAP "," NV ",1)
replace standard_name = subinstr( standard_name," NAAMLOZE VENNOOTSCHAP "," NV ",1)
replace standard_name = subinstr( standard_name," N V "," NV ",1)
replace standard_name = subinstr( standard_name," OESTERREICHISCHES "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OESTERREICHISCHE "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OESTERREICHISCH "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OESTERREICH "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OSTERREICHISCHES "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OSTERREICHISCHE "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OSTERREICHISCH "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OSTERREICH "," OESTERR ",1)
replace standard_name = subinstr( standard_name," OFFICINE MECCANICA "," OFF MEC ",1)
replace standard_name = subinstr( standard_name," OFFICINE MECCANICHE "," OFF MEC ",1)
replace standard_name = subinstr( standard_name," OFFICINE NATIONALE "," OFF NAT ",1)
replace standard_name = subinstr( standard_name," OFFENE HANDELSGESELLSCHAFT "," OHG ",1)
replace standard_name = subinstr( standard_name," ONTWIKKELINGSBUREAU "," ONTWIK ",1)
replace standard_name = subinstr( standard_name," ONTWIKKELINGS "," ONTWIK ",1)
replace standard_name = subinstr( standard_name," OBOROVY PODNIK "," OP ",1)
replace standard_name = subinstr( standard_name," ORGANISATIE "," ORG ",1)
replace standard_name = subinstr( standard_name," ORGANISATIONS "," ORG ",1)
replace standard_name = subinstr( standard_name," ORGANISATION "," ORG ",1)
replace standard_name = subinstr( standard_name," ORGANIZATIONS "," ORG ",1)
replace standard_name = subinstr( standard_name," ORGANIZATION "," ORG ",1)
replace standard_name = subinstr( standard_name," ORGANIZZAZIONE "," ORG ",1)
replace standard_name = subinstr( standard_name," OSAKEYHTIO "," OY ",1)
replace standard_name = subinstr( standard_name," PHARMACEUTICALS "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMACEUTICAL "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMACEUTICA "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMACEUTIQUES "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMACEUTIQUE "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMAZEUTIKA "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMAZEUTISCHEN "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMAZEUTISCHE "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMAZEUTISCH "," PHARM ",1)
replace standard_name = subinstr( standard_name," PHARMAZIE "," PHARM ",1)
replace standard_name = subinstr( standard_name," PUBLIC LIMITED COMPANY "," PLC ",1)
replace standard_name = subinstr( standard_name," PRELUCRAREA "," PRELUC ",1)
replace standard_name = subinstr( standard_name," PRELUCRARE "," PRELUC ",1)
replace standard_name = subinstr( standard_name," PRODOTTI "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCE "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTS "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCT "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTAS "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTA "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTIE "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTOS "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTO "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUCTORES "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUITS "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUIT "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUKCJI "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUKTER "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUKTE "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUKT "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUSE "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUTOS "," PROD ",1)
replace standard_name = subinstr( standard_name," PRODUIT CHIMIQUES "," PROD CHIM ",1)
replace standard_name = subinstr( standard_name," PRODUIT CHIMIQUE "," PROD CHIM ",1)
replace standard_name = subinstr( standard_name," PRODUCTIONS "," PRODN ",1)
replace standard_name = subinstr( standard_name," PRODUCTION "," PRODN ",1)
replace standard_name = subinstr( standard_name," PRODUKTIONS "," PRODN ",1)
replace standard_name = subinstr( standard_name," PRODUKTION "," PRODN ",1)
replace standard_name = subinstr( standard_name," PRODUZIONI "," PRODN ",1)
replace standard_name = subinstr( standard_name," PROIECTARE "," PROI ",1)
replace standard_name = subinstr( standard_name," PROIECTARI "," PROI ",1)
replace standard_name = subinstr( standard_name," PRZEDSIEBIOSTWO "," PRZEDSIEB ",1)
replace standard_name = subinstr( standard_name," PRZEMYSLU "," PRZEYM ",1)
replace standard_name = subinstr( standard_name," PROPRIETARY "," PTY ",1)
replace standard_name = subinstr( standard_name," PERSONENVENNOOTSCHAP MET "," PVBA ",1)
replace standard_name = subinstr( standard_name," BEPERKTE AANSPRAKELIJKHEID "," PVBA ",1)
replace standard_name = subinstr( standard_name," REALISATIONS "," REAL ",1)
replace standard_name = subinstr( standard_name," REALISATION "," REAL ",1)
replace standard_name = subinstr( standard_name," RECHERCHES "," RECH ",1)
replace standard_name = subinstr( standard_name," RECHERCHE "," RECH ",1)
replace standard_name = subinstr( standard_name," RECHERCHES ET DEVELOPMENTS "," RECH & DEV ",1)
replace standard_name = subinstr( standard_name," RECHERCHE ET DEVELOPMENT "," RECH & DEV ",1)
replace standard_name = subinstr( standard_name," RECHERCHES ET DEVELOPPEMENTS "," RECH & DEV ",1)
replace standard_name = subinstr( standard_name," RECHERCHE ET DEVELOPPEMENT "," RECH & DEV ",1)
replace standard_name = subinstr( standard_name," RESEARCH & DEVELOPMENT "," RES & DEV ",1)
replace standard_name = subinstr( standard_name," RESEARCH AND DEVELOPMENT "," RES & DEV ",1)
replace standard_name = subinstr( standard_name," RESEARCH "," RES ",1)
replace standard_name = subinstr( standard_name," RIJKSUNIVERSITEIT "," RIJKSUNIV ",1)
replace standard_name = subinstr( standard_name," SECRETATY "," SECRETARY ",1)
replace standard_name = subinstr( standard_name," SECRETRY "," SECRETARY ",1)
replace standard_name = subinstr( standard_name," SECREATRY "," SECRETARY ",1)
replace standard_name = subinstr( standard_name," SOCIEDAD ANONIMA "," SA ",1)
replace standard_name = subinstr( standard_name," SOCIETE ANONYME DITE "," SA ",1)
replace standard_name = subinstr( standard_name," SOCIETE ANONYME "," SA ",1)
replace standard_name = subinstr( standard_name," SOCIETE A RESPONSABILITE LIMITEE "," SARL ",1)
replace standard_name = subinstr( standard_name," SOCIETE A RESPONSIBILITE LIMITEE "," SARL ",1)
replace standard_name = subinstr( standard_name," SOCIETA IN ACCOMANDITA SEMPLICE "," SAS ",1)
replace standard_name = subinstr( standard_name," SCHWEIZERISCHES "," SCHWEIZ ",1)
replace standard_name = subinstr( standard_name," SCHWEIZERISCHER "," SCHWEIZ ",1)
replace standard_name = subinstr( standard_name," SCHWEIZERISCHE "," SCHWEIZ ",1)
replace standard_name = subinstr( standard_name," SCHWEIZERISCH "," SCHWEIZ ",1)
replace standard_name = subinstr( standard_name," SCHWEIZER "," SCHWEIZ ",1)
replace standard_name = subinstr( standard_name," SCIENCES "," SCI ",1)
replace standard_name = subinstr( standard_name," SCIENCE "," SCI ",1)
replace standard_name = subinstr( standard_name," SCIENTIFICA "," SCI ",1)
replace standard_name = subinstr( standard_name," SCIENTIFIC "," SCI ",1)
replace standard_name = subinstr( standard_name," SCIENTIFIQUES "," SCI ",1)
replace standard_name = subinstr( standard_name," SCIENTIFIQUE "," SCI ",1)
replace standard_name = subinstr( standard_name," SHADAN HOJIN "," SH ",1)
replace standard_name = subinstr( standard_name," SIDERURGICAS "," SIDER ",1)
replace standard_name = subinstr( standard_name," SIDERURGICA "," SIDER ",1)
replace standard_name = subinstr( standard_name," SIDERURGIC "," SIDER ",1)
replace standard_name = subinstr( standard_name," SIDERURGIE "," SIDER ",1)
replace standard_name = subinstr( standard_name," SIDERURGIQUE "," SIDER ",1)
replace standard_name = subinstr( standard_name," SOCIETA IN NOME COLLECTIVO "," SNC ",1)
replace standard_name = subinstr( standard_name," SOCIETE EN NOM COLLECTIF "," SNC ",1)
replace standard_name = subinstr( standard_name," SOCIETE ALSACIENNE "," SOC ALSAC ",1)
replace standard_name = subinstr( standard_name," SOCIETE APPLICATION "," SOC APPL ",1)
replace standard_name = subinstr( standard_name," SOCIETA APPLICAZIONE "," SOC APPL ",1)
replace standard_name = subinstr( standard_name," SOCIETE AUXILIAIRE "," SOC AUX ",1)
replace standard_name = subinstr( standard_name," SOCIETE CHIMIQUE "," SOC CHIM ",1)
replace standard_name = subinstr( standard_name," SOCIEDAD CIVIL "," SOC CIV ",1)
replace standard_name = subinstr( standard_name," SOCIETE CIVILE "," SOC CIV ",1)
replace standard_name = subinstr( standard_name," SOCIETE COMMERCIALES "," SOC COMML ",1)
replace standard_name = subinstr( standard_name," SOCIETE COMMERCIALE "," SOC COMML ",1)
replace standard_name = subinstr( standard_name," SOCIEDAD ESPANOLA "," SOC ESPAN ",1)
replace standard_name = subinstr( standard_name," SOCIETE ETUDES "," SOC ETUD ",1)
replace standard_name = subinstr( standard_name," SOCIETE ETUDE "," SOC ETUD ",1)
replace standard_name = subinstr( standard_name," SOCIETE EXPLOITATION "," SOC EXPL ",1)
replace standard_name = subinstr( standard_name," SOCIETE GENERALE "," SOC GEN ",1)
replace standard_name = subinstr( standard_name," SOCIETE INDUSTRIELLES "," SOC IND ",1)
replace standard_name = subinstr( standard_name," SOCIETE INDUSTRIELLE "," SOC IND ",1)
replace standard_name = subinstr( standard_name," SOCIETE MECANIQUES "," SOC MEC ",1)
replace standard_name = subinstr( standard_name," SOCIETE MECANIQUE "," SOC MEC ",1)
replace standard_name = subinstr( standard_name," SOCIETE NATIONALE "," SOC NAT ",1)
replace standard_name = subinstr( standard_name," SOCIETE NOUVELLE "," SOC NOUV ",1)
replace standard_name = subinstr( standard_name," SOCIETE PARISIENNE "," SOC PARIS ",1)
replace standard_name = subinstr( standard_name," SOCIETE PARISIENN "," SOC PARIS ",1)
replace standard_name = subinstr( standard_name," SOCIETE PARISIEN "," SOC PARIS ",1)
replace standard_name = subinstr( standard_name," SOCIETE TECHNIQUES "," SOC TECH ",1)
replace standard_name = subinstr( standard_name," SOCIETE TECHNIQUE "," SOC TECH ",1)
replace standard_name = subinstr( standard_name," SDRUZENI PODNIKU "," SP ",1)
replace standard_name = subinstr( standard_name," SDRUZENI PODNIK "," SP ",1)
replace standard_name = subinstr( standard_name," SOCIETA PER AZIONI "," SPA ",1)
replace standard_name = subinstr( standard_name," SPITALUL "," SPITAL ",1)
replace standard_name = subinstr( standard_name," SOCIETE PRIVEE A RESPONSABILITE LIMITEE "," SPRL ",1)
replace standard_name = subinstr( standard_name," SOCIEDAD DE RESPONSABILIDAD LIMITADA "," SRL ",1)
replace standard_name = subinstr( standard_name," STIINTIFICA "," STIINT ",1)
replace standard_name = subinstr( standard_name," SUDDEUTSCHES "," SUDDEUT ",1)
replace standard_name = subinstr( standard_name," SUDDEUTSCHER "," SUDDEUT ",1)
replace standard_name = subinstr( standard_name," SUDDEUTSCHE "," SUDDEUT ",1)
replace standard_name = subinstr( standard_name," SUDDEUTSCH "," SUDDEUT ",1)
replace standard_name = subinstr( standard_name," SOCIEDADE "," SOC ",1)
replace standard_name = subinstr( standard_name," SOCIEDAD "," SOC ",1)
replace standard_name = subinstr( standard_name," SOCIETA "," SOC ",1)
replace standard_name = subinstr( standard_name," SOCIETE "," SOC ",1)
replace standard_name = subinstr( standard_name," SOCIETY "," SOC ",1)
replace standard_name = subinstr( standard_name," SA DITE "," SA ",1)
replace standard_name = subinstr( standard_name," TECHNICAL "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNICO "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNICZNY "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNIKAI "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNIKI "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNIK "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNIQUES "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNIQUE "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNISCHES "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNISCHE "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNISCH "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNOLOGY "," TECH ",1)
replace standard_name = subinstr( standard_name," TECHNOLOGIES "," TECH ",1)
replace standard_name = subinstr( standard_name," TELECOMMUNICATIONS "," TELECOM ",1)
replace standard_name = subinstr( standard_name," TELECOMMUNICACION "," TELECOM ",1)
replace standard_name = subinstr( standard_name," TELECOMMUNICATION "," TELECOM ",1)
replace standard_name = subinstr( standard_name," TELECOMMUNICAZIONI "," TELECOM ",1)
replace standard_name = subinstr( standard_name," TELECOMUNICAZIONI "," TELECOM ",1)
replace standard_name = subinstr( standard_name," TRUSTUL "," TRUST ",1)
replace standard_name = subinstr( standard_name," UNITED KINGDOM "," UK ",1)
replace standard_name = subinstr( standard_name," SECRETARY OF STATE FOR "," UK SEC FOR ",1)
replace standard_name = subinstr( standard_name," UNIVERSIDADE "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSIDAD "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITA DEGLI STUDI "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITAET "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITAIRE "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITAIR "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITATEA "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITEIT "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETAMI "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETAM "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETE "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETOM "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETOV "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETU "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETY "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITETA "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITAT "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITET "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITE "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITY "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIVERSITA "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNIWERSYTET "," UNIV ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA ADMINISTRATOR "," US ADMIN ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA AS REPRESENTED BY THE ADMINISTRATOR "," US ADMIN ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA AS REPRESENTED BY THE DEPT "," US DEPT ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA AS REPRESENTED BY THE UNITED STATES DEPT "," US DEPT ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICAN AS REPRESENTED BY THE UNITED STATES DEPT "," US DEPT ",1)
replace standard_name = subinstr( standard_name," UNITED STATES GOVERNMENT AS REPRESENTED BY THE SECRETARY OF "," US SEC ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA REPRESENTED BY THE SECRETARY "," US SEC ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA AS REPRESENTED BY THE SECRETARY "," US SEC ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICAS AS REPRESENTED BY THE SECRETARY "," US SEC ",1)
replace standard_name = subinstr( standard_name," UNITES STATES OF AMERICA AS REPRESENTED BY THE SECRETARY "," US SEC ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA SECRETARY OF "," US SEC ",1)
replace standard_name = subinstr( standard_name," UNITED STATES OF AMERICA "," USA ",1)
replace standard_name = subinstr( standard_name," UNITED STATES "," USA ",1)
replace standard_name = subinstr( standard_name," UTILAJE "," UTIL ",1)
replace standard_name = subinstr( standard_name," UTILAJ "," UTIL ",1)
replace standard_name = subinstr( standard_name," UTILISATIONS VOLKSEIGENER BETRIEBE "," VEB ",1)
replace standard_name = subinstr( standard_name," UTILISATION VOLKSEIGENER BETRIEBE "," VEB ",1)
replace standard_name = subinstr( standard_name," VEB KOMBINAT "," VEB KOMB ",1)
replace standard_name = subinstr( standard_name," VEREENIGDE "," VER ",1)
replace standard_name = subinstr( standard_name," VEREINIGTES VEREINIGUNG "," VER ",1)
replace standard_name = subinstr( standard_name," VEREINIGTE VEREINIGUNG "," VER ",1)
replace standard_name = subinstr( standard_name," VEREIN "," VER ",1)
replace standard_name = subinstr( standard_name," VERENIGING "," VER ",1)
replace standard_name = subinstr( standard_name," VERWALTUNGEN "," VERW ",1)
replace standard_name = subinstr( standard_name," VERWALTUNGS "," VERW ",1)
replace standard_name = subinstr( standard_name," VERWERTUNGS "," VERW ",1)
replace standard_name = subinstr( standard_name," VERWALTUNGSGESELLSCHAFT "," VERW GES ",1)
replace standard_name = subinstr( standard_name," VYZK USTAV "," VU ",1)
replace standard_name = subinstr( standard_name," VYZKUMNY USTAV "," VU ",1)
replace standard_name = subinstr( standard_name," VYZKUMNYUSTAV "," VU ",1)
replace standard_name = subinstr( standard_name," VEREINIGUNG VOLKSEIGENER BETRIEBUNG "," VVB ",1)
replace standard_name = subinstr( standard_name," VYZK VYVOJOVY USTAV "," VVU ",1)
replace standard_name = subinstr( standard_name," VYZKUMNY VYVOJOVY USTAV "," VVU ",1)
replace standard_name = subinstr( standard_name," WERKZEUGMASCHINENKOMBINAT "," WERKZ MASCH KOMB ",1)
replace standard_name = subinstr( standard_name," WERKZEUGMASCHINENFABRIK "," WERKZ MASCHFAB ",1)
replace standard_name = subinstr( standard_name," WESTDEUTSCHES "," WESTDEUT ",1)
replace standard_name = subinstr( standard_name," WESTDEUTSCHER "," WESTDEUT ",1)
replace standard_name = subinstr( standard_name," WESTDEUTSCHE "," WESTDEUT ",1)
replace standard_name = subinstr( standard_name," WESTDEUTSCH "," WESTDEUT ",1)
replace standard_name = subinstr( standard_name," WISSENSCHAFTLICHE(S) "," WISS ",1)
replace standard_name = subinstr( standard_name," WISSENSCHAFTLICHES TECHNISCHES ZENTRUM "," WTZ ",1)
replace standard_name = subinstr( standard_name," YUGEN KAISHA "," YG YUGEN GAISHA ",1)
replace standard_name = subinstr( standard_name," YUUGEN GAISHA "," YG YUGEN GAISHA ",1)
replace standard_name = subinstr( standard_name," YUUGEN KAISHA "," YG YUGEN GAISHA ",1)
replace standard_name = subinstr( standard_name," YUUGEN KAISYA "," YG YUGEN GAISHA ",1)
replace standard_name = subinstr( standard_name," ZAVODU "," ZAVOD ",1)
replace standard_name = subinstr( standard_name," ZAVODY "," ZAVOD ",1)
replace standard_name = subinstr( standard_name," ZENTRALES "," ZENT ",1)
replace standard_name = subinstr( standard_name," ZENTRALE "," ZENT ",1)
replace standard_name = subinstr( standard_name," ZENTRALEN "," ZENT ",1)
replace standard_name = subinstr( standard_name," ZENTRALNA "," ZENT ",1)
replace standard_name = subinstr( standard_name," ZENTRUM "," ZENT ",1)
replace standard_name = subinstr( standard_name," ZENTRALINSTITUT "," ZENT INST ",1)
replace standard_name = subinstr( standard_name," ZENTRALLABORATORIUM "," ZENT LAB ",1)
replace standard_name = subinstr( standard_name," ZAIDAN HOJIN "," ZH ",1)
replace standard_name = subinstr( standard_name," ZAIDAN HOUJIN "," ZH ",1)
replace standard_name = subinstr( standard_name," LIMITED "," LTD ",1)
replace standard_name = subinstr( standard_name," LIMITADA "," LTDA ",1)
replace standard_name = subinstr( standard_name," SECRETARY "," SEC ",1)