Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

ME21n - Purchase order field exit??

Former Member
0 Kudos

Hi

Does anybody know what the ME21n (enter purchase order) field exit would be so that I can default a particular G/L account (HKONT) when the account assignment group is 'F' & the purchasing org is a particular value?

If you can also confirm if that is going to be possible with coding in that field exit I would appreciate it....

Thanks all for your time...

4 REPLIES 4

former_member583013
Active Contributor
0 Kudos

This are all the available User-Exits for ME21N...


Enhancement

MM06E010   
MM06E009   
MM06E008   
MM06E007   
MM06E005   
MM06E004   
MM06E003   
MM06E001   
MEVME001   
MM06E011   
MEQUERY1   
MRFLB001   
MMFAB001   
MMDA0001   
MMAL0004   
MMAL0003   
MMAL0002   
MMAL0001   
M06B0002   
M06B0001   
LWSUS001   
LMEXF001   
LMEQR001   
LMELA010   
LMELA002   
LMEDR001   
AMPL0001   
MELAB001   
MEFLD004
MEETA001
ME590001
M06E0005
M06B0003
M06B0004
M06B0005
M06E0004

And this are the BADI's


Business Add-in

ME_HOLD_PO      
ME_CIN_MM06EFKO 
ME_CIN_LEINRF2V 
ME_CIN_LEINRF2R 

Greetings,

Blag.

0 Kudos

Hi

Are u trying to write Field exit for the screen ME21n .

From 4.6c onwards, Field exits will no more be supported by SAP

Activation of the field exits and assignment of the dynpros can also be carried out using program RSMODPRF

Thanks

Devendar

Former Member
0 Kudos

Hi all

Problem solved thro one of the user exit MM06E005 Customer fields in purchasing document.

Thanks all for your time....appreciate it...

Former Member
0 Kudos

Screen Exit

Please remove the TDS-related input fields on the PO entry screen on the customer data tab (PO line details).

- TDS account

- TDS cost code

- TDS sub code

1. Goto Transaction Code Me21n

Fill the following fields

Enter

Give the input values in following fields from ORGDATA TAB

Purchasing org

Purchasing group

Company code

Vendor

Enter

Select Customer Data tab like following

USER EXIT : MM06E005 (Customer fields in purchasing document )

 Goto : T.Code : SMOD

 Give the Enhacement Name : MM06E005

 Click on Display

 Click on Components Push Button

 Double click on function module EXIT_SAPMM06E_016( Export Data to Customer Subscreen for Purchasing document item)

 Double click on Include ZXM06O01.

 Insert the following coding in that include

SET PARAMETER ID 'BUK' FIELD g_ekko-bukrs.

LOOP AT SCREEN.

IF screen-name = 'EKPO_CI-ISMSUBTITLE1'.

screen-input = '0'.

MODIFY SCREEN.

ENDIF.

*>>>>>>>>>>>>>>>>>>>>>> Begin of insert CR336/BG1 >>>>>>>>>>>>>>>>>>>>>>

IF screen-name = 'G_EAN11'.

screen-input = '0'.

MODIFY SCREEN.

ENDIF.

*<<<<<<<<<<<<<<<<<<<<<<< End of insert CR336/BG1 <<<<<<<<<<<<<<<<<<<<<<<

*>>>>>>>>>>>>>>>>>> Begin of Changes for K896570/501411945 <<<<<<<<<<<<<

IF screen-name = 'EKPO_CI-TDSACCOUNT'.

screen-input = '0'.

MODIFY SCREEN.

ENDIF.

IF screen-name = 'EKPO_CI-TDSCOST'.

screen-input = '0'.

MODIFY SCREEN.

ENDIF.

IF screen-name = 'EKPO_CI-TDSSUB'.

screen-input = '0'.

MODIFY SCREEN.

ENDIF.

*>>>>>>>>>>>>>>>>>> End of Changes for K896570/501411945 <<<<<<<<<<<<<

*>>>>>>>>>>>>>>>>>>>>>> Begin of insert SM1 >>>>>>>>>>>>>>>>>>>>>>

IF ( screen-name = 'EKPO_CI-TDSACCOUNT'

OR screen-name = 'EKPO_CI-TDSCOST'

OR screen-name = 'EKPO_CI-TDSSUB'

OR screen-name = 'TDS_TXT_1'

OR screen-name = 'TDS_TXT_2'

OR screen-name = 'TDS_TXT_3'

OR screen-name = 'TDSACCOUNT-DESC'

OR screen-name = 'TDSCOST-DESC'

OR screen-name = 'TDSSUB-DESC' ).

IF g_ekko-bukrs(2) <> 'U6'. "not a theatrical company

screen-invisible = '1'.

screen-input = '0'.

ELSEIF g_flag = 0. "display only

screen-invisible = '0'.

screen-input = '0'.

ELSEIF g_flag = 1. "change

screen-invisible = '0'.

*>>>>>>>>>>>>>>>>>> Begin of Changes for K896570/501411945 <<<<<<<<<<<<<

  • screen-input = '1'. "Fharook Syed

screen-input = '0'. "Fharook Syed

*>>>>>>>>>>>>>>>>>> End of Changes for K896570/501411945 <<<<<<<<<<<<<

ENDIF.

IF screen-name = 'EKPO_CI-TDSACCOUNT'.

screen-required = '1'.

ENDIF.

MODIFY SCREEN.

ENDIF.

*>>>>>>>>>>>>>>>>>>>>>> End of insert SM1 >>>>>>>>>>>>>>>>>>>>>>

&#61664; save & activate.

&#61664; Repeat the above process in ME21N to see customer data fileds in CUSTOMER DATA tab

After the above Modifications CUSTOMER DATA is displaying like this

rewars if useful