CasewareDocs

SmartSingleList

Properties:

Remarks

  • If the account number length is greater than null, this value has to be used.
  • If the value is zero and a parameter name is provided and this parameter exists, its value will be used.
  • If the account number length is zero and no parameter name is provided, nothing happens and the input values will be taken as they are.
  • If the account number length is zero and a parameter name is provided but not available, nothing happens and the input values will be taken as they are. A log entry documents this issue.
  • If the field data type is numeric, zero-padding shall not be done.

Example

Sub Main() 
	Dim oParameters As Object 
	Dim oSingleList As Object 
	Dim vList As Variant 
	Dim vValue As Variant 
	Dim s As String 
	Dim i As Integer 

	'Get parameters from SmartContext.
	Set oParameters = SmartContext.Parameters 

	s = "The SmartSingleList1 control delivers" & Chr(13) 

	If oParameters.contains("SmartSingleList1") Then 
		Set oSingleList = oParameters.Item("SmartSingleList1") 

		vList = oSingleList.GetList 
		For Each vValue In vList 
			i = i + 1 
			s = s & CStr(i) & ". Value: " & CStr(vValue) & Chr(13) 
		Next 
	End If 

	MsgBox s 

	Set oSingleList = Nothing 
	Set oParameters = Nothing 
End Sub