ExitEasyCics();
CICS客户程序开发
• #include ""
• void main(){
•
char s[200];
•
int r;
•
•
r= ConnectServer( "NJ_186", "TEST", "TEST" );
printf( "ConnectServer: return code= %d\n", r );
CICS客户程序开发
• set EC_CLI=X:\CICS\Client\Get2K
• set path=%path%;X:\CICS\Client\Get2K
• nmake -f
CICS客户程序开发
• 多线程客户端
dllCreateHandleX
dllConnectServerX
dllBeginWriteX• Nhomakorabea•
r= CallProgramAndCommit("GETTIME");
printf( "CallProgramAndCommit: return code= %d\n", r );
•
•
• }
GetValue( "TIME", s );
printf( "Server Time= %s\n", s );
无须再启动DCE,但SFS仍保留
增加Web控制台
XA容错性增强
TXSeries配置-环境变量
set NLSPATH=C:\opt\cics\MSG\en_US\@N
set CICSNLS=C:\opt\cics\MSG\en_US\@N