Consultor Eletrônico

Status: Verified

GOAL:

How to change the default promsgs selected during installation

GOAL:

How to modify language support

GOAL:

How to change promsgs file to support local language

GOAL:

How to implement localization support for Progress Messages

GOAL:

How to modify the language for Progress messages to all sessions

GOAL:

How to modify the language for Progress messages per user

GOAL:

How to change the PROMSGS dynamically via 4GL

FIX:

The default language selected during install, results in the default promsgs file being taken from $DLC/prolang/xxx/ and copied to $DLC/promsgs.

note: "xxx" indicates the 3-alpha-character language abbreviation, for example:
eng = english


The default language can be changed in a number of ways, depending on the need for the "progress messages" being displayed in one or many languages.

To change Progress messages to all sessions that uses this installation, effectively re-setting the 'default', simply copy the relevant $DLC/prolang/xxx/promsgs.xxx to $DLC/promsgs.

To change it per user, changing the PROMSGS environment variable and pointing to the necessary promsgs.xxx file under $DLC/prolang/xxx/ directory
For example: for Brazilian Portuguese, use: PROMSGS=%DLC%/prolang/brz/promsgs.brz

To change the PROMSGS dynamically through 4GL, use PROMSGS function by pointing to the necessary promsgs.xxx file under $DLC/prolang/xxx/ directory

For example:
/* this script assumes that the default installatiion language is ENGLISH */

DEFINE VARIABLE newmsg AS CHARACTER FORMAT "x(16)"
LABEL "My MSSGS" NO-UNDO.
DEFINE VARIABLE filemsg AS CHARACTER.

SET newmsg HELP "Enter the new language for messages.".

IF newmsg = "English"
THEN ASSIGN filemsg = "promsgs".
ELSE ASSIGN filemsg = "prolang/promsgs." +
LC(SUBSTRING(newmsg, 1, 3)).

IF SEARCH(filemsg) < > ?
THEN DO:
PROMSGS = filemsg.
MESSAGE "Messages will now be taken from" PROMSGS.
END.
ELSE DO:
MESSAGE "Cannot find" filemsg.
UNDO, RETRY.
END.