精通COBOL－－16.2.2 使用CEDA定义资源

　　CICS子系统中包含有很多类型的资源。对于不同的应用，将会用到其中不同部分的资源。这些资源通常有以下几种：

q      交易

q      程序

q      MAPSET

q      文件

q      队列

q      数据库

q      终端

以上这些资源一般来说需要在CICS子系统中先定义之后方能使用。CICS中的资源主要是通过CEDA进行定义的。前面曾提到，CEDA实际上是系统中所预设的一个系统交易。用户可以通过该交易生成的任务，完成定义CICS资源的系统事务。

在实际应用中，通常首先需要将在ISPF中所开发的程序在CICS子系统中进行定义。定义程序的相应操作如下：

CEDA  DEFINE  PROGRAM(TESTPGM)   GROUP(TESTGRP)

以上操作在CICS中定义了程序名为“TESTPGM”的程序。同时，该操作还将这一程序定义在了名为“TESTGRP”的组中。组在CICS中是用来将各种相关资源存放在一起的，其本身严格来说并不属于一种CICS资源。

以上操作执行后，CICS系统接下来将会出现一个列表，用于对程序更详细的属性进行定义。这些详细定义中有很多参数都是由系统默认给出的。用户在此可根据实际需要修改这些默认值。以下为其中几条比较常见的程序属性：

q      程序由何种语言所编写。通常，这些语言可以为COBOL、大型机汇编语言、PL/1、C、RPG、以及LE370。

q      在某个时刻，可以有多少个任务并发使用该程序。

q      该程序的存储位置为何处（通常为主存或是磁盘）。

如果定义成功，在该列表界面倒数第2行的首列位置将会显示“DEFINE SUCCESSFUL”的提示信息。通常情况下，多数提示信息都是在该位置显示的。

当成功定义完程序后，接下来通常需要定义交易。定义交易时，关键需要将该交易同程序相关联起来。定义交易的相应操作如下：

CEDA  DEFINE  TRANS(TST1)   PROGRAM(TESTPGM)   GROUP(TESTGRP)

以上操作定义了交易名（TRANSID）为“TST1”的一个交易。同时，该操作还将TST1交易同之前定义的程序TESTPGM相关联了起来。TST1交易和TESTPGM程序一样，也是存放在TESTGRP组中的。

以上操作执行后，CICS系统仍然会出现一个列表，用于对交易进行更详细的定义。不过，此处通常只须关注交易名和该交易关联的程序，其余则采用系统默认值。

通常情况下，以上定义完成后，便可在安装之后直接通过交易名启用任务完成一定功能了。不过，有时程序中还用到其他一些资源，例如文件和终端等。其中定义文件的操作可以如下：

CEDA  DEFINE  FILE(TESTFILE)  GROUP(TESTGRP)

在定义文件时系统所给出的详细列表中，通常需要关注以下几个关于文件的属性：

q      文件的逻辑名称同物理数据集的对应关系。

q      文件类型。

q      文件访问方式。

q      文件访问权限。

q      文件的密码。

q      文件的保护机制。

此外，当定义终端时，关键需要给出终端的终端号。例如，以下操作将在TESTGRP组中定义一个名称为“TESTTEM”的终端：

CEDA  DEFINE  TERMINAL(TESTTEM)  GROUP(TESTGRP)

当定义完成资源后，在实际应用之前，还需将所定义的资源进行安装。所谓安装，实际也就是将该资源所包含的所有数据读入内存。原因在于CPU是只能执行读入内存的程序的。安装也是使用CEDA进行的，以下为几段相应的安装操作：

CEDA  INSTALL   PROGRAM(TESTPGM)  GROUP(TESTGRP)

CEDA  INSTALL   PROG(*)   GROUP(TESTGRP)

CEDA  INSTALL   GROUP(TESTGRP)

以上第一条操作是将TESTGRP组中的程序TESTPGM进行了安装；第二条操作则将安装TESTGRP组中的所有程序；第三条操作则将安装TESTGRP组中的所有资源。

同时，注意到第二条操作中将“PROGRAM”简写为了“PROG”。实际上，在CICS操作中经常会存在着简写。部分常见的原字符和简写后的字符对应关系如下：

q      DEFINE：可简写为D

q      PROGRAM：可简写为PROG

q      TRANSACTION：可简写为TRANS

q      FILE：可简写为F

q      TERMINAL：可简写为TE

q      GROUP：可简写为G

q      ALTER：可简写为AL

q      INQUIRE：可简写为I

q      SET：可简写为S

使用CEDA也可对已定义后的资源的各种属性进行修改。例如，可以将某一交易的关联程序改为其他程序，或者将该交易所在的组改为其他组等等。以下操作将可对TESTPGM组中的TST1交易的相关属性进行修改：

CEDA   ALTER   TRANS(TST1)   G(TESTGRP)

该操作执行后，系统将给出一个列表，列表中包含有所指定的TST1交易的各种属性信息。当需要修改某一属性值时，直接在该列表中相应的属性位置修改便可。

此外，使用CEDA还可对所定义的资源信息进行列表。列表通常可以分为两种情况。一种是对某一资源进行详细列表，另一种是对某一组中的所有资源进行概括的列表。例如，以下操作将对TESTGRP组中的TST1交易进行详细列表：

CEDA  DISPLAY   TRANS(TST1)   G(TESTGRP)

以下操作执行后，将会把TESTGRP组中的所有资源进行列表。其中所列表的资源属性主要包含资源名称、类型、所在组名、以及创建时间。相应操作如下：

CEDA  EXPAND   GROUP(TESTGRP)