代码语言:javascript复制
TYPES:
BEGIN OF ty_customer,
customer TYPE char10,
NAME TYPE char30,
city TYPE char30,
route TYPE char10,
END OF ty_customer.
TYPES: tt_customers TYPE SORTED TABLE OF ty_customer
WITH UNIQUE KEY customer.
TYPES: tt_citys TYPE STANDARD TABLE OF char30 WITH EMPTY KEY.
DATA(t_customres) =
VALUE tt_customers(
( customer = 'C0001' NAME = 'Test Customer 1' city = 'NY' route = 'R0001' )
( customer = 'C0002' NAME = 'Customer 2' city = 'LA' route = 'R0003' )
( customer = 'C0003' NAME = 'Good Customer 3' city = 'DFW' route = 'R0001' )
( customer = 'C0004' NAME = 'Best Customer 4' city = 'CH' route = 'R0003' )
( customer = 'C0005' NAME = 'So So Customer 5' city = 'NY' route = 'R0001' )
).
* Simply get the unique Routes, use WITHOUT MEMBERS
LOOP AT t_customres INTO DATA(ls_cust_2)
GROUP BY ( route = ls_cust_2-route )
ASCENDING
WITHOUT MEMBERS
REFERENCE INTO DATA(route_group_2).
WRITE: / route_group_2->route.
ENDLOOP.