It looks like you're new here. Sign in or register to get started.
Linenumber := COPYSTR(vstring3,4,6); DF."3-Detail Tag" := 'DET'; DF."3-Line Item Number" := EVALUATE(LineNUmber,vstring3);
OBJECT Report 50000 Text2Integer { OBJECT-PROPERTIES { Date=12-08-10; Time=11:31:37; Modified=Yes; Version List=; } PROPERTIES { ProcessingOnly=Yes; OnPostReport=BEGIN RandomText := 'RAN123456'; EVALUATE(LineInteger, COPYSTR(RandomText, 4, 6)); MESSAGE('%1', LineInteger); END; } DATAITEMS { } REQUESTFORM { PROPERTIES { Width=9020; Height=3410; } CONTROLS { } } REQUESTPAGE { PROPERTIES { } CONTROLS { } } CODE { VAR RandomText@1000000000 : Text[10]; LineInteger@1000000001 : Integer; BEGIN END. } RDLDATA { } }
Comments
my code doesn't work
thanks a lot
change integer type to text
=D> =D>