S001-4 failure running a DBUTLTY Load

Products

• Datacom
• Datacom/AD
• Datacom/DB

Issue/Introduction

When EXTRACTing a table from one MUF and trying to LOAD it into another MUF that has an empty table, received this error

DBMUFDV:DB00101I - STARTED JOB-EXBLB102 NUMBER-20893 CXX=DVCXX    MUFNAME=DBMUFDV
DB00101I - STARTED JOB-EXBLB102 NUMBER-21020 CXX=DVCXX
IEC020I 001-4,EXBLB102,DBUTIL,MYBLB102,2D11,PTST14,
IEC020I MY.EXTRACT.BLB102.PR240715
IEC020I DCB EROPT=ABE OR AN INVALID CODE, AND/OR NO SYNAD EXIT SPECIFIED

Environment

z/OS

Cause

Typically, the S001-4 is the result of a blocksize mismatch between the file and what the program expected. Here, when DBUTLTY tries to use an Extract file to LOAD when BACKUP format is requested, the step will fail.

Resolution

A review of the DBUTLTY LOAD function shows:

LOAD   AREA=BLB,DBID=102,FORMAT=BACKUP,DDNAME=MYBLB102,
       SORT=9999,OPTIMIZE=YES,KBYTES=99,OPTION1='(I)'

Here, the FORMAT=BACKUP expects a file that was created in the Backup format with the relevant control block data. This is different from the Extract format, which also has a different blocksize.

Change this parameter to FORMAT=EXTRACT to match the earlier EXTRACT function.

Additional Information

Please see the Datacom documentation for more information about the DBUTLTY BACKUP and EXTRACT functions.