?? dphsacti.pc
字號:
PrintStatus("yqd dphsacti1110");
PrintStatus(gcretstr);
return -1;
}
PrintStatus("yqdWO SWFJASLJFASJDFJ");
return 0;
}
/*
* 函數說明：生成sr_accept_log信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intoSr_accept_logProc()
{
EXEC SQL BEGIN DECLARE SECTION;
EXEC SQL END DECLARE SECTION;
/*初始化變量*/
strcpy(gcsrv_type,"0");/*0正式受理單，1修正單*/
/*刪除舊記錄*/
EXEC SQL DELETE FROM sr_accept_log WHERE produce_id = :gcmainproduce_id AND produce_no = :gcmainproduce_no AND (accept_state = '10' OR accept_state = '00');
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"刪除sr_accept_log出錯");
return -1;
}
EXEC SQL SELECT cust_type,cust_name,cert_no,cert_type,cust_kind INTO :gccust_type,:gccust_name,:gccert_no,:gccert_type,:gccust_kind
FROM dc_sim_precust
WHERE cust_id = :gccust_id;
if (sqlca.sqlcode != 0)
{
strcat(gcretstr,"檢索dc_sim_precust出錯");
#ifdef YYDEBUG
DebugLog("%s",gcretstr);
fclose(tracefp);
CopyTr(gcfilename,gcyyerrlog);
#endif
exceptExit(-1,gcretstr);
}
PrintStatus("yqd插入sr_accept_log數據");
PrintStatus("gcmainproduce_id");
PrintStatus(gcmainproduce_id);
PrintStatus("gcmainproduce_no");
PrintStatus(gcmainproduce_no);
PrintStatus("gcaccept_state");
PrintStatus(gcaccept_state);
PrintStatus("gcmainorder_id");
PrintStatus(gcmainorder_id);
PrintStatus("gcmainaccept_id");
PrintStatus(gcmainaccept_id);
PrintStatus("gcGenCustid");
PrintStatus(gcGenCustid);
PrintStatus("gccust_code");
PrintStatus(gccust_code);
PrintStatus("gcmainproduct_id");
PrintStatus(gcmainproduct_id);
PrintStatus("gccust_name");
PrintStatus(gccust_name);
PrintStatus("gccust_type");
PrintStatus(gccust_type);
PrintStatus("gcsrv_code");
PrintStatus(gcsrv_code);
PrintStatus("gcsub_srv");
PrintStatus(gcsub_srv);
PrintStatus("gcaccept_lan");
PrintStatus(gcaccept_lan);
PrintStatus("gcvest_lan");
PrintStatus(gcvest_lan);
PrintStatus("gcexch_code");
PrintStatus(gcexch_code);
PrintStatus("gcdepart_code");
PrintStatus(gcdepart_code);
PrintStatus("gcoper_code");
PrintStatus(gcoper_code);
PrintStatus("gcterminal_ip");
PrintStatus(gcterminal_ip);
PrintStatus("gcterm_code");
PrintStatus(gcterm_code);
PrintStatus("gcsrv_type");
PrintStatus(gcsrv_type);
PrintStatus("gccert_no");
PrintStatus(gccert_no);
PrintStatus("gccert_type");
PrintStatus(gccert_type);
PrintStatus("gccust_kind");
PrintStatus(gccust_kind);
trim(gccert_no);
trim(gcGenCustid);
trim(gccust_name);
trim(gccust_type);
trim(gcsub_srv);
trim(gcaccept_lan);
trim(gcvest_lan);
trim(gccert_type);
trim(gccust_kind);
trim(gccert_no);
EXEC SQL INSERT INTO sr_accept_log(
produce_id,produce_no,accept_state,
order_id,accept_id,owncust_id,owncust_code,product_id,
cust_name,cust_type,srv_code,sub_srv,accept_lan,vest_lan,
unit_type,unit_code,exch_code,
depart_code,depart_type,oper_code,terminal_ip,term_code,atime,
srv_type,cert_no,cert_type,cust_kind)
VALUES(:gcmainproduce_id,:gcmainproduce_no,:gcaccept_state,
:gcmainorder_id,:gcmainaccept_id,:gcGenCustid,:gccust_code,:gcmainproduct_id,
:gccust_name,:gccust_type,:gcsrv_code,:gcsub_srv,:gcaccept_lan,:gcvest_lan,
'1','001',:gcexch_code,
:gcdepart_code,'01',:gcoper_code,'','',sysdate,
:gcsrv_type,:gccert_no,:gccert_type,:gccust_kind);
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"插入sr_accept_log出錯");
sprintf(gcretstr,"yqd:%d,%s",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
PrintStatus("yqd 13021255");
PrintStatus(gcretstr);
return -1;
}
return 0;
}
/*
* 函數說明：生成pdn_servcontrol信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intoPdn_servcontrolProc()
{
EXEC SQL BEGIN DECLARE SECTION;
EXEC SQL END DECLARE SECTION;
strcpy(gcsrv_type,"0");
strcpy(gcdisp_flag,"0"); /*顯示標志,在客戶中心中是否顯示*/
strcpy(gcaccept_state,"00");
if (gitimes == 2)
{
/*刪除舊記錄*/
EXEC SQL DELETE FROM pdn_servcontrol WHERE produce_id = :gcmainproduce_id AND produce_no = :gcmainproduce_no AND (accept_state = '10' OR accept_state = '00');
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"刪除pdn_servcontrol出錯");
return -1;
}
}
EXEC SQL INSERT INTO pdn_servcontrol(produce_id,produce_no,order_id,accept_id,product_id,srv_code,sub_srv,accept_state,disp_flag,srv_type,atime)
VALUES(:gcmainproduce_id,:gcmainproduce_no,:gcmainorder_id,:gcmainaccept_id,:gcmainproduct_id,:gcsrv_code,:gcsub_srv,:gcaccept_state,:gcdisp_flag,:gcsrv_type,sysdate);
if (sqlca.sqlcode != 0)
{
strcpy(gcretstr,"插入pdn_servcontrol出錯");
sprintf(gcretstr,"yqd:%d,%s",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
PrintStatus("yqd dphsacti1255");
PrintStatus(gcretstr);
return -1;
}
return 0;
}
/*
* 函數說明：生成pdn_relate信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intoPdn_relateProc()
{
EXEC SQL BEGIN DECLARE SECTION;
EXEC SQL END DECLARE SECTION;
return 0;
}
/*
* 函數說明：生成pdn_prepay信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intoPdn_prepayProc()
{
EXEC SQL BEGIN DECLARE SECTION;
char lch3[PREPAY_FIELD][PREPAY_LENGTH] = {0};
char lcsub[3] = {0};
int lisub=0;
int j=0;
int k=0;
EXEC SQL END DECLARE SECTION;
return 0;
}
/*
* 函數說明：生成pdn_foregift信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intoPdn_foregiftProc()
{
EXEC SQL BEGIN DECLARE SECTION;
char lch6[FOREGIFT_FIELD][FOREGIFT_LENGTH] = {0};
char lcsub[3] = {0};
char lcsrowid[5] = {0};
char lccrowid[5] = {0};
int lisub=0;
int j=0;
int k=0;
EXEC SQL END DECLARE SECTION;
return 0;
}
/*
* 函數說明：生成p_orderdis信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intop_orderdis()
{
EXEC SQL BEGIN DECLARE SECTION;
int lcsubject_id=0;
int lccontent_id=0;
char lcvalidfee_flag[2]={0};
char lcfeeitem_code[5]={0};
char lcdis_mode[2]={0};
char lcpresent_code[11]={0};
int lcdis_var=0;
char lctime_flage[2]={0};
char lctime_unit[3]={0};
int lccontent_time=0;
int lcgroup_no=0;
char lcuse_scope[2]={0};
char lcetime[20]={0};
int RetCode;
EXEC SQL END DECLARE SECTION;
EXEC SQL DECLARE curdc_sim_predisc CURSOR FOR SELECT
subject_id,content_id,validfee_flag,
feeitem_code,dis_mode,present_code,dis_var,time_flag,
time_unit,content_time,group_no,
use_scope,etime
FROM dc_sim_predisc
WHERE product_id = :gcoldproduct_id;
EXEC SQL OPEN curdc_sim_predisc;
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"打開游標出錯");
return -1;
}
while (1)
{
EXEC SQL FETCH curdc_sim_predisc INTO :lcsubject_id,:lccontent_id,:lcvalidfee_flag,
:lcfeeitem_code,:lcdis_mode,:lcpresent_code,:lcdis_var,:lctime_flage,
:lctime_unit,:lccontent_time,:lcgroup_no,
:lcuse_scope,:lcetime;
RetCode = checkError("dc_sim_predisc",LINK_SELECT);
if ( RetCode == DATAERROR )
{
EXEC SQL close curdc_sim_predisc;
return -1 ;
}
if ( ( RetCode==DATANOTFOUND )||( getCurRecRowNum() > MAX_ROW_NUM ) )
{
break;
}
trim(lcvalidfee_flag);
trim(lcfeeitem_code);
trim(lcdis_mode);
trim(lcpresent_code);
trim(lctime_flage);
trim(lctime_unit);
trim(lcuse_scope);
trim(lcetime);
EXEC SQL INSERT INTO p_orderdis(
produce_id,produce_no,subject_id,content_id,validfee_flag,
feeitem_code,dis_mode,present_code,dis_var,time_flag,
time_unit,content_time,atime,stime,group_no,
use_scope,etime)
VALUES(:gcmainproduce_id,:gcmainproduce_no,:lcsubject_id,:lccontent_id,:lcvalidfee_flag,
:lcfeeitem_code,:lcdis_mode,:lcpresent_code,:lcdis_var,:lctime_flage,
:lctime_unit,:lccontent_time,sysdate,sysdate,:lcgroup_no,
:lcuse_scope,:lcetime
);
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"插入p_orderdis出錯");
return -1;
}
}
EXEC SQL CLOSE curdc_sim_predisc;
return 0;
}
/*
* 函數說明：生成Pdn_prepay信息
* 輸入參數：
* 輸出參數：
* 返 回 值：
*/
int intoPdn_prepay(){
EXEC SQL BEGIN DECLARE SECTION;
char lcitem_code[41]={0};
char lcitem_value[256]={0};
int RetCode=0;
char lcaccountid[11]={0};
char lcprod_class[3]={0};
EXEC SQL END DECLARE SECTION;
EXEC SQL DECLARE curPdn_prod_prop CURSOR FOR SELECT
item_code,item_value,prod_class
FROM Pdn_prod_prop
WHERE product_id = :gcmainproduct_id AND produce_type='1';
EXEC SQL OPEN curPdn_prod_prop;
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"打開游標出錯");
return -1;
}
while (1)
{
EXEC SQL FETCH curPdn_prod_prop INTO :lcitem_code,:lcitem_value,:lcprod_class;
RetCode = checkError("Pdn_prod_prop",LINK_SELECT);
if ( RetCode == DATAERROR )
{
EXEC SQL close curPdn_prod_prop;
return -1 ;
}
if ( ( RetCode==DATANOTFOUND )||( getCurRecRowNum() > MAX_ROW_NUM ) )
{
break;
}
trim(lcitem_code);
trim(lcitem_value);
if(strcmp(lcitem_code,"prepay_info")==0)
{
sprintf(lcaccountid,"%d",GenAccountidProc());
trim(lcaccountid);
if (strcmp(lcaccountid,"-1") == 0)
{
strcpy(gcretstr,"生成預付費帳號出錯");
return -1;
}
EXEC SQL INSERT INTO pdn_prepay(
produce_id,produce_type,account_id,pwd,cust_id,
card_no,bala_mode,mmaxconsume,dmaxconsume,rent_flag,
rent_type,rent_money,awoke_sum,allow_money,
allow_time,discount_type,fetch_flag,fetch_money,pay_mode,
bank_receipt,stime,comments
)
SELECT
:gcmainproduce_id,1,:lcaccountid,pwd,cust_id,
card_no,bala_mode,mmaxconsume,dmaxconsume,rent_flag,
rent_type,rent_money,awoke_sum,allow_money,
allow_time,discount_type,fetch_flag,fetch_money,pay_mode,
bank_receipt,sysdate,comments
FROM dc_sim_prepay
WHERE account_id =:lcitem_value;
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"插入pdn_prepay出錯");
return -1;
}
EXEC SQL UPDATE pdn_prod_prop
SET item_value=:lcaccountid
WHERE produce_id =:gcmainproduce_id
AND produce_type=1
AND prod_class=:lcprod_class
AND item_code =:lcitem_code;
if (sqlca.sqlcode < 0)
{
strcpy(gcretstr,"更新pdn_prod_prop出錯");
return -1;
}
}
}
EXEC SQL close curPdn_prod_prop;
return 0;
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -