cancel
Showing results for 
Search instead for 
Did you mean: 

Redefine from string as in cobol

Former Member
0 Kudos

01 TABELLE2.
03 pic x(14) value '20050104001900'.
03 pic x(14) value '20060203841824'.
03 pic x(14) value '20070303681748'.
etc...


01 TABELLE2-R redefines TABELLE2.
03 TABELLE2-SATZ OCCURS 36.
05 T2-JAHR pic 9(04).
05 T2-K pic 9(02).
05 TAB4 pic 9(01)V9(03).
05 TAB5 pic 9(04).

In Cobol ii is possible to define a string with 14 characters as "20050104001900" and redfines this string in 4 fields, one t2-jahr(4) type n, t2-k(2), tab4 p decimals 3, tab5(4) type n. For each line in "Tabelle2" the data will be transfered automatically in tabelle2-r defines as "Redefines". Is it possible in ABAP and how? or what is the best solution, in the string there is no packed data, only numeric data.

Accepted Solutions (0)

Answers (0)