User abend 4038



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

User abend 4038

Postby surime72 » Thu Feb 28, 2013 10:16 am

Hi,

can any one how to resolve this error, i was facing these error while running job.

A user abend,4038,occurred in module CEEPLPKA at offset X'D3E40'.


THE REFERENCE TO TABLE REPB1-OPTION-CODE BY VERB NUMBER 01 ON LINE
001638 ADDRESSED AN AREA OUTSIDE THE REGION OF THE TABLE.,
surime72
 
Posts: 107
Joined: Sun Oct 23, 2011 1:45 pm
Has thanked: 0 time
Been thanked: 0 time

Re: User abend 4038

 

Re: User abend

Postby BillyBoyo » Thu Feb 28, 2013 11:27 am

On line 1638 in your compile listing, you will find a reference to a table with OCCURS. The field being used to reference the table (a subscript or an index, defined by INDEXED BY) is pointing at an entry in the table of zero or less, or of greater than the number of entries in the table. You have compiled with option SSRANGE, and this is what it does, it does "bounds checking" for you.

Note, use of reference-modification will also be checked, which need not be used for a table.

Whatever you are using on line 001638, it is accessing storage that is not part of the item which is the apparent "target" of the code (the one named).
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times

Re: User abend

Postby Robert Sample » Thu Feb 28, 2013 3:18 pm

To amplify what BillyBoyo said, line 1638 is the line number in the compile listing, NOT your source code. Using a COPY statement, for example, will be one line of your source (maybe more depending upon how you coded it), but could expand to hundreds of lines in the compile listing.
Robert Sample
Global moderator
 
Posts: 3367
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 222 times


Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post