<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[COBOL]]></title><description><![CDATA[最新Cobol专著《精通COBOL——大型机商业编程技术详解 》]]></description><link>https://blog.csdn.net/COBOL_OS</link><language>zh-cn</language><generator>https://blog.csdn.net/</generator><copyright><![CDATA[Copyright &copy; COBOL_OS]]></copyright><item><title><![CDATA[精通COBOL－－16.9   小结]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342591</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342591</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:49:00 +0800</pubDate><description><![CDATA[ 　　本章主要讲解了CICS的概念及应用。CICS通常以COBOL作为宿主语言，提供了界面功能和交互能力，因此在实际开发中应用十分广泛。本章首先讲解了CICS的基本概念及其编译处理过程。学习这部分内容，需要明确联机处理程序和批处理程序的概念及其区别；理解CICS中交易与任务的基本概念；掌握CICS中的日常操作；理解基于CICS的COBOL程序的编译流程；掌握实际开发CICS应用程序的步骤，]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.8  CICS中的队列]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342585</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342585</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:48:00 +0800</pubDate><description><![CDATA[　　CICS中的队列相当于一块临时缓冲区，用于以队列的形式存放临时数据。在CICS的队列中提供两种数据组织机制。这两种机制分别为瞬时数据（Transient Data）和临时存储（Temporary Storage）。下面重点只介绍临时存储。当将数据写入临时存储队列中时，是通过WRITEQ命令实现的。例如，以下代码将把文件“TESTF”中的数据依次写入到临时存储队列之中：IDENTIF]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.7.2  写入文件]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342584</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342584</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:47:00 +0800</pubDate><description><![CDATA[　　与使用READ命令读取文件相对应，可以使用WRITE命令将数据写入文件。不过通常是使用REWRITE命令对文件中的数据进行写入更新的。在使用REWRITE命令之前，需要通过READ UPDATE命令指定更新数据所在的位置。同时，记录中的关键字是不可被更改的。以下代码反映了REWRITE命令的大致用法：IDENTIFICATION  DIVISION.PROGRAM-ID.  FWR]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.7.1  读取文件]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342581</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342581</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:46:00 +0800</pubDate><description><![CDATA[　　CICS所支持的VSAM文件主要有KSDS、ESDS、RRDS。此外，文件在CICS中由FCT（File Control Table）所统一管理。因此，在相应的COBOL程序中不用手工定义和打开文件。假设某一文件的文件名为“TESTF”，则在程序中通过CICS读取该文件的代码通常如下：IDENTIFICATION  DIVISION.PROGRAM-ID.  FREADPG.   ]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.7  CICS对于文件的操作]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342518</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342518</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:26:00 +0800</pubDate><description><![CDATA[　　在CICS中所处理的数据除用户输入的以外，绝大多数来自于外部文件。CICS所处理的文件主要为VSAM文件。下面分别对文件的读取和文件的写入进行讲解。]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.6.3  MAP的应用]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342514</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342514</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:25:00 +0800</pubDate><description><![CDATA[　　在COBOL中对MAP的应用，主要可分为发送MAP和接受MAP两种情况。其中发送MAP就是将MAP在CICS屏幕中显示出来。发送MAP时可选择只发送物理MAP还是只发送符号MAP。其中只发送物理MAP的代码如下：EXEC  CICS  SEND  MAP(‘TESTMA’)                      MAPSET(‘MAPSETA’)              ]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.6.2  MAP的创建]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342512</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342512</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:24:00 +0800</pubDate><description><![CDATA[　　当前MAP主要是通过SDFⅡ（Screen Define Facility Ⅱ）工具所创建的。SDFⅡ工具是z/OS上的一个可选产品。该产品自动生成MAP的源代码，实现了对于MAP所编即所见的功能。当然，在没有提供SDFⅡ工具的情况下，也可以手工编写源代码生成MAP。下面只重点介绍如何使用SDFⅡ工具创建MAP。此处所说的MAP，即包含有物理MAP，也包含有符号MAP。创建步骤通常如下]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.6.1  MAP的基本概念]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342508</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342508</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:24:00 +0800</pubDate><description><![CDATA[　　MAP是形成基于CICS程序的界面的一个实体，主要由BMS（Basic Mapping Support）提供支持。MAP存放于MAPSET中，一个MAPSET可以存放一到多个MAP。不过通常情况下，一个MAPSET中仅存放一个MAP。因此，有时也可使用MAP指代其所在的MAPSET。同时，MAP实际上是分为两种类型的。其中一种类型为物理MAP，另一种类型为符号MAP。理解MAP的基本概]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.6  CICS中的MAP]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342505</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342505</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:22:00 +0800</pubDate><description><![CDATA[　　CICS中的MAP实现了CICS应用程序的界面。由于CICS程序主要用于交互式的处理，因此界面对于CICS而言十分重要。在实际开发中，CICS程序往往会用到MAP。MAP可以说是CICS产品的一大特色。]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.5.2  使用XCTL命令进行程序调用]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342500</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342500</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:19:00 +0800</pubDate><description><![CDATA[　　使用XCTL命令调用程序时，两程序仍然处于同一个任务之下。并且，同样也可通过COMMAREA在两程序间传递参数。以下为在程序PGMC中，通过XCTL调用程序PGMD的部分代码：IDENTIFICATION  DIVISION.PROGRAM-ID.  PGMC.           ……PROCEDURE  DIVISION.……EXEC  CICS  LINK  ]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.5.1  使用LINK命令进行程序调用]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342492</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342492</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 13:18:00 +0800</pubDate><description><![CDATA[　　使用LINK命令调用程序时，两程序将位于一个任务之下。同时，通过LINK命令中的选项COMMAREA可以实现在调用过程中的参数传递。例如，在以下程序PGMA中，将通过LINK命令调用程序PGMB。IDENTIFICATION  DIVISION.PROGRAM-ID.  PGMA.                              * ENVIRONMENT  DI]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.5  CICS中的程序调用]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342329</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342329</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 12:16:00 +0800</pubDate><description><![CDATA[　　在大型软件项目中，应用系统往往由多个程序所共同组成。程序之间必然存在着一个调用关系。在基于CICS的COBOL程序中，通常使用LINK和XCTL命令实现程序调用。下面分别予以讲解。]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.4.3  RETURN到相同的程序]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342315</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342315</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 12:13:00 +0800</pubDate><description><![CDATA[　　该方式实际上就是将同一个交易中的关联程序既作为参数的发送者，又作为参数的接受者。假设某一交易为ROLL，其关联的程序为ROLLPGM。根据这一条件，图反映了伪会话程序中先后任务对应同一个程序的情况。需要注意的是，在该方式下，参数的传递将形成一个闭环。同时，在第一次启动任务时，是没有参数传递进来的，因此此时COMMAREA中的内容将为空。当COMMAREA中的内容为空时，该任务的EI]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.4.2  RETURN到不同的程序]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342309</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342309</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 12:11:00 +0800</pubDate><description><![CDATA[结合前面所讲的伪会话程序的基本概念，下面直接通过具体实例说明先后任务对应不同程序的情况。不妨假设CICS中某两个交易及其各自关联的程序分别如下：q      交易TRN0，关联的程序为PGM0。q      交易TRN1，关联的程序为PGM1。以上面这两个交易为例，图反映了伪会话程序中先后任务对应不同程序的情况。 下面给出程序PGM0和PGM1的具体示例代码，以说明该方]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.4.1  伪会话程序的基本概念]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2342295</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2342295</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 12:10:00 +0800</pubDate><description><![CDATA[精通COBOL－－16.4.1  伪会话程序的基本概念伪会话程序是相对于会话程序发展而来的。会话程序将会不间断地等待从终端接受数据，直到程序结束。而伪会话程序则只在终端有输入时才激活，并不会始终占用资源以等待从终端接受数据。图为二者的区别。由此可见，伪会话程序相对于会话程序最大的好处在于不会占据任务资源等待用户的输入。例如，在银行ATM自动取款机取款时，用户输入密码后有时会考虑究竟]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.4  伪会话程序]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2341935</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2341935</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 11:01:00 +0800</pubDate><description><![CDATA[　　伪会话程序是CICS开发中十分重要的一个概念，绝大多数CICS上的程序都是采用的伪会话程序。伪会话程序充分体现了CICS的交互能力，形成了区别于批处理作业最大的特征。同时，伪会话程序也避免了长时间的独占任务资源，从而提供了程序的并发执行能力。]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.3.7  获取CICS的日期信息]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2341924</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2341924</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 11:00:00 +0800</pubDate><description><![CDATA[　　获取CICS的日期信息同获取时间信息比较类似。日期信息也是依次通过CICS的命令ASKTIME和FORMATTIME得到的。不过在FORMATTIME中，需要指明获取的为日期信息，同时设置日期信息的相应输出格式。例如，以下程序将用于获取日期信息：IDENTIFICATION  DIVISION.PROGRAM-ID.  DATEPGM.* ENVIRONMENT  DIVI]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.3.6  获取CICS的时间信息]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2341921</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2341921</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 10:59:00 +0800</pubDate><description><![CDATA[ 　　获取CICS的时间信息也是关于CICS的一项最基本的应用。该应用主要分为两步操作。其中第一步是通过ASKTIME得到时间的数据。第二步是通过FORMATTIME得到时间的格式。例如，以下代码将根据用户的请求而获得相应的时间信息：IDENTIFICATION  DIVISION.PROGRAM-ID.  TIMEPGM.* ENVIRONMENT  DIVISION.*]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.3.5  获取CICS的终端信息]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2341917</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2341917</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 10:58:00 +0800</pubDate><description><![CDATA[　　在第一节中曾讲到，每一个任务都有一个与之对应的EIB。CICS的终端信息正是通过EIB得到的。需要注意的是，由于任务可以在不同的终端上启动，因此得到的终端信息也是不同的。也就是说，终端信息是基于任务而言的，这点同每一任务中EIB的惟一性是相对应的。此处所说的终端信息，主要是指终端在CICS中的设备编号。终端编号是通过EIB中的信息EIBTRMID提供的。以下程序将直接通过EIBTR]]></description><category></category></item><item><title><![CDATA[精通COBOL－－16.3.4  输出过程中的光标定位]]></title><link>https://blog.csdn.net/COBOL_OS/article/details/2341915</link><guid>https://blog.csdn.net/COBOL_OS/article/details/2341915</guid><author>COBOL_OS</author><pubDate>Tue, 29 Apr 2008 10:57:00 +0800</pubDate><description><![CDATA[前面曾讲到，CICS中默认的输出是以当前光标所在位置作为起始位置的。不过，光标的实际位置在程序中也是可以进行更改。若要在程序中更改光标的位置，需要提供更改后光标的位置值。在CICS支持的标准终端屏幕上，光标的位置值如图所示。由上图可以看出，光标的位置值是一个一维数字，而并非由行数和列数形成的一个二维向量。通常在程序要求中只给出直观的行列数，需要通过计算将其转换为程序中的光标位置值。]]></description><category></category></item></channel></rss>