READNEXT

描述

READNEXT 可重复用于从本地或远程系统上的文件按顺序读取记录。 这样一系列顺序读取命令称为文件的 浏览 。 浏览还可以按任意顺序包含一系列 READNEXT 和 READPREV 命令。 浏览必须使用 STARTBR 命令启动，以标识浏览的起始点，并使用 ENDBR 命令终止。

必须在 RIDFLD 选项中提供足够大的数据区，以包含文件中记录的完整标识 (完整键， RBA 或 RRN)。 此数据区既可以用作输出，也可以用作输入参数。

当 CICS在每个 READNEXT 命令完成时，将刚刚检索到的记录的完整标识放入 RIDFLD 数据区中时，它将用作输出参数。 然后， CICS 保存此标识以标记后续 READNEXT 要继续的点。

除 BDAM 外，它也可用作输入参数。 在发出下一个 READNEXT 命令之前修改 RIDFLD 会导致该命令将浏览重新定位到新的标识，并以通常的方式从该标识继续。 如果使用 GENERIC 选项启动了浏览，那么修改后的 RIDFLD 必须是通用的。 如果使用 GTEQ 选项启动了浏览，那么返回的下一个记录是数据集中键大于或等于修改后的 RIDFLD 的第一个记录。

在 READPREV 之后的 READNEXT 命令，或者指定了 "last" 键值的 STARTBR 或 RESETBR 被视为已修改 RIDFLD 值，并导致重新定位 (如上)。

读取以 RLS 方式访问的文件

对于以 RLS 方式访问的文件，可以在 READNEXT 请求中包含 UPDATE 关键字以在浏览期间更新某些记录。 如果指定 UPDATE ，那么还必须指定 TOKEN。 然后，可以通过发出指定在浏览功能上返回的 TOKEN 的 DELETE 或 REWRITE 命令来更新记录。

UPDATE 的锁定

用于读完整性的锁定

具有 UPDATE 或读完整性的函数输送 READNEXT

读完整性

以 RLS 方式访问文件时，非更新读请求可以指定读完整性选项 :UNCOMMITTED ， CONSISTENT 或REPE可用。

如果未指定其中任何关键字，那么 CICS 将使用在 FILE 资源定义的 READINTEG 参数上指定的值，缺省值为 UNCOMMITTED。

保留锁定和活动锁定

RECORDBUSY 指活动锁定，而 LOCKED 指保留锁定。

选项

CONSISTENT (仅限 RLS)

将使用 VSAM 共享锁定提供的读完整性级别来读取记录，该级别将持续请求的持续时间。

如果另一个任务正在修改记录，因此该任务持有互斥锁定，那么 READNEXT 请求将等待更新完成 (除非还指定了 NOSUSPEND) ，如下所示:

• 对于针对不可恢复文件的 READNEXT 请求，只要执行更新的任何 VSAM 请求完成， READ 就会完成。
• 对于针对可恢复文件的 READNEXT 请求，当更新任务完成其下一个同步点或回滚时， READ 请求将完成。

FILE (filename)

指定要浏览的文件的名称。

如果指定了 SYSID ，那么假定此文件所引用的数据集位于远程系统上，而不考虑是否对 CICS定义了该名称。 否则，将使用资源定义来确定数据集是在本地系统上还是在远程系统上。

INTO (data-area)

指定要将从数据集检索的记录写入其中的数据区。

KEYLENGTH (data-value)

指定 RIDFLD 选项中指定的键的长度 (半字二进制) ，除非指定了 RBA 或 RRN ，在这种情况下， KEYLENGTH 无效。

如果浏览是在没有 GENERIC 选项 (即全键浏览) 的情况下启动的，并且如果指定的长度与为数据集定义的长度不同，那么会发生 INVREQ 条件。

如果浏览是使用 GENERIC 选项 (即，通用键浏览) 启动的，并且如果指定的长度大于为数据集指定的长度，那么会发生 INVREQ 条件。

如果在最新的 STARTBR 或 RESETBR 命令上指定了 GTEQ 和 GENERIC ，那么发出指定了 KEYLENGTH ($TAG1) 的 READNEXT 将在文件启动时重新定位浏览。 如果指定了 EQUAL ，那么 READNEXT KEYLENGTH (0) 的影响将不可预测。

对于通用浏览， CICS 会保留浏览的当前密钥长度。 将当前键长度初始化为在 STARTBR 命令上指定为 KEYLENGTH 的值。

可以通过在 READNEXT 或 RESETBR 命令上指定 KEYLENGTH 来修改当前密钥长度。 如果更改了当前键长度，那么这将导致重新定位浏览。 浏览将重新定位到其初始字符与 RIDFLD 中为当前键长度指定的值匹配的键。

在指定 KEYLENGTH (0) 的请求之后，当前密钥长度为零。

如果在 READNEXT 命令中省略了 KEYLENGTH ，那么当前键长度保持不变，浏览继续而不重新定位。

如果在 READNEXT 命令上指定了 KEYLENGTH 并且它等于当前键长度，那么这将被视为无更改，并且不会重新定位浏览。 此情况的一个例外是指定了 KEYLENGTH (0) ，这始终导致将浏览重新定位到文件开头。

可以在通用浏览期间使用等于完整键长度的值指定 KEYLENGTH。 这不会导致当前键长度发生更改，并且不会重新定位浏览。 提供了在通用浏览期间指定完整密钥长度的功能，以允许指定 SYSID 的请求能够告知函数输送变压器密钥的长度，以便变压器可以将密钥输送到文件拥有区域。

可以通过修改 RIDFLD 数据区来重新定位浏览。 仅当对 RIDFLD 的修改更改了 RIDFLD 的对应于当前键长度的部分时，才会重新定位通用浏览。 这样做的一个后果是，如果当前键长度为零，那么无法通过修改 RIDFLD 数据区来重新定位浏览。

对于远程文件，可以在 FILE 定义中指定 KEYLENGTH。 如果未在其中定义 KEYLENGTH ，并且未在应用程序中指定 KEYLENGTH ，并且键的长度超过 4 个字符，那么缺省值为 4。

LENGTH (数据区)

指定要放置记录的数据区的长度 (作为半字二进制值)。 READNEXT 命令完成时， LENGTH 参数包含记录的实际长度。

如果指定了 SYSID ，那么必须指定此选项。

如果文件位于远程系统上，那么无需在此处设置 LENGTH 参数，但必须在文件资源定义中设置 LENGTH 参数。

如果文件位于本地系统上，那么必须使用 INTO 选项为可变长度记录设置 LENGTH 参数，但不能为固定长度记录设置 LENGTH 参数。 但是，最好指定固定长度记录的长度，因为:

• 这将导致检查正在读取的记录对于可用数据区的长度是否不太长。
• 在 COBOL、C®、 PL/I 和汇编语言应用程序中，如果指定了 LENGTH 选项，当浏览固定长度记录到一个比正在访问的记录更长的区域时，就会引发 LENGERR 条件。 如果未显式指定 LENGTH 选项，那么如果可以从数据区推断长度，那么将返回 LENGERR 条件。 如果指定的长度超过文件记录长度， CICS 将使用较长的长度进行移动。 如果应用程序中的目标区域不够大，那么存储将覆盖到目标区域之外。

如果指定 SET 选项，那么不需要同时指定 LENGTH 选项。

当浏览到比正在读取的记录更长的目标数据区时，从检索到的记录的末尾到目标数据区的末尾，目标数据区的内容是不可预测的。

如果指定 INTO 选项，那么 LENGTH 自变量必须是指定程序接受的最大记录的数据区。 如果检索到的记录比 LENGTH 选项中指定的值长，那么会将该记录截断为指定的值，并出现 LENGERR 条件。 在这种情况下， LENGTH 数据区设置为截断前记录的长度。

请注意，如果未指定长度，那么针对本地 CICS 系统上定义的文件中的可变长度记录发出的文件控制命令将失败，并带有 LENGERR 条件。 但是，如果对远程系统上定义的文件发出同一命令，那么该命令不会失败。

NOSUSPEND (仅限 RLS)

如果记录被 VSAM 锁定并具有活动锁定 (包括由于死锁而锁定的记录) ，那么请求不会等待。

注: 在 CICS 返回 RECORDBUSY 响应之前，指定 NOSUSPEND 等待至少 1 秒的请求。

RBA

(VSAM KSDS 或 ESDS 基本数据集，或者仅 CICS维护的数据表，而不是路径) 指定 RIDFLD 选项中指定的记录标识字段包含相对字节地址。

当 STARTBR 或 RESETBR 命令指定 RBA 选项时，必须指定此选项。 当 STARTBR 或 RESETBR 命令未指定 RBA 时，不得指定此参数。

不能将 RBA 用于:

• 用户维护的数据表
• 耦合设施数据表
• 以 RLS 访问方式打开的任何 KSDS 文件
• 使用扩展寻址的 KSDS 文件

此外，建议不要将 RBA 用于存放超过 4GB的 ESDS 文件。 (请改为使用 XRBA。)

可重复 (仅限 RLS)

将使用 VSAM 共享锁定提供的读完整性级别来读取记录，该级别将持续发出读请求的工作单元的持续时间。

如果另一个任务正在修改记录，因此该任务持有互斥锁定，那么 READNEXT 请求将等待更新完成 (除非还指定了 NOSUSPEND) ，如下所示:

• 对于可恢复文件， READNEXT 请求在更新事务完成其下一个同步点或回滚时完成。
• 对于不可恢复文件， READNEXT 将在执行更新的 VSAM 请求完成后立即完成。

在 READNEXT 请求完成后，记录将保持锁定于发出 READNEXT 的任务。 其他任务可能继续读取记录，但在发出 READNEXT 的任务执行其下一个同步点或回滚之前，不允许其他任务更新记录。

REQID (data-value)

将浏览的唯一请求标识指定为半字二进制值，用于控制对文件的多个浏览操作。 如果未指定此选项，那么将采用缺省值 0。

RIDFLD (数据区)

指定记录标识字段。 内容可以是键，相对字节地址或相对记录号 (对于 VSAM 数据集) ，也可以是块引用，物理键和去块参数 (对于 BDAM 数据集)。 对于相对字节地址或相对记录号，此字段的格式必须是全字二进制。 对于相对字节地址， RIDFLD 可以大于或等于零。 对于相对记录号， RIDFLD 值可以大于或等于 1。

有关定义记录标识字段的更多信息，请参阅 标识 BDAM 记录 和 标识 VSAM 记录 。

即使浏览是通用的，此 RIDFLD 也应该始终足够大，以容纳完整的记录标识。 这是因为在 READNEXT 命令完成后， CICS 将使用检索到的记录的完整标识来更新该字段。

RRN

(VSAM RRDS) 指定 RIDFLD 选项中指定的记录标识字段包含相对记录号。

SET (ptr-ref)

指定要设置为检索到的记录的地址的指针引用。

在汇编语言中，如果出现 DUPKEY 条件，那么不会设置指定的寄存器，但可以从 DFHEITP1装入。

在下一个 READNEXT 或 READPREV 命令为同一文件的同一浏览 (REQID) 指定 SET 之前，指针引用有效。 在 ENDBR 或 SYNCPOINT 命令之后，指针不再有效。 如果要保留指针所寻址的字段中的数据，那么必须将其移至您自己的区域。

如果 DATALOCATION (ANY) 与应用程序相关联，那么数据的地址可以高于或低于 16 MB 界线。

如果 DATALOCATION (BELOW) 与应用程序相关联，那么在 SET 指针中返回的地址低于 16 MB 线。

如果为正在运行的任务指定了 TASKDATAKEY (USER) ，那么返回的数据位于用户密钥存储器中; 否则，返回的数据位于 CICS-key 存储器中。

SYSID (systemname)

指定请求所定向到的系统的名称。

如果指定 SYSID 并同时省略 RBA 和 RRN ，那么还必须指定 LENGTH 和 KEYLENGTH; 在资源定义中找不到它们。

TOKEN (数据区) (仅限 RLS)

作为全字二进制值返回此 READNEXT UPDATE 请求的请求标识。 这是文件控制返回给请求任务的输出值，用于将后续 REWRITE 或 DELETE (或 UNLOCK) 请求与此 READNEXT 命令上返回的记录相关联。

必须在后续 REWRITE 或 DELETE 命令上指定返回的 TOKEN ，以标识要重写或删除的记录。 您还可以在后续 UNLOCK 命令上的 TOKEN 选项上指定 CICS 返回的值，以标识正在失效的令牌。

如果指定了 UPDATE ，那么必须指定 TOKEN (但如果指定了不带 UPDATE 的 TOKEN ，那么将采用 UPDATE)。

对于给定的 REQID ， CICS 一次仅支持一个活动的 TOKEN。 因此， TOKEN 值仅在以下 READNEXT ， READPREV ， RESETBR ， 或 ENDBR 命令用于此浏览之前有效，或者在 REWRITE ， DELETE 或 UNLOCK 命令之前有效 (以先者为准)。

可以交付 TOKEN 函数。 但是，如果指定 TOKEN 的请求是传递给无法识别此关键字的 CICS 系列产品的成员的函数，那么请求将失败。

已落实

在没有读完整性的情况下读取记录。 返回 VSAM 已知的当前数据。 不会尝试将此读请求与同一记录的任何并发更新活动一起序列化。 该记录可能正在由另一个事务更新，因此如果该更新随后回退，那么该记录的值可能会稍后更改。

UPDATE (仅 RLS)

指定要获取记录以进行更新或删除。 如果同时省略了此选项和 TOKEN ，那么将假定为只读。

如果指定 UPDATE ，那么还必须指定 TOKEN。

UPDATE 仅对定义到本地区域的文件有效

XRBA

指定 RIDFLD 选项中指定的记录标识字段包含扩展的相对字节地址。 当浏览 ESDS 扩展寻址数据集中的记录时，应使用此选项。

除非关联的 STARTBR 或 RESETBR 命令也指定了 XRBA ，否则不能在 READNEXT 命令上指定 XRBA。

XRBA 无法访问 KSDS 数据集。

条件

15 个 DUPKEY

RESP2 值 (VSAM):

140

通过具有 NONUNIQUEKEY 属性的备用索引检索记录，后跟具有相同键的另一个备用索引记录。 它不会作为读取具有非唯一键的最后记录的 READNEXT 命令的结果出现。

在汇编语言中，如果正在使用 SET 选项，那么不会设置指定的寄存器，但可以从 DFHEITP1装入。

缺省操作: 异常终止任务。

20 个 ENDFILE

RESP2 值：

90

在浏览期间检测到文件结束条件。

缺省操作: 异常终止任务。

12 个 FILENOTFOUND

RESP2 值：

1

未对 CICS定义 FILE 选项中引用的文件名。

缺省操作: 异常终止任务。

21 不合逻辑

发生此情况时，将终止当前正在进行的浏览。

RESP2 值 (VSAM):

110

发生不在其他某个 CICS 响应类别中的 VSAM 错误。

请参阅 EXEC 接口块中的 EIBRCODE; 有关详细信息，请参阅 EIB 字段。

缺省操作: 异常终止任务。

16 INVREQ

RESP2 值：

20

FILE 定义不允许更新。

25

为通用浏览指定了 KEYLENGTH 选项 (即，在 STARTBR 或最后一个 RESETBR 上指定了 GENERIC) ，并且 KEYLENGTH 的值大于完整键长度。

26 日

为非活动浏览指定了 KEYLENGTH 选项，并且指定的长度不等于为此文件引用的数据集定义的长度。

34

RQID ， SYSID 或文件名与任何成功的 STARTBR 命令的名称不匹配，或者发出了 SYNCPOINT ，导致 STARTBR ， READNEXT/READPREVs 位置丢失。

37

已更改用于在浏览期间访问数据集的记录标识类型 (例如，键或相对字节地址)。 不能在 STARTBR 上指定一种类型的寻址，也不能在 READNEXT 上指定另一种类型的寻址。

42

为通用浏览指定了 KEYLENGTH 选项 (即在 STARTBR 或最后一个 RESETBR 上指定了 GENERIC 的选项) ，并且 KEYLENGTH 的值小于零。

52

在对非 RLS 方式文件或对使用 RLSACCESS (YES) 指定的数据表的 READ 请求上指定了 CONSISTENT。 如果文件引用数据表，那么不允许 CONSISTENT ，即使文件定义指定了 RLSACCESS (YES) 也是如此。

53

对非 RLS 方式文件的 READ 请求或对使用 RLSACCESS (YES) 指定的数据表指定了可重复。 如果文件引用数据表，那么不允许重复，即使文件定义指定了 RLSACCESS (YES) 也是如此。

54

不允许 UPDATE ，因为该文件不是以 RLS 方式访问的 VSAM 文件。

55

对非 RLS 方式文件或对使用 RLSACCESS (YES) 指定的数据表的 READ 请求指定了 NOSUSPEND。 如果文件引用数据表，那么不允许 NOSUSPEND ，即使文件定义指定了 RLSACCESS (YES) 也是如此。

57

尝试更新文件失败，因为关联的 VSAM 数据集的 AVAILABILITY 状态为 RREPL ，这将不允许更新操作 (来自复制程序的操作除外)。

缺省操作: 异常终止任务。

17 IOERR

RESP2 值：

120

READNEXT 命令期间发生 I/O 错误。 I/O 错误是 CICS 条件未涵盖的任何异常事件。

对于 VSAM 文件， IOERR 通常指示硬件错误。

对于耦合设施数据表， IOERR 指示从耦合设施访问返回的响应不正确。

EXEC 接口块中提供了更多信息; 有关详细信息，请参阅 EIB 字段。

缺省操作: 异常终止任务。

54 ISCINVREQ

RESP2 值：

70

远程系统指示不符合已知条件的故障。

缺省操作: 异常终止任务。

22 LENGERR

RESP2 值：

10

对于具有可变长度记录的文件或具有未定义格式记录的 BDAM 文件，既未指定 LENGTH 选项，也未指定 SET 选项。

11

使用指定的 INTO 选项读取的记录长度超过 LENGTH 选项中指定的值; 记录被截断，并且 LENGTH 选项中提供的数据区设置为记录的实际长度。

13

为具有固定长度记录的文件指定了不正确的长度。

缺省操作: 异常终止任务。

94 个 LOADING

RESP2 值：

104

读请求为耦合设施数据表中仍在装入的记录指定记录键，该键超出已装入的记录的范围。 仅当请求的键在已装入的记录的范围内时，才能在装入期间在耦合设施数据表中浏览记录。

对于在装入期间发生故障的耦合设施数据表，也可以返回 LOADING 响应。 有关在耦合设施数据表的装入失败时发生的情况的更多信息，请参阅 数据表管理出口 XDTRD ， XDTAD 和 XDTLC中对 XDTLC 全局用户出口的描述。

如果应用程序持续或过于频繁地迂到 LOADING 条件，请检查这是否不是由引用相同数据集的冲突文件定义引起的。

100 个已锁定

RESP2 值：

106

The read request specifies the UPDATE keyword, or one of the read integrity keywords CONSISTENT or REPEATABLE, or the file resource definition specifies read integrity, but VSAM holds a retained lock against the record (see 保留锁定和活动锁定).

锁定记录的密钥不会返回到应用程序。 如果您处理此情况并将控制权返回给程序，那么浏览可以继续并通过发出另一个 READNEXT 请求来检索锁定记录之后的记录。

如果正在读取的记录由保留锁定锁定，那么对使用锁定模型的可恢复 CFDT 的请求也可能发生 LOCKED 条件。 有关调查耦合设施数据表中记录的保留锁定的信息，请参阅 耦合设施数据表保留锁定 。

缺省操作: 使用代码 AEX8异常终止任务。

70 NOTAUTH

RESP2 值：

101

对 FILE (filename) 执行资源安全性检查失败。

缺省操作: 异常终止任务。

13 NOTFND

RESP2 值：

80

尝试根据提供的搜索参数检索记录失败。 如果 READNEXT 命令紧跟在指定了数据集中最后一条记录的键 ( X'FF '的完整键) 的 STARTBR 命令之后，那么可能会发生此情况。

81

指定了 XRBA ，并且 RIDFLD 的值大于 4 GB ，但数据集不是扩展寻址 ESDS。

缺省操作: 异常终止任务。

101 记录 DBUSY

RESP2 值：

107

在请求上指定了 NOSUSPEND ，但 VSAM 对记录持有活动锁定，这将导致请求等待 (请参阅 保留锁定和活动锁定)。

锁定记录的密钥不会返回到应用程序。 如果您处理此情况并将控制权返回给程序，那么浏览可以继续并通过发出另一个 READNEXT 请求来检索锁定记录之后的记录。

缺省操作: 使用代码 AEX9异常终止任务。

53 个 SYSIDERR

RESP2 值：

130

SYSID 选项指定的名称既不是本地系统，也不是由 CONNECTION 或 IPCONN 定义定义的远程系统。 当到远程系统的链接已知但不可用时，也会发生 SYSIDERR。 对于 IPCONN ，如果链路已知，但本地或远程系统不支持使用 IP 互连交付的功能的文件控制命令，那么将发生 SYSIDERR。

131

对于耦合设施数据表，与耦合设施数据表服务器的连接已失败。 这可能是因为服务器本身已发生故障，或者服务器可用，但 CICS 未能连接到该服务器。

132

对不再存在的耦合设施数据表发出 READNEXT ，可能是因为耦合设施故障，在这种情况下，耦合设施数据表服务器也会发生故障。 有关重新启动耦合设施数据表服务器和重新装入表的信息，请参阅 设置和运行耦合设施数据表服务器 。

缺省操作: 异常终止任务。