加入收藏 | 设为首页 | 会员中心 | 我要投稿 汽车网 (https://www.0577qiche.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 教程 > 正文

定义ESDS群集

发布时间:2023-09-06 10:01:31 所属栏目:教程 来源:
导读:ESDS称为条目序列数据集.入门序列数据集的行为类似于顺序文件组织,其中包含更多功能.我们可以直接访问记录,出于安全考虑,我们也可以使用密码.我们必须在ESF数据集的DEFINE CLUSTER命令中编码 NONINDEXED .以下是E
ESDS称为条目序列数据集.入门序列数据集的行为类似于顺序文件组织,其中包含更多功能.我们可以直接访问记录,出于安全考虑,我们也可以使用密码.我们必须在ESF数据集的DEFINE CLUSTER命令中编码 NONINDEXED .以下是ESDS的主要功能 :

ESDS群集中的记录按插入顺序存储数据集.
记录由物理地址引用,称为相对字节地址(RBA).假设在ESDS数据集中,我们有80个字节的记录,第一个记录的RBA将为0,第二个记录的RBA将为80,第三个记录的RBA将为160,依此类推.
RBA可以按顺序访问记录,这被称为寻址访问.
记录是按插入顺序举行.最后插入新记录.
在ESDS数据集中无法删除记录.但它们可以被标记为无效.
ESDS数据集中的记录可以是固定长度或可变长度.
ESDS未编入索引. ESDS数据集中不存在键,因此它可能包含重复记录.
ESDS可以像任何其他文件一样在COBOL程序中使用.我们将在JCL中指定文件名,我们可以使用ESDS文件来处理程序内部.在COBOL程序中,将文件组织指定为顺序,将访问模式指定为带有ESDS数据集的顺序.

定义ESDS群集

以下语法显示创建ESDS群集时可以使用的参数.参数描述与VSAM  -  Cluster模块中提到的相同.
DEFINE CLUSTER (NAME(esds-file-name)     -
BLOCKS(number)                           -
VOLUMES(volume-serial)                   -
NONINDEXED                               -
RECSZ(average maximum)                   -
[FREESPACE(CI-Percentage,CA-Percentage)] -
CISZ(number)                             -
[READPW(password)]                       -
[FOR(days)|TO(date)]                     -
[UPDATEPW(password)]                     -
[REUSE / norEUSE])                       -
DATA                                     -
   (NAME(esds-file-name.data))
   
示例
以下示例显示了如何使用IDCAMS实用程序创建ESDS集群 :
//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC pgm = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN    DD  *
   DEFINE CLUSTER (NAME(MY.VSAM.ESDSFILE)  -
   NONINDEXED                              -
   RECSZ(80 80)                            -
   TRACKS(1,1)                             -
   CISZ(4096)                              -                            
   FREESPACE(3 3) )                        -
   DATA (NAME(MY.VSAM.ESDSFILE.DATA))      
/*
如果您将在大型机服务器上执行上述JCL.它应该以MAXCC = 0执行,它将创建MY.VSAM.ESDSFILE VSAM文件.

删除ESDS群集
使用IDCAMS删除ESDS群集效用. DELETE命令从目录中删除VSAM集群的条目,并可选择删除该文件,从而释放该对象占用的空间.
DELETE data-set-name CLUSTER  
[ERASE / NOERASE] 
[FORCE / NOFORCE] 
[PURGE / nopURGE] 
[SCRATCH / NOSCRATCH]
上面的语法显示了删除ESDS群集时我们可以使用的参数.参数说明与VSAM  -  Cluster模块中提到的相同.

示例
以下示例说明如何使用IDCAMS删除JCL中的ESDS集群实用程序 :
//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEPNAME EXEC pgm = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN    DD  *
   DELETE MY.VSAM.ESDSFILE CLUSTER
/*
如果您将在Mainframes服务器上执行上述JCL.它应该以MAXCC = 0执行,它将删除MY.VSAM.ESDSFILE VSAM集群.

 

(编辑:汽车网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章