Product Hierachy info

----------------------------------------------------------------------------

*               Product Hierachy tree details                              *

----------------------------------------------------------------------------

    IF NOT -PRODH+0(2) EQ SPACE.
      -LINE    = -PRODH+0(2).
      L_WA_PRODH_LINE-SIGN = L_C_I.
      L_WA_PRODH_LINE-OPTION = L_C_EQ.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(2).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.

    IF NOT -PRODH+2(2) EQ SPACE.
      -BRDGRP   = -PRODH+2(2).
      L_WA_PRODH_LINE-SIGN = L_C_I.
      L_WA_PRODH_LINE-OPTION = L_C_EQ.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(4).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.

*End of Change by MOD-004.

    IF NOT -PRODH+4(3) EQ SPACE.
      -BRAND    = -PRODH+4(3).
      L_WA_PRODH_LINE-SIGN = L_C_I.
      L_WA_PRODH_LINE-OPTION = L_C_EQ.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(7).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.
    IF NOT -PRODH+13(2) EQ SPACE.
      -PACKAGE  = -PRODH+13(2).
      L_WA_PRODH_LINE-SIGN = 'I'.
      L_WA_PRODH_LINE-OPTION = 'EQ'.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(15).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.

    IF NOT -PRODH+7(3) EQ SPACE.
      -SBRAND    = -PRODH+7(3).
      L_WA_PRODH_LINE-SIGN = L_C_I.
      L_WA_PRODH_LINE-OPTION = L_C_EQ.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(10).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.

    IF NOT -PRODH+10(3) EQ SPACE.
      -FLAVOR    = -PRODH+10(3).
      L_WA_PRODH_LINE-SIGN = L_C_I.
      L_WA_PRODH_LINE-OPTION = L_C_EQ.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(13).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.

    IF NOT -PRODH+15(3) EQ SPACE.
      -SIZE    = -PRODH+15(3).
      L_WA_PRODH_LINE-SIGN = L_C_I.
      L_WA_PRODH_LINE-OPTION = L_C_EQ.
      L_WA_PRODH_LINE-LOW  = -PRODH+0(18).
      APPEND L_WA_PRODH_LINE TO L_R_PRODH.
    ENDIF.