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