CICS简单入门例程
CICS环境构架
1 安装服务器
1) 建立用户CICSTEST(要用超户权)
2)用CICSTEST用户登录
3)安装DB2指定CICSTEST为管理用户
源代码在线查看: sample1.c.bak
/*****************************************************************************/
/*
testec.exe: ec.obj testec.obj
link sample1.obj ec.obj cclwin32.lib
ec.obj: ec.c
cl /c /DCICS_W32 ec.c
testec.obj: testec.c ec.h
cl /c sample1.c
*/
/*-------------------------- HEADER FILES ------------------------------------*/
#include "time.h"
#include "ec.h"
void main(){
char s[200];
int r;
printf("begin\n");
r=ConnectServer( "CICS01", "TEST", "TEST" );
if (r)
{
printf("连接不成功 %d\n",r);
return;
}
printf("连接成功,返回码是 %d\n",r);
r=CallProgramAndCommit("SAMPLE1");
//r=CallProgramAndCommit("GETTIME");
printf("返回码是 %d\n",r);
GetValue("TIME",s);
printf("TIME= %s\n",s);
GetValue("NAME",s);
printf("NAME= %s\n",s);
printf("结束");
}