Represents a folder in a form.
SAP Business One UI API 10.0 - Objects Reference (10.00.270)
-
-
-
-
-
-
-
To hold data in a folder, the item must be bound to a data source (UserDataSource or DBDataSource) using the DataBind property.
-
-
Adding folders and grouping them (Visual Basic) Public Sub UsingFolderItems()
Dim oForm As SAPbouiCOM.Form
Dim oItem As SAPbouiCOM.Item
Dim oFolder As SAPbouiCOM.Folder
Dim i As Integer '// to be used as a counter
'// add a new form
Set oForm = SBO_Application.Forms.Add("FormWithFolder")
'// add a user data source
oForm.DataSources.UserDataSources.Add "FolderDS", dt_SHORT_TEXT, 1
'//***************************
'// Adding Folder items
'//***************************
For i = 1 To 2
Set oFolder = oForm.Items.Add("Folder" & i, it_FOLDER).Specific
'// set the caption
oFolder.Caption = "Folder" & i
oFolder.DataBind.SetBound True, "", "FolderDS"
If Not i = 1 Then
oFolder.GroupWith ("Folder" & i - 1)
End If
Next i
End Sub
'-------------------------------
Public Sub UsingFolderItems()
Dim oForm As SAPbouiCOM.Form
Dim oItem As SAPbouiCOM.Item
Dim oFolder As SAPbouiCOM.Folder
Dim i As Integer '// to be used as a counter
'// add a new form
Set oForm = SBO_Application.Forms.Add("FormWithFolder")
'// add a user data source
oForm.DataSources.UserDataSources.Add "FolderDS", dt_SHORT_TEXT, 1
'//***************************
'// Adding Folder items
'//***************************
For i = 1 To 2
Set oFolder = oForm.Items.Add("Folder" & i, it_FOLDER).Specific
'// set the caption
oFolder.Caption = "Folder" & i
oFolder.DataBind.SetBound True, "", "FolderDS"
If Not i = 1 Then
oFolder.GroupWith ("Folder" & i - 1)
End If
Next i
End Sub
-
-
-
-
-
-
-
-