某種業務情境下，將一個工作區的多個欄位整理到一個內表中

標籤：style   blog   http   color   strong   資料   ar   2014   

 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 SINGLE14   *15   INTO  lh_t334t16   FROM t334t17   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.

工作區中的資料：

整理後，內表中的資料：