TLMS to CA 1 conversion job TMSTLMS1 fails with Abend S013-20 for the VMF (TAPEDB).

Products

• CA 1 Flexible Storage
• CA 1 Tape Management - Copycat Utility
• CA 1 Tape Management - Add-On Options

Issue/Introduction

 

Running TLMS to CA 1 conversion job TMSTLMS1 to extract the VMF into Common EARL Format fails with Abend S013-20 for the VMF (TAPEDB).

 

 

 

Cause

 

This can be caused by using the CA EARL Copybook Library CTAPECPB  from CA 1. The EARLDEFS from the CA 1 CTAPECPB Library use TMSEARL, which tries to open the VMF (TAPEDB) using the DCB attributes from the TMC, resulting in Abend S013-20.

Resolution

Specify the CTAPECPB Library from TLMS in TMSTLMS1:

//EARLJCL  PROC EARLCPB='CAI.CTAPECPB',  <- TLMS CTAPECPB

The EARLDEFS from the TLMS CTAPECPB use TLMSEARL to read the VMF with the correct DCB attributes.