IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Displaying SAY staement on a new page


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 96
Location: Delhi

PostPosted: Sun Aug 29, 2010 3:11 pm
Reply with quote

When I am running any EXEC statement the Display whic I have given in my logic is coming on same page.
Code:

  Menu  List  Mode  Functions  Utilities  Help                                 
ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
                              ISPF Command Shell                               
Enter TSO or Workstation commands below:                                       
                                                                               
===> exec 'SS5661.SATS.PULL.TOOL.JCLLIB(TETSING)'                             
                                                                               
                                                                               
                                                                               
Place cursor on choice and press enter to Retrieve command                     
                                                                               
=> exec 'SS5661.SATS.PULL.TOOL.JCLLIB(TETSING)'                               
 
***************************************************************************   
*****                 WELCOME TO THE REPORT GENERATION UTILITY        *****   
***************************************************************************   
                                                                               
***                                                                           


I want it to come like this. On a new page
Code:

***************************************************************************   
*****                 WELCOME TO THE REPORT GENERATION UTILITY        *****   
***************************************************************************   


Can someone help
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Sun Aug 29, 2010 3:36 pm
Reply with quote

Quote:
On a new page


or SCREEN?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Sun Aug 29, 2010 3:39 pm
Reply with quote

and... how does this relate to dfsort/icetool ???
please clarify and the topic will be moved where it belongs
Back to top
View user's profile Send private message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 96
Location: Delhi

PostPosted: Sun Aug 29, 2010 4:19 pm
Reply with quote

One a new screen.

And by mistake I posted in DFSORT, it was supposed to be in REXX
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Sun Aug 29, 2010 5:20 pm
Reply with quote

If your application is being designed to run in the foreground and interact with the end user, then you probably want to design it as an ISPF application, with panels, tables, messages, and what not. Otherwise, in TSO, it will run the way TSO applications are designed to run.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Sun Aug 29, 2010 5:49 pm
Reply with quote

Quote:
it will run the way TSO applications are designed to run.


which means it will force a new page when the previous screen is full,
since it effectively is only a 'Write to screen, next line'.
Back to top
View user's profile Send private message
epicdave

New User


Joined: 11 Oct 2007
Posts: 20
Location: New York

PostPosted: Sun Aug 29, 2010 9:53 pm
Reply with quote

I did some digging and found another thread on this board with the answer. It seems that you can't do it from TSO. You can, however, write a simple assembler module that will do it for you.

here is the thread with the source for the asm module


here is a link to the IBM pub that describes the STLINENO macro
Back to top
View user's profile Send private message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 96
Location: Delhi

PostPosted: Mon Aug 30, 2010 12:19 am
Reply with quote

Thanks for helping.

I found the command from the post

"ISPEXEC SELECT PGM(CLRSCRN)"
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Mon Aug 30, 2010 1:55 am
Reply with quote

CLRSCRN is an utterly site-specific command. Do not count on it being present on any other systems.

A good, ISPF-aware version can be found at Doug Nadel's site, ISPCLEAR.
Back to top
View user's profile Send private message
VishnuPrakash

New User


Joined: 10 Jun 2010
Posts: 10
Location: Bangalore

PostPosted: Wed Nov 17, 2010 3:39 pm
Reply with quote

Hi

There is a command which will clear the screen

TSOPCLER

This command clears the 3270 display screen and places
the cursor at row 1, column 1 position.

Note: if you want to run this command form TSO command line then give the command as TSO TSOPCLER
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Nov 17, 2010 3:44 pm
Reply with quote

VishnuPrakash wrote:
There is a command which will clear the screen
TSOPCLER
This command clears the 3270 display screen and places
the cursor at row 1, column 1 position.

Code:
IKJ56500I COMMAND TSOPCLER NOT FOUND
Perhaps your little gem may also be site specific icon_rolleyes.gif
Back to top
View user's profile Send private message
VishnuPrakash

New User


Joined: 10 Jun 2010
Posts: 10
Location: Bangalore

PostPosted: Wed Nov 17, 2010 5:12 pm
Reply with quote

Oh!! it might me site specific

Actually i gave the command QW CLEAR in TSO (its like HELP menu) to check is there any commands to clear the screen... i found this command in HELP

but there might be some commands to clear the screen in your shop...try to find out using HELP or QW
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Nov 17, 2010 5:18 pm
Reply with quote

VishnuPrakash, QW is QuickRef, which is an installed package from a software vendor that is not free. It is site-specific and not all sites have it available.
Back to top
View user's profile Send private message
eprasad629

New User


Joined: 25 Sep 2009
Posts: 9
Location: Bangalore

PostPosted: Tue Nov 30, 2010 11:15 pm
Reply with quote

Hi,

Please try with "clr3270" command. This will clear the screen and it's not site specific.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Nov 30, 2010 11:39 pm
Reply with quote

Quote:
Please try with "clr3270" command. This will clear the screen and it's not site specific.


It is site specific. Actually, it is a TSO command you can download from CBT's file 119.

Why are you so sure that this is not site specific?

O.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Wed Dec 01, 2010 2:44 am
Reply with quote

Dave said:
Quote:
It seems that you can't do it from TSO. You can, however, write a simple assembler module that will do it for you.


Why don't you guys believe Dave?
Back to top
View user's profile Send private message
Josh Keller

New User


Joined: 08 Oct 2007
Posts: 36
Location: Columbia, SC

PostPosted: Sat Dec 04, 2010 3:25 am
Reply with quote

When I precede a REXX with % it starts the output on a new screen.

However, I'm not using the TSO EX command. I'm running straight from the command line.


ex:
TSO %REXXTEST


Of course you'll have to allocate SS5661.SATS.PULL.TOOL.JCLLIB to your SYSEXEC then you could type TSO %TETSING on the command line to achieve your result.

Unfortunately it sounds like you want to do this within the REXX itself. If I had a desire to do this, I would get the MOD size of my screen, then send a number of blank SAY statements until it rolls over to a new screen.

I notice my ISPF session seems to consistently start output at line 40 and I can display a max of 43 lines, so if I send 3 say statements, I will be on the top of a new screen.


OR just write a panel, its much easier.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts IBM OnDemand Folders displaying to al... IBM Tools 6
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts IMS queue causing page through diffic... IMS DB/DC 1
No new posts Back Page print direction (Duplex Pri... JCL & VSAM 3
No new posts Parsing single liner XML into readabl... COBOL Programming 1
Search our Forums:

Back to Top