Bind Document Series SAP B1

Dear All,
   Today we will see "How to Bind Document Series" using SAP B1 SDK?

  Friend Sub BindDocSeries(ByVal oForm As SAPbouiCOM.Form, ByVal oDsName As Object, ByVal dbAlias As Object)

        Dim oDBDataSource As SAPbouiCOM.DBDataSource = Nothing

        oDBDataSource = oForm.DataSources.DBDataSources.Item(oDsName)

        Try

            With oDBDataSource

                .SetValue(dbAlias, 0, "5")

            End With

        Catch ex As Exception



        End Try



    End Sub