2 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Assembler calling DSNTAIR
Thanks for the response Shmuel.
COMPLETION CODE SYSTEM = 0C4 REASON CODE = 0004
I am usually a CICS programmer, so batch abends are slightly foreign to me.
My own program's savearea is addressed by R13. What fo
rv.ua.edu>
Sent: Friday, April 13, 2018 11:55 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Assembler calling DSNTAIR
On Fri, 13 Apr 2018 15:23:04 +, Seymour J Metz wrote:
>What format save area does R13 point to?
ITYM how big of a save area does R13 point to when he makes the
call. A
;-Original Message-
:>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of John Gateley
:>Sent: 15 April 2018 21:10
:>To: IBM-MAIN@LISTSERV.UA.EDU
:>Subject: Re: Assembler calling DSNTAIR
:>
:>ATTENTION! This email originated outside of DTCC;
(Green)
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of John Gateley
Sent: 15 April 2018 21:10
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler calling DSNTAIR
ATTENTION! This email originated outside of DTCC; exercise caution.
I
OK
пн, 16 апр. 2018 г., 3:20 John Gateley :
> I use this code to get the error message from DSNTIAR
>
> CALL_PARM DS 0F
> PARM_1 DC A(SQLCA)
> PARM_2 DC A(MSGLEN)
> PARM_3 DC A(MSGSIZE)
>
> MSGSIZE DC
I use this code to get the error message from DSNTIAR
CALL_PARM DS 0F
PARM_1 DC A(SQLCA)
PARM_2 DC A(MSGLEN)
PARM_3 DC A(MSGSIZE)
MSGSIZE DC F'72' LENGTH OF EACH LINE
MSGAREA DS H,CL(20*72)
It is also likely that you should never use the LINKINST parameter of the
CALL macro unless the documentation of the target routine tells you that
you should.
If you call a routine that expects to be called by BASR/BALR, it might
well not work properly if called by BASSM (particularly with
On Fri, 13 Apr 2018 14:24:19 + "Ward Able, Grant"
wrote:
:>I have an Assembler program linked AMODE(31) RMODE(24). It makes SQL calls
and under some circumstances I will call DSNTIAR to printout the DB2 error &
diagnostic info.
:>The call statement I am using for this
On Fri, 13 Apr 2018 15:23:04 +, Seymour J Metz wrote:
>What format save area does R13 point to?
ITYM how big of a save area does R13 point to when he makes the
call. A save area does not have a format until a program saves its
caller's registers in it according to some format.
--
Tom
On Fri, 13 Apr 2018 14:24:19 +, Ward Able, Grant wrote:
>I have an Assembler program linked AMODE(31) RMODE(24). It makes SQL calls and
>under some circumstances I will call DSNTIAR to printout the DB2 error &
>diagnostic info.
>The call statement I am using for this is:
>
>CALL
: Assembler calling DSNTAIR
ATTENTION! This email originated outside of DTCC; exercise caution.
What format save area does R13 point to? Is DSNTIAR linked with you or are you
doing a LOAD? What is the reason code for the 0C4 (I hate the overloading!)?
Have you looked at the failing code?
--
Shmuel
From: IBM Mainframe Discussion List <IBM-MAIN@listserv.ua.edu> on behalf of
Ward Able, Grant <gwarda...@dtcc.com>
Sent: Friday, April 13, 2018 10:24 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Assembler calling DSNTAIR
I have an Assembler program linked AMODE(31) RMODE(24). It mak
I have an Assembler program linked AMODE(31) RMODE(24). It makes SQL calls and
under some circumstances I will call DSNTIAR to printout the DB2 error &
diagnostic info.
The call statement I am using for this is:
CALL DSNTIAR,(SQLCA,(6),LRECL),LINKINST=BASSM,MF=(E,PARM)
Yet I am getting an
13 matches
Mail list logo