退出 XDTLC
在数据表装入完成时调用 XDTLC 用户出口-无论成功与否。 如果在装入完成之前由于任何原因关闭了数据表,那么不会调用用户出口。 仅当从源数据集装入耦合设施数据表时,才会对该表调用 XDTLC 出口。
如果装入未成功完成,那么将通知出口程序-请参阅字段 UEPDTORC。 例如,如果达到最大记录数或虚拟存储器不足,那么可能会发生此情况。 在这种情况下,出口程序可以通过设置返回码来请求立即关闭文件。
- 调用时机
- 在表装入完成时。 如果由于数据表已关闭而终止了装入过程,那么不会调用此操作。
- 特定于出口的参数
- UEPDTPL
- 由副本 DFHXDTDS 中的 DSECT DT_UE_PLIST 映射的数据表用户出口参数列表的地址。 数据表用户出口参数列表包含:
- UEPDTNAM
- 8 字符数据表名称。
- 欧 PDTFLG
- 1 字节标志字段。 可能的位设置为:
- UEPDTSDT (X'80 ')
- CICS® 共享数据表支持已调用该出口。
- UEPDTCMT (X'40 ')
- 这是 CICS维护的表。 仅当 UEPDTSDT 处于开启状态时才有意义。
- UEPDTCFT (X'10 ')
- 耦合设施数据表支持已调用出口。
- UEPDTUMT (X'08 ')
- 这是用户维护的表。 仅当 UEPDTSDT 处于开启状态时才有意义。
- UEPDTORC
- 数据表打开结果代码。 可能的值包括:
- UEPDTLCS
- 装入成功
- UEPDTLFL
- 装入失败。
- UEPDTDSL
- 源数据集名称的全字长度。 仅当 UEPDTSDT 或 UEPDTCFT 处于开启状态时才有意义。
- UEPDTDSN
- 包含源数据集名称的 44 个字符的字段。 仅当 UEPDTSDT 或 UEPDTCFT 处于开启状态时才有意义。
- 返回码
- UERCDTOK
- 接受处于当前状态的数据表
- UERCDTCL
- 关闭数据表。
- XPI 调用
- 都可以用。