文档介绍：第一节 CICS服务程序的相互调用 1
11 一个调用其它服务程序的例子 1
12 跨域调用其它服务程序 5
第二节 CICS事务的作用域 7
第三节 深入CICS编程 9
31 CICS API简介 9
32 SFS的应用 11
33 使用ECI 17
第四章 高级编程
相对其它的软件产品，CICS可谓历史悠久，因此也就有非常丰富的内涵和开发手段。本章所讲解的所谓“高级编程”，不过是为了引导熟悉EasyCICS的程序员再深入地了解一些CICS而已。
我听到很多用户抱怨说，Microsoft Word提供了几千种功能，可一般人只用几十种就够了，为什么要付钱去那些不用的功能？其实，大多数成熟的软件产品都难以避免这样的尴尬问题。不过，有时，靠软件吃饭的使用者倒可以从反面考虑一下问题：我们如果花费一份时间和精力，学到了某产品10%的功能，而满足了自己80%的需求，往往我们要再花费十份时间和精力，才能学到该产品30%的功能，而最终结果是满足了自己85%的需求。这样的买卖未必总是划算的，对吗？当然，如果某种产品对您关系重大，还是要认真钻研一下。如果您是这样的读者，我要再强调本书仅仅能把您引进CICS的大门，并提供给您一些十分有效的手段。每种CICS产品都附带大量的联机文档，这些文档能为您深入学****CICS提供很多帮助。俗语道：师傅领进门，修行在个人。
第一节 CICS服务程序的相互调用
11 一个调用其它服务程序的例子
如果您读完并理解了本章以前的所有内容，那您已经是非常不错的EasyCICS程序员了。您应该很熟悉CICS的客户程序如何调用CICS的服务程序，对了，调用CallProgramAndCommit函数。有人曾经问我CICS的客户程序是否可以调用CICS的客户程序，当然不行，因为如果仅仅是客户的话，是不能接受和应答任何请求的，请再复****一下Client/Server系统机构的概念。但与其它Client/Server系统类似，CICS的服务程序确实可以调用CICS的服务程序。
我们来看一个简单的例子。有两个非常简单的服务：EC04和 EC05。EC04基本上什么事都不做，只调用EC05，并根据EC05返回的信息设置返回值。而EC05把当前的日期和时间写到公共数据区里。以下是它们的代码：
/*****************************************************************************/
/*-------------------------- HEADER FILES -----------------------------------*/
#include "easycicsh"
/*****************************************************************************/
/*--------------------------- Global Variables ------------------------------*/
char Ca1[BUF_SIZE]="";
/*****************************************************************************/
/*Functions*/
/*****************************************************************************/
/*
*/
void main(){
char s[100];
if( InitEasyCics() ) ExitEasyCics();
SetCurrentCA(Ca1);
BeginWrite();
CallProgram( "EC05" );
GetValue( "TIME5", s );
SetCurrentCA(0);
BeginWrite();
SetValue( "TIME5", s );
ExitEasyCics();
}
清单 4-1-1 服务程序EC04
/*****************************************************************************/
/*-------------------------- HEADER FILES --------------------------------