157 lines
5.2 KiB
Plaintext
157 lines
5.2 KiB
Plaintext
|
/******************************************************************************
|
||
|
|
/*
|
||
|
|
/* nls.uvinst.u: Install of UniVerse sections.
|
||
|
|
/*
|
||
|
|
/* Module %M% Version %I% Date %H%
|
||
|
|
/*
|
||
|
|
/* (c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
|
||
|
|
/* This is unpublished proprietary source code of Ardent Software Inc.
|
||
|
|
/* The copyright notice above does not evidence any actual or intended
|
||
|
|
/* publication of such source code.
|
||
|
|
/*
|
||
|
|
/******************************************************************************
|
||
|
|
/*
|
||
|
|
/* Maintenence log - insert most recent change descriptions at top
|
||
|
|
/*
|
||
|
|
/* Date.... GTAR# WHO Description.........................................
|
||
|
|
/* 10/14/98 23801 SAP Change copyrights.
|
||
|
|
/* 07/24/97 21195 DTM Added proper handling of COPYP for reality
|
||
|
|
/* 07/08/97 20861 DJD Stop paging by setting the term depth to 9999.
|
||
|
|
/* 06/16/97 20861 DJD Added build of the default locale.
|
||
|
|
/* 06/30/97 20987 PEJ Fix ED script for PACKAGE.MENU
|
||
|
|
/* 03/13/96 20235 PEJ nls/uvhome/INCLUDE done by InstallShield on NT
|
||
|
|
/* 11/12/96 19601 JC Module created from section in nls.install.u
|
||
|
|
/*
|
||
|
|
/*******************************************************************************
|
||
|
|
/*
|
||
|
|
/* This file creates a paragraph to be used as part of the NLS install
|
||
|
|
/* process. It's main use is to copy files to the UVHOME account and
|
||
|
|
/* build required maps.
|
||
|
|
/*
|
||
|
|
/* Please note : This is used for both the UNIX and NT installs.
|
||
|
|
/*
|
||
|
|
/*******************************************************************************
|
||
|
|
NLS.UV.INST PA - Paragraph to do UniVerse side of install
|
||
|
|
* Set the term depth to 9999 ,so it will not page.
|
||
|
|
TERM ,9999
|
||
|
|
|
||
|
|
* Copy across all uvhome file contents:
|
||
|
|
SETFILE nls/uvhome/MENU.FILE NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO MENU.FILE ALL OVERWRITING
|
||
|
|
|
||
|
|
SETFILE nls/uvhome/REVISE.PROCS NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO REVISE.PROCESSES ALL OVERWRITING
|
||
|
|
|
||
|
|
SETFILE nls/uvhome/SYS.MESSAGE NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO SYS.MESSAGE ALL OVERWRITING
|
||
|
|
|
||
|
|
SETFILE nls/uvhome/UV.VOC NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO VOC ALL OVERWRITING
|
||
|
|
|
||
|
|
SETFILE nls/uvhome/DATA.TYPES NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO DATA.TYPES ALL OVERWRITING
|
||
|
|
|
||
|
|
SETFILE nls/uvhome/NEWACC NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO VOC ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,IN2 ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,INFORMATION ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,NEWACC ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,PICK ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,PIOPEN ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,REALITY ALL OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO NEWACC,REALITY TMPCOPYP,COPYP OVERWRITING
|
||
|
|
* Delete temporary
|
||
|
|
DELETE VOC TMPCOPYP
|
||
|
|
DELETE NEWACC,IN2 TMPCOPYP
|
||
|
|
DELETE NEWACC,INFORMATION TMPCOPYP
|
||
|
|
DELETE NEWACC,NEWACC TMPCOPYP
|
||
|
|
DELETE NEWACC,PICK TMPCOPYP
|
||
|
|
DELETE NEWACC,PIOPEN TMPCOPYP
|
||
|
|
DELETE NEWACC,REALITY TMPCOPYP
|
||
|
|
|
||
|
|
/? MSWIN
|
||
|
|
/%
|
||
|
|
SETFILE nls/uvhome/INCLUDE NLS.TMP OVERWRITING
|
||
|
|
COPY FROM NLS.TMP TO INCLUDE ALL OVERWRITING
|
||
|
|
/*
|
||
|
|
|
||
|
|
DELETE VOC NLS.TMP
|
||
|
|
|
||
|
|
* See if NLS.MAP.DESCS/TABLES already exist, and if not create them:
|
||
|
|
NLS.INSTALL.FILE MAP.DESCS MAP.DESCSX maps
|
||
|
|
NLS.INSTALL.FILE MAP.TABLES MAP.TABLESX maps
|
||
|
|
|
||
|
|
* See if NLS.LC.ALL/NUMERIC etc. already exist, and if not create them:
|
||
|
|
NLS.INSTALL.FILE LC.ALL LC.ALLX locales
|
||
|
|
NLS.INSTALL.FILE LC.TIME LC.TIMEX locales
|
||
|
|
NLS.INSTALL.FILE LC.NUMERIC LC.NUMERICX locales
|
||
|
|
NLS.INSTALL.FILE LC.MONETARY LC.MONETARYX locales
|
||
|
|
NLS.INSTALL.FILE LC.CTYPE LC.CTYPEX locales
|
||
|
|
NLS.INSTALL.FILE LC.COLLATE LC.COLLATEX locales
|
||
|
|
* Ditto for NLS.WT.TABLES:
|
||
|
|
NLS.INSTALL.FILE WT.TABLES WT.TABLESX locales
|
||
|
|
* Ditto for NLS.LANG.INFO:
|
||
|
|
NLS.INSTALL.FILE LANG.INFO LANG.INFOX locales
|
||
|
|
|
||
|
|
* See if NLS.CLIENT.MAPS/LCS already exist, and if not create them:
|
||
|
|
NLS.INSTALL.FILE CLIENT.MAPS CLIENT.MAPSX maps
|
||
|
|
NLS.INSTALL.FILE CLIENT.LCS CLIENT.LCSX locales
|
||
|
|
|
||
|
|
* Then delete the previous command once its work is done:
|
||
|
|
DELETE VOC NLS.INSTALL.FILE
|
||
|
|
|
||
|
|
* Build the NLS-DEFAULT locale.
|
||
|
|
NLS.BUILD LC NLS-DEFAULT OVERWRITING NOPAGE
|
||
|
|
|
||
|
|
* Now remove the NLS-DEFAULT entry in NLS.LC.ALL as it will
|
||
|
|
* confuse people.
|
||
|
|
DELETE NLS.LC.ALL NLS-DEFAULT
|
||
|
|
DELETE NLS.LC.INSTALL NLS-DEFAULT
|
||
|
|
|
||
|
|
* Catalog things that need cataloging globally:
|
||
|
|
CATALOG BP *NLS.LISTMAPS NLS.LSTMAPS.B FORCE
|
||
|
|
CATALOG BP *NLS.LISTLCS NLS.LISTLCS.B FORCE
|
||
|
|
|
||
|
|
* Some I-types need to be compiled in situ, either because they
|
||
|
|
* contain TRANSs, or are >1 page long:
|
||
|
|
SET.TERM.TYPE DUMB LENGTH 34
|
||
|
|
CD NLS.CS.DESCS
|
||
|
|
CD NLS.CS.CASES
|
||
|
|
CD NLS.LC.ALL
|
||
|
|
CD NLS.LC.CTYPE
|
||
|
|
CD NLS.CLIENT.LCS
|
||
|
|
CD NLS.CLIENT.MAPS
|
||
|
|
|
||
|
|
* Clear out the NLS.CS.INSTALL directory to force its contents
|
||
|
|
* to be re-generated by the next locale that gets built:
|
||
|
|
CLEAR.FILE NLS.CS.INSTALL
|
||
|
|
|
||
|
|
* Set correct NLS maps for some files:
|
||
|
|
NLS.SET.NONE.MAP NLS.MAP.INSTALL
|
||
|
|
NLS.SET.NONE.MAP NLS.CS.INSTALL
|
||
|
|
NLS.SET.NONE.MAP NLS.LC.INSTALL
|
||
|
|
|
||
|
|
* Ensure maps/locales are correctly built (interactive program):
|
||
|
|
NLS.INSTALL USING ./uvconfig
|
||
|
|
|
||
|
|
/? MSWIN
|
||
|
|
|
||
|
|
* Build default terminal map. Only used on NT
|
||
|
|
IF <<I2,Enter terminal map>> EQ 'NOMAP' THEN GO NOMAP:
|
||
|
|
NLS.BUILD MAP <<I2,Enter terminal map>> OVERWRITING
|
||
|
|
NOMAP:
|
||
|
|
/%
|
||
|
|
* Add NLS menus to the package menu. Only used on UNIX
|
||
|
|
ED MENU.FILE PACKAGE.MENU
|
||
|
|
DATA 2
|
||
|
|
DATA A ^253@(20,20)NLS Administration
|
||
|
|
DATA 3
|
||
|
|
DATA A ^253NLS.ADMIN.MENU
|
||
|
|
DATA 4
|
||
|
|
DATA A ^253Display the National Language Support Administration menu.
|
||
|
|
DATA FI
|
||
|
|
/*
|
||
|
|
|
||
|
|
/* END */
|
||
|
|
|