How to solve the erro:(12/3841)? Emergency!

Question

hi,all:
i meet a problem,when i try to fget the buffer from tuxedo,the error was logged!the
flowing is the message of error and source,pleae check and help me and tell me why?thanks
anyway!!!
PS:
1.my platform of tuxedo is Digital Unix and PC side is Win98/win2000.
2.Tuxedo version is 7.1(with no patch fixed)
3.database is sybase of unix
PART ONE,ERROR MESSAGE:
LIBTUX_CAT:6031: ERROR: Unable to pre-process buffer before tranmission. Error code(12/3841)
171112.ah97supp!WSH.10488.1.0: WSNAT_CAT:1148: ERROR: Processing of message to be
sent to client failed
171112.ah97supp!WSH.10488.1.0: WSNAT_CAT:1029: ERROR: Sending of reply message to
client failed
PART TWO:MY SOURCE:
void CPExscind::AllDataCheck(TPSVCINFO *rqst)
/* ¼ì²é¡¢¸î½Ó½á¹û±êÖ¾¡£
flag 0 δ¼ì²é£¬1 ¸æ¾¯£¬2´íÎó£¬3 ¼ì²éͨ¹ý£¬4 ¸î½Óʧ°Ü£¬5 ¸î½Ó³É¹¦,6 ¸î½Ó»Ø¹öʧ°Ü£¬7
¸î½Ó»Ø¹ö³É¹¦*/
EXEC SQL BEGIN DECLARE SECTION;
long recno;
long new_exchange_id;
long new_mdf_no;
CS_CHAR new_acc_nbr[21];
CS_CHAR new_port_no[21];
CS_CHAR new_mdf_col[9];
CS_CHAR new_mdf_block[9];
long new_mdf_serial;
CS_CHAR new_linebox_no[21];
long new_linebox_code;
long new_linebox_serial;
CS_CHAR new_crossbox1_no[21];
long new_crossbox1_code;
long new_crossbox1_in_line;
long new_crossbox1_out_line;
CS_CHAR new_crossbox2_no[21];
long new_crossbox2_code;
long new_crossbox2_in_line;
long new_crossbox2_out_line;
CS_CHAR new_crossbox3_no[21];
long new_crossbox3_code;
long new_crossbox3_in_line;
long new_crossbox3_out_line;
long new_maintrunk_code;
long new_mdf_code;
CS_CHAR check_message[101]="";
long tp_exchange_id;
CS_CHAR tp[2];
CS_CHAR tp_acc_nbr[21];
CS_CHAR tp_port_no[21];
CS_CHAR tp_mdfcol_no[9];
CS_CHAR tp_mdfblock_no[9];
long tp_mdf_code;
long tp_mdfblock_lineno;
long tp_maintrunk_code;
long tp_linebox_code;
CS_CHAR tp_linebox_name[21];
long tp_linebox_serial;
long tp_matchline_serial;
CS_CHAR tp_crossbox_name[21];
long tp_crossbox_code;
long tp_crossbox_inserial;
long tp_crossbox2_code;
long tp_crossbox2_in_serial;
long tp_crossbox2_out_serial;
long tp_crossbox3_code;
long tp_crossbox3_in_serial;
long tp_crossbox3_out_serial;
long SQL_exchange_id;
CS_CHAR SQL_project_name[21];
CS_CHAR SQL_project_sequence[11];
long SQL_input_err_cnt;
EXEC SQL END DECLARE SECTION;
recvbuf = (FBFR32 *)rqst->data;
     BufferSize = 4*1024;
     sendbuf = NULL;
     if((sendbuf = (FBFR32 *)tpalloc("FML32",NULL,BufferSize))==NULL)
DisConnect();
                    tpreturn(TPFAIL,0,NULL,0,0);
     Finit32(sendbuf,BufferSize) ;
Fget32(recvbuf,FML_CK_exchange_id,0,(char*)&SQL_exchange_id,0);
userlog("SQL_exchange_id-->%d",SQL_exchange_id);
Fget32(recvbuf,FML_CK_project_name,0,SQL_project_name,0);
userlog("SQL_project_name-->%s",SQL_project_name);
Fget32(recvbuf,FML_CK_project_sequence,0,SQL_project_sequence,0);
userlog("SQL_project_sequence-->%s",SQL_project_sequence);
Fget32(recvbuf,FML_CK_input_err_cnt,0,(char*)&SQL_input_err_cnt,0);
userlog("SQL_input_err_cnt-->%d",SQL_input_err_cnt);
/*È¡³ö·ûºÏ¼ì²éÌõ¼þµÄ¼Ç¼*/
EXEC SQL DECLARE check_data cursor for
select recno,
ISNULL(new_exchange_id,-1),
ISNULL(new_mdf_no,-1),
ISNULL(new_acc_nbr,'-1'),
ISNULL(new_port_no,'-1'),
ISNULL(new_mdf_col,'-1'),
          ISNULL(new_mdf_block,'-1'),
          ISNULL(new_mdf_serial,-1),
          ISNULL(new_linebox_no,'-1'),
          ISNULL(new_linebox_code,-1),
          ISNULL(new_linebox_serial,-1),
          ISNULL(new_crossbox1_no,'-1'),
          ISNULL(new_crossbox1_code,-1),
          ISNULL(new_crossbox1_in_line,-1),
          ISNULL(new_crossbox1_out_line,-1),
          ISNULL(new_crossbox2_no,'-1'),
          ISNULL(new_crossbox2_code,-1),
          ISNULL(new_crossbox2_in_line,-1),
          ISNULL(new_crossbox2_out_line,-1),
          ISNULL(new_crossbox3_no,'-1'),
          ISNULL(new_crossbox3_code,-1),
          ISNULL(new_crossbox3_in_line,-1),
          ISNULL(new_crossbox3_out_line,-1),
          ISNULL(new_maintrunk_code,-1),
          ISNULL(new_mdf_code,-1)
          from res_modify_details
where old_exchange_id=:SQL_exchange_id and
project_name=:SQL_project_name and
project_sequence=:SQL_project_sequence and
state='10A' and flag in('0','1','2') order by recno;
EXEC SQL OPEN check_data;
if(sqlca.sqlcode!=0)
userlog("Open Cursor --->sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode%s,%d",sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode);
/*Ñ»·¼ì²éÿÌõ¼Ç¼*/
int err_cnt=0;/*´íÎóÊý*/
int alert_cnt=0;/*¾¯¸æÊý*/
while(1)
/*¶ÔÓÚÒ»ÌõÏêÇé¼Ç¼Êý¾Ý±éÀú¼ì²é*/
EXEC SQL FETCH check_data into
:recno,
:new_exchange_id,
:new_mdf_no,
          :new_acc_nbr,
          :new_port_no,
          :new_mdf_col,
          :new_mdf_block,
          :new_mdf_serial,
          :new_linebox_no,
          :new_linebox_code,
          :new_linebox_serial,
          :new_crossbox1_no,
          :new_crossbox1_code,
          :new_crossbox1_in_line,
          :new_crossbox1_out_line,
          :new_crossbox2_no,
          :new_crossbox2_code,
          :new_crossbox2_in_line,
          :new_crossbox2_out_line,
          :new_crossbox3_no,
          :new_crossbox3_code,
          :new_crossbox3_in_line,
          :new_crossbox3_out_line,
          :new_maintrunk_code,
          :new_mdf_code;
     userlog("sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode%s,%d",sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode);
     if(sqlca.sqlcode!=0) break;
     /*else if((sqlca.sqlcode!=100)&&(sqlca.sqlcode!=0))
          userlog("FETCH FAIL!");     
          DisConnect();
               tpreturn(TPFAIL,0,NULL,0,0);
/*±ØÊäÈë:оÖÏòÃû£¬ÐºÅÂ룬ж˿ڣ¬ÐÂÁС¢¿é¡¢¶Ô£¬
зÖÏßÏäºÅ£¬Ð·ÖÏßÏäÏßÐò£¬ÐÂÒ»¼¶½»½ÓÏäºÅ£¬
ÈëÏߣ¬³öÏߣ¬¶þ¼¶½»½ÓÏäºÅ£¬ÈëÏߣ¬³öÏߣ¬Èý¼¶*/
char err_msg[200]="";
char alt_msg[200]="";
strcpy(check_message,"");
     /*=============================ÅжÏÐÂÊý¾ÝÊÇ·ñΪ¿Õ´íÎó==============================*/
if(new_exchange_id==-1)
/*strcpy(err_msg,"оÖÏòΪ¿Õ´í£¡");*/
userlog("оÖÏòΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"оÖÏòΪ¿Õ´í£¡",0) == -1) userlog("fadd
error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(new_mdf_no==-1)
     /*strcpy(err_msg,"ÐÂÅäÏ߼ܺÅΪ¿Õ´í£¡");*/
     userlog("ÐÂÅäÏ߼ܺÅΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÅäÏ߼ܺÅΪ¿Õ´í£¡",0) == -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if((strcmp(new_acc_nbr,"-1")==0)||(strcmp(new_port_no,"-1")==0))
/*strcpy(err_msg,"ºÅÂë¶Ë¿ÚΪ¿Õ´í£¡");*/
userlog("ºÅÂë¶Ë¿ÚΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ºÅÂë¶Ë¿ÚΪ¿Õ´í£¡",0) == -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if((strcmp(new_mdf_col,"-1")==0)||(strcmp(new_mdf_block,"-1")==0)||(new_mdf_serial==-1))
/*strcpy(err_msg,"ÐÂÁпé¶ÔΪ¿Õ´í£¡");*/
userlog("ÐÂÁпé¶ÔΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÁпé¶ÔΪ¿Õ´í£¡",0) == -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(strcmp(new_linebox_no,"-1")==0)
/*strcpy(err_msg,"зÖÏßÏäºÅΪ¿Õ´í£¡");*/
userlog("зÖÏßÏäºÅΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"зÖÏßÏäºÅΪ¿Õ´í£¡",0) == -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(new_linebox_serial==-1)
/*strcpy(err_msg,"зÖÏßÏäÏßÐòΪ¿Õ´í£¡");*/
userlog("зÖÏßÏäÏßÐòΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"зÖÏßÏäÏßÐòΪ¿Õ´í£¡",0) ==
-1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(strcmp(new_crossbox1_no,"-1")==0)
/*strcpy(err_msg,"ÐÂÒ»¼¶½»½ÓÏäºÅΪ¿Õ´í£¡");*/
userlog("ÐÂÒ»¼¶½»½ÓÏäºÅΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÒ»¼¶½»½ÓÏäºÅΪ¿Õ´í£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(new_crossbox1_in_line==-1)
/*strcpy(err_msg,"ÐÂÒ»¼¶½»½ÓÏäÈëÏßΪ¿Õ´í£¡");*/
userlog("ÐÂÒ»¼¶½»½ÓÏäÈëÏßΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÒ»¼¶½»½ÓÏäÈëÏßΪ¿Õ´í£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
/*===========================ÅжÏÐÂÊý¾ÝΪ¿Õ¸æ¾¯============================
if(new_crossbox1_out_line==-1)
strcpy(alt_msg,"¸æ¾¯1,ÐÂÒ»¼¶½»½ÓÏä³öÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(strcmp(new_crossbox2_no,"-1")==0)
          strcpy(alt_msg,"¸æ¾¯2,жþ¼¶½»½ÓÏäºÅΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
          if(new_crossbox2_in_line==-1)
strcpy(alt_msg,"¸æ¾¯3,жþ¼¶½»½ÓÏäÈëÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(new_crossbox2_out_line==-1)
     strcpy(alt_msg,"¸æ¾¯4,жþ¼¶½»½ÓÏä³öÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
          if(strcmp(new_crossbox3_no,"-1")==0)
strcpy(alt_msg,"¸æ¾¯5,ÐÂÈý¼¶½»½ÓÏäºÅΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(new_crossbox3_in_line==-1)
strcpy(alt_msg,"¸æ¾¯6,ÐÂÈý¼¶½»½ÓÏäÈëÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(new_crossbox3_out_line==-1)
          strcpy(alt_msg,"¸æ¾¯7,ÐÂÈý¼¶½»½ÓÏä³öÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
/*===========================ÅжÏÐÂÊý¾ÝºÏ·¨ÐÔ´íÎó²¢¾À´í=====================================*/
if(new_exchange_id!=-1)
EXEC SQL select exchange_id into :tp_exchange_id from exchange
where exchange_id=:new_exchange_id and state='10A';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,¾ÖÏò±íÖÐÎÞ´ËоÖÏò£¡");*/
strcat(check_message,"¾ÖÏò´í*");
userlog("´íÎó,¾ÖÏò±íÖÐÎÞ´ËоÖÏò£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,¾ÖÏò±íÖÐÎÞ´ËоÖÏò£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if((strcmp(new_acc_nbr,"-1")!=0)||(strcmp(new_port_no,"-1")!=0))
/*ÅжϺÅÂë¶Ë¿ÚÊÇ·ñÒ»Ò»¶ÔÓ¦*/
EXEC SQL select distinct switch_num_way into :tp from branch_tel_head
a,all_number b
where a.tel_head=b.tel_head
and b.acc_nbr=:new_acc_nbr;
if(strcmp(tp,"1")!=0)
/*²»¶ÔÓ¦*/
EXEC SQL select ISNULL(b.acc_nbr,'0') into
:tp_acc_nbr
from switch_info a,all_number b
     where a.switch_no=b.switch_no
     and a.exchange_id in (select distinct exchange_id FROM popedom_tache_exchange
     where exchange_id=:new_exchange_id )
     and b.acc_nbr =:new_acc_nbr and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,ºÅÂë±íÖÐÎÞ´ËкÅÂ룡");*/
userlog("´íÎó,ºÅÂë±íÖÐÎÞ´ËкÅÂ룡");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,ºÅÂë±íÖÐÎÞ´ËкÅÂ룡",0)
== -1) userlog("fadd error %ld",__LINE__);
int num=Foccur32(sendbuf,FML_CK_errmessage);
                         userlog("num==%d",num);
strcat(check_message,"ºÅÂë´í*");
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
EXEC SQL select ISNULL(b.port_no,'0')
into :tp_port_no
from switch_info a,port_details b
     where a.switch_no=b.switch_no
     and a.exchange_id in (select distinct exchange_id FROM popedom_tache_exchange
     where exchange_id=:new_exchange_id) and
b.port_no=:new_port_no and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´Ëж˿ڣ¡");*/
userlog("´íÎó,¶Ë¿Ú±íÖÐÎÞ´Ëж˿ڣ¡");
strcat(check_message,"¶Ë¿Ú´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´Ëж˿ڣ¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
else if(strcmp(tp,"1")==0)/*Ò»Ò»¶ÔÓ¦*/
EXEC SQL select ISNULL(b.acc_nbr,'0'),
ISNULL(b.port_no,'0')
into
:tp_acc_nbr,
:tp_port_no
from switch_info a,port_no b
     where a.switch_no=b.switch_no
     and a.exchange_id in (select distinct exchange_id FROM popedom_tache_exchange
     where exchange_id=:new_exchange_id) and
b.acc_nbr=:new_acc_nbr and
b.port_no=:new_port_no and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/* strcpy(err_msg,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´ËкÅÂë¶Ë¿Ú£¡");*/
userlog("´íÎó,¶Ë¿Ú±íÖÐÎÞ´ËкÅÂë¶Ë¿Ú£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´ËкÅÂë¶Ë¿Ú£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
strcat(check_message,"ºÅÂë¶Ë¿Ú´í*");
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) == -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
else
strcpy(new_port_no,tp_port_no);
/*strcpy(err_msg,"¸æ¾¯,¶Ë¿Ú±íÖÐÓÐж˿ڣ¡");*/
if (Fadd32(sendbuf,FML_CK_altmsg,"¸æ¾¯,¶Ë¿Ú±íÖÐÓÐж˿ڣ¡",0)==
-1) userlog("fadd error %ld",__LINE__);
alert_cnt=alert_cnt+1;
if((strcmp(new_mdf_col,"-1")!=0)&&(strcmp(new_mdf_block,"-1")!=0)&&(new_mdf_serial!=-1))
EXEC SQL select ISNULL(a.mdfcol_no,'0'),
ISNULL(a.mdfblock_no,'0'),
ISNULL(a.mdf_code,0),
ISNULL(b.mdfblock_lineno,0)
into
:tp_mdfcol_no,
:tp_mdfblock_no,
:tp_mdf_code,
:tp_mdfblock_lineno
from mdfz_info a,mdfz_details b
where a.mdf_code=b.mdf_code and
a.mdf_no=:new_mdf_no and
a.mdfcol_no=:new_mdf_col and
a.mdfblock_no=:new_mdf_block and
b.mdfblock_lineno=:new_mdf_serial and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,mdf±íÖÐÎÞ´ËÐÂÁпé¶Ô£¡");*/
userlog("´íÎó,mdf±íÖÐÎÞ´ËÐÂÁпé¶Ô£¡");
strcat(check_message,"Áпé¶Ô´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,mdf±íÖÐÎÞ´ËÐÂÁпé¶Ô£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
else
EXEC SQL select ISNULL(maintrunk_code,0)
into
:tp_maintrunk_code
from maintrunk_details
where mdf_code=:tp_mdf_code and
mdf_blocklineno=:tp_mdfblock_lineno;
if(sqlca.sqlcode==0)
new_maintrunk_code=tp_maintrunk_code;
if(strcmp(new_linebox_no,"-1")!=0)
     EXEC SQL select ISNULL(linebox_code,0),
     ISNULL(linebox_name,'0')
     into
     :tp_linebox_code,
     :tp_linebox_name
     from linebox_info
     where exchange_id=:new_exchange_id and
     linebox_name=:new_linebox_no;
     if(sqlca.sqlcode==0)
     new_linebox_code=tp_linebox_code;
               else
          /*strcpy(err_msg,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏ䣡");*/
          userlog("´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏ䣡");
          strcat(check_message,"·ÖÏßÏä´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏ䣡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
          if(new_linebox_serial!=-1)
          EXEC SQL select ISNULL(linebox_serial,0),
          ISNULL(matchline_serial,0)
          into
          :tp_linebox_serial,
          :tp_matchline_serial
          from linebox_details
          where linebox_code in (select linebox_code from linebox_info
          where exchange_id=:new_exchange_id and
          linebox_name=:new_linebox_no) and
          linebox_serial=:new_linebox_serial and
          num_line_state='6';
          if(sqlca.sqlcode!=0)
          /*strcpy(err_msg,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏäÏßÐò£¡");*/
          userlog("´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏäÏßÐò£¡");
          strcat(check_message,"·ÖÏßÏäÏßÐò´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏäÏßÐò£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
          else
          new_crossbox1_out_line=tp_matchline_serial;
          if(strcmp(new_crossbox1_no,"-1")!=0)
          EXEC SQL select ISNULL(crossbox_name,'0'),
          ISNULL(crossbox_code,0)
          into
          :tp_crossbox_name,
          :tp_crossbox_code
          from crossbox_info
          where exchange_id=:new_exchange_id and
          crossbox_name=:new_crossbox1_no;
          if(sqlca.sqlcode==0)
          new_crossbox1_code=tp_crossbox_code;
          else
          /*strcpy(err_msg,"´íÎó,±íÖÐÎ޴˽»½ÓÏ䣡");*/
          userlog("´íÎó,±íÖÐÎ޴˽»½ÓÏ䣡");
          strcat(check_message,"½»½ÓÏä´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,±íÖÐÎ޴˽»½ÓÏ䣡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
          if(new_crossbox1_in_line!=-1)
          EXEC SQL select ISNULL(crossbox_inserial,0),
          ISNULL(uppercross_code,-1),
          ISNULL(uppercross_inserial,-1),
          ISNULL(uppercross_outserial,-1)
          into
          :tp_crossbox_inserial,
          :tp_crossbox2_code,
          :tp_crossbox2_in_serial,
          :tp_crossbox2_out_serial
          from maintrunk_details
          where maintrunk_code=:new_maintrunk_code and
          crossbox_inserial=:new_crossbox1_in_line and
          num_line_state='6';
          if(sqlca.sqlcode==0)
          if(tp_crossbox2_code!=-1)
          {/*2¼¶*/
          new_crossbox2_code=tp_crossbox2_code;
          new_crossbox2_in_line=tp_crossbox2_in_serial;
          new_crossbox2_out_line=tp_crossbox2_out_serial;
          EXEC SQL select ISNULL(crossbox_name,'0')
          into
          :new_crossbox2_no
          

Answer 1

hi,all:
i'm sorry the posted source is so confussing(tab key problem),i should point out
that the error has happened at "tpreturn" of
"userlog("before return in CPExscindclass.cpp get result = %s#,bufsize is %ld,used=%ld,unused=%ld",SQL_project_name,Fsizeof32(sendbuf),Fused32(sendbuf),Funused32(sendbuf));
tpreturn(TPSUCCESS,0,(char *)sendbuf,0L,0);
---------sunny
"sunny" <[email protected]> wrote:
>
hi,all:
i meet a problem,when i try to fget the buffer from tuxedo,the error was
logged!the
flowing is the message of error and source,pleae check and help me and tell
me why?thanks
anyway!!!
PS:
1.my platform of tuxedo is Digital Unix and PC side is Win98/win2000.
2.Tuxedo version is 7.1(with no patch fixed)
3.database is sybase of unix
PART ONE,ERROR MESSAGE:
LIBTUX_CAT:6031: ERROR: Unable to pre-process buffer before tranmission.
Error code(12/3841)
171112.ah97supp!WSH.10488.1.0: WSNAT_CAT:1148: ERROR: Processing of message
to be
sent to client failed
171112.ah97supp!WSH.10488.1.0: WSNAT_CAT:1029: ERROR: Sending of reply message
to
client failed
PART TWO:MY SOURCE:
void CPExscind::AllDataCheck(TPSVCINFO *rqst)
/* ¼ì²é¡¢¸î½Ó½á¹û±êÖ¾¡£
flag 0 δ¼ì²é£¬1 ¸æ¾¯£¬2´íÎó£¬3 ¼ì²éͨ¹ý£¬4 ¸î½Óʧ°Ü£¬5 ¸î½Ó³É¹¦,6
¸î½Ó»Ø¹öʧ°Ü£¬7
¸î½Ó»Ø¹ö³É¹¦*/
EXEC SQL BEGIN DECLARE SECTION;
long recno;
long new_exchange_id;
long new_mdf_no;
CS_CHAR new_acc_nbr[21];
CS_CHAR new_port_no[21];
CS_CHAR new_mdf_col[9];
CS_CHAR new_mdf_block[9];
long new_mdf_serial;
CS_CHAR new_linebox_no[21];
long new_linebox_code;
long new_linebox_serial;
CS_CHAR new_crossbox1_no[21];
long new_crossbox1_code;
long new_crossbox1_in_line;
long new_crossbox1_out_line;
CS_CHAR new_crossbox2_no[21];
long new_crossbox2_code;
long new_crossbox2_in_line;
long new_crossbox2_out_line;
CS_CHAR new_crossbox3_no[21];
long new_crossbox3_code;
long new_crossbox3_in_line;
long new_crossbox3_out_line;
long new_maintrunk_code;
long new_mdf_code;
CS_CHAR check_message[101]="";
long tp_exchange_id;
CS_CHAR tp[2];
CS_CHAR tp_acc_nbr[21];
CS_CHAR tp_port_no[21];
CS_CHAR tp_mdfcol_no[9];
CS_CHAR tp_mdfblock_no[9];
long tp_mdf_code;
long tp_mdfblock_lineno;
long tp_maintrunk_code;
long tp_linebox_code;
CS_CHAR tp_linebox_name[21];
long tp_linebox_serial;
long tp_matchline_serial;
CS_CHAR tp_crossbox_name[21];
long tp_crossbox_code;
long tp_crossbox_inserial;
long tp_crossbox2_code;
long tp_crossbox2_in_serial;
long tp_crossbox2_out_serial;
long tp_crossbox3_code;
long tp_crossbox3_in_serial;
long tp_crossbox3_out_serial;
long SQL_exchange_id;
CS_CHAR SQL_project_name[21];
CS_CHAR SQL_project_sequence[11];
long SQL_input_err_cnt;
EXEC SQL END DECLARE SECTION;
recvbuf = (FBFR32 *)rqst->data;
     BufferSize = 4*1024;
     sendbuf = NULL;
     if((sendbuf = (FBFR32 *)tpalloc("FML32",NULL,BufferSize))==NULL)
DisConnect();
                    tpreturn(TPFAIL,0,NULL,0,0);
     Finit32(sendbuf,BufferSize) ;
Fget32(recvbuf,FML_CK_exchange_id,0,(char*)&SQL_exchange_id,0);
userlog("SQL_exchange_id-->%d",SQL_exchange_id);
Fget32(recvbuf,FML_CK_project_name,0,SQL_project_name,0);
userlog("SQL_project_name-->%s",SQL_project_name);
Fget32(recvbuf,FML_CK_project_sequence,0,SQL_project_sequence,0);
userlog("SQL_project_sequence-->%s",SQL_project_sequence);
Fget32(recvbuf,FML_CK_input_err_cnt,0,(char*)&SQL_input_err_cnt,0);
userlog("SQL_input_err_cnt-->%d",SQL_input_err_cnt);
/*È¡³ö·ûºÏ¼ì²éÌõ¼þµÄ¼Ç¼*/
EXEC SQL DECLARE check_data cursor for
select recno,
ISNULL(new_exchange_id,-1),
ISNULL(new_mdf_no,-1),
ISNULL(new_acc_nbr,'-1'),
ISNULL(new_port_no,'-1'),
ISNULL(new_mdf_col,'-1'),
          ISNULL(new_mdf_block,'-1'),
          ISNULL(new_mdf_serial,-1),
          ISNULL(new_linebox_no,'-1'),
          ISNULL(new_linebox_code,-1),
          ISNULL(new_linebox_serial,-1),
          ISNULL(new_crossbox1_no,'-1'),
          ISNULL(new_crossbox1_code,-1),
          ISNULL(new_crossbox1_in_line,-1),
          ISNULL(new_crossbox1_out_line,-1),
          ISNULL(new_crossbox2_no,'-1'),
          ISNULL(new_crossbox2_code,-1),
          ISNULL(new_crossbox2_in_line,-1),
          ISNULL(new_crossbox2_out_line,-1),
          ISNULL(new_crossbox3_no,'-1'),
          ISNULL(new_crossbox3_code,-1),
          ISNULL(new_crossbox3_in_line,-1),
          ISNULL(new_crossbox3_out_line,-1),
          ISNULL(new_maintrunk_code,-1),
          ISNULL(new_mdf_code,-1)
          from res_modify_details
where old_exchange_id=:SQL_exchange_id and
project_name=:SQL_project_name and
project_sequence=:SQL_project_sequence and
state='10A' and flag in('0','1','2') order by recno;
EXEC SQL OPEN check_data;
if(sqlca.sqlcode!=0)
userlog("Open Cursor --->sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode%s,%d",sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode);
/*Ñ»·¼ì²éÿÌõ¼Ç¼*/
int err_cnt=0;/*´íÎóÊý*/
int alert_cnt=0;/*¾¯¸æÊý*/
while(1)
/*¶ÔÓÚÒ»ÌõÏêÇé¼Ç¼Êý¾Ý±éÀú¼ì²é*/
EXEC SQL FETCH check_data into
:recno,
:new_exchange_id,
:new_mdf_no,
          :new_acc_nbr,
          :new_port_no,
          :new_mdf_col,
          :new_mdf_block,
          :new_mdf_serial,
          :new_linebox_no,
          :new_linebox_code,
          :new_linebox_serial,
          :new_crossbox1_no,
          :new_crossbox1_code,
          :new_crossbox1_in_line,
          :new_crossbox1_out_line,
          :new_crossbox2_no,
          :new_crossbox2_code,
          :new_crossbox2_in_line,
          :new_crossbox2_out_line,
          :new_crossbox3_no,
          :new_crossbox3_code,
          :new_crossbox3_in_line,
          :new_crossbox3_out_line,
          :new_maintrunk_code,
          :new_mdf_code;
     userlog("sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode%s,%d",sqlca.sqlerrm.sqlerrmc,sqlca.sqlcode);
     if(sqlca.sqlcode!=0) break;
     /*else if((sqlca.sqlcode!=100)&&(sqlca.sqlcode!=0))
          userlog("FETCH FAIL!");     
          DisConnect();
               tpreturn(TPFAIL,0,NULL,0,0);
/*±ØÊäÈë:оÖÏòÃû£¬ÐºÅÂ룬ж˿ڣ¬ÐÂÁС¢¿é¡¢¶Ô£¬
зÖÏßÏäºÅ£¬Ð·ÖÏßÏäÏßÐò£¬ÐÂÒ»¼¶½»½ÓÏäºÅ£¬
ÈëÏߣ¬³öÏߣ¬¶þ¼¶½»½ÓÏäºÅ£¬ÈëÏߣ¬³öÏߣ¬Èý¼¶*/
char err_msg[200]="";
char alt_msg[200]="";
strcpy(check_message,"");
     /*=============================ÅжÏÐÂÊý¾ÝÊÇ·ñΪ¿Õ´íÎó==============================*/
if(new_exchange_id==-1)
/*strcpy(err_msg,"оÖÏòΪ¿Õ´í£¡");*/
userlog("оÖÏòΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"оÖÏòΪ¿Õ´í£¡",0)
== -1) userlog("fadd
error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(new_mdf_no==-1)
     /*strcpy(err_msg,"ÐÂÅäÏ߼ܺÅΪ¿Õ´í£¡");*/
     userlog("ÐÂÅäÏ߼ܺÅΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÅäÏ߼ܺÅΪ¿Õ´í£¡",0)
== -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if((strcmp(new_acc_nbr,"-1")==0)||(strcmp(new_port_no,"-1")==0))
/*strcpy(err_msg,"ºÅÂë¶Ë¿ÚΪ¿Õ´í£¡");*/
userlog("ºÅÂë¶Ë¿ÚΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ºÅÂë¶Ë¿ÚΪ¿Õ´í£¡",0)
== -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if((strcmp(new_mdf_col,"-1")==0)||(strcmp(new_mdf_block,"-1")==0)||(new_mdf_serial==-1))
/*strcpy(err_msg,"ÐÂÁпé¶ÔΪ¿Õ´í£¡");*/
userlog("ÐÂÁпé¶ÔΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÁпé¶ÔΪ¿Õ´í£¡",0)
== -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(strcmp(new_linebox_no,"-1")==0)
/*strcpy(err_msg,"зÖÏßÏäºÅΪ¿Õ´í£¡");*/
userlog("зÖÏßÏäºÅΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"зÖÏßÏäºÅΪ¿Õ´í£¡",0)
== -1)
userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(new_linebox_serial==-1)
/*strcpy(err_msg,"зÖÏßÏäÏßÐòΪ¿Õ´í£¡");*/
userlog("зÖÏßÏäÏßÐòΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"зÖÏßÏäÏßÐòΪ¿Õ´í£¡",0)
==
-1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(strcmp(new_crossbox1_no,"-1")==0)
/*strcpy(err_msg,"ÐÂÒ»¼¶½»½ÓÏäºÅΪ¿Õ´í£¡");*/
userlog("ÐÂÒ»¼¶½»½ÓÏäºÅΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÒ»¼¶½»½ÓÏäºÅΪ¿Õ´í£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if(new_crossbox1_in_line==-1)
/*strcpy(err_msg,"ÐÂÒ»¼¶½»½ÓÏäÈëÏßΪ¿Õ´í£¡");*/
userlog("ÐÂÒ»¼¶½»½ÓÏäÈëÏßΪ¿Õ´í£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"ÐÂÒ»¼¶½»½ÓÏäÈëÏßΪ¿Õ´í£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0) ==
-1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                    if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error %ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
/*===========================ÅжÏÐÂÊý¾ÝΪ¿Õ¸æ¾¯============================
if(new_crossbox1_out_line==-1)
strcpy(alt_msg,"¸æ¾¯1,ÐÂÒ»¼¶½»½ÓÏä³öÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(strcmp(new_crossbox2_no,"-1")==0)
          strcpy(alt_msg,"¸æ¾¯2,жþ¼¶½»½ÓÏäºÅΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
          if(new_crossbox2_in_line==-1)
strcpy(alt_msg,"¸æ¾¯3,жþ¼¶½»½ÓÏäÈëÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(new_crossbox2_out_line==-1)
     strcpy(alt_msg,"¸æ¾¯4,жþ¼¶½»½ÓÏä³öÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
          if(strcmp(new_crossbox3_no,"-1")==0)
strcpy(alt_msg,"¸æ¾¯5,ÐÂÈý¼¶½»½ÓÏäºÅΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(new_crossbox3_in_line==-1)
strcpy(alt_msg,"¸æ¾¯6,ÐÂÈý¼¶½»½ÓÏäÈëÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
if(new_crossbox3_out_line==-1)
          strcpy(alt_msg,"¸æ¾¯7,ÐÂÈý¼¶½»½ÓÏä³öÏßΪ¿Õ£¡");
if (Fadd32(sendbuf,FML_CK_altmsg,alt_msg,0)== -1) userlog("fadd
error
= %ld",__LINE__);
alert_cnt=alert_cnt+1;
/*===========================ÅжÏÐÂÊý¾ÝºÏ·¨ÐÔ´íÎó²¢¾À´í=====================================*/
if(new_exchange_id!=-1)
EXEC SQL select exchange_id into :tp_exchange_id from exchange
where exchange_id=:new_exchange_id and state='10A';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,¾ÖÏò±íÖÐÎÞ´ËоÖÏò£¡");*/
strcat(check_message,"¾ÖÏò´í*");
userlog("´íÎó,¾ÖÏò±íÖÐÎÞ´ËоÖÏò£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,¾ÖÏò±íÖÐÎÞ´ËоÖÏò£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
if((strcmp(new_acc_nbr,"-1")!=0)||(strcmp(new_port_no,"-1")!=0))
/*ÅжϺÅÂë¶Ë¿ÚÊÇ·ñÒ»Ò»¶ÔÓ¦*/
EXEC SQL select distinct switch_num_way into :tp from
branch_tel_head
a,all_number b
where a.tel_head=b.tel_head
and b.acc_nbr=:new_acc_nbr;
if(strcmp(tp,"1")!=0)
/*²»¶ÔÓ¦*/
EXEC SQL select ISNULL(b.acc_nbr,'0') into
:tp_acc_nbr
from switch_info a,all_number b
     where a.switch_no=b.switch_no
     and a.exchange_id in (select distinct exchange_id FROM
popedom_tache_exchange
     where exchange_id=:new_exchange_id )
     and b.acc_nbr =:new_acc_nbr and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,ºÅÂë±íÖÐÎÞ´ËкÅÂ룡");*/
userlog("´íÎó,ºÅÂë±íÖÐÎÞ´ËкÅÂ룡");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,ºÅÂë±íÖÐÎÞ´ËкÅÂ룡",0)
== -1) userlog("fadd error %ld",__LINE__);
int num=Foccur32(sendbuf,FML_CK_errmessage);
                         userlog("num==%d",num);
strcat(check_message,"ºÅÂë´í*");
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
EXEC SQL select ISNULL(b.port_no,'0')
into :tp_port_no
from switch_info a,port_details b
     where a.switch_no=b.switch_no
     and a.exchange_id in (select distinct exchange_id FROM
popedom_tache_exchange
     where exchange_id=:new_exchange_id) and
b.port_no=:new_port_no and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´Ëж˿ڣ¡");*/
userlog("´íÎó,¶Ë¿Ú±íÖÐÎÞ´Ëж˿ڣ¡");
strcat(check_message,"¶Ë¿Ú´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´Ëж˿ڣ¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
else if(strcmp(tp,"1")==0)/*Ò»Ò»¶ÔÓ¦*/
EXEC SQL select ISNULL(b.acc_nbr,'0'),
ISNULL(b.port_no,'0')
into
:tp_acc_nbr,
:tp_port_no
from switch_info a,port_no b
     where a.switch_no=b.switch_no
     and a.exchange_id in (select distinct exchange_id FROM
popedom_tache_exchange
     where exchange_id=:new_exchange_id) and
b.acc_nbr=:new_acc_nbr and
b.port_no=:new_port_no and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/* strcpy(err_msg,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´ËкÅÂë¶Ë¿Ú£¡");*/
userlog("´íÎó,¶Ë¿Ú±íÖÐÎÞ´ËкÅÂë¶Ë¿Ú£¡");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,¶Ë¿Ú±íÖÐÎÞ´ËкÅÂë¶Ë¿Ú£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
strcat(check_message,"ºÅÂë¶Ë¿Ú´í*");
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1)
userlog("fadd error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                              if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
else
strcpy(new_port_no,tp_port_no);
/*strcpy(err_msg,"¸æ¾¯,¶Ë¿Ú±íÖÐÓÐж˿ڣ¡");*/
if (Fadd32(sendbuf,FML_CK_altmsg,"¸æ¾¯,¶Ë¿Ú±íÖÐÓÐж˿ڣ¡",0)==
-1) userlog("fadd error %ld",__LINE__);
alert_cnt=alert_cnt+1;
if((strcmp(new_mdf_col,"-1")!=0)&&(strcmp(new_mdf_block,"-1")!=0)&&(new_mdf_serial!=-1))
EXEC SQL select ISNULL(a.mdfcol_no,'0'),
ISNULL(a.mdfblock_no,'0'),
ISNULL(a.mdf_code,0),
ISNULL(b.mdfblock_lineno,0)
into
:tp_mdfcol_no,
:tp_mdfblock_no,
:tp_mdf_code,
:tp_mdfblock_lineno
from mdfz_info a,mdfz_details b
where a.mdf_code=b.mdf_code and
a.mdf_no=:new_mdf_no and
a.mdfcol_no=:new_mdf_col and
a.mdfblock_no=:new_mdf_block and
b.mdfblock_lineno=:new_mdf_serial and
b.num_line_state='6';
if(sqlca.sqlcode!=0)
/*strcpy(err_msg,"´íÎó,mdf±íÖÐÎÞ´ËÐÂÁпé¶Ô£¡");*/
userlog("´íÎó,mdf±íÖÐÎÞ´ËÐÂÁпé¶Ô£¡");
strcat(check_message,"Áпé¶Ô´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,mdf±íÖÐÎÞ´ËÐÂÁпé¶Ô£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
else
EXEC SQL select ISNULL(maintrunk_code,0)
into
:tp_maintrunk_code
from maintrunk_details
where mdf_code=:tp_mdf_code and
mdf_blocklineno=:tp_mdfblock_lineno;
if(sqlca.sqlcode==0)
new_maintrunk_code=tp_maintrunk_code;
if(strcmp(new_linebox_no,"-1")!=0)
     EXEC SQL select ISNULL(linebox_code,0),
     ISNULL(linebox_name,'0')
     into
     :tp_linebox_code,
     :tp_linebox_name
     from linebox_info
     where exchange_id=:new_exchange_id and
     linebox_name=:new_linebox_no;
     if(sqlca.sqlcode==0)
     new_linebox_code=tp_linebox_code;
               else
          /*strcpy(err_msg,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏ䣡");*/
          userlog("´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏ䣡");
          strcat(check_message,"·ÖÏßÏä´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏ䣡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
          if(new_linebox_serial!=-1)
          EXEC SQL select ISNULL(linebox_serial,0),
          ISNULL(matchline_serial,0)
          into
          :tp_linebox_serial,
          :tp_matchline_serial
          from linebox_details
          where linebox_code in (select linebox_code from linebox_info
          where exchange_id=:new_exchange_id and
          linebox_name=:new_linebox_no) and
          linebox_serial=:new_linebox_serial and
          num_line_state='6';
          if(sqlca.sqlcode!=0)
          /*strcpy(err_msg,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏäÏßÐò£¡");*/
          userlog("´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏäÏßÐò£¡");
          strcat(check_message,"·ÖÏßÏäÏßÐò´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,±íÖÐÎÞ´Ë·ÖÏßÏäÏßÐò£¡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
          else
          new_crossbox1_out_line=tp_matchline_serial;
          if(strcmp(new_crossbox1_no,"-1")!=0)
          EXEC SQL select ISNULL(crossbox_name,'0'),
          ISNULL(crossbox_code,0)
          into
          :tp_crossbox_name,
          :tp_crossbox_code
          from crossbox_info
          where exchange_id=:new_exchange_id and
          crossbox_name=:new_crossbox1_no;
          if(sqlca.sqlcode==0)
          new_crossbox1_code=tp_crossbox_code;
          else
          /*strcpy(err_msg,"´íÎó,±íÖÐÎ޴˽»½ÓÏ䣡");*/
          userlog("´íÎó,±íÖÐÎ޴˽»½ÓÏ䣡");
          strcat(check_message,"½»½ÓÏä´í*");
if (Fadd32(sendbuf,FML_CK_errmessage,"´íÎó,±íÖÐÎ޴˽»½ÓÏ䣡",0)
== -1) userlog("fadd error %ld",__LINE__);
err_cnt=err_cnt+1;
if (Fadd32(sendbuf,FML_CK_err_cnt,(char*)&err_cnt,0)
== -1) userlog("fadd error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_alert_cnt,(char*)&alert_cnt,0)== -1) userlog("fadd
error %ld",__LINE__);
                                        if (Fadd32(sendbuf,FML_CK_recno,(char*)&recno,0)== -1) userlog("fadd
error
%ld",__LINE__);
if(err_cnt>=SQL_input_err_cnt) goto SUBMIT;
          if(new_crossbox1_in_line!=-1)
          EXEC SQL select ISNULL(crossbox_inserial,0),
          ISNULL(uppercross_code,-1),