|
我在AIX5上使用External_Call,但是有时候会有问题，调用会中断，我在 Rc = CICS_ExternalCall (&EciParms);
Response("ECI_STATE_SYNC", Rc, EciParms.eci_abend_code);
/******************************************** add *****************/
fprintf(stderr,"RC=%d\n",Rc);
/***********************************************************************/
调用后输出返回值，发现没有运行到那里，怎么回事呢？
参数为：
EciParms.eci_version = ECI_VERSION_1;
EciParms.eci_call_type = ECI_SYNC;
memcpy(&EciParms.eci_program_name, cics_prgm, 8);
memcpy(&EciParms.eci_userid, cics_user, 8);
memcpy(&EciParms.eci_password, " ", 8);
memcpy(&EciParms.eci_system_name, cics_srv, 8);
EciParms.eci_commarea = (void *)&CommArea;
EciParms.eci_commarea_length = sizeof(CommArea);
EciParms.eci_extend_mode = ECI_NO_EXTEND;
EciParms.eci_luw_token = ECI_LUW_NEW;
EciParms.eci_timeout = 0;
|
