Is there a way to remove the "_1" that appears in the ListView Column Header?

I tried:
property fChooseList LstTable .fLstTable
property fChooseList LstField .fLstField
property rbase_form_action ColumnHeaders ''
property fChooseList kFld .fkFld
property fChooseList LookupWhereClause .fLWhere
property fChooseList refreshlist 'true'

property rbase_form alphablend 'false'

cls
RETURN


ColumnHeaders is defined as
 SET VAR fPass INTEGER = 1

 SET VAR fColumnHeader = (SSUB(.fLstField, .fPass))

 WHILE fColumnHeader IS NOT NULL THEN

set var fPrevPass integer = (.fPass - 1)

  SET VAR fProp = ('property fChooseList' +
     & (CHAR(39)) + 'COLUMNS[' + (ctxt(.fPrevPass)) + ']->CAPTION' +
     + (CHAR(39)) & (CHAR(39)) + .fColumnHeader + (char(39)))

  &fprop

  SET VAR fPass = (.fPass + 1)
  SET VAR fColumnHeader = (SSUB(.fLstField, .fPass))
 ENDWHILE

 RETURN

Reply via email to