how to make item text mandatory in me51n tcode .

[Former Member]

hello experts,

i developed this code , but it is not working , please suggest me wat i did mistake in my code.....

*data : it_lines1 type tline occurs 0 with header line .

*data :tdname like stxh-tdname.

**

*

*loop at im_t_eban1.

*

• if im_t_eban1-werks = '3000'.

• if sy-tcode = 'ME51N'.

*

• concatenate im_t_eban1-banfn im_t_eban1-bnfpo into tdname.

*

*

• call function 'READ_TEXT'

• exporting

• client = sy-mandt

• id = 'B01'

• language = 'E'

• name = tdname

• object = 'EBAN'

• tables

• lines = it_lines1.

*

*

*

• loop at it_lines1 .

*

• if it_lines1-tdline is initial.

*

*

*

• if sy-subrc <> 0.

• ex_mes1-type = 'E'.

• ex_mes1-id = 'ZMM_MSG'.

• ex_mes1-number = '063'.

• append ex_mes1.

• ex_messages[] = ex_mes1[].

• clear ex_mes1.

• free ex_mes1.

• endif.

• endif.

*

*

• endloop.

*

• endif.

• endif.

*

*endloop.

note: here no 63 is message no ,( please enter item text).

[karthik_vardhan]

Hi,

Message e63(ZMM_MSG) .

Try This .

in place of

*ex_mes1-type = 'E'.

• ex_mes1-id = 'ZMM_MSG'.

• ex_mes1-number = '063'.

• append ex_mes1.

• ex_messages] = ex_mes1[.

• clear ex_mes1.

• free ex_mes1.

[Former Member]

Hi Kamal

Kindly where you used this code ,in which enhancement ? ,because i need to do the same

Regards

Ghadeer