xchange.c

UNIX/LINUX平台下面SMS网管原代码

# line 73 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 73 "xchange.cp"
                           SQLNULLSTR(S_ctiinstrument)), (CS_INT) CS_NULLTERM, 
# line 73 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 73 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 73 "xchange.cp"
                       }
# line 73 "xchange.cp"
                       
# line 73 "xchange.cp"
                       _sql->retcode = ct_send(_sql->conn.command);
# line 73 "xchange.cp"
                       _sql->retcode = _sqlResults(_sql);
# line 73 "xchange.cp"
                       _sql->retcode = _sqlepilog(_sql);
# line 73 "xchange.cp"
                   }
# line 73 "xchange.cp"
                   
# line 73 "xchange.cp"
               }
# line 73 "xchange.cp"
               
# line 73 "xchange.cp"
           }
# line 73 "xchange.cp"
           

           /*
           ** Generated code ends here.
           */
# line 73 "xchange.cp"

		
	pub_trim( S_businessinfo );
	strcpy( businessinfo, S_businessinfo );

	pub_trim( S_custinfo );
	strcpy( custinfo, S_custinfo);
	bms_trace("custinfo[%s]", custinfo);

	return( SUCCESS );

}

int DB_put_businessinfo_tbc( char *callid, char *custid, char *businessinfo, char *custinfo , char *incall_num)
{

           /*
           ** SQL STATEMENT: 7
           ** EXEC SQL BEGIN DECLARE SECTION ;
           */
# line 88 "xchange.cp"

	char S_callid[100];
	char S_businessinfo[300+1];
	char S_custid[20+1];
	char S_custinfo[300];
	char sDate[20];
	char S_incall_num[30];

           /*
           ** SQL STATEMENT: 8
           ** EXEC SQL END   DECLARE SECTION ;
           */
# line 95 "xchange.cp"

           /*
           ** Generated code ends here.
           */
# line 95 "xchange.cp"


	memset( S_callid, '\0', sizeof( S_callid ));
	memset( S_custid, '\0', sizeof( S_custid ));
	memset( S_custinfo, '\0', sizeof( S_custinfo ));
	memset( S_businessinfo, '\0', sizeof( S_businessinfo ));
	memset( S_incall_num, '\0', sizeof( S_incall_num ));

	strcpy( S_callid, callid );
	strcpy( S_custid, custid );
	strcpy( S_custinfo, custinfo);
	strcpy( S_businessinfo, businessinfo );
	strcpy( S_incall_num, incall_num );
	pub_get_y4md( sDate );
	bms_trace("date[%s]", sDate );

	
           /*
           ** SQL STATEMENT: 9
           ** EXEC SQL INSERT INTO tbctiexchange 
           ** 			( callid,custinfo, businessinfo, custid, calldeviceid,flag,reg
           ** _date ) 
           ** 		        VALUES(:S_callid,:S_custinfo, :S_businessinfo,:S_custid
           ** , :S_incall_num, '0', :sDate );
           */
# line 113 "xchange.cp"
# line 111 "xchange.cp"
           {
# line 111 "xchange.cp"
                _SQL_CT_HANDLES * _sql;
# line 111 "xchange.cp"
               _sqlinitctx(&_sql, CS_VERSION_125, CS_TRUE, &sqlca, (long 
# line 111 "xchange.cp"
                   *)NULL, (CS_CHAR *)NULL);
# line 111 "xchange.cp"
               if (_sql != (_SQL_CT_HANDLES *) NULL)
# line 111 "xchange.cp"
               {
# line 111 "xchange.cp"
                   _sql->stmtIdlen = CS_UNUSED;
# line 111 "xchange.cp"
                   _sql->stmtData.persistent = CS_FALSE;
# line 111 "xchange.cp"
                   _sql->stmttype = SQL_INSERT_STMT;
# line 111 "xchange.cp"
                   _sql->connName.lnlen = CS_UNUSED;
# line 111 "xchange.cp"
                   if ((_sql->retcode = _sqlprolog(_sql)) == CS_SUCCEED)
# line 111 "xchange.cp"
                   {
# line 111 "xchange.cp"
                       _sql->retcode = ct_command(_sql->conn.command, 
# line 111 "xchange.cp"
                           CS_LANG_CMD, "INSERT INTO tbctiexchange  	"
"		( callid,custinfo, businessinfo, custid, calldeviceid,flag,reg"
"_date )  		        VALUES(@sql0_S_callid ,@sql1_S_custinfo , @sql"
"2_S_businessinfo ,@sql3_S_custid , @sql4_S_incall_num , '0', @sql5_sDate )", 
# line 111 "xchange.cp"
                           231, CS_UNUSED);
# line 111 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 111 "xchange.cp"
                       {
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 111 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 100;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 111 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 111 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 111 "xchange.cp"
                           SQLNULLSTR(S_callid)), (CS_INT) CS_NULLTERM, 
# line 111 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 111 "xchange.cp"
                       }
# line 111 "xchange.cp"
                       
# line 111 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 111 "xchange.cp"
                       {
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 111 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 300;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 111 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 111 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 111 "xchange.cp"
                           SQLNULLSTR(S_custinfo)), (CS_INT) CS_NULLTERM, 
# line 111 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 111 "xchange.cp"
                       }
# line 111 "xchange.cp"
                       
# line 111 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 111 "xchange.cp"
                       {
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 111 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 300+1;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 111 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 111 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 111 "xchange.cp"
                           SQLNULLSTR(S_businessinfo)), (CS_INT) CS_NULLTERM, 
# line 111 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 111 "xchange.cp"
                       }
# line 111 "xchange.cp"
                       
# line 111 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 111 "xchange.cp"
                       {
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 111 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 20+1;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 111 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 111 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 111 "xchange.cp"
                           SQLNULLSTR(S_custid)), (CS_INT) CS_NULLTERM, 
# line 111 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 111 "xchange.cp"
                       }
# line 111 "xchange.cp"
                       
# line 111 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 111 "xchange.cp"
                       {
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 111 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 30;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 111 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 111 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 111 "xchange.cp"
                           SQLNULLSTR(S_incall_num)), (CS_INT) CS_NULLTERM, 
# line 111 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 111 "xchange.cp"
                       }
# line 111 "xchange.cp"
                       
# line 111 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 111 "xchange.cp"
                       {
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 111 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 20;
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 111 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 111 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 111 "xchange.cp"
                           SQLNULLSTR(sDate)), (CS_INT) CS_NULLTERM, 
# line 111 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 111 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 111 "xchange.cp"
                       }
# line 111 "xchange.cp"
                       
# line 111 "xchange.cp"
                       _sql->retcode = ct_send(_sql->conn.command);
# line 111 "xchange.cp"
                       _sql->retcode = _sqlResults(_sql);
# line 111 "xchange.cp"
                       _sql->retcode = _sqlepilog(_sql);
# line 111 "xchange.cp"
                   }
# line 111 "xchange.cp"
                   
# line 111 "xchange.cp"
               }
# line 111 "xchange.cp"
               
# line 111 "xchange.cp"
           }
# line 111 "xchange.cp"
           

           /*
           ** Generated code ends here.
           */
# line 113 "xchange.cp"

	if(sqlca.sqlcode != 0 )
	{
        	bms_trace("DB_insert_newacct[%d] errm[%s] Failure!",sqlca.sqlcode, sqlca.sqlerrm ) ;
		return( FAILURE );
	}

	return( SUCCESS );
}

int DB_update_businessinfo_tbc( char *ctiinstrument, char *passwd, char *callid)
{

           /*
           ** SQL STATEMENT: 9
           ** EXEC SQL BEGIN DECLARE SECTION ;
           */
# line 125 "xchange.cp"

	char S_businessinfo[300+1];
	char S_ctiinstrument[30+1];
	char S_callid[60+1];

           /*
           ** SQL STATEMENT: 10
           ** EXEC SQL END   DECLARE SECTION ;
           */
# line 129 "xchange.cp"

           /*
           ** Generated code ends here.
           */
# line 129 "xchange.cp"


	memset( S_businessinfo, '\0', sizeof( S_businessinfo ));
	memset( S_callid, '\0', sizeof( S_callid ));
	memset( S_ctiinstrument, '\0', sizeof( S_ctiinstrument ));

	strcpy( S_ctiinstrument, ctiinstrument );

	
           /*
           ** SQL STATEMENT: 11
           ** EXEC SQL SELECT businessinfo,callid INTO :S_businessinfo,:S_callid 
           ** 
           ** 		 FROM tbctiexchange 
           ** 		 WHERE ctiinstrument = :S_ctiinstrument ;
           */
# line 139 "xchange.cp"
# line 137 "xchange.cp"
           {
# line 137 "xchange.cp"
                _SQL_CT_HANDLES * _sql;
# line 137 "xchange.cp"
               _sqlinitctx(&_sql, CS_VERSION_125, CS_TRUE, &sqlca, (long 
# line 137 "xchange.cp"
                   *)NULL, (CS_CHAR *)NULL);
# line 137 "xchange.cp"
               if (_sql != (_SQL_CT_HANDLES *) NULL)
# line 137 "xchange.cp"
               {
# line 137 "xchange.cp"
                   _sql->stmtIdlen = CS_UNUSED;
# line 137 "xchange.cp"
                   _sql->stmtData.persistent = CS_FALSE;
# line 137 "xchange.cp"
                   _sql->stmttype = SQL_SELECT_STMT;
# line 137 "xchange.cp"
                   _sql->connName.lnlen = CS_UNUSED;
# line 137 "xchange.cp"
                   if ((_sql->retcode = _sqlprolog(_sql)) == CS_SUCCEED)
# line 137 "xchange.cp"
                   {
# line 137 "xchange.cp"
                       _sql->retcode = ct_command(_sql->conn.command, 
# line 137 "xchange.cp"
                           CS_LANG_CMD, "SELECT businessinfo,callid FROM tbctie"
"xchange  		 WHERE ctiinstrument = @sql2_S_ctiinstrument ", 94, 
# line 137 "xchange.cp"
                           CS_UNUSED);
# line 137 "xchange.cp"
                       if (_sql->retcode == CS_SUCCEED)
# line 137 "xchange.cp"
                       {
# line 137 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.count = 0;
# line 137 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.format = (CS_FMT_NULLTERM | 
# line 137 "xchange.cp"
                               CS_FMT_PADBLANK);
# line 137 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.maxlength = 30+1;
# line 137 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = CS_INPUTVALUE;
# line 137 "xchange.cp"
                           _sql->retcode = ct_param(_sql->conn.command, 
# line 137 "xchange.cp"
                               &_sql->dfmtCS_CHAR_TYPE, _sqlcheckstr(_sql, 
# line 137 "xchange.cp"
                           SQLNULLSTR(S_ctiinstrument)), (CS_INT) CS_NULLTERM, 
# line 137 "xchange.cp"
                               (CS_SMALLINT) 0);
# line 137 "xchange.cp"
                           _sql->dfmtCS_CHAR_TYPE.status = 0;
# line 137 "xchange.cp"
                       }
# line 137 "xchange.cp"
                       
# line 137 "xchange.cp"
                       _sql->retcode = ct_send(_sql->conn.command);
# line 137 "xchange.cp"
                       _sql->resloop = CS_TRUE;
# line 137 "xchange.cp"
                       while ((_sql->resloop == CS_TRUE) && (_sql->retcode = 
# line 137 "xchange.cp"
                           ct_results(_sql->conn.command, &_sql->restype)) == 
# line 137 "xchange.cp"
                       CS_SUCCEED)
# line 137 "xchange.cp"
                       {
# line 137 "xchange.cp"