Help to read the complete basic idoc structure

Question

Hi,
I have the following Basic Idoc structure
1. /DSD/HH_CONTROL01- Control data for hand held interface.
1.1 /DSD/HH_E1CTHD01- Control data header.
1.1.1 /DSD/HH_E1CTAD02- Control idoc- Application data header
1.1.1.1 /DSD/HH_E1CTID03- Control idoc- Application data item
1.1.1.2 /E1WXX01- Segment for customer enhancement to be used as requirement.     
OBSERVATION----
1. The basic idoc (1) is found in table EDBAS and description in EDBAST.
2. The segments (1.1.1.2) are in table EDISEGMENT and EDISEGT.
3. All the other structures (1.1), (1.1.1), (1.1.1.1) are found in tables EDISDEF and some in EDISEGMENT.
QUESTIONS----
1.What query can I write to get the above basic idoc structure?
2.How are the relationships mapped among the tables?
Thank you, points will be awarded for your time and answers.

Answer 1

REPORT  ZPGM_BASIC_IDOC_IMPRT_TO_PCNTR.
TABLES: EDBAS, " Basic types
        IDOCSYN. " Syntax Description for Basic Types
DATA: BEGIN OF ITAB OCCURS 0.
        INCLUDE STRUCTURE IDOCSYN.
DATA: END OF ITAB.
SELECT A~IDOCTYP " Basic type
       B~NR      " Sequential Number of Segment in IDoc Type
       B~SEGTYP  " Segment type
       B~PARSEG  " Name of parent segment
       B~PARPNO  " Sequential number of parent segment
       B~PARFLG  " Flag for parent segment: Segment is start of segment
                                                             "  group
       B~MUSTFL  " Flag: Mandatory entry
       B~OCCMIN  " Minimum number of segments in sequence
       B~OCCMAX  " Maximum number of segments in sequence
       B~HLEVEL  " Hierarchy level of IDoc type segment
       INTO TABLE ITAB
       FROM EDBAS AS A INNER JOIN
            IDOCSYN AS B
        ON AIDOCTYP EQ BIDOCTYP.
SORT ITAB BY IDOCTYP NR." Sort the idoctype and according the segment "
                        "number for the right order in the basic idoc
                        "syntax.
LOOP AT ITAB.
  AT NEW IDOCTYP.
      WRITE:/ '***********'.
      WRITE:/1 ITAB-IDOCTYP.
  ENDAT.
     WRITE:/.
     SY-COLNO = 5 + ( ITAB-PARPNO * 2 ). " this displays the segments
                                         "under the respective parent
                                         "segments.
     WRITE AT SY-COLNO ITAB-SEGTYP.
ENDLOOP.
Thank you.