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
 

 

TBDISPL and using REMPOP displays

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

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Mon Mar 19, 2007 8:46 pm    Post subject: TBDISPL and using REMPOP displays
Reply with quote

Is there a problem in ISPF when using a popup panel for the display of an ISPF table.?? I created a 17 line by 32 column panels using the MODEL
statement for my TBDISPL command to populate the popup. I have in the
panel the )BODY window(32,17). In my REXX I issue a ADDPOP command
ADDPOP ROW(2) COLUMN(20). I then issue the following TBDISPL command
TBDISPL" DB2TABS "PANEL(ISPFDTAB) CURSOR(ACTION) AUTOSEL(NO)
ROWID(ACTROW)"
all is fine at this point in time, then I make several selections and press
the ENTER KEY, the first line of data from the selection is build into a
parameter that is passed to another REXX that issue a BROWSE command
on the PDS with the MEMBER that was selected. The first thing I do before
invoking the other REXX is issue a REMPOP and then the call to the second
REXX, again all is fine and the member is displayed, upon returning from the
second REXX and trying to process the second selection the TBDISPL command fails with a return code of 20. If I remove the REMPOP all of the
selection are displayed but in the POPUP window(32,17) and you can not
see all of the member data. Is it that you can not use a TBDISPL with a
popup that is calling another REXX that uses the BROWSE or EDIT services.
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Tue Mar 20, 2007 12:44 am    Post subject:
Reply with quote

Use dialog trace option to display some meaningfull error messages (ZERRSM, ZERRLM).

My recommendation: put the ADDPOP/REMPOP surrounding the TBDISPL loop. Don't play with ADDPOP/REMPOP across routines.

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

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Tue Mar 20, 2007 12:51 am    Post subject:
Reply with quote

That is what I have done, but the TBDISPL has lost it table pointers
when returning from the full screen BROWSE back to the POPUP
window display of the table.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Tue Mar 20, 2007 11:31 am    Post subject:
Reply with quote

Did you manage to see a "real" error message using trace options?

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

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Tue Mar 20, 2007 7:54 pm    Post subject:
Reply with quote

Yes, the problem boils down to that you can not have a POPUP TBDISPL then issue a REMPOP, call a full screen panel display like Browse and then
issue a ADDPOP command before issueing the TBDISPL without the panel name to process the next selection from the original TBDISPL panel display. You get the following error message.

ISPT050

Unable to process reinvocation.

Current Dialog Statement:
TBDISPL DB2TABS ROWID(ACTROW)
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Thu Mar 22, 2007 12:22 am    Post subject:
Reply with quote

The answer to the problem, was to use the select command with the SUSPEND option to use the popup selection panel and the full screen display panel.icon_smile.gif



Thanks to all that responded.
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 Remove unnecessary displays in cobol vickey_dw COBOL Programming 3 Mon Jun 29, 2015 1:41 pm
No new posts Capturing Cobol Program Displays luis_pr TSO/ISPF 1 Wed Jun 03, 2015 5:01 am
No new posts Trouble Scrolling TBDISPL in my Panel thesumitk TSO/ISPF 6 Mon Sep 09, 2013 3:03 pm
No new posts Forcing a single (or no) selection wi... PeterHolland TSO/ISPF 5 Thu Aug 30, 2012 4:15 pm
No new posts Displays after EOF not working Gayathri P CA Products 5 Tue Jun 26, 2012 4:03 pm


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