Code:
SqlDetails = "Insert into tbl_rarenewaldetails (RaNumber,Ptn,OrNumber,Tin,BranchName," & _
" BranchAdd,Transdate,CustName,CustAdd,CorpName,Interest,I_Pct,Ld,Sc,ME,LoyaltyDiscount,TransAmt," & _
" PTNPrincipal,NetProceed,OwnEmployee,CustLastname,CustFirstname," & _
" CustMiddleInitial,LoanDate,MaturityDate,ExpiryDate,OwnTelNo,CustTelNO,CustGender," & _
" AI_amt,AI_Pct,StorageCode,Transtype,OwnManager,ReqCostCenter,OwnCostCenter,ReqBranchName,LastTransaction,LastTransDate)" & _
" VALUES('" & FinalRAN & "','" & Local_Ptn & "','" & Local_Ornumber & "'," & _
" '" & Local_Tin & "','" & Trim(Replace(Local_BranchName, "'", "''")) & "'," & _
" '" & Trim(Replace(Local_BranchAdd, "'", "''")) & "','" & Format(xTrandate, "yyyy-MM-dd hh:mm:ss") & "','" & Local_CustName & "','" & Replace(Local_CustAdd, "'", "''") & "'," & _
" '" & Replace(jCorpName, "'", "''") & "','" & IValue & "','" & oldPT_Tran.I_PCT & "','" & LDValue & "'," & _
" '" & oldPT_Tran.SC_Value & "','" & mvalue & "','" & discountIvalue & "','" & TransactionAmt & "','" & oldPT_Tran.PTNPrincipal & "','" & NetProceeds & "'," & _
" '" & Trim(txtEmployee.Text) & "','" & Trim(oldPT_Tran.CustLastName) & "','" & Trim(oldPT_Tran.CustFirstName) & "'," & _
" '" & oldPT_Tran.CustMiddleInitial & "','" & Format(oldPT_Tran.LoanDate, "yyyy-MM-dd hh:mm:ss") & "'," & _
" '" & Format(GetMaturity(BranchServerDate), "yyyy-MM-dd hh:mm:ss") & "','" & Format(GetExpiry(BranchServerDate), "yyyy-MM-dd hh:mm:ss") & "'," & _
" '" & Local_TelNo & "','" & Cust_TelNo & "','" & oldPT_Tran.CustGender & "'," & _
" '" & oldPT_Tran.AI_AMT & "','" & oldPT_Tran.AI_PCT & "','" & oldPT_Tran.SF_code & "', 'RENEW','" & Trim(sLoginEmployee) & "'," & _
" '" & ReqCostCenter & "','" & OwnCostCenter & "','" & Mid(Trim(Replace(txtReqBranchName.Text, "'", "''")), 5) & "'," & _
" '" & oldPT_Tran.TransType & "','" & Format(oldPT_Tran.TransDate, "yyyy-MM-dd") & "')"