View previous topic :: View next topic
|
Author |
Message |
scorp_rahul23
New User
Joined: 06 May 2008 Posts: 96 Location: Delhi
|
|
|
|
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 |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
or SCREEN? |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
and... how does this relate to dfsort/icetool ???
please clarify and the topic will be moved where it belongs |
|
Back to top |
|
|
scorp_rahul23
New User
Joined: 06 May 2008 Posts: 96 Location: Delhi
|
|
|
|
One a new screen.
And by mistake I posted in DFSORT, it was supposed to be in REXX |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
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 |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
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 |
|
|
epicdave
New User
Joined: 11 Oct 2007 Posts: 20 Location: New York
|
|
Back to top |
|
|
scorp_rahul23
New User
Joined: 06 May 2008 Posts: 96 Location: Delhi
|
|
|
|
Thanks for helping.
I found the command from the post
"ISPEXEC SELECT PGM(CLRSCRN)" |
|
Back to top |
|
|
prino
Senior Member
Joined: 07 Feb 2009 Posts: 1306 Location: Vilnius, Lithuania
|
|
|
|
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 |
|
|
VishnuPrakash
New User
Joined: 10 Jun 2010 Posts: 10 Location: Bangalore
|
|
|
|
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 |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
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 |
|
Back to top |
|
|
VishnuPrakash
New User
Joined: 10 Jun 2010 Posts: 10 Location: Bangalore
|
|
|
|
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 |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
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 |
|
|
eprasad629
New User
Joined: 25 Sep 2009 Posts: 9 Location: Bangalore
|
|
|
|
Hi,
Please try with "clr3270" command. This will clear the screen and it's not site specific. |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
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 |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2546 Location: Silicon Valley
|
|
|
|
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 |
|
|
Josh Keller
New User
Joined: 08 Oct 2007 Posts: 36 Location: Columbia, SC
|
|
|
|
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 |
|
|
|