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); } }
} //生成分行往来对帐单 $ctatmemo = "应收" . $cusname . "客户" . $allmoney . "元"; $cactlisttype = "3"; $lessenmoney = 0; currentaccount(1, $cusid, $allmoney, $lessenmoney, $ctatmemo, $cactlisttype, $loginstaname, $listid, $listno, $date); if ($allmoney != 0) { changemoney(1, $cusid, $allmoney, 0); //第四位0代表正,1代表负数 } //生成帐户流水帐 $chgememo = "销售单收取" . $cusname . "客户" . $allmoney . "元"; $chgelisttype = "3"; $cogetype = 0; //0为收款 , 1为付款 cashglide($accountid, $allmoney, $chgememo, $chgelisttype, $loginstaname, $listid, $listno, $cogetype, $date); $query = "insert into tb_cus_stock(\n\t fd_stock_no , fd_stock_date ,fd_stock_cusid , fd_stock_cusno,\n\t\t\t\t\tfd_stock_cusname ,\tfd_stock_skfs ,fd_stock_shaddress ,fd_stock_allmoney,\n\t\t\t\t\tfd_stock_allcost ,fd_stock_saleid ,fd_stock_datetime ,fd_stock_state\n\t )values(\n\t '{$listno}' , '{$date}' ,'{$cusid}' , '{$cusno}',\n\t\t\t\t\t'{$cusname}' , '{$skfs}' ,'{$shaddress}'\t , '{$allmoney}',\n \t\t\t\t\t'{$allmoney}' , '{$listid}' , now() , '1'\n\t )"; $db->query($query); //插入单据资料 $cus_listid = $db->insert_id(); //取出刚插入的记录的主关键值的id for ($i = 0; $i < count($arr_data); $i++) { $paycardid = $arr_data[$i]['paycardid']; $quantity = $arr_data[$i]['quantity']; $price = $arr_data[$i]['price']; $productid = $arr_data[$i]['productid']; updatepaycard($paycardid, $price, $date, $cusid); $query = "insert into tb_cus_stockdetail(\n\t\t\t\t\t\tfd_skdetail_stockid , fd_skdetail_paycardid , \n\t\t\t\t\t\tfd_skdetail_quantity , fd_skdetail_price , \n\t\t\t\t\t\tfd_skdetail_productid \t\t\t\t\t\n\t\t\t\t\t\t)values(\n\t\t\t\t\t\t'{$cus_listid}' , '{$paycardid}' , \n\t\t\t\t\t\t'{$quantity}' , '{$price}' , \n\t\t\t\t\t\t'{$productid}' \n\t\t\t\t\t\t)"; $db->query($query); //插入细节表 数据 }