精通COBOL－－16.8 CICS中的队列

最新推荐文章于 2013-06-05 19:25:52 发布

原创

最新推荐文章于 2013-06-05 19:25:52 发布 · 2.7k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#cobol #存储 #file #string

本文介绍了CICS系统中队列的作用，特别是临时存储队列的概念，通过WRITEQ命令将数据写入队列，并展示了如何使用ITEM进行记录访问。同时，文中提到了通过READQ和DELETEQ命令对队列进行读取和删除的操作。

　　CICS中的队列相当于一块临时缓冲区，用于以队列的形式存放临时数据。在CICS的队列中提供两种数据组织机制。这两种机制分别为瞬时数据（Transient Data）和临时存储（Temporary Storage）。下面重点只介绍临时存储。

当将数据写入临时存储队列中时，是通过WRITEQ命令实现的。例如，以下代码将把文件“TESTF”中的数据依次写入到临时存储队列之中：

IDENTIFICATION DIVISION.

PROGRAM-ID. WTSPGM.

ENVIRONMENT DIVISION.

DATA DIVISION.

WORKING-STORAGE SECTION.

……

PROCEDURE DIVISION.

……

EXEC CICS STARTBR FILE('TESTF')

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

COBOL_OS

关注关注

0
点赞
踩
1

收藏

觉得还不错? 一键收藏
2
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

CICS队列之TDQ与TSQ

sjmz30071360的专栏

12-20

2509

队列（Queue）是一种以先进先出方式存取的数据集，是CICS可以管理的数据集之一。队列是连续的存储设施，由于事务处理的动态特性，所以通常它们本质上是静态的。它们通常用于处理请求或者将数据从一个事务传递到另一个事务，如图2.11所示。例如，作为事务的一部分所生成的数据通常在任务完成后才打印；数据在队列中等待打印程序在没有更紧急任务的情况下再来处理它。队列分为瞬时数据队列（TDQ）和临时...

2 条评论您还未登录，请先登录后发表或查看评论

精通COBOL－－16.3.3 输入过程中的异常处理

COBOL

04-29

2655

　　CICS中的异常处理有很多种情况，此处主要只针对在输入过程中的异常处理。异常处理是通过在相应的CICS命令中使用RESP选项实现的。RESP选项后为一个8位长度的有符号数，用以表明异常的种类。例如，以下代码在输入数据大于指定长度时，将对所抛出的异常进行处理。处理方式为在屏幕上输出相应提示信息。代码如下：IDENTIFICATION DIVISION.PROGRAM-ID. RE

精通COBOL－－16.3 CICS在COBOL中的基本应用

COBOL

04-29

1330

　　CICS在实际应用方面的功能最终还是通过程序实现的。这些程序同操作DB2的程序类似，也是将某一程序语言作为宿主语言，并将CICS命令嵌入其中。相关宿主语言可以为COBOL语言、大型机汇编语言、PL/1语言等等。目前最常用的还是COBOL语言。

CICS/MVS技术日记

lzl0516的专栏

08-12

3509

在对BMS进行编译时，可以使用两个选项，即Type=DSECT和Type=Map；前者生成逻辑MAP，后者生成物理MAP。可以在LINKAGE SECTION中说明一个数据结构，而用ADDRESS获取其地址，空间的分配命令包括GETMAIN，LOAD，READ和READQ。在多用户的环境下，不仅要考虑交易的完整性与一致性，而且要考虑多交易对资源的争夺，即避免死锁现象的出现。为此，1.所有

【转】CICS MVS技术日记

zhouyang1987的专栏

06-02

837

本文提到MAP、LINKAGE、死锁、调用方式、嵌入、交易存贮、共享机制、姻亲关系、传递数据技术、运行程序、错误恢复机制、测试、文件访问方式及机制、数据库管理、任务交易的执行机制、3270终端家族、3270 BUFFER、转自：http://blog.yxzone.net/2010/02/21/4.html 在对BMS进行编译时，可以使用两个选项，即Type=DSECT和Type=M...

精通COBOL－－16.1.2 CICS中的交易和任务

COBOL

04-29

2163

　　交易（Transaction）和任务（Task）是CICS中的两个最基本的概念。这两个概念实际上也是基于CICS面向事务处理的特点而产生的。1．CICS中的交易在CICS中，一个交易是指一组相关联的操作序列或为了完成一个特定功能的一组步骤。交易通常产生于终端和数据库之间，属于一种应用过程。一个交易中既可能只有一个操作，也可能存在一组操作。例如，在ATM机上完成的取款过程便可视作一个

proleap-cobol-parser:基于ProLeap ANTLR4的COBOL解析器

05-23

EXEC SQL，EXEC SQLIMS和EXEC CICS语句被提取为文本。该解析器是受测试驱动开发的，通过了NIST测试套件，已成功应用于银行和保险业的许多COBOL文件。 :dizzy: 如果您喜欢我们的工作，请加星号。例子输入：...

大型机学习整理cobol-jcl-db2-mysql-cics

04-21

我在学习大型机过程中的知识点整理，包括cobol-jcl-db2-mysql-cics

zosconnect-sample-cobol-apirequester：包含一个示例CICS COBOL应用程序，该应用程序使用zOS Connect EE的API Requester函数

03-04

适用于z / OS Connect Enterprise Edition（EE）的示例CICS应用程序该存储库包含一个示例CICS COBOL应用程序，该应用程序使用z / ...克隆此存储库git clone git@github.com:zosconnect/zosconnect-sample-cobol-apireq

COBOL基础知识

热门推荐

共享，学习，纪录

05-20

1万+

本文内容源于对IBM英文文档的理解与归纳，不保证其准确性。仅用于自学，转载请注明出处。-----------------------------------------------------------------------------------------------1．编码格式第1～６列为序号区，用于表示行号。行号不是必须的，也不必是顺序的，甚至可以是本机字符集中的任意字

cobol错误.doc

01-21

初学COBOL的常遇到的问题集，大家可根据图片描述一起探讨

精通COBOL－－16.3.5 获取CICS的终端信息

COBOL

04-29

1772

　　在第一节中曾讲到，每一个任务都有一个与之对应的EIB。CICS的终端信息正是通过EIB得到的。需要注意的是，由于任务可以在不同的终端上启动，因此得到的终端信息也是不同的。也就是说，终端信息是基于任务而言的，这点同每一任务中EIB的惟一性是相对应的。此处所说的终端信息，主要是指终端在CICS中的设备编号。终端编号是通过EIB中的信息EIBTRMID提供的。以下程序将直接通过EIBTR

精通COBOL－－16.1.1 CICS简介

COBOL

04-29

2728

　　CICS的全称为Customer Information Control System，即客户信息控制系统的意思。CICS最初为S/370上的一个程序产品，迄今已有将近40年的发展历史。CICS同DB2一样，也是支持多种操作系统的，但目前仍然主要用于大型机的操作系统z/OS。CICS在大型机上的版本依次经历了1.7版、2.1版、3.1.1版、3.1.2版、3.3版、4.1版等等。当CI

CICS的基本结构和命令

quanben

11-23

4572

1. 映射表（Map/Mapset）的属性（Attribute）字节 1. 第一列总不会被实质内容占据；最多是属性字节。所以实质内容总最多从第二列开始。 2. 每个映射域均要以一个属性字节起始。 3. 输入域（UNPROT）还要以一个属性字节结束，而这个属性字节应当为ASKIP。属性字节排布：比特位置功能比特设置 0-1 根据2～7比特

基于CICS的COBOL程序顺序文件处理

omygege

10-29

483

CICS顺序文件处理中，使用浏览（browse）概念来进行操作。因而这些操作包括开启浏览，执行文件记录读取（正向/反向），关闭浏览等。由于是CICS命令，在COBOL中使用时，必须包含在EXEC CICS语句对中。浏览可以用于访问VSAM文件，包括PDS，ESDS, KSDS和RSDS。 1. 开启浏览（Start Browse）命令 STARTBR，命令格式： STARTBR FIL...

精通COBOL－－16.7.1 读取文件

COBOL

04-29

4818

　　CICS所支持的VSAM文件主要有KSDS、ESDS、RRDS。此外，文件在CICS中由FCT（File Control Table）所统一管理。因此，在相应的COBOL程序中不用手工定义和打开文件。假设某一文件的文件名为“TESTF”，则在程序中通过CICS读取该文件的代码通常如下：IDENTIFICATION DIVISION.PROGRAM-ID. FREADPG.

COBOL文件操作

张铖@南通

12-17

8987

要在COBOL中使用文件，要在3个不同的部中放上信息。环境部，要有程序使用的每个文件的文件控制项目(FILE-CONTROL)。这个项目将程序中使用的文件名与程序外的实际文件联系起来。这些项目还定义文件的组织和访问方式。数据部，要有每个文件的文件描述符(FD)项目，就是数据定义。过程部，放上处理语句，OPEN,READ,WRITE,DELETE等。环境部

CICS的临时存储队列操作

weixin_30566063的博客

11-19

254

CICS临时存储（CICS Temporary Storage）以一组队列（CICS Temporary Storage Queues或简称TS Queues）的形式实现。说是“队列”，其实不是严格数据结构意义上的FIFO队列，而是一个对数据记录（Record）标识（Identify）并顺序存储的机构，以供CICS-COBOL程序访问。每个队列都有一个队列名queue name或队列数据标识d...

COBOL+CICS文件操作

lanyanjiayu的专栏

06-05

3233

1.输入输出数据非CICS： ACCEPT数据来源：终端输入和系统接收。一般系统接收数据为日期或者时间。 DATE--YYMMDD. DAY---YYDDD. DAY-OF-WEEK--- PIC 9. 范围1-7. TIME---HHMMSSHH,最后HH表示hundredths from midnigth. 如：DATA DIVISION. WORKING-STO