Dim RetailColumn As B4XTableColumn = B4XTable1.AddColumn("Retail", B4XTable1.COLUMN_TYPE_NUMBERS)
Dim formatter As B4XFormatter
formatter.Initialize
formatter.GetDefaultFormat.MaximumFractions = 2
formatter.GetDefaultFormat.MinimumFractions = 2
RetailColumn.Formatter = formatter