You can use the IDCAMS LISTCAT command to determine if SAM or VSAM
data sets have associated DDM attributes and the value of the CCSID
attribute. Figure 1 uses the LISTCAT
command to generate a report on a data set named IBMUSER.DFMDATA:
Figure 1. LISTCAT Command //LISTCAT JOB
//STEP EXEC PGM=IDCAMS
//**************************************************************
//* PURPOSE: LIST A CATALOG AND A CLUSTER
//***************************************************************
//SYSPRINT DD SYSOUT=*
//AMSDUMP DD SYSOUT=*
//SYSIN DD *
LISTCAT LVL(IBMUSER.DFMDATA) ALL
/*
Figure 2 shows the resulting output.
The DDMEXIST field contains the value TEXT, indicating that associated
DDM attributes exist. And the CCSID field contains the value X'01F4',
NLS EBCDIC STANDARD.
Figure 2. IDCAMS LISTCAT Output Showing DDMEXIST and
CCSID FieldsIDCAMS SYSTEM SERVICES TIME:08:10 12/02/92
PAGE 1
NONVSAM ------- IBMUSER.DFMDATA.TEST
IN-CAT --- SYS1.ICFCAT.VSYS306
HISTORY
DATASET-OWNER-----(NULL) CREATION--------1990.016
RELEASE----------------2 EXPIRATION------0000.000
SMSDATA
STORAGECLASS -----NORMAL MANAGEMENTCLASS--PRIMARY
DATACLASS --------(NULL) LBACKUP ---1992.296.0129
VOLUMES
VOLSER------------SYS309 DEVTYPE------X'3010200E' FSEQN------------------0
ASSOCIATIONS--------(NULL)
ATTRIBUTES
STRIPE-COUNT------(NULL) CCSID------------X'01F4', NLS EBCDIC STANDARD
DDMEXIST TEXT
IDCAMS SYSTEM SERVICES TIME:08:10 12/02/92
PAGE 2
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------0
DATA ------------------0
GDG -------------------0
INDEX -----------------0
NONVSAM ---------------1
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TAPELIBRARY -----------0
TAPEVOLUME ------------0
TOTAL -----------------1
THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0