begin-procedure list_ld_actwork
position ()
@xxx3
begin-select
llld.ldkey
llld.ldtext (+1,17,50) wrap 50
4
from
longdescription llld
where
llld.ldkey = &ldkey
and
ldownercol =
'WO8' !This
column had long description
order
by ldkey, ldlinenum
!functionality added now
end-select
end-procedure