function create_erpinmoney($memid, $paymoney)
{
$db = new mssale_test();
$db2 = new mssale_test();
$dberp = new erp_test();
$query = "select * from tb_organmem where fd_organmem_id = '{$memid}'";
$db->query($query);
if ($db->nf()) {
$db->next_record();
$insert_cusid = $db->f(fd_organmem_cusid);
$cusno = $db->f(fd_organmem_cusno);
$cusname = $db->f(fd_organmem_cusname);
$phone = $db->f(fd_organmem_phone);
$mobile = $db->f(fd_organmem_mobile);
$address = $db->f(fd_organmem_address);
$comnpany = $db->f(fd_organmem_comnpany);
$linkman = $db->f(fd_organmem_linkman);
$email = $db->f(fd_organmem_email);
$province = $db->f(fd_organmem_province);
$city = $db->f(fd_organmem_city);
$county = $db->f(fd_organmem_county);
$memid = $db->f(fd_order_memeberid);
//绑定ERP客户
if (empty($cusname)) {
$cusno = "ZB" . strtoupper(c($comnpany)) . randstr() . "";
//生成客户编号
$query = "select * from tb_webcustomer where fd_webcus_allname = '{$comnpany}' and fd_webcus_organid = '1'";
$dberp->query($query);
if ($dberp->nf()) {
$dberp->next_record();
$webmemid = $dberp->f(fd_webcus_id);
} else {
$query = "INSERT INTO tb_webcustomer (\n fd_webcus_no , fd_webcus_name , fd_webcus_allname ,\n fd_webcus_address , fd_webcus_phone1 , fd_webcus_quyuid , \n fd_webcus_newtime , fd_webcus_provinces , fd_webcus_city , \n fd_webcus_county , fd_webcus_organid , fd_webcus_linkman , \n fd_webcus_manphone , fd_webcus_email \n )VALUES(\n '{$cusno}' , '{$comnpany}' , '{$comnpany}' ,\n '{$address}' , '{$phone}' , '{$quyuid}' , \n now() , '{$province}' , '{$city}' , \n '{$county}' , '1' , '{$linkman}' , \n '{$mobile}' , '{$email}'\n )";
$dberp->query($query);
$webmemid = $dberp->insert_id();
}
$query = "select * from tb_customer where fd_cus_allname = '{$comnpany}' and fd_cus_organid = '1'";
$dberp->query($query);
if ($dberp->nf()) {
$dberp->next_record();
$insert_cusid = $dberp->f(fd_cus_id);
$cusno = $dberp->f(fd_cus_no);
} else {
$query = "INSERT INTO tb_customer(\n fd_cus_no , fd_cus_name , fd_cus_allname ,\n fd_cus_address , fd_cus_phone1 , fd_cus_quyuid , \n fd_cus_newtime , fd_cus_organid , fd_cus_iswebuse , \n fd_cus_provinces , fd_cus_city , fd_cus_county , \n fd_cus_linkman , fd_cus_manphone , fd_cus_email , \n fd_cus_credit \n )VALUES (\n '{$cusno}' , '{$comnpany}' , '{$comnpany}' ,\n '{$address}' , '{$phone}' , '{$quyuid}' , \n now() , '1' , '1' , \n '{$province}' , '{$city}' , '{$county}' , \n '{$linkman}' , '{$mobile}' , '{$email}' , \n '100' \n )";
$dberp->query($query);
$insert_cusid = $dberp->insert_id();
//取出刚插入的记录的主关键值的id
}
$query = "update tb_webcustomer set fd_webcus_erpcusid = '{$insert_cusid}' where fd_webcus_id = '{$webmemid}'";
$dberp->query($query);
$query = "update tb_organmem set fd_organmem_cusid = '{$insert_cusid}',fd_organmem_cusno = '{$cusno}', fd_organmem_cusname = '{$comnpany}'\n where fd_organmem_id = '{$memid}'";
$db->query($query);
}
//--------------------增加收款单功能----------------------------
$nowdate = date("Y-m-d");
$havesave = 0;
$paymemo = "手机支付自动生成的收款单";
//$paymemo = u2g($paymemo);
if (empty($cusname)) {
//如果客户是为空，就绑定网站注册公司为客户名称
$cusname = $comnpany;
}
$quyuid = 5;
$mscid = 11;
$skmscid = 11;
$skaccountid = "208";
$pjlistno = listnumber_update2(10);
//票据编号
$xt = '系统';
$query = "insert into tb_bill(\n fd_bill_no , fd_bill_clientid , fd_bill_type ,\n fd_bill_clientname , fd_bill_organid , fd_bill_accountid ,\n fd_bill_money , fd_bill_date , fd_bill_memo ,\n fd_bill_dealwithman , fd_bill_billno , fd_bill_firstorganid ,\n fd_bill_billtype , fd_bill_bank , fd_bill_number ,\n fd_bill_remitter , fd_bill_enddate , fd_bill_sdcrid ,\n fd_bill_clientno , fd_bill_iecrid , fd_bill_isopeninvoice,\n fd_bill_mscompanyid , fd_bill_state , fd_bill_hzdate\n )values(\n '{$pjlistno}' , '{$insert_cusid}' , '1' ,\n '{$cusname}' , '1' , '{$skaccountid}' ,\n '{$paymoney}' , '{$nowdate}' , '{$paymemo}' ,\n '{$xt}' , '' , '1' , \n '4' , '' , '' ,\n '' , '{$nowdate}' , '{$quyuid}' ,\n '{$cusno}' , '' , '1' ,\n '{$skmscid}' , '4' , now()\n )";
$dberp->query($query);
//插入付款单
$pjlistid = $dberp->insert_id();
//取出刚插入的记录的主关键值的id
$sklistno = listnumber_update2(8);
//票据编号
$query = "insert into tb_inmoneylist (\n fd_inmylt_no , fd_inmylt_clientid , fd_inmylt_type , \n fd_inmylt_clientno , fd_inmylt_clientname , fd_inmylt_dealwithman ,\n fd_inmylt_accountid , fd_inmylt_money , fd_inmylt_date ,\n fd_inmylt_state , fd_inmylt_memo , fd_inmylt_datetime ,\n fd_inmylt_organid , fd_inmylt_sdcrid , fd_inmylt_mscompanyid ,\n fd_inmylt_skmscid , fd_inmylt_billid\n )values(\n '{$sklistno}' , '{$insert_cusid}' , '1' ,\n '{$cusno}' , '{$cusname}' , '{$xt}' ,\n '{$skaccountid}' , '{$paymoney}' , '{$nowdate}' ,\n '1' , '{$paymemo}' , now() ,\n '1' , '{$quyuid}' , '{$skmscid}' ,\n '{$skmscid}' , '{$pjlistid}'\n )";
$dberp->query($query);
$sklistid = $dberp->insert_id();
//取出刚插入的记录的主关键值的id
//生成客户往来对帐单
$ctatmemo = "手机支付自动生成的收款单收取" . $paymoney . "元";
$cactlisttype = "8";
$addmoney = 0;
zbcurrentaccount(1, $insert_cusid, $addmoney, $paymoney, $ctatmemo, $cactlisttype, $xt, $sklistid, $sklistno, $nowdate, $quyuid, $skmscid);
changemoney(1, $insert_cusid, $paymoney, 1, 1, $quyuid, $skmscid, 1);
//修改应收应付款函数，0代表正，1代表负数
changeaccount($skaccountid, $paymoney, 0);
//调用修改帐户金额的函数
//生成帐户流水帐
$chgememo = "手机支付自动生成的收款单收取" . $paymoney . "元";
$chgelisttype = "8";
$cogetype = 0;
//0为收款 ， 1为付款
cashglide($skaccountid, $paymoney, $chgememo, $chgelisttype, $xt, $sklistid, $sklistno, $cogetype, $nowdate);
}
}
