CA Ideal IDADERRP15E MEM format error on IDDAT

book

Article ID: 129076

calendar_today

Updated On:

Products

CA Datacom - DB CA Datacom CA Datacom - AD CA Datacom - Server CA Ideal CA CIS CA Common Services for z/OS CA 90s Services CA Database Management Solutions for DB2 for z/OS CA Common Product Services Component CA Common Services CA Datacom/AD CA ecoMeter Server Component FOC CA Easytrieve Report Generator for Common Services CA Infocai Maintenance CA IPC Unicenter CA-JCLCheck Common Component CA Mainframe VM Product Manager CA Chorus Software Manager CA On Demand Portal CA Service Desk Manager - Unified Self Service CA PAM Client for Linux for zSeries CA Mainframe Connector for Linux on System z CA Graphical Management Interface CA Web Administrator for Top Secret CA CA- Xpertware

Issue/Introduction

Doing a DISPLAY INDEX MEMBER  in CA IDEAL fails with error:

IDADERRP15E - INTERR: MEM format error, LIB=IDDAT               
                                                                  
SRVC=VLS FUNC=RMP      RC=004-32 PGM=ADXDIB  14.0 +134C           
CALPGM=                   CURACT=   ACTTYP=  USER=58M ERRID=      
SYS=RCP ENTTYP=MEM ENTNAM=                   ENTVER=000  ENTSTAT= 
LIB=IDDAT    MEM=        

 

Cause

The error can be caused by corruption in the VLS file index.
This can be confirmed by running the VLSUTIL LIBRARY function to list the VLS index.
Examine the output and look for unprintable characters in the report.
Sample JCL:

 
//* LIBRARY LISTING OF IDDAT VLS FILE 
//* 
//LIBRARY  EXEC PGM=VLSUTIL 
//STEPLIB  DD DSN=ipc.CAVQLOAD,DISP=SHR 
//SYSPRINT DD SYSOUT=* 
//AUXPRINT DD SYSOUT=* 
//VLSFILE  DD DSN=IDDAT_file,DISP=SHR 
//SYSIN    DD * 
LIBRARY 
/*

Environment

Release: DATABB00200-14.0-Datacom/AD
Component:

Resolution

There are some CA IPC PTFs to resolve problems with VLS index corruption, these should be applied first.
If using CA IPC 14.0 apply PTFs RO69919 and RO72605.
If using CA IPC 15.0 apply PTF RO75397.

Once the corruptions occurs, to resolve the problem perform the following steps:

  1. Run VLSUTIL to do a BACKUP of the IDDAT file

    //* BACKUP IDDAT VLS FILE 
    //* 
    //BACKUP   EXEC PGM=VLSUTIL 
    //STEPLIB  DD DSN=ipc.CAVQLOAD,DISP=SHR 
    //SYSPRINT DD SYSOUT=* 
    //AUXPRINT DD SYSOUT=* 
    //VLSFILE  DD DSN=IDDAT_file,DISP=SHR 
    //VLSBKUP  DD DSN=IDDAT_backup_file, 
    //         DISP=(,CATLG,KEEP), 
    //         SPACE=(CYL,(10,5)),UNIT=SYSDA 
    //SYSIN    DD * 
    BACKUP 
    LIBRARY 
    /*
  2. Run another step to do a VLSUTIL FORMAT and RESTORE of the file. 

    //* FORMAT AND RESTORE IDDAT VLS FILE 
    //* 
    //RESTORE  EXEC PGM=VLSUTIL 
    //STEPLIB  DD DSN=ipc.CAVQLOAD,DISP=SHR 
    //SYSPRINT DD SYSOUT=* 
    //AUXPRINT DD SYSOUT=* 
    //VLSFILE  DD DSN=IDDAT_file,DISP=SHR 
    //VLSBKUP  DD DSN=IDDAT_backup_file,DISP=SHR 
    //SYSIN    DD * 
    FORMAT BLKSIZE=1960,NAMELEN=24 
    RESTORE 
    LIBRARY 
    /* 

Note: if the index corruption is in a different VLS file, check the INSTJCL member ILNEW02 to get the correct BLKSIZE and NAMELEN for the VLS file.

Additional Information

See DocOps sections BACKUP FunctionFORMAT Function and RESTORE Function