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
 
How do I define Panel with columns that exceed the Window

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

New User


Joined: 26 Sep 2007
Posts: 24
Location: Bangalore

PostPosted: Mon Dec 31, 2007 6:04 pm    Post subject: How do I define Panel with columns that exceed the Window
Reply with quote

Hi,


I was not able define panel with in the window limit. How can add coulmns and displayed when scrolled to right?
Code:

 )BODY CMD(ZCMD)                                                                 
%---------------------CLAIMS PROCESSED FOR UNET SYSTEM--------------------------
 %COMMAND===> _ZCMD                                           %SCROLL ===>_AMT +
   +JOBNAME+        +CLAIM+  +CLAIM+     +INPUT+ +OUTPUT+ +ERROR+ +REPORT+     
                    +PROC+   +REJECT+    +FILE+  +FILE+   +FILE+  +FILE+       
%-------------------------------------------------------------------------------
)MODEL                                                                         
#Z +@JOBN   +        +@CNTP  + +@CNTR  ++@NINP   @NOUT    @NERR   @NREP         +

Coulmns list
JOBN
CNTP
CNTR
NINP
NOUT
NERR
NREP
NREQ
PREJ
NEXJ
TCLM
VEND
POLI
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10375
Location: italy

PostPosted: Mon Dec 31, 2007 6:48 pm    Post subject: Reply to: How do I define Panel with columns that exceed the
Reply with quote

ISPF will not do IT on its own

You need to define the appropriate numbers of panels, with the proper column names,
and in Your REXX script take care Yourself of horizontal scrolling

or , depending on your ISPF knowledge do it with dynamic areas;

In any case horizontal scrolling is a do it Yourself task
Back to top
View user's profile Send private message
praveenbl22
Currently Banned

New User


Joined: 26 Sep 2007
Posts: 24
Location: Bangalore

PostPosted: Wed Jan 02, 2008 10:28 am    Post subject:
Reply with quote

Hi,

How do i use the dynamic areas?. Can you give some sample code using Dynamic area to scroll Horizontally as i did not find any examples using the dynamic area for scrolling Horizontal.But there are many exampels to scroll Vertically with DEPTH option.
Back to top
View user's profile Send private message
praveenbl22
Currently Banned

New User


Joined: 26 Sep 2007
Posts: 24
Location: Bangalore

PostPosted: Wed Jan 02, 2008 12:47 pm    Post subject:
Reply with quote

Hi enrico-sorichetti,

In the panel I was not able to write to the ZDATA and ZMLCOLD. How do write to the Variable from the file using the So/s rexx?
Previously i thought of using the table and models to write the contents of the file.But Know using area how do you Write the header to ZMLCOLD and the Data to the ZDATA
Code:


)ATTR  FORMAT(MIX)             
 @ TYPE(OUTPUT) INTENS(LOW)   
 # TYPE(INPUT) PAD( _ )       
 | AREA(DYNAMIC)               
 )BODY CMD(ZCMD) EXPAND(//)                                             
 +---------------------CLAIMS PROCESSED FOR UNET SYSTEM------------------------------+
 %REG OR ENGINE:@Z  %-----------JOB LIST---------------------%ROW  @Z   %OF @Z   +
 %COMMAND ===> #Z                                              %SCROLL ===>#Z   +
 |ZMLCOLD                                                               
 |ZDATA           
                                                     
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10375
Location: italy

PostPosted: Wed Jan 02, 2008 1:00 pm    Post subject: Reply to: How do I define Panel with columns that exceed the
Reply with quote

as I said for horizontal scrolling You are on Your own...

depending on the application and what You do with the data displayed

dynamic aeas might be simpler...
( only one panel for example )

for pseudo horizontal scrolling You should simply rfill the dynamica area
variables with the appropriate substring of Your data...

Y would go for example this way..

build the full data lines regardless of lenght,

fill the inital area with the proper substring of the data ( 1,80 )
when scrolling refill from the piont needed ( 81,80 )
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 Can EDCICONV convert EBCDIC to ASCII... natt.sut IBM Tools 3 Fri Nov 17, 2017 8:46 pm
No new posts Copy selected columns from 2 input fi... Poha Eater DFSORT/ICETOOL 3 Thu Nov 02, 2017 3:43 pm
No new posts Trace in CLIST PANEL cvnlynn CLIST & REXX 1 Thu Jun 22, 2017 11:06 pm
No new posts SCLM -- not installed -- panel ISRNOSLM dmitchell1105 IBM Tools 3 Fri Jun 09, 2017 10:41 pm
No new posts unload data from table with lob columns farhad_evan DB2 1 Sat Apr 22, 2017 1:32 pm

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