Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Displaying SAY staement on a new page

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 90
Location: Chennai

PostPosted: Sun Aug 29, 2010 3:11 pm    Post subject: Displaying SAY staement on a new page
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    Post subject:
Reply with quote

Quote:
On a new page


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

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Sun Aug 29, 2010 3:39 pm    Post subject: Reply to: Displaying SAY staement on a new page
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: 90
Location: Chennai

PostPosted: Sun Aug 29, 2010 4:19 pm    Post subject: Reply to: Displaying SAY staement on a new page
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

Moderator Team Head


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

PostPosted: Sun Aug 29, 2010 5:20 pm    Post subject: Reply to: Displaying SAY staement on a new page
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    Post subject:
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    Post subject: Reply to: Displaying SAY staement on a new page
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: 90
Location: Chennai

PostPosted: Mon Aug 30, 2010 12:19 am    Post subject: Reply to: Displaying SAY staement on a new page
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

Active Member


Joined: 07 Feb 2009
Posts: 982
Location: Oostende, Belgium

PostPosted: Mon Aug 30, 2010 1:55 am    Post subject:
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    Post subject:
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: 8593
Location: Back in jolly old England

PostPosted: Wed Nov 17, 2010 3:44 pm    Post subject:
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    Post subject:
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: 7904
Location: Bellevue, IA

PostPosted: Wed Nov 17, 2010 5:18 pm    Post subject:
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    Post subject: Reply to: Displaying SAY staement on a new page
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: 2360
Location: Israel

PostPosted: Tue Nov 30, 2010 11:39 pm    Post subject:
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

Senior Member


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

PostPosted: Wed Dec 01, 2010 2:44 am    Post subject: Reply to: Displaying SAY staement on a new page
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts ALTER of an IDMS AREA with NEW/OLD pa... Awanti IDMS/ADSO 2 Mon Mar 14, 2016 10:01 pm
No new posts XML generated from cobol is displayin... vangeti COBOL Programming 2 Wed Aug 19, 2015 5:16 pm
No new posts Displaying records per contract and a... madishpa DFSORT/ICETOOL 2 Mon Feb 16, 2015 7:39 pm
No new posts How to do page navigation in REXX? Gopalakrishnan V TSO/ISPF 3 Mon Nov 24, 2014 6:36 pm
No new posts code for page navigation in a panel Gopalakrishnan V TSO/ISPF 5 Thu Nov 13, 2014 7:14 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us