Salesforce

How to change the default PROMSGS?

« Go Back

Information

 
TitleHow to change the default PROMSGS?
URL NameP68929
Article Number000141266
EnvironmentProduct: Progress
Version: 9.x
Product: OpenEdge
Version: 10.x, 11.x
OS: All supported platforms
Question/Problem Description
How to change the default PROMSGS to be different from that selected during installation
How to change PROMSGS file to support local language
How to implement localization support for Progress Messages
How to modify the language for Progress messages to all sessions
How to modify the language for Progress messages per user
How to change the PROMSGS dynamically via 4GL
Steps to Reproduce
Clarifying Information
Error Message
Defect Number
Enhancement Number
Cause
Resolution
The default language selected during install results in the default promsgs file being copied from $DLC/prolang/xxx/ 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 for all sessions:

Reset the 'default' selected during install time by simply copying the relevant $DLC/prolang/xxx/promsgs.xxx to $DLC/promsgs.

To change Progress messages per user:

The PROMSGS environment variable can be used to refer to the necessary promsgs.xxx file under $DLC/prolang/xxx/ directory. 

Example:
For Brazilian Portuguese, use: PROMSGS=%DLC%/prolang/brz/promsgs.brz

To change the PROMSGS dynamically:

The ABL PROMSGS function can be used to direct to the necessary promsgs.xxx file under $DLC/prolang/xxx/ directory

Example:
/* this script assumes that the default installation 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.

 
Workaround
Notes
Keyword Phrase
Last Modified Date11/20/2020 7:36 AM

Powered by