IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

TBADD returncode 20. What does it mean.


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
pravin madoori

New User


Joined: 29 Jan 2007
Posts: 25
Location: Hyderabad

PostPosted: Tue Jan 01, 2008 5:17 pm
Reply with quote

In my program i am getting a RC 20 for TBADD, from manuals I found it to be a severe error. what are the situations which cause sever error to tbadd?

In my code when i am not using key it's working , however if i use KEY it's giving sever error[rc 20].

My code sample:
KEYN = '(MCMFGNO)';
NLIST = '(field1,fielsd2)
CALL ISPLINK ('TBCREATE',table1,KEYN,NLIST,'NOWRITE','REPLACE',
' ','SHARE'); ,
CALL ISPLINK('TBADD',table1,' ','ORDER');
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Jan 01, 2008 5:21 pm
Reply with quote

After the TBADD, use VGET for ZERRLM and ZERRSM and display them.

Other options are: (1) run the Dialog trace facility; (2) Use ISPVCALL; (3) Use the TRACE keyword in batch.

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

New User


Joined: 29 Jan 2007
Posts: 25
Location: Hyderabad

PostPosted: Tue Jan 01, 2008 5:40 pm
Reply with quote

I am getting below numeric values instead of message text.
ZERRLM : 0.00000E+00
ZERRSM : 0.00000E+00 .

From manual I see below definition:
ZERRSM Short-message text in which variables have been resolved.
ZERRLM Long-message text in which variables have been resolved.
ZERRHM The name of a Help panel, if one was specified in the message
definition.
ZERRALRM The value YES if an alarm was specified in the message definition
(.ALARM=YES); otherwise, the value NO.
ZERRMSG, ZERRSM, and ZERRLM are changed only when the return code from a
DM component service is greater than 8.
These system variables are in the function pool, if it exists
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Tue Jan 01, 2008 6:55 pm
Reply with quote

Are you running in batch or in foreground?

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

New User


Joined: 29 Jan 2007
Posts: 25
Location: Hyderabad

PostPosted: Tue Jan 01, 2008 10:32 pm
Reply with quote

I am running in batch.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Tue Jan 01, 2008 11:32 pm
Reply with quote

And do you have all of the ISPF libraries that are allocated to your online TSO session allocated to the batch job ?
Back to top
View user's profile Send private message
pravin madoori

New User


Joined: 29 Jan 2007
Posts: 25
Location: Hyderabad

PostPosted: Wed Jan 02, 2008 5:31 am
Reply with quote

TBADD is working fine if I am using empty keylist.. it's giving problem when I am using Key.

My key field lenth is 7. Keyn size i am using is 150B..I do not think this is the issue.

Key field is declared like below:
DCL

FLENGTH = 7;
CALL ISPLINK('VDEFINE','(MCMFGNO)',MCMFGNO,'CHAR',FLENGTH);
DCL MCMFGNO CHAR (07) STATIC INIT('');

Key list is declared like below:
DCL KEYN CHAR (150) STATIC INIT('');

KEYN = '(MCMFGNO)';


Is there any meterial where I can see examples with explanation , for beginer. for instant I am not clear on how to declare variables for Key list, dialog table list.I am just assuming that it should be greater than sum of list of variables.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Wed Jan 02, 2008 12:11 pm
Reply with quote

It is always a good practice to start by reading the fine manual.

In this manual, under the ISPSTART syntax, please read how to use TRACE and TEST keywords in batch. I found it very helpfull when debugging.

O.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed Jan 02, 2008 12:44 pm
Reply with quote

it' s a pity that the manual has disappeared in the latest releases...

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ISPEXA01/CCONTENTS?SHELF=ISP4BK07&DN=SC28-1282-01&DT=19961113104903
Back to top
View user's profile Send private message
pravin madoori

New User


Joined: 29 Jan 2007
Posts: 25
Location: Hyderabad

PostPosted: Tue Jan 22, 2008 11:19 am
Reply with quote

I found what is the problem. I was using key name as S_MFGNO, which is not valide.. it would have been smfgno.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Jan 22, 2008 8:42 pm
Reply with quote

Thank you for posting your solution icon_smile.gif

d
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Returncode from BPXWDYN not to be fou... COBOL Programming 8
This topic is locked: you cannot edit posts or make replies. Check if file is empty and pass retur... JCL & VSAM 15
No new posts Query regarding ISPF table - TBADD an... TSO/ISPF 2
No new posts SQL returncode -000100001 DB2 1
No new posts IMS Abend - U4088 returncode = 3EC IMS DB/DC 1
Search our Forums:

Back to Top