Skip to Content
0
Former Member
Jul 13, 2012 at 05:58 AM

combo box loading series problem............

14 Views

Hi..

See the image..

i had a loading series problem

i am able to get the series no and doc no

but if if click combobox the combo box is saving only number but i need series name

ex : 51 primary

it is taking 51 only how can get primary...

i had used this code in item event..

and allso put some code in menuevent as

ocombo.select (0, description ) not worked...

how can i get the series name............

Try

If (pVal.Before_Action = False And pVal.FormUID = "TT" And pVal.EventType = SAPbouiCOM.BoEventTypes.et_COMBO_SELECT) Then

If (pVal.ItemUID = "999") Then

oform = sbo_app.Forms.Item("TT")

'If (oform.Items.Item("22").Specific.value = "") Then

Dim ds1 As SAPbobsCOM.Recordset

ds1 = ocompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)

Dim sql As String

Dim ocombo As SAPbouiCOM.ComboBox

ocombo = oform.Items.Item("999").Specific

sql = "SELECT T0.[NextNumber] as n FROM NNM1 T0 WHERE T0.[Seriesname]='" & ocombo.Selected.Description & "' and T0.ObjectCode='IPY'"

'sql = "SELECT T0.[NextNumber] as n FROM NNM1 T0 WHERE T0.[SeriesName]='" & ocombo.Selected.Value & "'"

ds1.DoQuery(sql)

oform.Items.Item("10").Specific.value = ds1.Fields.Item("n").Value

End If

End If

Catch ex As Exception

sbo_app.MessageBox(ex.Message)

End Try

Attachments

sere.JPG (130.7 kB)