on 12-03-2007 8:24 AM
Hi Masters
I have a Form which was designed in Screen Painter which is also bounded to a UserTable , I am able to Add the details from SBO when my Application Runs But i am unable to UPDATE the same, could you please tell me the entire query to update my Table
This is my Method to Add ,i am able to Add But please provide me the query for UPDATE
Public Sub addPOReq(ByVal objForm As SAPbouiCOM.Form)
Dim strSQL As String
Dim objRS As SAPbobsCOM.Recordset
Dim intCode As Integer
Dim intDocEntry As Integer
intCode = objAddOn.objGenFunc.GetCode("[@ALTPOREQHD]")
intDocEntry = GetNextCode()
strSQL = "INSERT INTO [@ALTPOREQHD](Code, Name, U_DocEntry, U_DocNum, U_Status, U_DeliveryDate, U_DocDate, U_EmpCode, U_EmpName) VALUES(" & _
" " & intCode & _
",'" & intCode & "'" & _
", " & intDocEntry & _
",'" & intDocEntry & "'" & _
",'" & "O" & "'" & _
",'" & objAddOn.objGenFunc.GetDateTimeValue(objForm.Items.Item("13").Specific.String).ToString("yyyy-MM-dd") & "'" & _
",'" & objAddOn.objGenFunc.GetDateTimeValue(objForm.Items.Item("15").Specific.String).ToString("yyyy-MM-dd") & "'" & _
",'" & objForm.Items.Item("4").Specific.String & "'" & _
",'" & objForm.Items.Item("7").Specific.string & "'" & _
")"
objRS = objAddOn.objCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)
objRS.DoQuery(strSQL)
objAddOn.objApplication.StatusBar.SetText("Added successfully ")
End Sub
Regards
Mohamed
Hello MOHAMED ZUBAIR
You will get a faster answer if you post this question to the SDK forum as this is pertaining to SDK.
Suda
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
100 | |
12 | |
11 | |
6 | |
6 | |
4 | |
3 | |
3 | |
3 | |
3 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.