REFERENCE(O_TDPZZ) TYPE TDPZZ
REFERENCE(E_WRK_TDPZZ) TYPE TDPZZ
VALUE(I_D_DISTRIBUTOR) LIKE TDPZZ-D_DISTRIBUTOR