REPORT ZALV_FROMAT_COPY.
PARAMETERS p_rep1 TYPE ltdx-report. "first program with alv variants
PARAMETERS p_rep2 TYPE ltdx-report. "target program

DATA gt_ltdx LIKE TABLE OF ltdx WITH HEADER LINE.
DATA gt_ltdxd LIKE TABLE OF ltdxd WITH HEADER LINE.
DATA gt_ltdxt LIKE TABLE OF ltdxt WITH HEADER LINE.

START-OF-SELECTION.
  SELECT *
  FROM ltdx
  INTO TABLE gt_ltdx
  WHERE report EQ p_rep1.

  SELECT *
  FROM ltdxd
  INTO TABLE gt_ltdxd
  WHERE report EQ p_rep1.

  SELECT *
  FROM ltdxt
  INTO TABLE gt_ltdxt
  WHERE report EQ p_rep1.

  LOOP AT gt_ltdx.
    gt_ltdx-report = p_rep2.
    MODIFY gt_ltdx.
  ENDLOOP.

  LOOP AT gt_ltdxd.
    gt_ltdxd-report = p_rep2.
    MODIFY gt_ltdxd.
  ENDLOOP.

  LOOP AT gt_ltdxt.
    gt_ltdxt-report = p_rep2.
    MODIFY gt_ltdxt.
  ENDLOOP.

  MODIFY ltdx FROM TABLE gt_ltdx.
  MODIFY ltdxd FROM TABLE gt_ltdxd.
  MODIFY ltdxt FROM TABLE gt_ltdxt.

  COMMIT WORK AND WAIT.