Progress
Language Reference


USE Statement

Interfaces
OS
SpeedScript
All
Windows only
No

Specifies environment defaults that apply to subsequent windows that the application creates. The defaults might reside in the registry or in an initialization file. The defaults can involve colors, fonts, environment variables, etc. You must specify a default in a LOAD statement before you specify it in a USE statement.

SYNTAX

USE environment [ NO-ERROR ] 

environment

A CHARACTER expression that evaluates to the name of a current environment. If environment is non-null, it must have appeared in a prior LOAD Statement. If environment is the null string (""), the default environment becomes the current environment.

NO-ERROR

Directs Progress to suppress any errors that occur in the attempt use the environment file specifications. After the USE statement completes, you can check the ERROR-STATUS system handle for information on suppressed errors.

EXAMPLE

This procedure loads two files, env1.ini and env2.ini, each of which contains a font definition for font0. The program displays a character string in the Progress default window using the definition for font0 from env1.ini. It then creates a new window and displays the same character string using the definition for font0 from env2.ini. Note that the procedure creates the window after the USE Statement.

r-use.p
DEFINE VARIABLE w1 AS CHARACTER VIEW-AS TEXT FONT 0 FORMAT "x(34)"
  INITIAL "This is font 0 in the first window".
DEFINE VARIABLE w2 AS CHARACTER VIEW-AS TEXT FONT 0 FORMAT "x(35)"
  INITIAL "This is font 0 in the second window".
DEFINE VARIABLE new_win AS WIDGET-HANDLE.

LOAD "env1".
LOAD "env2".

USE "env1".

DISPLAY w1 WITH NO-LABELS WITH FRAME a.
PAUSE.

USE "env2".
CREATE WINDOW new_win.
CURRENT-WINDOW = new_win.
DISPLAY w2 in WINDOW new_win WITH NO-LABELS WITH FRAME b.
PAUSE.

DELETE WIDGET new_win. 

This procedure depends on the existence of files named env1.ini and env2.ini, each of which contains a font definition for font0. If you run this procedure in your environment, you must create these files.

NOTES

SEE ALSO

GET-KEY-VALUE Statement, LOAD Statement, PUT-KEY-VALUE Statement


Copyright © 2004 Progress Software Corporation
www.progress.com
Voice: (781) 280-4000
Fax: (781) 280-4095