示例#1
0
        private void btnExit_Click(object sender, EventArgs e)
        {
            if (!Convert.ToBoolean(this.bView))
            {
                if ((this.dsPR.Tables[0].Rows.Count > 0) || (this.groupPR.Enabled == false))
                {
                    if (NP.MSGB("The PO list will be cancel , Do you agree with this ?") == DialogResult.Yes)
                    {
                        // Cancel
                        oConn = new SqlConnection(NP.ReadFileDB(Application.StartupPath + @"\DB\DB.ini"));
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                        oConn.Open(); SqlTransaction Tr;
                        Tr = oConn.BeginTransaction();

                        try
                        {
                            SqlCommand cmd = new SqlCommand();
                            NP_Cls.SqlDel = "DELETE FROM t_PO WHERE (PONumber = @DocNumber)";
                            cmd.Parameters.Add("@DocNumber", SqlDbType.NVarChar, 12).Value = this.txtPR.Text.Trim();
                            cmd.CommandText = NP_Cls.SqlDel; cmd.Connection = oConn; cmd.Transaction = Tr;
                            cmd.ExecuteNonQuery();

                            NP_Cls.SqlDel   = "DELETE FROM t_PODetail WHERE (PONumber = @DocNumber)";
                            cmd.CommandText = NP_Cls.SqlDel; cmd.Connection = oConn; cmd.Transaction = Tr;
                            cmd.ExecuteNonQuery();

                            Tr.Commit();
                        }
                        catch (Exception ex)
                        {
                            NP.MSGB(NP_Cls.NPMgsStyle.ErrorType, "Del : " + ex.Message);
                        }
                        finally
                        {
                            if (oConn.State == ConnectionState.Open)
                            {
                                oConn.Close();
                            }
                        }
                        this.Close(); return;
                    }
                    else
                    {
                        return;
                    }
                }
            }

            if (NP.MSGB("Do you want to exit this screen ?") == DialogResult.Yes)
            {
                this.Close();
            }
            else
            {
                return;
            }
        }
示例#2
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            try
            {
                if (NP.ReqField(this.cbDepartment, "Please enter Department: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.cbLevel, "Please enter Level: !!") == false)
                {
                    return;
                }

                if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
                {
                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open();
                    try
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO s_Level " +
                                           "(DepartmentCode, AuthLevel, Per, UserCreate, DateCreate, FileStatus) " +
                                           "VALUES     (@DepartmentCode,@AuthLevel,@Per,@UC, GETDATE(),@St)";
                        cmdIns.Parameters.Add("@DepartmentCode", SqlDbType.NVarChar, 3).Value = this.cbDepartment.SelectedValue;
                        cmdIns.Parameters.Add("@AuthLevel", SqlDbType.NVarChar, 1).Value      = this.cbLevel.Text.Trim();
                        cmdIns.Parameters.Add("@Per", SqlDbType.NVarChar).Value    = ((string)GenPer());
                        cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value = NP_Cls.strUsr;
                        cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value  = "1";
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                        cmdIns.ExecuteNonQuery();

                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.cbDepartment.Select();
                    }
                    catch (Exception ex)
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                }
                else
                {
                    return;
                }
            }
            catch (Exception ex)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
            }
        }
示例#3
0
        private void btnAddPR_Click(object sender, EventArgs e)
        {
            if (string.IsNullOrEmpty(this.txtInv.Text.Trim()))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Invoice Number first !!"); this.txtInv.Select(); return;
            }
            if ((!string.IsNullOrEmpty(this.cbVendor.Text.Trim())) && (this.cbVendor.SelectedIndex != 0))
            {
                //
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();

                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO t_GT " +
                                       "(GTNumber, InvoiceNumber, GTDate, VendorCode, VendorName, PurchasingGroup, MovementType, Remark, UserCreate, DateCreate) " +
                                       "VALUES     (@GTNumber,@Invoice, GETDATE(),@VendorCode,@VendorName,@PurchasingGroup,@MovementType,@Remark,@UC,GETDATE())";
                    this.strGNumber = GetNumber();
                    cmdIns.Parameters.Add("@GTNumber", SqlDbType.NVarChar, 12).Value       = this.strGNumber;
                    cmdIns.Parameters.Add("@Invoice", SqlDbType.NVarChar, 20).Value        = this.txtInv.Text.Trim();
                    cmdIns.Parameters.Add("@VendorCode", SqlDbType.NVarChar, 10).Value     = this.cbVendor.Text.Trim();
                    cmdIns.Parameters.Add("@VendorName", SqlDbType.NVarChar, 60).Value     = this.lblVendorName.Text.Trim();
                    cmdIns.Parameters.Add("@PurchasingGroup", SqlDbType.NVarChar, 3).Value = this.lblPG.Text.Trim();
                    cmdIns.Parameters.Add("@MovementType", SqlDbType.NVarChar, 3).Value    = this.lblMovType.Text.Trim();
                    cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value        = this.txtRemark.Text.Trim();
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 50).Value             = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    this.groupPR.Enabled = false; this.btnAddPR.Visible = false; this.btnSave.Visible = true;
                    NP_Cls.SqlSelect     = "SELECT     GRNumber, GRNumber AS GRDis FROM t_GR WHERE (VendorCode = N'" + this.cbVendor.Text.Trim() + "') AND (MovementType = '101')";
                    NP.BindCB(this.cbPONumber, NP_Cls.SqlSelect, "GRNumber", "GRDis", "((( Select GR Number )))");
                    this.cbPONumber.Select(); this.cbPONumber.SelectAll();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Header : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
                //
            }
            else
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please select vendor first !!"); this.cbVendor.Select(); return;
            }
        }
示例#4
0
文件: frmGI.cs 项目: yuanyuan0318/WMS
        private void btnAddGI_Click(object sender, EventArgs e)
        {
            if ((!string.IsNullOrEmpty(this.cbPrdoOrder.Text.Trim())) && (this.cbPrdoOrder.SelectedIndex != 0))
            {
                //
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();

                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO t_StockMovement " +
                                       "(DocNumber, TranDate, RefNumber, PlantCode, PlantName, BOMVersion, LocCode, LocName, Remark, UserCreate, DateCreate) " +
                                       "VALUES     (@GINumber, GETDATE(),@PrdONumber,@PlantCode,@PlantName,@BOMVersion,@LocCode,@LocName,@Remark,@UD,GETDATE())";
                    this.strGNumber = GetNumber();
                    cmdIns.Parameters.Add("@GINumber", SqlDbType.NVarChar, 12).Value = this.strGNumber;
                    //cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.lblHeadMaterial.Text.Trim().Split(':')[0].ToString();
                    //cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60).Value = this.lblHeadMaterial.Text.Trim().Split(':')[1].ToString();
                    cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 50).Value = this.cbPrdoOrder.Text.Trim();
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 50).Value  = this.strPlant;
                    cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 50).Value  = this.lblPlant.Text.Trim();
                    cmdIns.Parameters.Add("@BOMVersion", SqlDbType.NVarChar, 5).Value  = this.lblBOMVer.Text.Trim();
                    cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 50).Value    = this.strLoc;
                    cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 50).Value    = this.lblLocation.Text.Trim();
                    cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value    = this.txtRemark.Text.Trim();
                    cmdIns.Parameters.Add("@UD", SqlDbType.NVarChar, 50).Value         = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    this.groupPR.Enabled = false; this.btnAddGI.Visible = false; this.btnSave.Visible = true;
                    NP_Cls.SqlSelect     = "SELECT  DISTINCT     t_PrdOrderDetail.ComponentName AS MaterialName, t_PrdOrderDetail.ComponentCode + ':' + t_PrdOrderDetail.ComponentName AS MaterialName AS MaterialCode FROM   t_PrdOrder INNER JOIN                    t_PrdOrderDetail ON t_PrdOrder.PrdONumber = t_PrdOrderDetail.PrdONumber LEFT OUTER JOIN   t_StockMovement ON t_PrdOrder.PrdONumber = t_StockMovement.RefNumber WHERE     (t_PrdOrder.PrdONumber = N'" + this.cbPrdoOrder.Text.Trim() + "') AND (t_PrdOrderDetail.IsGIClose = 0) AND (t_StockMovement.IsClose = 0)";
                    NP.BindCB(this.cbMaterial, NP_Cls.SqlSelect, "MaterialName", "MaterialCode", "((( Select Material )))");
                    this.cbMaterial.Select(); this.cbMaterial.SelectAll();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Header : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
                //
            }
            else
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please select vendor first !!"); return;
            }
        }
示例#5
0
文件: frmDO.cs 项目: yuanyuan0318/WMS
        private void btnAddSO_Click(object sender, EventArgs e)
        {
            if ((!string.IsNullOrEmpty(this.cbCustomer.Text.Trim())) && (this.cbCustomer.SelectedIndex != 0))
            {
                //
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();

                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO t_DO " +
                                       "(DONumber, DODate, CustomerCode, CustomerName, Terms, CurrencyCode, CurrencyName, Remark, UserCreate, DateCreate) " +
                                       "VALUES     (@DONumber, GETDATE(),@CustomerCode,@CustomerName,@Terms,@CurrencyCode,@CurrencyName,@Remark,@UD, GETDATE())";
                    this.strGNumber = GetNumber();
                    cmdIns.Parameters.Add("@DONumber", SqlDbType.NVarChar, 12).Value     = this.strGNumber;
                    cmdIns.Parameters.Add("@CustomerCode", SqlDbType.NVarChar, 10).Value = this.cbCustomer.Text.Trim().Split(':')[0].Trim();
                    cmdIns.Parameters.Add("@CustomerName", SqlDbType.NVarChar, 60).Value = this.lblCustomer.Text.Trim();
                    cmdIns.Parameters.Add("@Terms", SqlDbType.Decimal).Value             = Convert.ToDecimal(this.lblTerm.Text.Trim());
                    cmdIns.Parameters.Add("@CurrencyCode", SqlDbType.NVarChar, 3).Value  = this.strCurr;
                    cmdIns.Parameters.Add("@CurrencyName", SqlDbType.NVarChar, 20).Value = this.lblCurrency.Text.Trim();
                    cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value      = this.txtRemark.Text.Trim();
                    cmdIns.Parameters.Add("@UD", SqlDbType.NVarChar, 50).Value           = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    this.groupPR.Enabled = false; this.btnAddSO.Visible = false; this.btnSave.Visible = true;
                    BindCBSONumber();
                    this.cbSO.Select(); this.cbSO.SelectAll();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Header : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
                //
            }
            else
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please select vendor first !!"); return;
            }
        }
示例#6
0
        private void btnSaveChange_Click(object sender, EventArgs e)
        {
            if (this.dgvView.RowCount == 0)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Data Not Found !!"); return;
            }
            this.dgvView.EndEdit();
            if (NP.MSGB("Do you want to Save Change Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                SqlTransaction Tr;
                oConn.Open(); Tr = oConn.BeginTransaction(); this.dgvView.EndEdit();
                try
                {
                    SqlCommand cmdEdit = new SqlCommand();
                    NP_Cls.SqlInsert = "UPDATE    t_VendorSourceList " +
                                       "SET              Fix = @Fix " +
                                       "WHERE     (VendorCode = @VendorCode) AND (MaterialCode = @MaterialCode)";
                    cmdEdit.Parameters.Add("@VendorCode", SqlDbType.NVarChar, 10);
                    cmdEdit.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15);
                    cmdEdit.Parameters.Add("@Fix", SqlDbType.Bit);

                    for (Int32 i = 0; i < this.dgvView.RowCount; i++)
                    {
                        cmdEdit.Parameters["@VendorCode"].Value   = this.dgvView["clnVendorCode", i].Value.ToString();
                        cmdEdit.Parameters["@MaterialCode"].Value = this.txtMaterialCode.Text.Trim();
                        cmdEdit.Parameters["@Fix"].Value          = ((bool)this.dgvView["clnFix", i].Value);

                        cmdEdit.Connection = oConn; cmdEdit.CommandText = NP_Cls.SqlInsert; cmdEdit.Transaction = Tr;
                        cmdEdit.ExecuteNonQuery();
                    }
                    Tr.Commit();
                    DGV(string.Empty); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Save Change Completed !!"); this.txtMaterialCode.Select();
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Save : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#7
0
 private void ConnectDB()
 {
     try
     {
         oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
         oConn.Open(); oConn.Close();
     }
     catch (Exception)
     {
         if (NP.MSGB("Can not Connect Database, Try agian later !!\nor Setteing Configuration ?") == DialogResult.Yes)
         {
             frmConfiguration frm = new frmConfiguration();
             frm.ShowDialog(); ConnectDB();
         }
         else
         {
             Application.Exit();
         }
     }
 }
示例#8
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            if ((string.IsNullOrEmpty((this.cbProdOrder.Text.Trim()))) || (this.cbProdOrder.Text.Trim() == "((( Select Production Order )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please select Production Order: !!"); this.cbProdOrder.Select(); return;
            }
            if ((string.IsNullOrEmpty((this.cbWorkCenter.Text.Trim()))) || (this.cbWorkCenter.Text.Trim() == "((( Select WorkCenter )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please select Work Center: !!"); this.cbWorkCenter.Select(); return;
            }
            if (!NP.ReqField(this.txtMachine, "Please enter Used Machine !!"))
            {
                return;
            }
            if (!NP.ReqField(this.txtSetup, "Please enter Used Setup !!"))
            {
                return;
            }
            if (!NP.ReqField(this.txtLabor, "Please enter Used Labor !!"))
            {
                return;
            }
            if (!NP.ReqField(this.txtOT, "Please enter Used OT !!"))
            {
                return;
            }

            if (NP.MSGB("Do you want to Close Production Order ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr; Tr = oConn.BeginTransaction();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();

                    NP_Cls.SqlInsert = "INSERT INTO t_ProductionCost  (PrdONumber, MaterialCode, PlantCode, WorkCenterCode, UsedMachine, UsedSetup, UsedLabor, UsedOT, UserCreate, DateCreate) VALUES (@PrdONumber, @MaterialCode, @PlantCode, @WorkCenterCode, @UsedMachine, @UsedSetup, @UsedLabor, @UsedOT, @UserCreate, GETDATE())";
                    cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12).Value     = this.cbProdOrder.SelectedValue;
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value   = this.lblMaterialCode.Text.Trim();
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value       = this.lblPlantCode.Text.Trim();
                    cmdIns.Parameters.Add("@WorkCenterCode", SqlDbType.NVarChar, 10).Value = this.cbWorkCenter.SelectedValue;
                    cmdIns.Parameters.Add("@UsedMachine", SqlDbType.Decimal).Value         = decimal.Parse(this.txtMachine.Text.Trim());
                    cmdIns.Parameters.Add("@UsedSetup", SqlDbType.Decimal).Value           = decimal.Parse(this.txtSetup.Text.Trim());
                    cmdIns.Parameters.Add("@UsedLabor", SqlDbType.Decimal).Value           = decimal.Parse(this.txtLabor.Text.Trim());
                    cmdIns.Parameters.Add("@UsedOT", SqlDbType.Decimal).Value          = decimal.Parse(this.txtOT.Text.Trim());
                    cmdIns.Parameters.Add("@UserCreate", SqlDbType.NVarChar, 50).Value = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    // By NP - 2.7.13 - No reason to flag GI Change to OrderStatus = Close
                    NP_Cls.sqlUpdate  = "UPDATE t_PrdOrderDetail SET IsGIClose = 1 WHERE (PrdONumber = @PrdONumber)";
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    NP_Cls.sqlUpdate  = "UPDATE t_PrdOrder SET OrderStatus = 'Close' WHERE (PrdONumber = @PrdONumber)";
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    Tr.Commit();
                    Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Close Completed !!");
                    this.cbProdOrder.Select();
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Close : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#9
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            try
            {
                if (NP.ReqField(this.txtEmpCode, "Please enter EmployeeCode: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtFirstName, "Please enter FirstName: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtLastName, "Please enter LastName: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.cbDepartment, "Please enter Department: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.cbLevel, "Please enter Level: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtUserName, "Please enter UserName: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtPass, "Please enter Password: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtConf, "Please enter Confirm: !!") == false)
                {
                    return;
                }
                if (this.txtPass.Text.Trim() != this.txtConf.Text.Trim())
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Miss match password !!"); return;
                }

                if (ChkDup())
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Employee Code Or UserName Duplicated !!"); this.txtEmpCode.Select(); this.txtEmpCode.SelectAll(); return;
                }

                if (NP.MSGB("Do you want to Add User Data ?") == DialogResult.Yes)
                {
                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open();
                    try
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO s_User " +
                                           "(EmployeeCode, EmployeeFirstName, EmployeeLastName, DepartmentCode, AuthLevel, UserName, Password, UserCreate, DateCreate, FileStatus) " +
                                           "VALUES     (@EmployeeCode,@EmployeeFirstName,@EmployeeLastName,@DepartmentCode,@AuthLevel,@UserName,@Password,@UC, GETDATE(),@St)";
                        cmdIns.Parameters.Add("@EmployeeCode", SqlDbType.NVarChar, 10).Value      = this.txtEmpCode.Text.Trim();
                        cmdIns.Parameters.Add("@EmployeeFirstName", SqlDbType.NVarChar, 20).Value = this.txtFirstName.Text.Trim();
                        cmdIns.Parameters.Add("@EmployeeLastName", SqlDbType.NVarChar, 20).Value  = this.txtLastName.Text.Trim();
                        cmdIns.Parameters.Add("@DepartmentCode", SqlDbType.NVarChar, 3).Value     = this.cbDepartment.SelectedValue;
                        cmdIns.Parameters.Add("@AuthLevel", SqlDbType.NVarChar, 1).Value          = this.cbLevel.Text;;
                        cmdIns.Parameters.Add("@UserName", SqlDbType.NVarChar, 10).Value          = this.txtUserName.Text.Trim();
                        cmdIns.Parameters.Add("@Password", SqlDbType.NVarChar, 10).Value          = this.txtPass.Text.Trim();
                        cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value = NP_Cls.strUsr;
                        cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value  = "1";
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                        cmdIns.ExecuteNonQuery();

                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtEmpCode.Focus();
                    }
                    catch (Exception ex)
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                }
                else
                {
                    return;
                }
            }
            catch (Exception ex)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
            }
        }
示例#10
0
    private void btnAdd_Click(object sender, EventArgs e)
    {
        if (NP.ReqField(this.cbMaterial, "Please enter Material: !!") == false)
        {
            return;
        }
        if (NP.ReqField(this.cbPlant, "Please enter Plant: !!") == false)
        {
            return;
        }
        if (NP.ReqField(this.cbBOMType, "Please enter B.O.M Type: !!") == false)
        {
            return;
        }
        if (NP.ReqField(this.cbUnit, "Please enter Unit: !!") == false)
        {
            return;
        }
        if (NP.ReqField(this.txtQty, "Please enter Quantity: !!") == false)
        {
            return;
        }
        if (NP.ReqField(this.cbComponent, "Please enter Component: !!") == false)
        {
            return;
        }
        if (NP.ReqField(this.txtQtyComp, "Please enter Qty of Component: !!") == false)
        {
            return;
        }

        if (ChkDup())
        {
            NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.cbComponent.Select(); return;
        }

        if (this.dgvView.RowCount != 0)
        {
            Double bChk = 0;
            for (byte i = 0; i < this.dgvView.RowCount; i++)
            {
                bChk += Convert.ToDouble(this.dgvView["clnQty", i].Value);
            }
            if ((Convert.ToDouble(this.txtQtyComp.Text.Trim()) + bChk) > 100)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Qty of Component is over 100 !!"); this.txtQtyComp.Select(); this.txtQtyComp.SelectAll(); return;
            }
        }
        else
        {
            if (this.cbBOMType.SelectedValue.ToString().ToUpper() == "M")
            {
                if (Convert.ToDouble(this.txtQtyComp.Text.Trim()) > 100)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Qty of Component is over 100 !!"); this.txtQtyComp.Select(); this.txtQtyComp.SelectAll(); return;
                }
            }
        }

        if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
        {
            oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
            if (oConn.State == ConnectionState.Open)
            {
                oConn.Close();
            }
            oConn.Open(); SqlTransaction Tr; Tr = oConn.BeginTransaction();
            try
            {
                SqlCommand cmdIns = new SqlCommand();
                NP_Cls.SqlSelect = "SELECT MaterialCode, PlantCode FROM t_BOM WHERE (MaterialCode = @MaterialCode) AND (PlantCode = @PlantCode) AND (BOMVersion = @Ver)";
                cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.cbMaterial.SelectedValue;
                cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value     = this.cbPlant.SelectedValue;
                cmdIns.Parameters.Add("@Ver", SqlDbType.NVarChar, 20).Value          = this.txtVersion.Text.Trim();
                cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlSelect; cmdIns.Transaction = Tr;
                SqlDataAdapter da = new SqlDataAdapter(cmdIns); DataSet ds = new DataSet(); da.Fill(ds);

                if (ds.Tables[0].Rows.Count == 0)
                {
                    GenVCode();
                    NP_Cls.SqlInsert = "INSERT INTO t_BOM " +
                                       "(BOMCode, MaterialCode, PlantCode, BOMType, UnitCode, Quantity, BOMVersion, UserCreate, DateCreate, FileStatus, Approve) " +
                                       "VALUES     (@BOMCode,@MaterialCode,@PlantCode,@BOMType,@UnitCode,@Quantity,@BOMVersion,@UC, GETDATE(),@St,@Appr)";
                    cmdIns.Parameters.Add("@BOMCode", SqlDbType.Int).Value          = NP_Cls.strBOMCode;
                    cmdIns.Parameters.Add("@BOMType", SqlDbType.NVarChar, 1).Value  = this.cbBOMType.SelectedValue;
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3).Value = this.cbUnit.SelectedValue;
                    cmdIns.Parameters.Add("@Quantity", SqlDbType.Int).Value         = Convert.ToInt32(this.txtQty.Text.Trim());
                    cmdIns.Parameters.Add("@BOMVersion", SqlDbType.Int).Value       = this.txtVersion.Text.Trim();
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value      = NP_Cls.strUsr;
                    cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value       = "1";
                    cmdIns.Parameters.Add("@Appr", SqlDbType.Bit).Value             = 0;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    NP_Cls.SqlInsert = "INSERT INTO t_BOMDetail " +
                                       "(BOMCode, Category, MaterialCode, Quantity) " +
                                       "VALUES     (@BOMCode,@Category,@CompCode,@QtyComp)";
                    cmdIns.Parameters.Add("@CompCode", SqlDbType.NVarChar, 15).Value = this.cbComponent.SelectedValue;
                    cmdIns.Parameters.Add("@Category", SqlDbType.NVarChar, 1).Value  = ChkCategory(oConn, Tr, this.cbComponent.SelectedValue.ToString());
                    cmdIns.Parameters.Add("@QtyComp", SqlDbType.Decimal).Value       = Convert.ToDouble(this.txtQtyComp.Text.Trim());
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    Tr.Commit();
                    this.cbComponent.SelectedIndex = 0; this.txtQtyComp.Text = string.Empty;
                    DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.cbMaterial.Select();
                }
                else
                {
                    NP_Cls.strBOMCode = this.dgvView["clnBOMCode", 0].Value.ToString();
                    NP_Cls.SqlInsert  = "INSERT INTO t_BOMDetail " +
                                        "(BOMCode, Category, MaterialCode, Quantity) " +
                                        "VALUES     (@BOMCode,@Category,@CompCode,@QtyComp)";
                    cmdIns.Parameters.Add("@BOMCode", SqlDbType.Int).Value           = NP_Cls.strBOMCode;
                    cmdIns.Parameters.Add("@CompCode", SqlDbType.NVarChar, 15).Value = this.cbComponent.SelectedValue;
                    cmdIns.Parameters.Add("@Category", SqlDbType.NVarChar, 1).Value  = ChkCategory(oConn, Tr, this.cbComponent.SelectedValue.ToString());
                    cmdIns.Parameters.Add("@QtyComp", SqlDbType.Decimal).Value       = Convert.ToDouble(this.txtQtyComp.Text.Trim());
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    Tr.Commit();
                    this.cbComponent.SelectedIndex = 0; this.txtQtyComp.Text = string.Empty;
                    DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.cbMaterial.Select();
                }
            }
            catch (Exception ex)
            {
                if (oConn.State == ConnectionState.Open)
                {
                    Tr.Rollback();
                }
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
            }
            finally
            {
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
            }
        }
        else
        {
            return;
        }
    }
示例#11
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            if (NP.ReqField(this.txtCode, "Please enter Code: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtName, "Please enter Name: !!") == false)
            {
                return;
            }

            try
            {
                byte bRe = 0;
                if (ChkDup(ref bRe))
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.txtCode.Select(); this.txtCode.SelectAll(); return;
                }
                else
                {
                    if (bRe == 1)
                    {
                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Update Data Completed !!"); this.txtCode.Focus(); return;
                    }
                }
            }
            catch (Exception ex)
            {
                NP.MSGB("Erro Dup : " + ex.Message); return;
            }

            if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(Application.StartupPath + @"\DB\DB.ini"));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO m_WorkCenter " +
                                       " (WorkCenterCode, WorkCenterName, PlantCode, WorkCenterMachine, WorkCenterSetup, WorkCenterLabor, WorkCenterOT, UserCreate, DateCreate, FileStatus) " +
                                       "VALUES     (@WorkCenterCode,@WorkCenterName,@PlantCode,@WorkCenterMachine,@WorkCenterSetup,@WorkCenterLabor,@WorkCenterOT,@UC, GETDATE(),@St)";
                    cmdIns.Parameters.Add("@WorkCenterCode", SqlDbType.NVarChar, 10).Value = this.txtCode.Text.Trim();
                    cmdIns.Parameters.Add("@WorkCenterName", SqlDbType.NVarChar, 40).Value = this.txtName.Text.Trim();
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 10).Value      = this.cbPlant.SelectedValue;
                    cmdIns.Parameters.Add("@WorkCenterMachine", SqlDbType.Int).Value       = Convert.ToInt32(string.IsNullOrEmpty(this.txtMachine.Text.Trim()) ? "0" : this.txtMachine.Text.Trim());
                    cmdIns.Parameters.Add("@WorkCenterSetup", SqlDbType.Int).Value         = Convert.ToInt32(string.IsNullOrEmpty(this.txtSetup.Text.Trim()) ? "0" : this.txtSetup.Text.Trim());
                    cmdIns.Parameters.Add("@WorkCenterLabor", SqlDbType.Int).Value         = Convert.ToInt32(string.IsNullOrEmpty(this.txtLabor.Text.Trim()) ? "0" : this.txtLabor.Text.Trim());
                    cmdIns.Parameters.Add("@WorkCenterOT", SqlDbType.Int).Value            = Convert.ToInt32(string.IsNullOrEmpty(this.txtOT.Text.Trim()) ? "0" : this.txtOT.Text.Trim());
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value             = NP_Cls.strUsr;
                    cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value = "1";
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtCode.Focus();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Edit : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#12
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            if (NP.ReqField(this.txtCode, "Please enter Code: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtName, "Please enter Name: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbPG, "Please enter Purchasing group: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbCurrencyCode, "Please enter Currency: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtTerm, "Please enter Term of patment: !!") == false)
            {
                return;
            }
            try
            {
                byte bRe = 0;
                if (ChkDup(ref bRe))
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.txtCode.Select(); this.txtCode.SelectAll(); return;
                }
                else
                {
                    if (bRe == 1)
                    {
                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Update Data Completed !!"); this.txtCode.Focus(); return;
                    }
                }
            }
            catch (Exception ex)
            {
                NP.MSGB("Erro Dup : " + ex.Message); return;
            }


            if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(Application.StartupPath + @"\DB\DB.ini"));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO m_Vendor (Remark,VendorCode, VendorName, PurchasingGroup,VendorAddress, VendorPostalCode, VendorTelephone, VendorFax, CurrencyCode, TermsOfPayment, UserCreate, DateCreate, FileStatus, VendorContactPerson, VendorMobile, VendorEmail) VALUES (@Remark,@Code,@Name,@PG,@Address,@PostalCode,@Tel,@Fax,@OrderCurr,@Terms,@UC,getdate(),@St,@ContactP,@Mobile,@Email)";
                    cmdIns.Parameters.Add("@Code", SqlDbType.NVarChar, 10).Value       = this.txtCode.Text.Trim();
                    cmdIns.Parameters.Add("@Name", SqlDbType.NVarChar, 60).Value       = this.txtName.Text.Trim();
                    cmdIns.Parameters.Add("@PG", SqlDbType.NVarChar, 3).Value          = this.cbPG.SelectedValue;
                    cmdIns.Parameters.Add("@Address", SqlDbType.NVarChar, 120).Value   = this.txtAddress.Text.Trim();
                    cmdIns.Parameters.Add("@PostalCode", SqlDbType.NVarChar, 20).Value = this.txtPostal.Text.Trim();
                    cmdIns.Parameters.Add("@Tel", SqlDbType.NVarChar, 30).Value        = this.txtTele.Text.Trim();
                    cmdIns.Parameters.Add("@Fax", SqlDbType.NVarChar, 20).Value        = this.txtFax.Text.Trim();
                    cmdIns.Parameters.Add("@OrderCurr", SqlDbType.NVarChar, 3).Value   = this.cbCurrencyCode.SelectedValue;
                    cmdIns.Parameters.Add("@Terms", SqlDbType.NVarChar, 20).Value      = this.txtTerm.Text.Trim();
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value         = NP_Cls.strUsr;
                    cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value          = "1";
                    cmdIns.Parameters.Add("@ContactP", SqlDbType.NVarChar, 50).Value   = this.txtContactNo.Text.Trim();
                    cmdIns.Parameters.Add("@Mobile", SqlDbType.NVarChar, 60).Value     = this.txtMobileNo.Text.Trim();
                    cmdIns.Parameters.Add("@Email", SqlDbType.NVarChar, 100).Value     = this.txtEmail.Text.Trim();
                    cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 200).Value    = this.txtRemark.Text.Trim();
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtCode.Focus();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message);
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#13
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            if (!NP.ReqField(this.cbPrdOrder, "Please select Production Order first !!"))
            {
                return;
            }
            if (!NP.ReqField(this.txtQty, "Please enter Qty !!"))
            {
                return;
            }
            //if (decimal.Parse(lblPrdQty.Text.Trim()) < decimal.Parse(lblGrPrdQty.Text.Trim()) + decimal.Parse(txtQty.Text.Trim()))
            //{
            //    MessageBox.Show("Quantity must less than " + (decimal.Parse(lblPrdQty.Text.Trim()) - decimal.Parse(lblGrPrdQty.Text.Trim())).ToString(), "Warning !!", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1);
            //    txtQty.Focus();
            //    txtQty.Text = (decimal.Parse(lblPrdQty.Text.Trim()) - decimal.Parse(lblGrPrdQty.Text.Trim())).ToString();
            //    return;
            //}
            if (NP.MSGB("Do you to Save GR Production ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr;
                Tr = oConn.BeginTransaction();

                try
                {
                    SqlCommand cmdIns = new SqlCommand(); string strTmpBatch = NP_Cls._genBatch(this.lblMatCode.Text.Trim(), oConn, Tr);
                    NP_Cls.SqlInsert = "INSERT INTO t_StockMovement " +
                                       "(DocNumber, TranDate, MovementType,RefNumber, Remark, UserCreate, DateCreate,PlantCode,PlantName,BOMVersion,LocCode,LocName) " +
                                       "VALUES     (@GRPrdNumber,GETDATE(),@MovementType,@PrdONumber,@Remark,@UC,GETDATE(),@PlantCode,@PlantName,@BOMVersion,@LocCode,@LocName)";
                    cmdIns.Parameters.Add("@GRPrdNumber", SqlDbType.NVarChar, 12).Value = this.txtDocNo.Text.Trim();
                    cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12).Value  = this.cbPrdOrder.Text.Trim();
                    cmdIns.Parameters.Add("@MovementType", SqlDbType.NVarChar, 3).Value = this.lblMoveType.Text.Trim();
                    cmdIns.Parameters.Add("@GRPrdQty", SqlDbType.Decimal).Value         = Convert.ToDecimal(this.txtQty.Text.Trim());
                    cmdIns.Parameters.Add("@BatchNumber", SqlDbType.NVarChar, 10).Value = strTmpBatch;
                    cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value     = this.txtRemark.Text.Trim();
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 50).Value          = NP_Cls.strUsr;
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value    = this.lblPlantCode.Text.Trim();
                    cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20).Value   = this.lblPlant.Text.Trim();
                    cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2).Value      = this.lblLocCode.Text.Trim();
                    cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 20).Value     = this.lblLoc.Text.Trim();
                    cmdIns.Parameters.Add("@BOMVersion", SqlDbType.Int).Value           = Convert.ToInt32(this.lblBomVer.Text.Trim());
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    NP_Cls.SqlInsert = "INSERT INTO t_StockMovementDetail " +
                                       "(AutoID, DocNumber, RefNumber, MaterialCode, MaterialName, Quantity, BatchNumber, CurrentUser, LogDate,PlantCode,PlantName,LocCode,LocName,UnitCode,UnitName) " +
                                       "VALUES     (1, @GRPrdNumber,@PrdONumber,@MaterialCode, @MaterialName,@GRPrdQty,@BatchNumber, @UC, GETDATE(),@PlantCode,@PlantName,@LocCode,@LocName,@UnitCode,@UnitName)";
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.lblMatCode.Text.Trim();
                    cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60).Value = this.lblMaterialName.Text.Trim();
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3).Value      = this.lblUnitCode.Text.Trim();
                    cmdIns.Parameters.Add("@UnitName", SqlDbType.NVarChar, 20).Value     = this.lblUnitName.Text.Trim();
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    NP_Cls.SqlInsert  = "INSERT INTO [dbo].[t_GRPrd] ([GRPrdNumber]  ,[PrdONumber]  ,[GRPrdDate]  ,[MovementType]  ,[GRPrdQty]  ,[BatchNumber]  ,[Remark]  ,[UserCreate]  ,[DateCreate]  )       VALUES  (@GRPrdNumber  ,@PrdONumber  ,GETDATE()  ,@MovementType  ,@GRPrdQty  ,@BatchNumber  ,@Remark  ,@UC  ,GetDate())";
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    //TODO Save in Stock Overview // 16.11.10
                    string strTmp = "INSERT INTO t_StockOverview (MaterialCode, BatchNumber, UR, QI, Block, UserCreate, DateCreate, Cost,PlantCode,LocCode,OrigQty,UnitCode) VALUES (@MaterialCode,@BatchNumber,@UR,@QI,@Block,@UC, GETDATE(), @Cost,@PlantCode,@LocCode,@OrigQty,@UnitCode)";

                    //cmdIns.Parameters["@BatchNumber"].Value = strTmpBatch;
                    cmdIns.Parameters.Add("@UR", SqlDbType.Decimal).Value      = 0;
                    cmdIns.Parameters.Add("@QI", SqlDbType.Decimal).Value      = Convert.ToDecimal(this.txtQty.Text.Trim());
                    cmdIns.Parameters.Add("@Block", SqlDbType.Decimal).Value   = 0;
                    cmdIns.Parameters.Add("@Cost", SqlDbType.Decimal).Value    = getCost(oConn, Tr, this.lblMatCode.Text.Trim());
                    cmdIns.Parameters.Add("@OrigQty", SqlDbType.Decimal).Value = Convert.ToDecimal(this.txtQty.Text.Trim());
                    cmdIns.Connection = oConn; cmdIns.CommandText = strTmp; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();



                    strTmp            = "UPDATE t_PrdOrder SET GrPrdQuantity = Isnull(GrPrdQuantity,0) + @QI WHERE (PrdONumber = @PrdONumber)";
                    cmdIns.Connection = oConn; cmdIns.CommandText = strTmp; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    if (decimal.Parse(lblPrdQty.Text.Trim()) <= decimal.Parse(lblGrPrdQty.Text.Trim()) + decimal.Parse(txtQty.Text.Trim()))
                    {
                        strTmp            = "UPDATE t_MRPTranOrder SET IsCompleted = 1 WHERE (MaterialHeader = @MaterialCode) AND (TranOrder = @PrdONumber)";
                        cmdIns.Connection = oConn; cmdIns.CommandText = strTmp; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();

                        strTmp            = "UPDATE t_PrdOrder SET ISGRPrd = 1 WHERE (PrdONumber = @PrdONumber)";
                        cmdIns.Connection = oConn; cmdIns.CommandText = strTmp; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();
                    }

                    Tr.Commit(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Save GR Production Completed !!");
                    Clear();

                    this.txtDocNo.Text = GetNumber();
                    BindMat();
                    this.cbPrdOrder.Text = string.Empty; this.cbPrdOrder.Select();
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Detail : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#14
0
        private void btnSave_Click(object sender, EventArgs e)
        {
            if (NP.MSGB("Do you to Save Production Order no Job ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr;
                Tr = oConn.BeginTransaction();

                try
                {
                    if (!Convert.ToBoolean(bView))
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO t_Borrow (RefNumber, BorrowDate, MaterialCode, MaterialName, BorrowQuantity, UnitCode, UnitName, PlantCode, PlantName, LocCode, LocName, Remark, UserCreate, DateCreate) VALUES (@RefNumber,GETDATE(),@MaterialCode,@MaterialName,@BorrowQuantity,@UnitCode, @UnitName, @PlantCode,@PlantName,@LocCode,@LocName,@Remark,@UserCreate,  GETDATE())";
                        cmdIns.Parameters.Add("@RefNumber", SqlDbType.NVarChar, 12);
                        cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15);
                        cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60);
                        cmdIns.Parameters.Add("@BorrowQuantity", SqlDbType.Decimal);
                        cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 4);
                        cmdIns.Parameters.Add("@UnitName", SqlDbType.NVarChar, 20);
                        cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4);
                        cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20);
                        cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2);
                        cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 20);
                        cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255);
                        cmdIns.Parameters.Add("@UserCreate", SqlDbType.NVarChar, 50);

                        //SqlCommand cmdInsDetail = new SqlCommand();
                        //NP_Cls.SqlInsert = "INSERT INTO t_PrdOrderDetail (PrdONumber, ComponentCode, ComponentName, PrdOQuantity, UnitCode, UnitName, PlantCode, PlantName, LocCode, LocName, CurrentUser) VALUES     (@PrdONumber,@ComponentCode,@ComponentName,@PrdOQuantity,@UnitCode,@UnitName,@PlantCode,@PlantName,@LocCode,@LocName,@CurrentUser)";
                        //cmdInsDetail.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12);
                        //cmdInsDetail.Parameters.Add("@ComponentCode", SqlDbType.NVarChar, 15);
                        //cmdInsDetail.Parameters.Add("@ComponentName", SqlDbType.NVarChar, 60);
                        //cmdInsDetail.Parameters.Add("@PrdOQuantity", SqlDbType.Decimal);
                        //cmdInsDetail.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3);
                        //cmdInsDetail.Parameters.Add("@UnitName", SqlDbType.NVarChar, 20);
                        //cmdInsDetail.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4);
                        //cmdInsDetail.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20);
                        //cmdInsDetail.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2);
                        //cmdInsDetail.Parameters.Add("@LocName", SqlDbType.NVarChar, 20);
                        //cmdInsDetail.Parameters.Add("@CurrentUser", SqlDbType.NVarChar, 50);


                        for (byte ins = 0; ins < this.dgvView.RowCount; ins++)
                        {
                            cmdIns.Parameters["@RefNumber"].Value      = this.txtPrdOrder.Text.Trim();
                            cmdIns.Parameters["@MaterialCode"].Value   = this.dgvView["clnMaterialCode", ins].Value.ToString();
                            cmdIns.Parameters["@MaterialName"].Value   = this.dgvView["clnMaterialName", ins].Value.ToString();
                            cmdIns.Parameters["@BorrowQuantity"].Value = Convert.ToDecimal(this.dgvView["clnQuantity", ins].Value);
                            cmdIns.Parameters["@UnitCode"].Value       = this.dgvView["clnUnitCode", ins].Value.ToString();
                            cmdIns.Parameters["@UnitName"].Value       = this.dgvView["clnUnitName", ins].Value.ToString();
                            cmdIns.Parameters["@UserCreate"].Value     = NP_Cls.strUsr;
                            cmdIns.Parameters["@PlantCode"].Value      = this.dgvView["clnPlantCode", ins].Value.ToString();
                            cmdIns.Parameters["@PlantName"].Value      = this.dgvView["clnPlantName", ins].Value.ToString();
                            cmdIns.Parameters["@LocCode"].Value        = this.dgvView["clnLocCode", ins].Value.ToString();
                            cmdIns.Parameters["@LocName"].Value        = this.dgvView["clnLocName", ins].Value.ToString();
                            cmdIns.Parameters["@Remark"].Value         = this.txtRemark.Text.Trim();
                            cmdIns.Parameters.Add("@BatchNumber", SqlDbType.NVarChar, 10).Value = this.dgvView["clnBatch", ins].Value.ToString();

                            cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                            cmdIns.ExecuteNonQuery();

                            // Stock Overview //
                            NP_Cls.sqlUpdate  = "UPDATE   t_StockOverview SET UR = UR - @BorrowQuantity  WHERE (BatchNumber = @BatchNumber)";
                            cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                            cmdIns.ExecuteNonQuery();
                        }

                        cmdIns.Parameters.Clear();
                        // Master
                        NP_Cls.SqlInsert = "INSERT INTO t_StockMovement " +
                                           "(DocNumber, TranDate, MovementType, RefNumber,  Remark, UserCreate,  DateCreate) " +
                                           "VALUES     (@GINumber, GETDATE(), @MV, @PrdONumber,@Remark,@UD,GETDATE())";
                        Random rnd       = new Random();
                        string tmpString = "BR" + DateTime.Now.Year.ToString(NP_Cls.cul) + rnd.Next(1, 99999);
                        cmdIns.Parameters.Add("@GINumber", SqlDbType.NVarChar, 12).Value   = tmpString;
                        cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 50).Value = this.txtPrdOrder.Text.Trim();
                        cmdIns.Parameters.Add("@MV", SqlDbType.NVarChar, 3).Value          = (!string.IsNullOrEmpty(this.txtPrdOrder.Text.Trim()) ? "261" : "999");
                        cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 500).Value    = this.lblPlant.Text.Trim();
                        cmdIns.Parameters.Add("@UD", SqlDbType.NVarChar, 50).Value         = NP_Cls.strUsr;
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();


                        // Detail
                        cmdIns.Parameters.Clear();
                        NP_Cls.SqlInsert = "INSERT INTO t_StockMovementDetail " +
                                           "(AutoID,DocNumber, MaterialCode, MaterialName, Quantity, UnitCode, UnitName, PlantCode, PlantName, LocCode, LocName, CurrentUser, RefNumber, BatchNumber) " +
                                           "VALUES     (@AutoID, @DocNumber,@MaterialCode,@MaterialName,@GIQuantity,@UnitCode,@UnitName,@PlantCode,@PlantName,@LocCode,@LocName,@CurrentUser,@PrdONumber, @BatchNumber)";
                        cmdIns.Parameters.Add("@AutoID", SqlDbType.Int);
                        cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15);
                        cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60);
                        cmdIns.Parameters.Add("@GIQuantity", SqlDbType.Decimal);
                        cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3);
                        cmdIns.Parameters.Add("@UnitName", SqlDbType.NVarChar, 20);
                        cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4);
                        cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20);
                        cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 4);
                        cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 20);
                        cmdIns.Parameters.Add("@CurrentUser", SqlDbType.NVarChar, 50);
                        cmdIns.Parameters.Add("@BatchNumber", SqlDbType.NVarChar, 10);
                        cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12);
                        cmdIns.Parameters.Add("@DocNumber", SqlDbType.NVarChar, 12);

                        for (byte ins = 0; ins < this.dgvView.RowCount; ins++)
                        {
                            cmdIns.Parameters["@AutoID"].Value       = ins;
                            cmdIns.Parameters["@MaterialCode"].Value = this.dgvView["clnMaterialCode", ins].Value.ToString();
                            cmdIns.Parameters["@MaterialName"].Value = this.dgvView["clnMaterialName", ins].Value.ToString();
                            cmdIns.Parameters["@GIQuantity"].Value   = Convert.ToDouble(this.dgvView["clnQuantity", ins].Value.ToString());
                            cmdIns.Parameters["@UnitCode"].Value     = this.dgvView["clnUnitCode", ins].Value.ToString();
                            cmdIns.Parameters["@UnitName"].Value     = this.dgvView["clnUnitName", ins].Value.ToString();
                            cmdIns.Parameters["@CurrentUser"].Value  = NP_Cls.strUsr;
                            cmdIns.Parameters["@PlantCode"].Value    = this.dgvView["clnPlantCode", ins].Value.ToString();
                            cmdIns.Parameters["@PlantName"].Value    = this.dgvView["clnPlantName", ins].Value.ToString();
                            cmdIns.Parameters["@LocCode"].Value      = this.dgvView["clnLocCode", ins].Value.ToString();
                            cmdIns.Parameters["@LocName"].Value      = this.dgvView["clnLocName", ins].Value.ToString();
                            cmdIns.Parameters["@PrdONumber"].Value   = this.txtPrdOrder.Text.Trim();
                            cmdIns.Parameters["@DocNumber"].Value    = tmpString;
                            cmdIns.Parameters["@BatchNumber"].Value  = this.dgvView["clnBatch", ins].Value.ToString();

                            cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                            cmdIns.ExecuteNonQuery();
                        }

                        Tr.Commit(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Save Production Order Completed !!");
                        Clear(); this.btnSave.Visible = false;
                        this.MyGrid(dgvView); this.txtPrdOrder.DropDownStyle = ComboBoxStyle.Simple;
                        BindCB();
                        this.cbMaterialCode.Enabled = true;
                        this.cbMaterialCode.Text    = string.Empty; this.cbMaterialCode.Select(); this.cbMaterialCode.SelectAll();
                    }
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Detail : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#15
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            if (NP.ReqField(this.txtCode, "Please enter Code: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtName, "Please enter Name: !!") == false)
            {
                return;
            }

            if (NP.ReqField(this.cbUnit, "Please choose Unit: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbPlant, "Please choose Plant: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbLoc, "Please choose Location: !!") == false)
            {
                return;
            }
            if (this.cbMT.SelectedIndex == -1)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please choose Material Type: !!"); this.cbMT.Select(); return;
            }
            if (this.txtProcureType.SelectedIndex == -1)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please choose Procurement Type: !!"); this.txtProcureType.Select(); return;
            }


            try
            {
                byte bRe = 0;
                if (ChkDup(ref bRe))
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.txtCode.Select(); this.txtCode.SelectAll(); return;
                }
                else
                {
                    if (bRe == 1)
                    {
                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Update Data Completed !!"); this.txtCode.Focus(); return;
                    }
                }
            }
            catch (Exception ex)
            {
                NP.MSGB("Erro Dup : " + ex.Message); return;
            }


            if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(Application.StartupPath + @"\DB\DB.ini"));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO m_Material " +
                                       "(MaterialCode, MaterialName, ChemicalName, MaterialTypeName, MaterialGroupCode, UnitCode, PlantCode, LocCode, CustomerProduct, ProcurementType, GRProcessingTime, " +
                                       "DeliveryTime, InHouseProduction, ShelfLife, MovAvgPrice, StandardCost, UserCreate, DateCreate, FileStatus) " +
                                       "VALUES     (@MaterialCode,@MaterialName,@ChemicalName,@MaterialTypeName,@MaterialGroupCode,@UnitCode,@PlantCode,@LocCode,@CustomerProduct,@ProcurementType," +
                                       "@GRProcessingTime,@DeliveryTime,@InHouseProduction,@ShelfLife,@MovAvgPrice,@StandardCost,@UC, GETDATE(),@St)";
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value     = this.txtCode.Text.Trim();
                    cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60).Value     = this.txtName.Text.Trim();
                    cmdIns.Parameters.Add("@ChemicalName", SqlDbType.NVarChar, 60).Value     = this.txtChemicalName.Text.Trim();
                    cmdIns.Parameters.Add("@MaterialTypeName", SqlDbType.NVarChar, 20).Value = this.cbMT.Text.Trim();
                    cmdIns.Parameters.Add("@MaterialGroupCode", SqlDbType.NVarChar, 3).Value = this.cbMaterialGroup.SelectedValue;
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3).Value          = this.cbUnit.SelectedValue;
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value         = this.cbPlant.SelectedValue;
                    cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2).Value           = this.cbLoc.SelectedValue;
                    cmdIns.Parameters.Add("@CustomerProduct", SqlDbType.NVarChar, 15).Value  = this.txtCustProduct.Text.Trim();
                    cmdIns.Parameters.Add("@ProcurementType", SqlDbType.NVarChar, 1).Value   = this.txtProcureType.Text.Trim();
                    cmdIns.Parameters.Add("@GRProcessingTime", SqlDbType.Decimal).Value      = Convert.ToDecimal(string.IsNullOrEmpty(this.txtGR.Text.Trim()) ? "0" : this.txtGR.Text.Trim());
                    cmdIns.Parameters.Add("@DeliveryTime", SqlDbType.Decimal).Value          = Convert.ToDecimal(string.IsNullOrEmpty(this.txtDelivery.Text.Trim()) ? "0" : this.txtDelivery.Text.Trim());
                    cmdIns.Parameters.Add("@InHouseProduction", SqlDbType.Decimal).Value     = Convert.ToDecimal(string.IsNullOrEmpty(this.txtInHouse.Text.Trim()) ? "0" : this.txtInHouse.Text.Trim());
                    cmdIns.Parameters.Add("@ShelfLife", SqlDbType.Decimal).Value             = Convert.ToDecimal(string.IsNullOrEmpty(this.txtShelfLife.Text.Trim()) ? "0" : this.txtShelfLife.Text.Trim());
                    cmdIns.Parameters.Add("@MovAvgPrice", SqlDbType.Decimal).Value           = Convert.ToDecimal(string.IsNullOrEmpty(this.txtMovAvg.Text.Trim()) ? "0" : this.txtMovAvg.Text.Trim());
                    cmdIns.Parameters.Add("@StandardCost", SqlDbType.Decimal).Value          = Convert.ToDecimal(string.IsNullOrEmpty(this.txtStandardCost.Text.Trim()) ? "0" : this.txtStandardCost.Text.Trim());
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value = NP_Cls.strUsr;
                    cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value  = "1";
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtCode.Focus();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Edit : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#16
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            //for (byte ii = 0; ii < this.dgvView.RowCount; ii++)
            //{
            //    if (Convert.ToDouble(this.dgvView["clnDiff", ii].Value) < 0)
            //    {
            //        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Save with warning !!"); return;
            //    }
            //}

            if (NP.MSGB("Do you to Save Picking ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr;
                Tr = oConn.BeginTransaction();

                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    // Master
                    NP_Cls.SqlInsert = "INSERT INTO t_StockMovement " +
                                       "( DocNumber, TranDate, RefNumber, PlantCode, PlantName,  LocCode, LocName, UserCreate, DateCreate,BomVersion) " +
                                       "VALUES     (@GINumber, GETDATE(),@PrdONumber,@PlantCode,@PlantName,@LocCode,@LocName,@UD,GETDATE(),@BomVersion)";
                    cmdIns.Parameters.Add("@GINumber", SqlDbType.NVarChar, 12).Value   = this.txtProdOrder.Text.Trim();
                    cmdIns.Parameters.Add("@BomVersion", SqlDbType.Int).Value          = Convert.ToInt32(this.lblBOMVer.Text.Trim());
                    cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 50).Value = this.txtProdOrder.Text.Trim();
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 50).Value  = this.lblPlantCode.Text.Trim();
                    cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 50).Value  = this.lblPlant.Text.Trim();
                    cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 50).Value    = this.lblLocCode.Text.Trim();
                    cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 50).Value    = this.lblLoc.Text.Trim();
                    cmdIns.Parameters.Add("@UD", SqlDbType.NVarChar, 50).Value         = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    // Detail
                    NP_Cls.SqlInsert = "INSERT INTO t_StockMovementDetail " +
                                       "(AutoID,DocNumber, MaterialCode, MaterialName, Quantity, UnitCode, UnitName, PlantCode, PlantName, LocCode, LocName, CurrentUser, RefNumber, BatchNumber) " +
                                       "VALUES     (@AutoID, @GINumber,@MaterialCode,@MaterialName,@GIQuantity,@UnitCode,@UnitName,@PlantCode,@PlantName,@LocCode,@LocName,@CurrentUser,@PrdONumber, @BatchNumber)";
                    cmdIns.Parameters.Add("@AutoID", SqlDbType.Int);
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15);
                    cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60);
                    cmdIns.Parameters.Add("@GIQuantity", SqlDbType.Decimal);
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3);
                    cmdIns.Parameters.Add("@UnitName", SqlDbType.NVarChar, 20);
                    //cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4);
                    //cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20);
                    //cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2);
                    //cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 20);
                    cmdIns.Parameters.Add("@CurrentUser", SqlDbType.NVarChar, 50);
                    cmdIns.Parameters.Add("@BatchNumber", SqlDbType.NVarChar, 10);
                    //cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12);

                    //Fixed Issue 27/04/2013
                    //double clnQuantityValue = 0.000;
                    for (byte ins = 0; ins < this.dgvView.RowCount; ins++)
                    {
                        //For Stock Overview
                        AddDetail(oConn, Tr, cmdIns, (this.dgvView["clnQuantity", ins].Value == DBNull.Value ? 0.000 : Convert.ToDouble(this.dgvView["clnQuantity", ins].Value)), this.dgvView["clnMaterialCode", ins].Value.ToString(), ins);
                        //if (this.dgvView["clnQuantity", ins].Value != DBNull.Value)
                        //    clnQuantityValue = Convert.ToDouble(this.dgvView["clnQuantity", ins].Value);
                    }

                    cmdIns.Parameters.Clear();

                    //ToDo 0510
                    NP_Cls.sqlUpdate  = "UPDATE t_PrdOrder SET IsPicking = 1 WHERE (PrdONumber = '" + this.txtProdOrder.Text.Trim() + "')";
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    //ToDo 0710
                    NP_Cls.SqlSelect = "SELECT     PrdONumber, PrdOQuantity - GIQty AS Diff, ComponentCode FROM  t_PrdOrderDetail WHERE  (PrdONumber = N'" + this.txtProdOrder.Text.Trim() + "')";
                    DataSet dsFIS = new DataSet(); dsFIS = NP.GetDataWithTran(NP_Cls.SqlSelect, Tr, oConn);
                    for (int fis = 0; fis < dsFIS.Tables[0].Rows.Count; fis++)
                    {
                        if (Convert.ToDouble(dsFIS.Tables[0].Rows[fis][1]) == 0)
                        {
                            NP_Cls.sqlUpdate  = "UPDATE t_PrdOrderDetail SET FIS = 1 WHERE (ComponentCode = '" + dsFIS.Tables[0].Rows[fis][2].ToString() + "')";
                            cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                            cmdIns.ExecuteNonQuery();
                        }
                    }

                    //TODO 28082012 Save Picking tbl
                    cmdIns.Parameters.Clear();

                    NP_Cls.SqlInsert = "INSERT INTO t_Picking (PrdONumber, PickingDate, MaterialCode, MaterialName, PrdQuantity, PlantCode, PlantName, BOMVersion, LocCode, LocName, UserCreate, DateCreate) VALUES (@PrdONumber, GETDATE(), @MaterialCode, @MaterialName, @PrdQuantity, @PlantCode, @PlantName, @BOMVersion, @LocCode, @LocName, @UC, GETDATE())";
                    cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 50).Value   = this.txtProdOrder.Text.Trim();
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.lblMatCode.Text.Trim();
                    cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60).Value = this.lblMatName.Text.Trim();
                    cmdIns.Parameters.Add("@PrdQuantity", SqlDbType.Decimal).Value       = Decimal.Parse(this.lblPrdQty.Text.Trim());
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 10).Value    = this.lblPlantCode.Text.Trim();
                    cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 50).Value    = this.lblPlant.Text.Trim();
                    cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2).Value       = this.lblLocCode.Text.Trim();
                    cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 50).Value      = this.lblLoc.Text.Trim();
                    cmdIns.Parameters.Add("@BOMVersion", SqlDbType.NVarChar, 10).Value   = this.lblBOMVer.Text.Trim();
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 50).Value           = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    cmdIns.Parameters.Clear();
                    cmdIns.Parameters.Add("@PickingID", SqlDbType.Int);
                    cmdIns.Parameters.Add("@PickingDetailID", SqlDbType.Int);
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15);
                    cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60);
                    cmdIns.Parameters.Add("@PickingQuantity", SqlDbType.Decimal);
                    cmdIns.Parameters.Add("@ShortQuantity", SqlDbType.Decimal);
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 10);
                    cmdIns.Parameters.Add("@UnitName", SqlDbType.NVarChar, 50);
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 10);
                    cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 50);
                    cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2);
                    cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 50);
                    cmdIns.Parameters.Add("@BatchNumber", SqlDbType.NVarChar, 50);
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 50);

                    //Fixed Issue 27/04/2013
                    decimal QuantityValue = 0.00M;
                    //Get PickingID
                    int iPickingID = int.Parse(NP.GetDataWithTran("SELECT ISNULL(PickingID,0) AS PickingID FROM t_Picking ORDER BY PickingID DESC", Tr, oConn).Tables[0].Rows[0][0].ToString());
                    for (byte ins = 0; ins < this.dgvView.RowCount; ins++)
                    {
                        NP_Cls.SqlInsert = "INSERT INTO t_PickingDetail (PickingID, PickingDetailID, ComponentCode, ComponentName, PickingQuantity, ShortQuantity, UnitCode, UnitName, PlantCode, PlantName, LocCode, LocName, BatchNumber, CurrentUser) VALUES (@PickingID,  @PickingDetailID, @MaterialCode, @MaterialName, @PickingQuantity, @ShortQuantity, @UnitCode, @UnitName, @PlantCode, @PlantName, @LocCode, @LocName, @BatchNumber, @UC)";
                        cmdIns.Parameters["@PickingID"].Value       = iPickingID;
                        cmdIns.Parameters["@PickingDetailID"].Value = ins + 1;
                        cmdIns.Parameters["@MaterialCode"].Value    = this.dgvView["clnMaterialCode", ins].Value.ToString();
                        cmdIns.Parameters["@MaterialName"].Value    = this.dgvView["clnMaterialName", ins].Value.ToString();
                        cmdIns.Parameters["@PickingQuantity"].Value = (string.IsNullOrEmpty(this.dgvView["clnQuantity", ins].Value.ToString()) ? QuantityValue.ToString() : this.dgvView["clnQuantity", ins].Value.ToString());
                        if (this.dgvView["clnQuantity", ins].Value != DBNull.Value)
                        {
                            QuantityValue = Convert.ToDecimal(this.dgvView["clnQuantity", ins].Value);
                        }
                        cmdIns.Parameters["@ShortQuantity"].Value = decimal.Parse(this.dgvView["clnCurQty", ins].Value.ToString()) - decimal.Parse((this.dgvView["clnStockQty", ins].Value.ToString() == string.Empty ? "0" : this.dgvView["clnStockQty", ins].Value.ToString()));
                        cmdIns.Parameters["@UnitCode"].Value      = this.dgvView["clnUnitCode", ins].Value.ToString();
                        cmdIns.Parameters["@UnitName"].Value      = this.dgvView["clnUnitName", ins].Value.ToString();
                        cmdIns.Parameters["@PlantCode"].Value     = this.dgvView["clnPlantCode", ins].Value.ToString();
                        cmdIns.Parameters["@PlantName"].Value     = this.dgvView["clnPlantName", ins].Value.ToString();
                        cmdIns.Parameters["@LocCode"].Value       = this.dgvView["clnLocCode", ins].Value.ToString();
                        cmdIns.Parameters["@LocName"].Value       = this.dgvView["clnLocName", ins].Value.ToString();
                        cmdIns.Parameters["@BatchNumber"].Value   = this.dgvView["clnBatch", ins].Value.ToString();
                        cmdIns.Parameters["@UC"].Value            = NP_Cls.strUsr;

                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();
                    }
                    Tr.Commit(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Save Picking Completed !!");
                    btnAdd.Visible = false;
                    //TODO Picking 2809
                    //Report
                    NP_Cls.SqlSelect = "SELECT  0 AS ItemNo,   t_Picking.PrdONumber, t_Picking.PickingDate, t_Picking.MaterialCode, t_Picking.MaterialName, t_Picking.PrdQuantity, t_Picking.PlantCode, t_Picking.PlantName,                        t_Picking.BOMVersion, t_Picking.LocCode, t_Picking.LocName, t_Picking.PickingID, t_PickingDetail.PickingDetailID, t_PickingDetail.ComponentCode,                        t_PickingDetail.ComponentName, t_PickingDetail.PickingQuantity, t_PickingDetail.ShortQuantity, t_PickingDetail.UnitCode, t_PickingDetail.UnitName,                        t_PickingDetail.PlantCode AS cPlantCode, t_PickingDetail.PlantName AS cPlantName, t_PickingDetail.LocCode AS cLocCode, t_PickingDetail.LocName AS cLocName,                        t_PickingDetail.BatchNumber,CASE WHEN t_PickingDetail.ShortQuantity = 0 THEN '' WHEN t_PickingDetail.ShortQuantity > 0 THEN '***' END AS SH FROM         t_Picking INNER JOIN                       t_PickingDetail ON t_Picking.PickingID = t_PickingDetail.PickingID WHERE  (t_Picking.PrdONumber = N'" + this.txtProdOrder.Text.Trim() + "')";
                    DataSet ds = new DataSet();
                    ds = NP.GetClientDataSet(NP_Cls.SqlSelect);
                    if (ds.Tables[0].Rows.Count > 0)
                    {
                        for (int i = 0; i < ds.Tables[0].Rows.Count; i++)
                        {
                            ds.Tables[0].Rows[i][0] = i + 1;
                        }
                        frmRptViewer rptV = new frmRptViewer();
                        rptV.dsReportA = ds.Copy();

                        NP_Cls.SqlSelect = "SELECT t_Picking.PrdONumber, t_Picking.PickingDate, t_Picking.MaterialCode, t_Picking.MaterialName, t_Picking.PrdQuantity,t_RoutingDetail.WorkCenterCode FROM   t_Picking INNER JOIN  t_RoutingDetail ON t_Picking.MaterialCode = t_RoutingDetail.MaterialCode  WHERE  (t_Picking.PrdONumber = N'" + this.txtProdOrder.Text.Trim() + "')";
                        ds             = new DataSet();
                        ds             = NP.GetClientDataSet(NP_Cls.SqlSelect);
                        rptV.dsReportB = ds.Copy();

                        rptV.ShowDialog();
                    }
                    else
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Data Not Found !! Report !!"); return;
                    }
                    //this.Close();
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Detail : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#17
0
        private void btnAddVaidPeriod_Click(object sender, EventArgs e)
        {
            if (this.dtpTo.Value < this.dtpOn.Value)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Valid To: must be more than Valid On: !!"); this.dtpTo.Select(); return;
            }

            if (this.dtpTo.Value == this.dtpOn.Value)
            {
                if (NP.MSGB("Do you want to save and use Valid To: for unlimit date !!") == DialogResult.Yes)
                {
                    this.dtpTo.Value = this.dtpTo.MaxDate;

                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open(); SqlTransaction Tr;
                    Tr = oConn.BeginTransaction();
                    try
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        cmdIns.Parameters.Add("@ValidTo", SqlDbType.Date);

                        if (this.dgvView.RowCount > 0)
                        {
                            if (Convert.ToDateTime(this.dgvView[2, this.dgvView.RowCount - 1].Value) == this.dtpTo.MaxDate)
                            {
                                NP_Cls.sqlUpdate = "UPDATE t_VendorInfoRecordPeriods SET ValidTo = @ValidTo WHERE (ValidPeriodCode = @ValidPeriodCode)";
                                cmdIns.Parameters["@ValidTo"].Value = this.dtpOn.Value.AddDays(-1);
                                cmdIns.Parameters.Add("@ValidPeriodCode", SqlDbType.NVarChar, 20).Value = this.dgvView["clnValidPeriodCode", this.dgvView.RowCount - 1].Value.ToString();
                                cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                                cmdIns.ExecuteNonQuery();
                            }
                        }

                        //if (this.dgvView.RowCount == 0) { GenVCode(); }
                        NP_Cls.SqlInsert = "INSERT INTO t_VendorInfoRecordPeriods " +
                                           "(VendorCode, MaterialCode, ValidOn, ValidTo, UserCreate, DateCreate, FileStatus) " +
                                           "VALUES (@VendorCode,@MaterialCode,@ValidOn,@ValidTo,@UC, GETDATE(), N'1')";
                        //cmdIns.Parameters.Add("@ValidPeriodCode", SqlDbType.Int).Value = Convert.ToInt64(NP_Cls.strValidCode);
                        cmdIns.Parameters.Add("@VendorCode", SqlDbType.NVarChar, 10).Value   = NP_Cls.hVendorInfo["Vendor"].ToString();
                        cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = NP_Cls.hVendorInfo["Material"].ToString();
                        cmdIns.Parameters.Add("@ValidOn", SqlDbType.Date).Value = this.dtpOn.Value;
                        cmdIns.Parameters["@ValidTo"].Value = this.dtpTo.Value;
                        cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value = NP_Cls.strUsr;
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();

                        Tr.Commit();
                        DGV(); Clear(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.dtpOn.Select(); return;
                    }
                    catch (Exception ex)
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Edit : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                }
                else
                {
                    this.dtpTo.Select(); return;
                }
            }

            if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr;
                Tr = oConn.BeginTransaction();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    cmdIns.Parameters.Add("@ValidTo", SqlDbType.Date);
                    if (this.dgvView.RowCount > 0)
                    {
                        if (Convert.ToDateTime(this.dgvView[2, this.dgvView.RowCount - 1].Value) == this.dtpTo.MaxDate)
                        {
                            NP_Cls.sqlUpdate = "UPDATE t_VendorInfoRecordPeriods SET ValidTo = @ValidTo WHERE (ValidPeriodCode = @ValidPeriodCode)";
                            cmdIns.Parameters["@ValidTo"].Value = this.dtpOn.Value.AddDays(-1);
                            cmdIns.Parameters.Add("@ValidPeriodCode", SqlDbType.NVarChar, 20).Value = this.dgvView["clnValidPeriodCode", this.dgvView.RowCount - 1].Value.ToString();
                            cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.sqlUpdate; cmdIns.Transaction = Tr;
                            cmdIns.ExecuteNonQuery();
                        }
                    }
                    //if (this.dgvView.RowCount == 0) { GenVCode(); }
                    NP_Cls.SqlInsert = "INSERT INTO t_VendorInfoRecordPeriods " +
                                       "(VendorCode, MaterialCode, ValidOn, ValidTo, UserCreate, DateCreate, FileStatus) " +
                                       "VALUES (@VendorCode,@MaterialCode,@ValidOn,@ValidTo,@UC, GETDATE(), N'1')";
                    //cmdIns.Parameters.Add("@ValidPeriodCode", SqlDbType.Int).Value = Convert.ToInt64(NP_Cls.strValidCode);
                    cmdIns.Parameters.Add("@VendorCode", SqlDbType.NVarChar, 10).Value   = NP_Cls.hVendorInfo["Vendor"].ToString();
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = NP_Cls.hVendorInfo["Material"].ToString();
                    cmdIns.Parameters.Add("@ValidOn", SqlDbType.Date).Value = this.dtpOn.Value;
                    cmdIns.Parameters["@ValidTo"].Value = this.dtpTo.Value;
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value = NP_Cls.strUsr;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    Tr.Commit();
                    DGV(); Clear(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.dtpOn.Select();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Edit : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#18
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            try
            {
                if (NP.ReqField(this.txtCode, "Please enter Material Code: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtBatch, "Please enter Batch: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtPlant, "Please enter Plant: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtLocation, "Please enter Location: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtUnit, "Please enter Unit: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtUR, "Please enter UR: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtQI, "Please enter QI: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtBlock, "Please enter Block: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtCost, "Please enter Cost: !!") == false)
                {
                    return;
                }

                if (IsMaterial())
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Material Code is not in system !!"); this.txtCode.Select(); this.txtCode.SelectAll(); return;
                }

                if (ChkDup())
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Material Code & Batch Duplicated !!"); this.txtCode.Select(); this.txtCode.SelectAll(); return;
                }

                if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
                {
                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open();
                    try
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO t_StockOverview " +
                                           "(MaterialCode, BatchNumber, PlantCode, LocCode, UnitCode, UR, QI, Block, Cost, UserCreate, DateCreate) " +
                                           "VALUES     (@MaterialCode,@BatchNumber,@PlantCode,@LocCode,@UnitCode,@UR,@QI,@Block,@Cost,@UC,GETDATE())";
                        cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.txtCode.Text.Trim();
                        cmdIns.Parameters.Add("@BatchNumber", SqlDbType.NVarChar, 10).Value  = this.txtBatch.Text.Trim();
                        cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value     = this.txtPlant.Text.Trim();
                        cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2).Value       = this.txtLocation.Text.Trim();
                        cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3).Value      = this.txtUnit.Text.Trim();
                        cmdIns.Parameters.Add("@UR", SqlDbType.Decimal).Value      = Convert.ToDecimal(this.txtUR.Text.Trim());
                        cmdIns.Parameters.Add("@QI", SqlDbType.Decimal).Value      = Convert.ToDecimal(this.txtQI.Text.Trim());
                        cmdIns.Parameters.Add("@Block", SqlDbType.Decimal).Value   = Convert.ToDecimal(this.txtBlock.Text.Trim());
                        cmdIns.Parameters.Add("@Cost", SqlDbType.Decimal).Value    = Convert.ToDecimal(this.txtCost.Text.Trim());
                        cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 20).Value = NP_Cls.strUsr;

                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                        cmdIns.ExecuteNonQuery();

                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtCode.Focus();
                    }
                    catch (Exception ex)
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                }
                else
                {
                    return;
                }
            }
            catch (Exception ex)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
            }
        }
示例#19
0
        private void btnExit_Click(object sender, EventArgs e)
        {
            if (this.dQtyChk != 0)
            {
                if (NP.MSGB("Qty of Component are not equal Qty of BOM !!\nThe transaction will be reject , Do you want to exit out of save ?") == DialogResult.Yes)
                {
                    // Delete all Transaction
                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open(); SqlTransaction Tr; Tr = oConn.BeginTransaction();
                    try
                    {
                        SqlCommand cmdDel = new SqlCommand();
                        NP_Cls.SqlSelect = "SELECT BOMDetailCode FROM t_BOMDetail WHERE (BOMCode = @BOMCode)";
                        cmdDel.Parameters.Add("@BOMCode", SqlDbType.Int).Value = Convert.ToInt32(NP_Cls.hBOM["BOMCode"].ToString());
                        cmdDel.Connection = oConn; cmdDel.CommandText = NP_Cls.SqlSelect; cmdDel.Transaction = Tr;
                        SqlDataAdapter da = new SqlDataAdapter(cmdDel); DataSet ds = new DataSet(); da.Fill(ds);

                        if (ds.Tables[0].Rows.Count > 0)
                        {
                            NP_Cls.SqlDel = "DELETE FROM t_BOMDetail WHERE (BOMCode = @BOMCode)";
                            //cmdDel.Parameters.Add("@BOMCode", SqlDbType.Int).Value = this.dgvView["clnBOMCode", this.dgvView.CurrentRow.Index].Value;
                            cmdDel.Parameters.Add("@BOMDetailCode", SqlDbType.Int).Value = this.dgvView["clnBOMDetailCode", this.dgvView.CurrentRow.Index].Value;
                            cmdDel.Connection = oConn; cmdDel.CommandText = NP_Cls.SqlDel; cmdDel.Transaction = Tr;
                            cmdDel.ExecuteNonQuery();

                            NP_Cls.SqlDel     = "DELETE FROM t_BOM WHERE (BOMCode = @BOMCode)";
                            cmdDel.Connection = oConn; cmdDel.CommandText = NP_Cls.SqlDel; cmdDel.Transaction = Tr;
                            cmdDel.ExecuteNonQuery();

                            if (NP._TRanSave(oConn, Tr, NP_Cls.NPTranType.Delete, "t_BOM:t_BOMDetail", NP_Cls.strUsr))
                            {
                                Tr.Commit();
                                this.Close();
                            }
                            else
                            {
                                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Try agian !!"); return;
                            }
                        }
                        else // Has Row
                        {
                            NP_Cls.SqlDel     = "DELETE FROM t_BOM WHERE (BOMCode = @BOMCode)";
                            cmdDel.Connection = oConn; cmdDel.CommandText = NP_Cls.SqlDel; cmdDel.Transaction = Tr;
                            cmdDel.ExecuteNonQuery();

                            if (NP._TRanSave(oConn, Tr, NP_Cls.NPTranType.Delete, "t_BOM", NP_Cls.strUsr))
                            {
                                Tr.Commit();
                                this.Close();
                            }
                            else
                            {
                                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Try agian !!"); return;
                            }
                        }
                    }
                    catch (Exception ex)
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            Tr.Rollback();
                        }
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Delete : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                    //
                }
                else
                {
                    return;
                }
            }
            else
            {
                if (NP.MSGB("Do you want to exit this screen ?") == DialogResult.Yes)
                {
                    this.Close();
                }
                else
                {
                    return;
                }
            }
        }
示例#20
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            if ((string.IsNullOrEmpty((this.cbMaterial.Text.Trim()))) || (this.cbMaterial.Text.Trim() == "((( Select Material )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Material: !!"); this.cbMaterial.Select(); return;
            }
            if ((string.IsNullOrEmpty((this.cbPlant.Text.Trim()))) || (this.cbPlant.Text.Trim() == "((( Select Plant )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Plant: !!"); this.cbPlant.Select(); return;
            }
            if (NP.ReqField(this.txtBaseQuantity, "Please enter Base Quantity !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtStdManHour, "Please enter Standard Man Hour !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtHour, "Please enter Hours !!") == false)
            {
                return;
            }
            if ((string.IsNullOrEmpty((this.cbWorkCenter.Text.Trim()))) || (this.cbWorkCenter.Text.Trim() == "((( Select WorkCenter )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Work Center: !!"); this.cbWorkCenter.Select(); return;
            }

            if (ChkDup())
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Work Center Duplicated !!"); this.cbWorkCenter.Select(); this.cbWorkCenter.SelectAll(); return;
            }

            if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr; Tr = oConn.BeginTransaction();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlSelect = "SELECT MaterialCode, PlantCode FROM t_Routing WHERE (MaterialCode = @MaterialCode) AND (PlantCode = @PlantCode)";
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.cbMaterial.SelectedValue;
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value     = this.cbPlant.SelectedValue;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlSelect; cmdIns.Transaction = Tr;
                    SqlDataAdapter da = new SqlDataAdapter(cmdIns); DataSet ds = new DataSet(); da.Fill(ds);
                    if (ds.Tables[0].Rows.Count > 0)
                    {
                        NP_Cls.SqlInsert = "INSERT INTO t_RoutingDetail (MaterialCode, PlantCode, WorkCenterCode, LogDate,STDManHour,Hours) VALUES (@MaterialCode,@PlantCode,@WorkCenterCode,GETDATE(),@STDManHour,@Hours)";
                        cmdIns.Parameters.Add("@WorkCenterCode", SqlDbType.NVarChar, 10).Value = this.cbWorkCenter.SelectedValue;
                        cmdIns.Parameters.Add("@STDManHour", SqlDbType.Decimal).Value          = Convert.ToDecimal(this.txtStdManHour.Text.Trim());
                        cmdIns.Parameters.Add("@Hours", SqlDbType.Decimal).Value = Convert.ToDecimal(this.txtHour.Text.Trim());
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();
                    }
                    else
                    {
                        NP_Cls.SqlInsert = "INSERT INTO t_Routing (MaterialCode, PlantCode,Remark,BaseQuantity) VALUES (@MaterialCode,@PlantCode,@Remark,@BaseQuantity)";
                        cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value = this.txtRemark.Text.Trim();
                        cmdIns.Parameters.Add("@BaseQuantity", SqlDbType.Decimal).Value = Convert.ToDecimal(this.txtBaseQuantity.Text.Trim());
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();

                        NP_Cls.SqlInsert = "INSERT INTO t_RoutingDetail (MaterialCode, PlantCode, WorkCenterCode, LogDate,STDManHour,Hours) VALUES (@MaterialCode,@PlantCode,@WorkCenterCode,GETDATE(),@STDManHour,@Hours)";
                        cmdIns.Parameters.Add("@WorkCenterCode", SqlDbType.NVarChar, 10).Value = this.cbWorkCenter.SelectedValue;
                        cmdIns.Parameters.Add("@STDManHour", SqlDbType.Decimal).Value          = Convert.ToDecimal(this.txtStdManHour.Text.Trim());
                        cmdIns.Parameters.Add("@Hours", SqlDbType.Decimal).Value = Convert.ToDecimal(this.txtHour.Text.Trim());
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                        cmdIns.ExecuteNonQuery();
                    }

                    Tr.Commit();
                    DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!");
                    this.cbWorkCenter.Text  = string.Empty; this.cbWorkCenter.Select();
                    this.txtStdManHour.Text = string.Empty; this.txtRemark.Text = string.Empty; this.txtHour.Text = string.Empty;
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#21
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            //if (NP.ReqField(this.cbVendor, "Please enter Vendor: !!") == false) { return; }
            //if (NP.ReqField(this.cbMaterial, "Please enter Material: !!") == false) { return; }
            if ((string.IsNullOrEmpty((this.cbVendor.Text.Trim()))) || (this.cbVendor.Text.Trim() == "((( Select Vendor )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Vendor: !!"); this.cbVendor.Select(); return;
            }
            if ((string.IsNullOrEmpty((this.cbMaterial.Text.Trim()))) || (this.cbMaterial.Text.Trim() == "((( Select Material )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Material: !!"); this.cbMaterial.Select(); return;
            }
            //if (NP.ReqField(this.cbPG, "Please enter Purchasing group: !!") == false) { return; }
            if (NP.ReqField(this.txtDelivery, "Please enter Delivery time: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtMinQty, "Please enter Minimum Qty.: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtNetPrice, "Please enter Net Price: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbOrderUnit, "Please enter Order Unit: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtQtyCon, "Please enter Qty.Conversion: !!") == false)
            {
                return;
            }

            if (ChkDup())
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.cbVendor.Select(); return;
            }

            if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr;
                Tr = oConn.BeginTransaction();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    NP_Cls.SqlInsert = "INSERT INTO t_VendorInfoRecord " +
                                       "(VendorCode, MaterialCode, DeliveryTime, MinimumQty, NetPrice, UnitCode, QtyConversion, Block) " +
                                       "VALUES     (@VendorCode,@MaterialCode,@DeliveryTime,@MinimumQty,@NetPrice,@UnitCode,@QtyConversion,@Block)";
                    cmdIns.Parameters.Add("@VendorCode", SqlDbType.NVarChar, 10).Value   = this.cbVendor.SelectedValue;
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.cbMaterial.SelectedValue;
                    //cmdIns.Parameters.Add("@PurchasingGroup", SqlDbType.NVarChar, 3).Value = this.cbPG.SelectedValue;
                    cmdIns.Parameters.Add("@DeliveryTime", SqlDbType.Int).Value     = Convert.ToInt32(string.IsNullOrEmpty(this.txtDelivery.Text.Trim()) ? "0" : this.txtDelivery.Text.Trim());
                    cmdIns.Parameters.Add("@MinimumQty", SqlDbType.Decimal).Value   = Convert.ToDecimal(string.IsNullOrEmpty(this.txtMinQty.Text.Trim()) ? "0" : this.txtMinQty.Text.Trim());
                    cmdIns.Parameters.Add("@NetPrice", SqlDbType.Decimal).Value     = Convert.ToDecimal(string.IsNullOrEmpty(this.txtNetPrice.Text.Trim()) ? "0" : this.txtNetPrice.Text.Trim());
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3).Value = this.cbOrderUnit.SelectedValue;
                    cmdIns.Parameters.Add("@QtyConversion", SqlDbType.Int).Value    = Convert.ToInt32(string.IsNullOrEmpty(this.txtQtyCon.Text.Trim()) ? "0" : this.txtQtyCon.Text.Trim());
                    cmdIns.Parameters.Add("@Block", SqlDbType.Bit).Value            = this.chkBlock.Checked;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    NP_Cls.SqlInsert = "INSERT INTO t_VendorSourceList (VendorCode, MaterialCode, Fix) VALUES (@VendorCode,@MaterialCode,@Fix)";
                    cmdIns.Parameters.Add("@Fix", SqlDbType.Bit).Value = 0;
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert; cmdIns.Transaction = Tr;
                    cmdIns.ExecuteNonQuery();

                    Tr.Commit();
                    Clear(); DGV(); this.cbMaterial.Enabled = true; this.cbVendor.Enabled = true; this.btnAdd.Visible = true; this.btnEdit.Visible = false;
                    this.cbVendor.Text = string.Empty; this.cbMaterial.Text = string.Empty; this.cbVendor.Select();
                    NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!");
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#22
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            //if (NP.ReqField(this.cbMaterial, "Please enter Material: !!") == false) { return; }
            if ((string.IsNullOrEmpty((this.cbMaterial.Text.Trim()))) || (this.cbMaterial.Text.Trim() == "((( Select Material )))"))
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Please enter Material: !!"); this.cbMaterial.Select(); return;
            }
            if (NP.ReqField(this.cbPlant, "Please enter Plant: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbBOMType, "Please enter B.O.M Type: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.cbUnit, "Please enter Unit: !!") == false)
            {
                return;
            }
            if (NP.ReqField(this.txtQty, "Please enter Quantity: !!") == false)
            {
                return;
            }

            if (cbMaterial.Text.StartsWith("3"))
            {
                if (!NP.ReqField(this.txtFor, "please enter Formula No : !!"))
                {
                    return;
                }
            }
            if (cbMaterial.Text.StartsWith("5") && cbBOMType.Text == "Mix")
            {
                if (!NP.ReqField(this.txtFor, "please enter Formula No : !!"))
                {
                    return;
                }
            }
            if (ChkDup())
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Material & Plant Duplicated !!"); this.cbMaterial.Select(); return;
            }

            if (NP.MSGB("Do you want to Add BOM Data ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open();
                try
                {
                    SqlCommand cmdIns = new SqlCommand();
                    BuildVersion();
                    NP_Cls.SqlInsert = "INSERT INTO t_BOM " +
                                       "(MaterialCode, PlantCode, BOMType, UnitCode, Quantity, BOMVersion, UserCreate, DateCreate, FileStatus, Approve, Remark, FormulaNo) " +
                                       "VALUES     (@MaterialCode,@PlantCode,@BOMType,@UnitCode,@Quantity,@BOMVersion,@UC, GETDATE(),@St,@Appr, @Remark, @FormulaNo)";
                    //cmdIns.Parameters.Add("@BOMCode", SqlDbType.Int).Value = NP_Cls.strBOMCode;
                    cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.cbMaterial.SelectedValue;
                    cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value     = this.cbPlant.SelectedValue;
                    cmdIns.Parameters.Add("@BOMType", SqlDbType.NVarChar, 1).Value       = this.cbBOMType.SelectedValue;
                    cmdIns.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3).Value      = this.cbUnit.SelectedValue;
                    cmdIns.Parameters.Add("@Quantity", SqlDbType.Decimal).Value          = Convert.ToDouble(this.txtQty.Text.Trim());
                    cmdIns.Parameters.Add("@BOMVersion", SqlDbType.Int).Value            = this.strVersion;
                    cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value           = NP_Cls.strUsr;
                    cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value            = "1";
                    cmdIns.Parameters.Add("@Appr", SqlDbType.Bit).Value                = 0;
                    cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 200).Value    = this.txtRemark.Text.Trim();
                    cmdIns.Parameters.Add("@FormulaNo", SqlDbType.NVarChar, 200).Value = this.txtFor.Text.Trim();
                    cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                    cmdIns.ExecuteNonQuery();

                    NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add BOM Data Completed !!\n\n Please Add Component for this BOM ..");
                    this.cbUnit.Enabled = true;
                    NP_Cls.hBOM         = new System.Collections.Hashtable();
                    NP_Cls.hBOM.Add("BOMCode", ((string)GenBOMCode()));
                    NP_Cls.hBOM.Add("Qty", Convert.ToDouble(this.txtQty.Text.Trim()));
                    NP_Cls.hBOM.Add("UnitName", ((string)this.cbUnit.Text));
                    NP_Cls.hBOM.Add("BOMType", ((string)this.cbBOMType.SelectedValue));
                    NP_Cls.hBOM.Add("Approve", Convert.ToBoolean(false));
                    NP_Cls.hBOM.Add("Material", this.cbMaterial.SelectedValue.ToString());

                    WMS.BOM.frmBOMNewDetail frm = new frmBOMNewDetail();

                    frm.lblSCode.Text = this.cbMaterial.SelectedValue.ToString();
                    frm.lblSName.Text = this.cbMaterial.Text.ToString().Split(':')[1].Trim();

                    frm.ShowDialog();
                    Clear(); DGV(); this.cbMaterial.Select();
                }
                catch (Exception ex)
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }
示例#23
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            try
            {
                if (NP.ReqField(this.txtCode, "Please enter Code: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtName, "Please enter Unit of Measure: !!") == false)
                {
                    return;
                }

                try
                {
                    byte bRe = 0;
                    if (ChkDup(ref bRe))
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.txtCode.Select(); this.txtCode.SelectAll(); return;
                    }
                    else
                    {
                        if (bRe == 1)
                        {
                            Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Update Data Completed !!"); this.txtCode.Focus(); return;
                        }
                    }
                }
                catch (Exception ex)
                {
                    NP.MSGB("Erro Dup : " + ex.Message); return;
                }


                if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
                {
                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open();
                    try
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO m_Unit (UnitCode, UnitName, Remark, UserCreate, DateCreate, FileStatus) VALUES (@Code,@Name,@Remark,@UC,getdate(),@St)";
                        cmdIns.Parameters.Add("@Code", SqlDbType.NVarChar, 10).Value    = this.txtCode.Text.Trim();
                        cmdIns.Parameters.Add("@Name", SqlDbType.NVarChar, 60).Value    = this.txtName.Text.Trim();
                        cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value = this.txtRemark.Text.Trim();
                        cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value      = NP_Cls.strUsr;
                        cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value       = "1";
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                        cmdIns.ExecuteNonQuery();

                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtCode.Focus();
                    }
                    catch (Exception ex)
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                }
                else
                {
                    return;
                }
            }
            catch (Exception ex)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
            }
        }
示例#24
0
        private void btnAdd_Click(object sender, EventArgs e)
        {
            try
            {
                if (NP.ReqField(this.txtScaleQty, "Please enter Scale Qty: !!") == false)
                {
                    return;
                }
                if (NP.ReqField(this.txtRate, "Please enter Unit of Rate: !!") == false)
                {
                    return;
                }

                if (ChkDup())
                {
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Code Duplicated !!"); this.txtScaleQty.Select(); this.txtScaleQty.SelectAll(); return;
                }

                if (NP.MSGB("Do you want to Add Data ?") == DialogResult.Yes)
                {
                    oConn = new SqlConnection(NP.ReadFileDB(NP_Cls.PathDB));
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                    oConn.Open();
                    try
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO t_VendorInfoRecordPeriodsDetail " +
                                           "(ValidPeriodCode, ScaleQty, Rate, UserCreate, DateCreate, FileStatus) " +
                                           "VALUES     (@ValidPeriodCode,@ScaleQty,@Rate,@UC, GETDATE(), @St)";
                        cmdIns.Parameters.Add("@ValidPeriodCode", SqlDbType.Int).Value       = NP_Cls.strValidCode;
                        cmdIns.Parameters.Add("@ValidPeriodDetailCode", SqlDbType.Int).Value = NP_Cls.strValidCode;
                        cmdIns.Parameters.Add("@ScaleQty", SqlDbType.Decimal).Value          = Convert.ToDecimal(this.txtScaleQty.Text.Trim() == string.Empty ? "0" : this.txtScaleQty.Text.Trim());
                        cmdIns.Parameters.Add("@Rate", SqlDbType.Decimal).Value    = Convert.ToDecimal(this.txtRate.Text.Trim() == string.Empty ? "0" : this.txtRate.Text.Trim());
                        cmdIns.Parameters.Add("@UC", SqlDbType.NVarChar, 10).Value = NP_Cls.strUsr;
                        cmdIns.Parameters.Add("@St", SqlDbType.NVarChar, 1).Value  = "1";
                        cmdIns.Connection = oConn; cmdIns.CommandText = NP_Cls.SqlInsert;
                        cmdIns.ExecuteNonQuery();

                        Clear(); DGV(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Add Data Completed !!"); this.txtScaleQty.Select();
                    }
                    catch (Exception ex)
                    {
                        NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
                    }
                    finally
                    {
                        if (oConn.State == ConnectionState.Open)
                        {
                            oConn.Close();
                        }
                    }
                }
                else
                {
                    return;
                }
            }
            catch (Exception ex)
            {
                NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add : " + ex.Message); return;
            }
        }
示例#25
0
        private void btnSave_Click(object sender, EventArgs e)
        {
            if (NP.MSGB("Do you to Save Production Order ?") == DialogResult.Yes)
            {
                oConn = new SqlConnection(NP.ReadFileDB(Application.StartupPath + @"\DB\DB.ini"));
                if (oConn.State == ConnectionState.Open)
                {
                    oConn.Close();
                }
                oConn.Open(); SqlTransaction Tr;
                Tr = oConn.BeginTransaction();

                try
                {
                    if (!Convert.ToBoolean(bView))
                    {
                        SqlCommand cmdIns = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO t_PrdOrder   (PrdONumber, PrdODate, MaterialCode, MaterialName, PrdQuantity, PlantCode, PlantName, BOMVersion, LocCode, LocName, Remark, UserCreate, DateCreate, MRPOrder) VALUES (@PrdONumber,GETDATE(),@MaterialCode,@MaterialName,@PrdQuantity,@PlantCode,@PlantName,@BOMVersion,@LocCode,@LocName,@Remark,@UserCreate,  GETDATE(), @MRPOrder)";
                        cmdIns.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12).Value   = this.txtPrdOrder.Text.Trim();
                        cmdIns.Parameters.Add("@MaterialCode", SqlDbType.NVarChar, 15).Value = this.cbMaterialCode.Text.Trim();
                        cmdIns.Parameters.Add("@MaterialName", SqlDbType.NVarChar, 60).Value = this.lblMaterial.Text.Trim();
                        cmdIns.Parameters.Add("@PrdQuantity", SqlDbType.Decimal).Value       = Convert.ToDecimal(this.txtQty.Text.Trim());
                        cmdIns.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4).Value     = hsTmp["PlantCode"].ToString();
                        cmdIns.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20).Value    = this.lblPlant.Text.Trim();
                        cmdIns.Parameters.Add("@BOMVersion", SqlDbType.Int).Value            = Convert.ToInt32(this.lblBOMVer.Text.Trim());
                        cmdIns.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2).Value       = hsTmp["LocCode"].ToString();
                        cmdIns.Parameters.Add("@LocName", SqlDbType.NVarChar, 20).Value      = this.lblLocation.Text.Trim();
                        cmdIns.Parameters.Add("@Remark", SqlDbType.NVarChar, 255).Value      = this.txtRemark.Text.Trim();
                        cmdIns.Parameters.Add("@UserCreate", SqlDbType.NVarChar, 50).Value   = NP_Cls.strUsr;
                        cmdIns.Parameters.Add("@MRPOrder", SqlDbType.NVarChar, 12).Value     = (NP_Cls.FromMRP == 1 ? NP_Cls.MRPSO : string.Empty);
                        cmdIns.Connection = oConn; cmdIns.Transaction = Tr; cmdIns.CommandText = NP_Cls.SqlInsert;
                        cmdIns.ExecuteNonQuery();

                        SqlCommand cmdInsDetail = new SqlCommand();
                        NP_Cls.SqlInsert = "INSERT INTO t_PrdOrderDetail (PrdONumber, ComponentCode, ComponentName, PrdOQuantity, UnitCode, UnitName, PlantCode, PlantName, LocCode, LocName, CurrentUser) VALUES     (@PrdONumber,@ComponentCode,@ComponentName,@PrdOQuantity,@UnitCode,@UnitName,@PlantCode,@PlantName,@LocCode,@LocName,@CurrentUser)";
                        cmdInsDetail.Parameters.Add("@PrdONumber", SqlDbType.NVarChar, 12);
                        cmdInsDetail.Parameters.Add("@ComponentCode", SqlDbType.NVarChar, 15);
                        cmdInsDetail.Parameters.Add("@ComponentName", SqlDbType.NVarChar, 60);
                        cmdInsDetail.Parameters.Add("@PrdOQuantity", SqlDbType.Decimal);
                        cmdInsDetail.Parameters.Add("@UnitCode", SqlDbType.NVarChar, 3);
                        cmdInsDetail.Parameters.Add("@UnitName", SqlDbType.NVarChar, 20);
                        cmdInsDetail.Parameters.Add("@PlantCode", SqlDbType.NVarChar, 4);
                        cmdInsDetail.Parameters.Add("@PlantName", SqlDbType.NVarChar, 20);
                        cmdInsDetail.Parameters.Add("@LocCode", SqlDbType.NVarChar, 2);
                        cmdInsDetail.Parameters.Add("@LocName", SqlDbType.NVarChar, 20);
                        cmdInsDetail.Parameters.Add("@CurrentUser", SqlDbType.NVarChar, 50);

                        for (byte ins = 0; ins < this.dgvView.RowCount; ins++)
                        {
                            cmdInsDetail.Parameters["@PrdONumber"].Value    = this.txtPrdOrder.Text.Trim();
                            cmdInsDetail.Parameters["@ComponentCode"].Value = this.dgvView["clnMaterialCode", ins].Value.ToString();
                            cmdInsDetail.Parameters["@ComponentName"].Value = this.dgvView["clnMaterialName", ins].Value.ToString();
                            cmdInsDetail.Parameters["@PrdOQuantity"].Value  = Convert.ToDecimal(this.dgvView["clnQuantity", ins].Value);
                            cmdInsDetail.Parameters["@UnitCode"].Value      = this.dgvView["clnUnitCode", ins].Value.ToString();
                            cmdInsDetail.Parameters["@UnitName"].Value      = this.dgvView["clnUnitName", ins].Value.ToString();
                            cmdInsDetail.Parameters["@CurrentUser"].Value   = NP_Cls.strUsr;
                            cmdInsDetail.Parameters["@PlantCode"].Value     = this.dgvView["clnPlantCode", ins].Value.ToString();
                            cmdInsDetail.Parameters["@PlantName"].Value     = this.dgvView["clnPlantName", ins].Value.ToString();
                            cmdInsDetail.Parameters["@LocCode"].Value       = this.dgvView["clnLocCode", ins].Value.ToString();
                            cmdInsDetail.Parameters["@LocName"].Value       = this.dgvView["clnLocName", ins].Value.ToString();

                            cmdInsDetail.Connection = oConn; cmdInsDetail.CommandText = NP_Cls.SqlInsert; cmdInsDetail.Transaction = Tr;
                            cmdInsDetail.ExecuteNonQuery();
                        }

                        //TODO 14.11.10 Prd Order from MRP
                        if (NP_Cls.FromMRP == 1)
                        {
                            SqlCommand cmdMRP = new SqlCommand();
                            cmdMRP.Parameters.Add("@MatCode", SqlDbType.NVarChar, 15).Value   = NP_Cls.MRPFGSort;
                            cmdMRP.Parameters.Add("@TranOrder", SqlDbType.NVarChar, 50).Value = this.txtPrdOrder.Text.Trim();
                            cmdMRP.Parameters.Add("@TranQty", SqlDbType.Decimal).Value        = Convert.ToDecimal(this.txtQty.Text.Trim());
                            cmdMRP.Parameters.Add("@SONumber", SqlDbType.NVarChar, 50).Value  = NP_Cls.MRPSO;

                            NP_Cls.SqlInsert   = "INSERT INTO t_MRPTranOrder (MaterialCode,TranOrder,TranQty,SONumber,MaterialHeader) VALUES (@MatCode,@TranOrder,@TranQty,@SONumber,@MatCode)";
                            cmdMRP.CommandText = NP_Cls.SqlInsert; cmdMRP.Connection = oConn;
                            cmdMRP.Transaction = Tr; cmdMRP.ExecuteNonQuery();

                            Tr.Commit();
                            NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Save Prd Order Completed !! this screen will be close ..");
                            NP_Cls.MRPTranOrder = this.txtPrdOrder.Text.Trim(); this.Close(); return;
                        }
                        //

                        Tr.Commit(); NP.MSGB(NP_Cls.NPMgsStyle.InfoType, "Save Production Order Completed !!");
                        Clear(); this.btnSave.Visible = false;
                        this.MyGrid(dgvView); this.txtPrdOrder.DropDownStyle = ComboBoxStyle.Simple;
                        BindMat();
                        this.cbMaterialCode.Enabled = true; this.txtPrdOrder.Text = GetNumber();
                        this.cbMaterialCode.Text    = string.Empty; this.cbMaterialCode.Select(); this.cbMaterialCode.SelectAll();
                    }
                }
                catch (Exception ex)
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        Tr.Rollback();
                    }
                    NP.MSGB(NP_Cls.NPMgsStyle.WarningType, "Add Detail : " + ex.Message); return;
                }
                finally
                {
                    if (oConn.State == ConnectionState.Open)
                    {
                        oConn.Close();
                    }
                }
            }
            else
            {
                return;
            }
        }