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
 

 

Showing underscores in panel tables

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

New User


Joined: 21 Jun 2007
Posts: 3
Location: Madrid, Spain

PostPosted: Tue Jan 25, 2011 8:26 pm    Post subject: Showing underscores in panel tables
Reply with quote

Hi
I have a very simple panel with a table, showing one column which I feed through a COBOL program using TBCREATE, TBADD, ...
The variable is created in the program (using VDEFINE) as a CHAR(8). The problem comes when the value contains an underscore (_), which causes an error 20 when adding a row with TBADD. i've changed the panel to avoid the use of underscore in the ATTR section, but the problem persists. Any suggestions?
Back to top
View user's profile Send private message

Josh Keller

New User


Joined: 08 Oct 2007
Posts: 36
Location: Columbia, SC

PostPosted: Tue Jan 25, 2011 9:51 pm    Post subject:
Reply with quote

You should override the values using the DEFAULT statement.

Code this with your )ATTR statement.

Code:
)ATTR DEFAULT(%+_)


Then override the "_" with something else.


From the manual:
Quote:
DEFAULT(def1def2def3)
You can use the DEFAULT keyword to specify the characters that define a high-intensity text field, a low-intensity text field, and a high-intensity input field, respectively. The value inside the parentheses must consist of exactly three characters, not enclosed in single quotes and not separated by commas or blanks.
The DEFAULT keyword can also be specified on the )ATTR section statement.
Back to top
View user's profile Send private message
Faeton

New User


Joined: 21 Jun 2007
Posts: 3
Location: Madrid, Spain

PostPosted: Wed Jan 26, 2011 1:06 pm    Post subject:
Reply with quote

Hi, Josh

Thanks, but I've already tried that, and the problem is still there. It's not about showing underscores as part of the text in the ispf panel, but about the values of the variable i'm sending via TBADD from a COBOL program. The panel shows some data about a DB2 module, including the name of the collection. If that name contains underscores, the execution of TBADD fails.
Back to top
View user's profile Send private message
Ronald Burr

Active User


Joined: 22 Oct 2009
Posts: 293
Location: U.S.A.

PostPosted: Wed Jan 26, 2011 6:46 pm    Post subject:
Reply with quote

Suggest that you run your dialog under test with variable trace turned on to see if/where the error is occurring.
I feel that there must be something exotic about what you are doing that is unrelated to the fact that a variable contains an underscore. In most of the Table dialogs I've written, I set the default value of variables to underscores to represent fields which have not yet been given "real" values by a user, and I have yet to see one fail due to the value of a variable containing an underscore.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Wed Jan 26, 2011 9:48 pm    Post subject: Re: Showing underscores in panel tables
Reply with quote

Faeton wrote:
The problem comes when the value contains an underscore (_), which causes an error 20 when adding a row with TBADD.

I doubt that the underscore is the cause of the error.
Double check your code.
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 642
Location: Whitby, ON, Canada

PostPosted: Wed Jan 26, 2011 11:22 pm    Post subject:
Reply with quote

Are you using NOBSCAN on your VDEFINE?
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Jan 27, 2011 2:43 am    Post subject: Reply to: Showing underscores in panel tables
Reply with quote

run in dialog test and look at ZERRMSG andZERRLM immediately after the failure.
Back to top
View user's profile Send private message
Faeton

New User


Joined: 21 Jun 2007
Posts: 3
Location: Madrid, Spain

PostPosted: Thu Jan 27, 2011 1:28 pm    Post subject: Re: Showing underscores in panel tables
Reply with quote

Marso wrote:
Faeton wrote:
The problem comes when the value contains an underscore (_), which causes an error 20 when adding a row with TBADD.

I doubt that the underscore is the cause of the error.
Double check your code.


When the variable doesn't contain an underscore, the process works fine. It's a bit puzzling...

Adding NOBSCAN doesn't help...
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Jan 27, 2011 8:31 pm    Post subject: Reply to: Showing underscores in panel tables
Reply with quote

Quote:
It's a bit puzzling...


That is when you go into the detailed debugging. Traces, dialog test, etc...

Can you simplify your program and show us? VDEFINE, TBCREATE, assign variable, TBADD.
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
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts Is the 'prompt' data for the DSLIST p... Willy Jensen TSO/ISPF 2 Tue Dec 06, 2016 4:38 am
No new posts Getting list of tables defined under ... kishpra DB2 2 Wed Aug 24, 2016 10:36 am
No new posts Rexx Panel Validation ajithajt CLIST & REXX 6 Sun Jul 17, 2016 10:50 pm
No new posts ISPF Tables Creation newsysprg TSO/ISPF 6 Wed Jul 13, 2016 2:21 pm


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