SortHeaderClassType.GetColumnLabel - Template fault (Short 1 letter)

questions tips
, ,
1

Hey Guys
Found a small issue in the Browse Class - SortHeaderClassType.GetColumnLabel
The call returns the field name with out the Table Prefix - however the last letter of the field name is always left off.

I would recommend changing the class to read the following
(Effectively Comment out the -1 at the end of the sub)

SortHeaderClassType.GetColumnLabel PROCEDURE(LONG pColumn)
Loc:retVal STRING(256),AUTO
Loc:index  LONG,AUTO
  CODE
    Loc:retVal = SELF.GetColumnName(pColumn)
    IF Loc:retVal
      Loc:index = INSTRING(':',Loc:retVal,1,1)
      IF Loc:index>0
         RETURN SUB(Loc:retVal, Loc:index + 1, LEN(CLIP(Loc:retVal)) - Loc:index ) !-1 )	!Commented Out as cuts off the last Letter
      ELSE
         RETURN CLIP(Loc:retVal)
      END
    END
  RETURN ''