creating a object

[Former Member]

Hi experts,

How to create a object in TADIR table.can you please help me out with the steps.

***points will be rewarded

Thanks & Regards,

Arun

[Former Member]

Hi Arun,

TADIR is table for Directory of Repository Objects.

It's mean that every Abap Object that you created will be saved in this table.

Like Structure, Table, Table Type, Pogram, Function Module, BADI, BAPI, BSP, etc.

Just try create simple Structure, and you will see it in TADIR table.

Regards,

[Former Member]

Hi,

Just for curiosity: why do you want to create an object in the TADIR?

As Jatra said, you just have to create an object and the TADIR will be created automatically...

[Former Member]

Hi,

You can make TADIR entry manually using FM 'TR_TADIR_INTERFACE'

Call like this.

CALL FUNCTION 'TR_TADIR_INTERFACE'

EXPORTING

• WI_DELETE_TADIR_ENTRY = ' '

• WI_REMOVE_REPAIR_FLAG = ' '

• WI_SET_REPAIR_FLAG = ' '

WI_TEST_MODUS = 'X'

WI_TADIR_PGMID = 'R3TR'

WI_TADIR_OBJECT = 'TABL'

WI_TADIR_OBJ_NAME = obj_name

• WI_TADIR_KORRNUM = ' '

WI_TADIR_SRCSYSTEM = 'XXX'

WI_TADIR_AUTHOR = 'YYY'

WI_TADIR_DEVCLASS = 'TEST_DS'

WI_TADIR_MASTERLANG = 'E'

WI_TADIR_CPROJECT = 'L'

• WI_TADIR_VERSID = ' '

• WI_REMOVE_GENFLAG = ' '

WI_SET_GENFLAG = ' '

• WI_READ_ONLY = ' '

• IV_SET_EDTFLAG = ' '

• IV_TRANSL_TECH_TEXT = ' '

• IV_DELFLAG = ' '

• IV_NO_PAK_CHECK = ' '

• IV_OBJ_STABILITY = ' '

• IMPORTING

• NEW_GTADIR_ENTRY =

• NEW_TADIR_ENTRY =

• EXCEPTIONS

• TADIR_ENTRY_NOT_EXISTING = 1

• TADIR_ENTRY_ILL_TYPE = 2

• NO_SYSTEMNAME = 3

• NO_SYSTEMTYPE = 4

• ORIGINAL_SYSTEM_CONFLICT = 5

• OBJECT_RESERVED_FOR_DEVCLASS = 6

• OBJECT_EXISTS_GLOBAL = 7

• OBJECT_EXISTS_LOCAL = 8

• OBJECT_IS_DISTRIBUTED = 9

• OBJ_SPECIFICATION_NOT_UNIQUE = 10

• NO_AUTHORIZATION_TO_DELETE = 11

• DEVCLASS_NOT_EXISTING = 12

• SIMULTANIOUS_SET_REMOVE_REPAIR = 13

• ORDER_MISSING = 14

• NO_MODIFICATION_OF_HEAD_SYST = 15

• PGMID_OBJECT_NOT_ALLOWED = 16

• MASTERLANGUAGE_NOT_SPECIFIED = 17

• DEVCLASS_NOT_SPECIFIED = 18

• SPECIFY_OWNER_UNIQUE = 19

• LOC_PRIV_OBJS_NO_REPAIR = 20

• GTADIR_NOT_REACHED = 21

• OBJECT_LOCKED_FOR_ORDER = 22

• CHANGE_OF_CLASS_NOT_ALLOWED = 23

• NO_CHANGE_FROM_SAP_TO_TMP = 24

• OTHERS = 25

.

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Reward points if found useful