• VSAM Video Tutorials

VSAM - 命令

VSAM命令用于对VSAM数据集执行某些操作。以下是最有用的 VSAM 命令 -

  • 改变
  • 再现
  • 列表猫
  • 检查
  • 核实

改变

ALTER命令用于修改VSAM文件属性。我们可以更改 VSAM 文件的属性，这些属性在 VSAM 集群定义中提到过。以下是更改属性的语法 -

ALTER  file-cluster-name [password] 
   [ADDVOLUMES(volume-serial)] 
   [BUFFERSPACE(size)] 
   [EMPTY / NOEMPTY] 
   [ERASE / NOERASE] 
   [FREESPACE(CI-percentage CA-percentage)] 
   [KEYS(length offset)] 
   [NEWNAME(new-name)] 
   [RECORDSIZE(average maximum)] 
   [REMOVEVOLUMES(volume-serial)] 
   [SCRATCH / NOSCRATCH] 
   [TO(date) / FOR(days)] 
   [UPGRADE / NOUPGRADE] 
   [CATALOG(catalog-name [password]]

上面的语法显示了我们可以在现有 VSAM 集群中更改哪些参数。参数描述与 VSAM - Cluster 模块中提到的相同。

例子

以下示例展示了如何使用 ALTER 命令来增加可用空间、添加更多卷和更改密钥 -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC PGM = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN DD  *
   ALTER  MY.VSAM.KSDSFILE 
   [ADDVOLUMES(2)] 
   [FREESPACE(6 6)] 
   [KEYS(10 2)] 
/*

如果您将在大型机服务器上执行上述 JCL。它应该以 MAXCC = 0 执行，并且它将改变可用空间、卷和键。

再现

REPRO命令用于将数据加载到VSAM数据集中。它还用于将数据从一个 VSAM 数据集复制到另一个 VSAM 数据集。我们可以使用此命令将数据从顺序文件复制到 VSAM 文件。IDCAMS 实用程序使用 REPRO 命令加载数据集。

REPRO INFILE(in-ddname) 
   OUTFILE(out-ddname)

在上面的语法中，in-ddname 是具有记录的输入数据集的 DD 名称。out-ddname 是输出数据集的 DD 名称，输入数据集记录将复制到其中。

例子

以下示例展示了如何将记录从一个数据集复制到另一个 VSAM 数据集 -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC PGM = IDCAMS
//IN  DD DSN = MY.VSAM.KSDSFILE,DISP = SHR
//OUT DD DSN = MY.VSAM1.KSDSFILE,DISP = SHR
//SYSPRINT DD  SYSOUT = *
//SYSIN DD  *
   REPRO INFILE(IN) 
      OUTFILE(OUT)
/*

如果您将在大型机服务器上执行上述 JCL。它应该以 MAXCC = 0 执行，并将所有记录从 MY.VSAM.KSDSFILE 复制到 MY.VSAM1.KSDSFILE VSAM 文件。

列表猫

LISTCAT命令用于获取VSAM数据集的目录详细信息。Listcat 命令提供有关 VSAM 数据集的以下信息 -

  • 短信信息
  • RLS信息
  • 成交量信息
  • 球体信息
  • 分配信息
  • 数据集属性
LISTCAT ENTRY(vsam-file-name) ALL

在上面的语法中，vsam-file-name 是我们需要其所有信息的 VSAM 数据集名称。指定 ALL 关键字以获取所有目录详细信息。

例子

以下示例展示了如何使用 Listcat 命令获取 VSAM 数据集的所有详细信息 -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC PGM = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN DD  *
   LISTCAT ENTRY(MY.VSAM.KSDSFILE) 
   ALL 
/*

如果您将在大型机服务器上执行上述 JCL。它应该以 MAXCC = 0 执行，并将显示有关 MY.VSAM.KSDSFILE 数据集的所有目录详细信息。

检查

检查命令用于检查键排序数据集簇的结构完整性。它检查索引和数据组件，如果发现任何问题，则会向假脱机发送错误消息。您可以检查任何 IDCxxxxx 消息。

EXAMINE NAME(vsam-ksds-name) -                                    
   INDEXTEST DATATEST -                  
   ERRORLIMIT(50)

在上面的语法中，vsam-ksds-name 是我们需要检查 VSAM 集群的索引和数据部分的 VSAM 数据集名称。

例子

以下示例显示如何检查 KSDS 数据集的索引和数据部分是否同步 -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC PGM = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN DD  *
   EXAMINE NAME(MY.VSAM.KSDSFILE) -                                    
   INDEXTEST DATATEST -                  
   ERRORLIMIT(50)
/*

如果您将在大型机服务器上执行上述 JCL。它应该以 MAXCC = 0 执行，并将在假脱机中的 IDCxxxxx 消息之一中显示 VSAM 数据集的所有问题。

核实

verify命令用于检查并修复错误后未正确关闭的VSAM文件。该命令将正确的数据结束记录添加到文件中。

VERIFY DS(vsam-file-name)

在上面的语法中，vsam-file-name是我们需要检查错误的VSAM数据集名称。

例子

以下示例展示了如何检查和修复 VSAM 数据集中的错误 -

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC PGM = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN DD  *
   VERIFY DS(MY.VSAM.KSDSFILE)                                  
/*

如果您将在大型机服务器上执行上述 JCL。它应该以 MAXCC = 0 执行，并且它将修复 VSAM 数据集中的错误。