using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Threading.Tasks; using System.Windows.Forms; using System.Data.Sql; using System.Data.SqlClient; using System.Configuration; using System.IO; using System.Xml.Linq; using ManagementSystem.Utility; namespace ManagementSystem { public partial class AccountsReceivable : Form { //程式內共用物件 public bool blIsAdded = true; //判斷分錄是否寫入成功 string strFrmStatus = ""; //表單狀態 string strActiveUserID = ""; //取得登入作用的使用者帳號 string strAccountingBookID = ""; //取得作用中的帳本 SqlConnection sqlConn = UtilityClass.GetConn(MainForm.strAccountingBookID); SqlTransaction sqlTran; SqlCommand sqlCmd = new SqlCommand(); DataSet sdInsurance = new System.Data.DataSet(); string strKey = ""; //程式內加密的Key值 public AccountsReceivable() { InitializeComponent(); } #region 自定義程式 private void SetupStatus() //畫面載入設定 { try { strActiveUserID = MainForm.strActiveUserID; strAccountingBookID = MainForm.strAccountingBookID; strKey = MainForm.strKey; if (MainForm.strKey == "") { //設定Toolbar初始狀態 tsbAdd.Enabled = false; tsbSave.Enabled = false; tsbDelete.Enabled = false; } //設定畫面初始狀態 StatusChange("NONE"); } catch (Exception ex) { ErrorHandler.WriteErrorLog("AccountsReceivable.cs", ex); } } private void CleanForm() { txtCustomerName.Text = ""; txtReceiptDateStart.Text = ""; txtReceiptDateEnd.Text = ""; txtReceiptNo.Text = ""; cbHistory.Checked = false; } private void CleanToolbar() //清除工具列 { //設定Toolbar狀態 tsbSearch.Visible = true; tsbSearch.Enabled = true; tsbAdd.Visible = false; //本程式不存在新功能 tsbEdit.Visible = false; tsbEdit.Enabled = false; tsbDelete.Visible = false; tsbDelete.Enabled = false; tsbSave.Visible = false; tsbOK.Visible = false; tsbCancel.Visible = false; } private void LockForm() //限制唯讀物件 { txtCustomerName.ReadOnly = true; txtReceiptDateEnd.ReadOnly = true; txtReceiptDateStart.ReadOnly = true; txtReceiptNo.ReadOnly = true; cbHistory.Enabled = false; } private void UnLockForm() //解除限制唯讀物件 { txtCustomerName.ReadOnly = false; txtReceiptDateEnd.ReadOnly = false; txtReceiptDateStart.ReadOnly = false; txtReceiptNo.ReadOnly = false; cbHistory.Enabled = true; } public void StatusChange(string strStatus) //變更主畫面狀態 { try { switch (strStatus.ToUpper()) { case "NONE": CleanForm(); CleanToolbar(); LockForm(); ((MainForm)ParentForm).SsStatus.Items["tsslStatus"].Text = ""; strFrmStatus = ""; tsbSearch.Enabled = true; break; case "SEARCH": UnLockForm(); CleanForm(); tsbSearch.Enabled = false; tsbEdit.Enabled = false; tsbDelete.Enabled = false; tsbSave.Visible = false; tsbOK.Visible = true; tsbCancel.Visible = true; ((MainForm)ParentForm).SsStatus.Items["tsslStatus"].Text = "搜尋"; strFrmStatus = "SEARCH"; break; case "ADD": //本程式不提供新增功能 ((MainForm)ParentForm).SsStatus.Items["tsslStatus"].Text = "新增"; strFrmStatus = "ADD"; break; case "MODIFY": //本程式不提供修改功能 ((MainForm)ParentForm).SsStatus.Items["tsslStatus"].Text = "修改"; strFrmStatus = "MODIFY"; break; case "DEL": ((MainForm)ParentForm).SsStatus.Items["tsslStatus"].Text = "刪除"; strFrmStatus = "DEL"; break; } UtilityClass.SetGridColor(dgvARManagement); } catch (Exception ex) { ErrorHandler.WriteErrorLog("AccountsReceivable.cs", ex); } } public void GoEvent() //執行事件 { try { //物件宣告 StringBuilder sbSQL = new StringBuilder(); string strSalesOrderNo = ""; //訂單編號 string strProjectCName = ""; //專案中文名稱 string strProjectNumber = ""; //專案編號 string strReceiptNo = ""; //統一編號 string strCustomerID = ""; //客戶編號 string strCustomerName = ""; //客戶名稱 DateTime dtActualReceiptDate; //請款日期 string strActualReceiptedDate; //收款日期 string strReceiptAmount = ""; //請款金額 string strReceiveStatus = ""; //請款狀態 string strMemo = ""; //備註 switch (strFrmStatus) { case "SEARCH": dgvARManagement.Rows.Clear(); sbSQL.Clear(); sbSQL.Append("Select SalesOrderNo, ProjectCName, ProjectNumber, ReceiptNo, CustomerID, CustomerName, ActualReceiptDate, ActualReceiptedDate , ReceiptAmount, ReceiveStatus, Memo From OTB_FNC_AccountReceivable "); sbSQL.Append(" Where AccountingBookID ='" + strAccountingBookID + "'"); if (txtReceiptNo.Text.Trim() != "") { sbSQL.Append("AND ReceiptNo like '" + txtReceiptNo.Text.Trim() + "' "); } if (txtCustomerName.Text.Trim() != "") { sbSQL.Append("AND CustomerName like '" + txtCustomerName.Text.Trim() + "' "); } if (txtProjectName.Text.Trim() != "") { sbSQL.Append("AND ProjectName like '" + txtProjectName.Text.Trim() + "' "); } if (txtReceiptDateStart.Text.Trim() != "") { sbSQL.Append("AND ActualReceiptDate >= '" + txtReceiptDateStart.Text.Trim() + "' "); } if (txtReceiptDateEnd.Text.Trim() != "") { sbSQL.Append("AND ActualReceiptDate <= '" + txtReceiptDateEnd.Text.Trim() + "' "); } if (cbHistory.Checked == true) { sbSQL.Append("And ReceiveStatus = 'Y' "); } else { sbSQL.Append("And ReceiveStatus = 'N' "); } sbSQL.Append("Order BY ActualReceiptDate"); DataTable dtTemp = UtilityClass.GetSQLResult(sbSQL.ToString()).Tables["Result"]; foreach (DataRow drData in dtTemp.Rows) { DataGridViewRow dgvRow = new DataGridViewRow(); dgvRow.CreateCells(dgvARManagement); //逐行產生資料 strSalesOrderNo = (string)drData["SalesOrderNo"]; strProjectCName = (string)drData["ProjectCName"]; strProjectNumber = (string)drData["ProjectNumber"]; strReceiptNo = (string)drData["ReceiptNo"]; strCustomerID = (string)drData["CustomerID"]; strCustomerName = (string)drData["CustomerName"]; dtActualReceiptDate = Convert.ToDateTime(drData["ActualReceiptDate"]); if (drData["ActualReceiptedDate"] != DBNull.Value) { strActualReceiptedDate = Convert.ToDateTime(drData["ActualReceiptedDate"]).ToShortDateString(); } else { strActualReceiptedDate = ""; } strReceiptAmount = (string)drData["ReceiptAmount"]; strReceiveStatus = (string)drData["ReceiveStatus"]; strMemo = (string)drData["Memo"]; //產生Row dgvRow.Cells[1].Value = string.IsNullOrEmpty(strSalesOrderNo) ? "" : strSalesOrderNo; dgvRow.Cells[2].Value = string.IsNullOrEmpty(strProjectCName) ? "" : strProjectCName; dgvRow.Cells[3].Value = string.IsNullOrEmpty(strProjectNumber) ? "" : strProjectNumber; dgvRow.Cells[4].Value = string.IsNullOrEmpty(strCustomerID) ? "" : strCustomerID; dgvRow.Cells[5].Value = string.IsNullOrEmpty(strCustomerName) ? "" : strCustomerName; dgvRow.Cells[6].Value = string.IsNullOrEmpty(strReceiptNo) ? "" : strReceiptNo; dgvRow.Cells[7].Value = dtActualReceiptDate.ToString("yyyy/MM/dd"); dgvRow.Cells[8].Value = strActualReceiptedDate; dgvRow.Cells[9].Value = string.IsNullOrEmpty(strReceiptAmount) ? "" : UtilityClass.DecryptDES(strReceiptAmount,strKey); dgvRow.Cells[10].Value = string.IsNullOrEmpty(strMemo) ? "" : strMemo; dgvRow.Cells[11].Value = string.IsNullOrEmpty(strReceiveStatus) ? "" : strReceiveStatus; if (drData["ReceiveStatus"].ToString() == "Y") { dgvRow.ReadOnly = true; } dgvARManagement.Rows.Add(dgvRow); } StatusChange("NONE"); break; case "MODIFY": //本程式不提供維護功能 break; } } catch (Exception ex) { ErrorHandler.WriteErrorLog("AccountsReceivable.cs", ex); sqlTran.Rollback(); } } private bool CheckForm() { if (!UtilityClass.IsDate(txtReceiptDateStart.Text.Trim()) && txtReceiptDateStart.Text.Trim() != "") { MessageBox.Show("起始時間格式有誤!", "提示"); txtReceiptDateStart.Focus(); return false; } if (!UtilityClass.IsDate(txtReceiptDateEnd.Text.Trim()) && txtReceiptDateEnd.Text.Trim() != "") { MessageBox.Show("結束時間格式有誤!", "提示"); txtReceiptDateEnd.Focus(); return false; } return true; } public void UpdateAR(DataGridViewCellEventArgs e) //更新應收帳款記錄 { try { //物件宣告 string strReceiptNo = (string)dgvARManagement.Rows[e.RowIndex].Cells["cReceiptNo"].Value; string strReceiptedDate = (string)dgvARManagement.Rows[e.RowIndex].Cells["cActualReceiptedDate"].Value; using (SqlDataAdapter sqlAdapter = new SqlDataAdapter()) { string strSQL = "Update OTB_FNC_AccountReceivable Set ActualReceiptedDate = @ActualReceiptedDate , ReceiveStatus = 'Y' , ModifyDate = GetDate(), ModifyUser = @ModifyUser Where AccountingBookID = @AccountingBookID And ReceiptNo = @ReceiptNo "; strSQL += "UPdate OTB_SAL_ReceiptPlan Set ActualReceiptedDate = @ActualReceiptedDate, ModifyDate = GetDate(), ModifyUser = @ModifyUser Where AccountingBookID = @AccountingBookID And ReceiptNo = @ReceiptNo "; //添加參數 sqlAdapter.UpdateCommand = new SqlCommand(); sqlAdapter.UpdateCommand.Connection = sqlConn; sqlAdapter.UpdateCommand.Transaction = sqlTran; sqlAdapter.UpdateCommand.CommandText = strSQL; sqlAdapter.UpdateCommand.Parameters.AddRange ( new SqlParameter[] { new SqlParameter("@AccountingBookID",string.IsNullOrEmpty(strAccountingBookID) ? "" : strAccountingBookID), new SqlParameter("@ReceiptNo",string.IsNullOrEmpty(strReceiptNo) ? "" : strReceiptNo), new SqlParameter("@ModifyUser",strActiveUserID) } ); SqlParameter spActualReceiptedDate = new SqlParameter("@ActualReceiptedDate", SqlDbType.DateTime); spActualReceiptedDate.Value = strReceiptedDate; sqlAdapter.UpdateCommand.Parameters.Add(spActualReceiptedDate); if (sqlConn.State == ConnectionState.Closed) //判斷連線狀態 { sqlConn.Open(); } sqlAdapter.UpdateCommand.ExecuteNonQuery(); MessageBox.Show("核銷成功", "提示"); } } catch (Exception ex) { throw ex; } } #endregion #region 事件觸發及問題處理 private void tsbClean_Click(object sender, EventArgs e) { CleanForm(); } private void tsbExit_Click(object sender, EventArgs e) { this.Close(); } private void tsbCancel_Click(object sender, EventArgs e) { CleanToolbar(); StatusChange("NONE"); } private void tsbOK_Click(object sender, EventArgs e) { try { if (CheckForm()) { dgvARManagement.Rows.Clear(); GoEvent(); //還原Toolbar狀態 CleanToolbar(); //關閉查詢條件 LockForm(); StatusChange("NONE"); } } catch (Exception ex) { ErrorHandler.WriteErrorLog("AccountsReceivable.cs", ex); } } private void AccountsReceivable_Load(object sender, EventArgs e) { SetupStatus(); StatusChange("SEARCH"); GoEvent(); } private void tsbSearch_Click(object sender, EventArgs e) { UnLockForm(); StatusChange("SEARCH"); txtCustomerName.Focus(); tsbOK.Visible = true; tsbCancel.Visible = true; } private void tsbSetup_Click(object sender, EventArgs e) { XMLSetting frmSettingForm = new XMLSetting(); frmSettingForm.Owner = this; frmSettingForm.strOwnerForm = this.Name.ToString(); frmSettingForm.strXMLName = this.Name.ToString(); frmSettingForm.StartPosition = FormStartPosition.CenterParent; frmSettingForm.ShowDialog(); } private void dgvARManagement_CellContentClick(object sender, DataGridViewCellEventArgs e) { //物件宣告 string strDC = ""; string strReceipt = (string)dgvARManagement.Rows[e.RowIndex].Cells["cReceiptNo"].Value; string strReceiptAmount = (string)dgvARManagement.Rows[e.RowIndex].Cells["cReceiptAmount"].Value; try { //當GridView中的Button被按下 var SenderGrid = (DataGridView)sender; if (SenderGrid.Columns[e.ColumnIndex] is DataGridViewButtonColumn && e.RowIndex >= 0) { if (SenderGrid.Rows[e.RowIndex].ReadOnly == true) //判定唯讀則不處理 { return; } //Form設定 AccountingEntries acItemForm = new AccountingEntries(); acItemForm.strOwnerForm = "AccountsReceivable"; acItemForm.Owner = this; acItemForm.StartPosition = FormStartPosition.CenterParent; acItemForm.strFrmStatus = "ADD"; acItemForm.txtProjectNumber.Text = (string)dgvARManagement.Rows[e.RowIndex].Cells["cProjectNumber"].Value; acItemForm.txtProjectName.Text = (string)dgvARManagement.Rows[e.RowIndex].Cells["cProjectName"].Value; string strXMLPath = ConfigurationManager.AppSettings["XMLFilePath"].ToString() + this.Name.ToString() + ".xml"; if (File.Exists(strXMLPath)) { XDocument xmlContent = XDocument.Load(strXMLPath); foreach (XElement xmlData in xmlContent.Descendants("Accounting")) { DataGridViewRow dgvRow = new DataGridViewRow(); dgvRow.CreateCells(acItemForm.dgvDataMaintain); strDC = xmlData.Element("SubAccounting").Attribute("DC").Value.ToString(); switch (strDC) { case "D": dgvRow.Cells[1].Value = xmlData.Element("SubAccounting").Value.ToString(); dgvRow.Cells[2].Value = xmlData.Element("SubAccounting").Attribute("SubName").Value.ToString(); dgvRow.Cells[3].Value = "發票號碼：" + (string)dgvARManagement.Rows[e.RowIndex].Cells["cReceiptNo"].Value; dgvRow.Cells[4].Value = strReceiptAmount; break; case "C": dgvRow.Cells[1].Value = xmlData.Element("SubAccounting").Value.ToString(); dgvRow.Cells[2].Value = xmlData.Element("SubAccounting").Attribute("SubName").Value.ToString(); dgvRow.Cells[3].Value = "發票號碼：" + (string)dgvARManagement.Rows[e.RowIndex].Cells["cReceiptNo"].Value; dgvRow.Cells[5].Value = strReceiptAmount; break; } blIsAdded = false; if (string.IsNullOrEmpty((string)dgvARManagement.Rows[e.RowIndex].Cells["cActualReceiptedDate"].Value)) { dgvARManagement.Rows[e.RowIndex].Cells["cActualReceiptedDate"].Value = DateTime.Now.ToString("yyyy/MM/dd"); } acItemForm.dgvDataMaintain.Rows.Add(dgvRow); } acItemForm.dgeArgs = e; } acItemForm.ShowDialog(); } } catch (Exception ex) { ErrorHandler.WriteErrorLog("AccountsReceivable.cs", ex); } } private void dgvARManagement_RowValidated(object sender, DataGridViewCellEventArgs e) { dgvARManagement.Rows[e.RowIndex].ErrorText = ""; } private void dgvARManagement_RowValidating(object sender, DataGridViewCellCancelEventArgs e) { string strActualReceiptedDate = (string)dgvARManagement.Rows[e.RowIndex].Cells["cActualReceiptedDate"].Value; if (!string.IsNullOrEmpty(strActualReceiptedDate)) { if (!UtilityClass.IsDate(strActualReceiptedDate)) { dgvARManagement.Rows[e.RowIndex].ErrorText = "日期格式不正確!"; e.Cancel = true; } } } #endregion } }