某种业务场景下，将一个工作区的多个字段整理到一个内表中详解编程语言

 1 DATA:num TYPE i. 
 2 CONSTANTS: times TYPE i VALUE 29. 
 3 DATA: BEGIN OF ih_lgty, 
 4   lgty TYPE lgtyp, 
 5 END OF ih_lgty, 
 6 it_lgty LIKE TABLE OF ih_lgty. 
 7 FIELD-SYMBOLS: <lgty> TYPE any, 
 8                <t334t> LIKE t334t. 
 9  
10 DATA:lh_t334t LIKE t334t, 
11      lt_t334t LIKE TABLE OF t334t. 
12  
13 SELECT SINGLE 
14   * 
15   INTO  lh_t334t 
16   FROM t334t 
17   WHERE lgnum = 'NJ1' 
18   AND kzear = 'A' 
19   AND lgtkz = 'BC1'. 
20 ***  将一个工作区的数据整理到一个内表中 
21 ASSIGN lh_t334t TO <t334t>. 
22 DO times TIMES. 
23   num = 10 + sy-index. 
24   UNASSIGN <lgty>. 
25   ASSIGN  COMPONENT num OF  STRUCTURE  <t334t> TO  <lgty>. 
26   ih_lgty-lgty =  <lgty>. 
27   APPEND ih_lgty TO it_lgty. 
28 ENDDO. 
29 DELETE it_lgty WHERE lgty IS INITIAL. 
30 *** 
31 SORT it_lgty. 
32 DELETE ADJACENT DUPLICATES FROM it_lgty COMPARING ALL FIELDS. 
33 num = lines( it_lgty ). 
34 WRITE:num.