Sub B4XTableM_CellClicked (ColumnId As String, RowId As Long)
Dim column As B4XTableColumn = B4XTableM.GetColumn(ColumnId)
Dim value As String = B4XTableM.GetRow(RowId).Get(ColumnId)
InputTemplate.Text = value
InputTemplate.lblTitle.Text = column.Id 'line 118 error column.Id = 'description' InputTemplate is all null's except for Text which is = 'AT&T'
Wait For (Dialog.ShowTemplate(InputTemplate, "OK", "", "CANCEL")) Complete (Result As Int)
If Result = xui.DialogResponse_Positive Then
B4XTableM.sql1.ExecNonQuery2($"UPDATE data SET ${column.SQLID} = ? WHERE rowid = ?"$, Array As String(InputTemplate.Text, RowId))
B4XTableM.Refresh
End If
End Sub