Kbase P102311: How to DISPLAY more than 80 columns on Windows GUI clients when using 'OUTPUT TO TERMINAL PAGED' sta
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
18/06/2010 |
|
Status: Verified
GOAL:
4GL/ABL: How to DISPLAY more than the default 80 columns and 25 rows on Windows GUI clients?
GOAL:
How to prevent DISPLAY statement records from wrapping around a Windows GUI client?
GOAL:
How to make the Windows GUI client screen larger?
GOAL:
How to output 320 columns wide when running a Windows graphical clients?
GOAL:
How to prevent scroll bars from appearing on the frame of the Windows GUI client?
GOAL:
How to resize the default screen of Windows GUI clients?
GOAL:
How to set the size of the output screen of a Windows GUI client?
FACT(s) (Environment):
Windows
Progress 9.x
OpenEdge 10.x
FIX:
1. To make the Windows GUI clients DISPLAY area more than the default 80 columns and 25 rows, set the CURRENT-WINDOW:WIDTH and the CURRENT-WINDOW:HEIGHT attribute to the desired sizes. For example, the following code displays the data in a 320 column by 40 row area:
CURRENT-WINDOW:WIDTH = 320.
CURRENT-WINDOW:HEIGHT = 40.
FOR EACH customer NO-LOCK:
DISPLAY
Customer.CustNum
Customer.Name
Customer.Contact
Customer.Address
Customer.City
Customer.State
Customer.PostalCode
Customer.Country
Customer.SalesRep
Customer.CreditLimit
Customer.Balance
WITH WIDTH 320.
END.
2. To prevent the displayed data from wrapping around the window, use the STREAM-IO option of the DISPLAY statement or increase the CURRENT-WINDOW:WIDTH attribute:
CURRENT-WINDOW:WIDTH = 320.
CURRENT-WINDOW:HEIGHT = 45.
FOR EACH customer NO-LOCK:
DISPLAY
Customer.CustNum
Customer.Name
Customer.Contact
Customer.Address
Customer.City
Customer.State
Customer.PostalCode
Customer.Country
Customer.SalesRep
Customer.CreditLimit
Customer.Balance
WITH WIDTH 320 STREAM-IO NO-ERROR.
END.
3. To suppress the scroll bars from appearing on the frame, use the OUTPUT TO TERMINAL PAGED statement. For example:
CURRENT-WINDOW:WIDTH = 320.
CURRENT-WINDOW:HEIGHT = 45.
OUTPUT TO TERMINAL PAGED.
FOR EACH customer NO-LOCK:
DISPLAY
Customer.CustNum
Customer.Name
Customer.Contact
Customer.Address
Customer.City
Customer.State
Customer.PostalCode
Customer.Country
Customer.SalesRep
Customer.CreditLimit
Customer.Balance
WITH WIDTH 320 STREAM-IO NO-ERROR.
END.
OUTPUT CLOSE.