Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Scrolling page using TBDSPL and )MODEL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
alexma

New User


Joined: 26 Feb 2009
Posts: 8
Location: Brazil

PostPosted: Thu Aug 06, 2009 7:29 am    Post subject: Scrolling page using TBDSPL and )MODEL
Reply with quote

Hi,

I create the following ISPF panel:

)ATTR
> type(TEXT) intens(HIGH) skip(OFF)
< type(TEXT) intens(LOW) skip(OFF)
# type(OUTPUT) intens(LOW) caps(OFF)
@ type(INPUT) intens(LOW) caps(OFF)
_ type(INPUT) intens(LOW) caps(OFF) hilite(USCORE)

)BODY window(70,21)
<WMQTP005 >Channels Status<
<
> Command:_Z <
> Queue Manager:_Z < Filter:_Z <
> Channel Status:_Z< A-all R-Running S-Stopped T-Retrying
> Actions:<1-Channel Information 2-Reset Channel 3-Start Channel
<4-Stop Channel 5-Stop/Start Channel
> Current Chinit Status:#Z
>Act Channel Name Chltype ChStatus Conname Indoubt
> BytesSent BytesRcvd LastMsgD LastMsgT Msgs BufSent BufRcvd
> XMITQ Curdepth ChStaDa ChStaTi SubState RQMNAME
)MODEL ROWS(ALL)
_Z<#Z #Z #Z #Z #Z
#Z #Z #Z #Z #Z #Z #Z
#Z #Z #Z #Z #Z #Z

:
:
(etc)

I need display 3 line at time when I press PF7 or PF8. How I can do it using TBDISPL command? Is it possible?

Any response will be appreciate.

Best regards,
ALEX
Back to top
View user's profile Send private message

Pedro

Senior Member


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

PostPosted: Thu Aug 06, 2009 9:35 pm    Post subject: Reply to: Scrolling page using TBDSPL and )MODEL
Reply with quote

Yes, TBDISPL will do that, but id depends on the scrolling amount and size of the screen. For a group of three, you may get 1 or 2 lines that do not display.
Back to top
View user's profile Send private message
alexma

New User


Joined: 26 Feb 2009
Posts: 8
Location: Brazil

PostPosted: Fri Aug 07, 2009 10:43 pm    Post subject:
Reply with quote

Hi Pedro,

Thanks one more time for your respose.

Actually 3 lines has been displayed each time that use TBDISPL because I have diferent information on each line (please take a look the model definition below). Is there any specific parameter on TBDISPL command? OR should be a controlled by program?

)MODEL
_Z<#Z #Z #Z #Z #Z
#Z #Z #Z #Z #Z #Z #Z
#Z #Z #Z #Z #Z #Z

Thanks for your attention and help, as always.

Best rgards,
Alex
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Sat Aug 08, 2009 3:42 am    Post subject: Reply to: Scrolling page using TBDSPL and )MODEL
Reply with quote

Quote:
Yes, TBDISPL will do that, but id depends on the scrolling amount and size of the screen. For a group of three, you may get 1 or 2 lines that do not display.


Sorry, if I was not clear.

In your panel, you likely have several top lines that are static, followed by the scrollable area (your model lines).

On a default emulator screen size of 24 lines, you will get your static lines (say 7), plus 3 of the first row, plus the 3 of the second row, etc... but the last one on the visible may not show all three lines. You may have to scroll to see the remaining lines.
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 -> TSO/ISPF 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 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
No new posts DISPLAY FROM(.... No page Break knobi DFSORT/ICETOOL 3 Fri Jul 04, 2014 8:13 am
No new posts SYNCSORT - Pushing the data onto nex... mistah kurtz SYNCSORT 9 Wed Apr 30, 2014 3:02 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us