sample3.c

来自「CICS简单入门例程 CICS环境构架 1 安装服务器 1） 建立用户C」· C语言 代码 · 共 48 行

/*****************************************************************************/
/*
CISC服务端执接收客户信息的例子
sample3.exe: ec.obj testec.obj
	link sample3.obj ec.obj cclwin32.lib
ec.obj: ec.c
	cl /c /DCICS_W32 ec.c
testec.obj: testec.c ec.h
	cl /c sample3.c
*/
//也可 make sample3
/*-------------------------- HEADER FILES ------------------------------------*/

#include "time.h"
#include "ec.h"
void main(){
char s[200];
    int i,j,r,rn,cn;
	printf("begin\n");
	r=ConnectServer( "CICS01", "TEST", "TEST" );
    if (r)
    {
    printf("连接不成功 %d\n",r);
	return;
	}
	printf("连接成功，返回码是 %d\n",r);
	BeginWrite();
	SetValue("X","10");
	r=CallProgramAndCommit("SAMPLE3");
 
    //r=CallProgramAndCommit("GETTIME");
	
    printf("返回码是 %d\n",r);
	if (r)
	{
		    printf("调用不成功 %d\n",r);
			return;
	}
	GetValue("NAME",s);
	printf("NAME=  %s\n",s);
	GetValue("Y",s);
	printf("Y=  %s\n",s);

	printf("结束");

}