コード例 #1
0
    private void btnRowEdit_Click(object sender, EventArgs e)
    {
        if (_LoanPayrollType == "PAYROLL")
        {
            MessageBox.Show("Editing This Payment is not Allowed!");
            return;
        }


        frmLoanPayment frmLoanPayment = new frmLoanPayment();

        frmLoanPayment._Company     = txtCompany.Text;
        frmLoanPayment._Employee    = txtEmpCode.Text;
        frmLoanPayment._LoanRefNo   = txtLoanReferenceNo.Text;
        frmLoanPayment._AccountCode = txtLoanAccountCode.Text;


        frmLoanPayment._LoanPayrollType   = _LoanPayrollType;
        frmLoanPayment._LoanPaymentDate   = _LoanPaymentDate;
        frmLoanPayment._LoanORNumber      = _LoanORNumber;
        frmLoanPayment._LoanPaymentAmount = _LoanPaymentAmount;
        frmLoanPayment._LoanRemarks       = _LoanRemarks;
        frmLoanPayment._AddType           = "EDIT";


        frmLoanPayment.ShowDialog();
    }
コード例 #2
0
    private void btnRowAdd_Click(object sender, EventArgs e)
    {
        frmLoanPayment frmLoanPayment = new frmLoanPayment();

        frmLoanPayment._Company     = txtCompany.Text;
        frmLoanPayment._Employee    = txtEmpCode.Text;
        frmLoanPayment._LoanRefNo   = txtLoanReferenceNo.Text;
        frmLoanPayment._AccountCode = txtLoanAccountCode.Text;

        frmLoanPayment._LoanPayrollType   = "";
        frmLoanPayment._LoanPaymentDate   = DateTime.Today.ToShortDateString();
        frmLoanPayment._LoanORNumber      = "";
        frmLoanPayment._LoanPaymentAmount = "";
        frmLoanPayment._LoanRemarks       = "";
        frmLoanPayment._AddType           = "ADD";
        frmLoanPayment.ShowDialog();


        string _ConCompany = clsFunctions.GetCompanyConnectionString(txtCompany.Text);

        string    _sqlList = @"SELECT Z.Type, Z.PaymentDate, Z.ORNo, Z.[Principal Amount], Z.[Interest Amount], Z.Amount, Z.Remarks FROM (
                            SELECT ISNULL([Type],'CASH PAYMENT') AS [Type],CONVERT(nvarchar(30), [PaymentDate], 101) AS [PaymentDate],[ORNo],0 AS [Principal Amount] ,0 AS [Interest Amount],[Amount],[Remarks],[EmployeeNo],[AccountCode],[LoanRefNo] FROM LoanCashPayment
                            UNION ALL
                            SELECT 'PAYROLL' AS [Type],CONCAT(A.[PayrollPeriod], ' (', CONVERT(nvarchar(30), B.DateOne, 101),' - ', CONVERT(nvarchar(30), B.DateTwo, 101), ') '),NULL as [ORNo],ISNULL(A.PrincipalAmt,0) AS [Principal Amount] ,ISNULL(A.InterestAmt,0) AS [Interest Amount] ,A.[Amount], NULL as [Remarks],[EmployeeNo],[AccountCode],[LoanRefenceNo] FROM PayrollDetails A INNER JOIN PayrollPeriod B
                            ON A.PayrollPeriod = B.PayrollPeriod) Z 
                            WHERE Z.EmployeeNo = '" + txtEmpCode.Text + @"' AND Z.AccountCode = '" + txtLoanAccountCode.Text + @"' AND Z.LoanRefNo = '" + txtLoanReferenceNo.Text + @"'";
        DataTable _tblList;

        _tblList = clsSQLClientFunctions.DataList(_ConCompany, _sqlList);
        clsFunctions.DataGridViewSetup(dgvDisplay, _tblList);
    }