Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

shift to 132 columns

Status
Not open for further replies.

gregor weertman

Programmer
Sep 29, 2000
195
NL
How do I tell Progress that I shifted to 132 columns
in order for progress to use them?
My screen has 132 columns but progress uses only 80 and displays a scrollbar.

please help.

Gregor.Weertman@mailcity.com
 
gregor,
are u using a display statement and the default progress frame? if so, it may be because of the way progress likes to do things it's own way. you may wnat to try defining your own frame.

regards,

longhair
 
When I put the screen on 132 with: display chr(27) + "[?03h" en run

repeat:
display fill( "X", 100) format "X(100)" with down width 132.
end.

I will get a scrollbar and only 80 columns are used by Progress.



Gregor.Weertman@mailcity.com
 
gregor,

you can try creating your own frame rather than using the default progress one.

def frame f-1.

repeat:
display ... with frame f-1
end.

regards,

longhair
 
it's the TERMINAL variable.

In my case it's vt220.
when I put it on vt220w
progress checks the protermcap and sends the correct
esc seguence to the console which puts it on 132 columns.
It also checkes the TERMINAL var when creating a frame.
when it is vt220w(ide) it makes 132 column frames when
asked. On the normal vt220 it creates a scrollbar of 80
columns when asked for a 132 columns frame.

Regards Gregor.

Gregor.Weertman@mailcity.com
 
Hi,
Use the TERMINAL statement. Make shure your PROTERMCAP has the definitions for the terminal emulations you want to use.
Example from the dynatext documentation.

FOR EACH customer:
DISPLAY customer.
END.
TERMINAL = "wy60w".
OUTPUT TO TERMINAL PAGED.
FOR EACH customer:
DISPLAY customer WITH WIDTH 132.
END.
OUTPUT CLOSE.
TERMINAL = "wy60".
DISPLAY "Back to 80 columns." WITH CENTERED.
 
Hi,
Use the TERMINAL statement. Make shure your PROTERMCAP has the definitions for the terminal emulations you want to use.



FOR EACH customer:
DISPLAY customer.
END.
TERMINAL = "wy60w".
OUTPUT TO TERMINAL PAGED.
FOR EACH customer:
DISPLAY customer WITH WIDTH 132.
END.
OUTPUT CLOSE.
TERMINAL = "wy60".
DISPLAY "Back to 80 columns." WITH CENTERED.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top