CICS简单入门例程 CICS环境构架 1 安装服务器 1) 建立用户CICSTEST(要用超户权) 2)用CICSTEST用户登录 3)安装DB2指定CICSTEST为管理用户

源代码在线查看: sample1.c.bak

软件大小: 258 K
上传用户: zhangyuntong
关键词: CICSTEST CICS 用户 DB2
下载地址: 免注册下载 普通下载 VIP

相关代码

				
				/*****************************************************************************/
				/*
				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("结束");
				
				}
							

相关资源