Hi. I have to load a cmbSp combobox based on a value selected in cmbCr combo box. I get an error while clearing the cmbSp box "Invalid Field Name [66000 - 18]". I have mentioned the code below: The code
objcombo.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index)
gives error alternatively while selecting the values from cmbCr.Plz help me out.
-
orec = objMain.objUtilities.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)
strSql = "Select t1.U_SpCode, t1.U_SpName from [@CS_CRSPD] as t1 join [@CS_CRSPH] as t2 on t1.DocEntry = t2.DocEntry and t2.U_CrCode='" & strCourse & "' "
orec.DoQuery(strSql)
objcombo = objForm.Items.Item("cmbSp").Specific
If objcombo.ValidValues.Count >= 0 Then
For intCount1 As Integer = 0 To objcombo.ValidValues.Count - 1
'For intCount1 As Integer = objcombo.ValidValues.Count - 1 To 0 Step -1
objcombo.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index)
Next
If (objcombo.ValidValues.Count <= 0) Then
If objForm.Items.Item("cmbSp").Enabled = False Then
objForm.Items.Item("cmbSp").Enabled = True
End If
objcombo.ValidValues.Add("", "")
If (orec.RecordCount > 0) Then
For inti As Integer = 0 To orec.RecordCount - 1
objcombo.ValidValues.Add(orec.Fields.Item(0).Value, orec.Fields.Item(1).Value)
orec.MoveNext()
Next
End If
objcombo.Select(0, SAPbouiCOM.BoSearchKey.psk_Index)
End If
Else
For intCount1 As Integer = 1 To objcombo.ValidValues.Count
'For intCount1 As Integer = objcombo.ValidValues.Count To 1 Step -1
objcombo.ValidValues.Remove(0, SAPbouiCOM.BoSearchKey.psk_Index)
Next
If (objcombo.ValidValues.Count <= 0) Then
If objForm.Items.Item("cmbSp").Enabled = False Then
objForm.Items.Item("cmbSp").Enabled = True
End If
objcombo.ValidValues.Add("", "")
If (orec.RecordCount > 0) Then
For inti As Integer = 0 To orec.RecordCount - 1
objcombo.ValidValues.Add(orec.Fields.Item(0).Value, orec.Fields.Item(1).Value)
orec.MoveNext()
Next
End If
objcombo.Select(0, SAPbouiCOM.BoSearchKey.psk_Index)
End If
End If
objcombo = Nothing
Edited by: S.Sujata on May 28, 2009 8:43 AM
Edited by: S.Sujata on May 28, 2009 8:44 AM