Response 74

z/os ADABAS 742

We are getting occasional 3074 errors on our production database.

We have a program that has the following statement:

FIND-NUM. FIND NUMBER AT WITH CPNY-IVST-GRUP-TYPE-DATE-KEY
= #CPNY-IVST-GRUP-TYPE-DATE-KEY THRU #CPNY-IVST-GRUP-TYPE-DATE-END

I reckon this will process 325,209 unique index entries. This statement works OK but around the same time it is executing we get a number of 3074 errors on another program which has the following statement:

FIND (1) VAR-DATA WITH HOLD-RQST-VAR = HOLD-RQST-VAR

This should process one unique index entry only but note that HOLD-RQST-VAR contains a PE field.

We have LWKP2=3072 which based on the formula in the manuals should handle 2,176,175 records so we should be nowhere near blowing the limit. Furthermore, I didn’t think that the second statement would use work part 2. (Other parameters LS=50000, LWP=750000)

other than that the area is shared and if there are multiple users executing similarly large transactions, you might want to run a consistency check on the files to verify the index structures.