Well for starters you aren't listening to what I suggested. Secondly, you stated in your definition that your file is pipe delimited but your ENTRY() is using the default of comma. You need to do ENTRY(3,l-val,"|").
Thanks for correcting me.
Trying like below :
DEF VAR l-val AS CHAR NO-UNDO.
DEF VAR mylongchar AS LONGCHAR NO-UNDO.
DEF VAR l-rslt AS CHAR NO-UNDO.
DEF VAR l-TEMP AS CHAR NO-UNDO.
INPUT FROM VALUE("/home/data/Data_File.txt").
REPEAT:
IMPORT UNFORMATTED l-val.
l-TEMP = l-val.
END.
INPUT CLOSE.
COPY-LOB FROM L-TEMP TO mylongchar.
l-rslt = ENTRY(3,mylongchar,"|").
DISPLAY l-rslt.
In this case am getting another error - COPY-LOB only works on large object fields. (11285)
please excuse if I am still doing something wrong . Expecting your advise on this.