U4086 abends

[George Lewandowski]

We are converting the CAS package to LE COBOL and are having problems:

1. We have a DC COBOL program that is calling another COBOL program.
The statement is:
CALL DATECON3 USING DATEFORM.
This statement work just fine in our test region but in our QA
region we get the UFC6 abend reason code 1.
I have checked all of the programs and all are 31, any. Any
ideas.....

2. We have another program that we are trying to convert. The LE COBOL
version works just fine in test but in
Production we are getting:
TASK:AMMI; LOAD OF CSRL16JL FAILED-EITHER NOT DEFINED TO SYSTEM,
DISABLED
TASK:AMMI PROG:AMM53000 ABENDED WITH CODE D002
We do not know what CSRL16JL is or how it gets called by the
program.....

TIA

George Lewandowski

[Allen D. Hathaway]

Hi George,

Regarding Issue #1... One thing to check in the LINK EDIT options for
DATECON3. It should include RENT.

Allen

[Steve Terry]

George,
we also had the 'LOAD OF CSRL16JL FAILED-EITHER NOT DEFINED TO SYSTEM'
problem and, if I remember correctly, I traced it to an assembler module
being called from a LE program, and the assembler program messing up the
return address. I believe that the problem was because the high order bit of
the return address was being set incorrectly due to the addressing mode that
the module was being called in changing between COBOL II and LE/370.
Hope this helps,

Steve

Steve Terry
computing partners
BT

[George Lewandowski]

To All,

In problem 1, I have relinked the program and it now has RENT.
also the program does the call, the called program does a
GOBACK.
I do not know if this makes any difference..

In problem 2,the program does a TRANSFER RETURN to the called sub program
and the sub-program does a DC RETURN. This is the only call is has.

GL.

Steve Terry
<steve.r.terry@BT. To: IDM...@LISTSERV.IUASSN.COM
COM> cc:
Sent by: IDMS Subject: Re: U4086 abends
Public Discussion
Forum
<IDMS-L@LISTSERV.I
UASSN.COM>

10/16/01 10:25 AM
Please respond to
IDMS Public
Discussion Forum

[Walter Van den Wijngaert]

Regarding problem #2:

We had the same one twice a few years ago. CSRL16JL is a LE/370 module which resides in the CSRL16JC module. This module normally is
loaded in LPA, but when IDMS needs it, it tries to find it in the CDMSLIB concatenation, without any luck offcourse. Take a look at
LO44428 and LS31790. I don't remember what release we were on at that time, but it point you in the right direction.

HTH,

Regards,

Walter Van den Wijngaert.

System Database Programmer
EDP Infrastructure
National Bank of Belgium
de Berlaimontlaan 14
B-1000 Brussels (Belgium)
Tel ++32-2-221.29.65
Fax ++32-2-221.30.92
GSM ++32-478-38.01.83
walter.vand...@nbb.be

> -----Original Message-----
> From: IDMS Public Discussion Forum
> [mailto:IDM...@LISTSERV.IUASSN.COM]On
> Behalf Of George Lewandowski
> Sent: dinsdag 16 oktober 2001 17:06
> To: IDM...@LISTSERV.IUASSN.COM
> Subject: U4086 abends
>
>

Visit our website! http://www.nbb.be

"DISCLAIMER: The content of this e-mail message does not constitute a commitment of the National Bank of Belgium (NBB) except where provided for in a written agreement between you and the NBB or where confirmed with a written form approved according to the internal regulations of the NBB.
Besides, the statements and opinions expressed in this e-mail message are those of the author of the message and do not necessarily represent those of the NBB.
The e-mail message contains proprietary information intended for the intended recipient only. If an addressing or transmission error has misdirected this e-mail, please notify the author. If you are not the intended recipient you must not use, disclose, distribute, copy, print or rely on any part of this e-mail message."