topic Re: add a additional field in tcode XK02 - control screen in Application Development and Automation Discussions

add a additional field in tcode XK02 - control screen

Former Member — Sat, 13 Jun 2009 08:05:30 GMT

Hi,

I have to add an additional field in Tcode XK02 ie., in Control Screen, I couldn't find any screen exits. I hvae found one BADI VENDOR_ADD_DATA_CS .I have added a New field in Table LFA1 (the new field is T5UNT-NAICS ) through Append Structure but the append strcture is Partial Active. Also, how to add an additional field in the control screen of tcode XK02 using this BADI.

1. How to make theAppend structure Active

2. How to add a screen field using this BADI

Regards,

Deeephi.

Re: add a additional field in tcode XK02 - control screen

shishupalreddy — Sat, 13 Jun 2009 08:09:19 GMT

Hello,

Goto se11 and give the append structure name and make it active ....and see that LFA1 is active .

For Enhancement usong VENDOR_ADD_DATA_CS please refer the below link which is for XD02 but the procedure is the same .

https://www.sdn.sap.com/irj/scn/wiki?path=/pages/viewpage.action&pageid=77005819

Regards

Re: add a additional field in tcode XK02 - control screen

Former Member — Sat, 13 Jun 2009 11:25:16 GMT

1. My table was partial active...so go to se11,Enter LFA1 in display mode, Go to Path Utilities-database utility.now click on Activate and Adjust database.it will activated fully.

a) create a module programme with the the screenfield(LFA1-NAICS) that you want.

b) In pbo of module pool,enter following code

data : l_zfield type lfa1-NAICS.

constants: c_zfield(10) value '(SAPMF02D)LFA1-NAICS'.

field-symbols: <fse>.

assign (c_zfield) to <fse>.

if sy-subrc = 0.

l_zfield = <fse>.

endif.

If sy-tcode = 'XK02'.

Loop at screen.

If screen-group1 = 'Z1'.

Screen-input = 0.

Modify screen.

Endif.

Endloop.

Endif.

c)create a Screen group(Z1) as sushipal reddy showed int he atatched link.

d)go to Method IF_EX_VENDOR_ADD_DATA~CHECK_ADD_ON_ACTIVE and add following code

if i_screen_group = 'Z1'.

e_add_on_active = 'X'.

endif.

e)Go to method IF_EX_VENDOR_ADD_DATA_CS~GET_TAXI_SCREEN and type following code

IF sy-tcode EQ 'XK02'.

e_screen = '0101'.

e_program = 'Z_ADD_FIELD_XK02'.

e_headerscreen_layout = 'E'.

ENDIF.

f)thast it...go to xk02 u willl see an al push button and click on it..u can view the screen field...