User Exit for MIRO to Populate the Business area feild in Modvat/VAT GLs

[Former Member]

This is related to CIN:

While posting entries of VAT/MODVAT the business area feild doesnt get populated at the time of bill passing(MIRO)

Please help how can we do the same

Pritu

[Former Member]

Below are the user exits related to MIRO:

Exit Name Description

LMR1M001 User exits in Logistics Invoice Verification

LMR1M002 Account grouping for GR/IR account maintenance

LMR1M003 Number assignment in Logistics Invoice Verification

LMR1M004 Logistics Invoice Verification: item text for follow-on docs

LMR1M005 Logistics Inv. Verification: Release Parked Doc. for Posting

LMR1M006 Logistics Invoice Verification: Process XML Invoice

MRMH0001 Logistics Invoice Verification: ERS procedure

MRMH0002 Logistics Invoice Verification: EDI inbound

MRMH0003 Logistics Invoice Verification: Revaluation/RAP

MRMN0001 Message output and creation: Logistics Invoice Verification

Also have a look at below code which gives the list of user exits where input is tcode.

&----

---

*& Report ZUSEREXIT *

*& *

&----

---

*& Finding the user-exits of a SAP transaction code *

*& *

*& Enter the transaction code in which you are looking for the *

*& user-exit and it will list you the list of user-exits in the *

*& transaction code. Also a drill down is possible which will help you *

*& to branch to SMOD. *

&----

---

REPORT zuserexit NO STANDARD PAGE HEADING.

TABLES : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.

TABLES : tstct.

DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.

DATA : field1(30).

DATA : v_devclass LIKE tadir-devclass.

PARAMETERS : p_tcode LIKE tstc-tcode OBLIGATORY.

SELECT SINGLE * FROM tstc WHERE tcode EQ p_tcode.

IF sy-subrc EQ 0.

SELECT SINGLE * FROM tadir WHERE pgmid = 'R3TR'

AND object = 'PROG'

AND obj_name = tstc-pgmna.

MOVE : tadir-devclass TO v_devclass.

IF sy-subrc NE 0.

SELECT SINGLE * FROM trdir WHERE name = tstc-pgmna.

IF trdir-subc EQ 'F'.

SELECT SINGLE * FROM tfdir WHERE pname = tstc-pgmna.

SELECT SINGLE * FROM enlfdir WHERE funcname = tfdir-funcname.

SELECT SINGLE * FROM tadir WHERE pgmid = 'R3TR'

AND object = 'FUGR'

AND obj_name EQ enlfdir-area.

MOVE : tadir-devclass TO v_devclass.

ENDIF.

ENDIF.

SELECT * FROM tadir INTO TABLE jtab

WHERE pgmid = 'R3TR'

AND object = 'SMOD'

AND devclass = v_devclass.

SELECT SINGLE * FROM tstct WHERE sprsl EQ sy-langu

AND tcode EQ p_tcode.

FORMAT COLOR COL_POSITIVE INTENSIFIED OFF.

WRITE:/(19) 'Transaction Code - ',

20(20) p_tcode,

45(50) tstct-ttext.

SKIP.

IF NOT jtab[] IS INITIAL.

WRITE:/(95) sy-uline.

FORMAT COLOR COL_HEADING INTENSIFIED ON.

WRITE:/1 sy-vline,

2 'Exit Name',

21 sy-vline ,

22 'Description',

95 sy-vline.

WRITE:/(95) sy-uline.

LOOP AT jtab.

SELECT SINGLE * FROM modsapt

WHERE sprsl = sy-langu AND

name = jtab-obj_name.

FORMAT COLOR COL_NORMAL INTENSIFIED OFF.

WRITE:/1 sy-vline,

2 jtab-obj_name HOTSPOT ON,

21 sy-vline ,

22 modsapt-modtext,

95 sy-vline.

ENDLOOP.

WRITE:/(95) sy-uline.

DESCRIBE TABLE jtab.

SKIP.

FORMAT COLOR COL_TOTAL INTENSIFIED ON.

WRITE:/ 'No of Exits:' , sy-tfill.

ELSE.

FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.

WRITE:/(95) 'No User Exit exists'.

ENDIF.

ELSE.

FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.

WRITE:/(95) 'Transaction Code Does Not Exist'.

ENDIF.

AT LINE-SELECTION.

GET CURSOR FIELD field1.

CHECK field1(4) EQ 'JTAB'.

SET PARAMETER ID 'MON' FIELD sy-lisel+1(10).

CALL TRANSACTION 'SMOD' AND SKIP FIRST SCREEN.

*---End of Program.

I hope it helps.

Best Regards,

Vibha

*Please mark all the helpful answers

[Former Member]

hi mehta

These are the User Exits available for MIRO.

<b>Exit Name Description</b>

<b>LMR1M001 </b> User exits in Logistics Invoice Verification

<b>LMR1M002</b> Account grouping for GR/IR account maintenance

<b>LMR1M003</b> Number assignment in Logistics Invoice Verification

<b>LMR1M004</b> Logistics Invoice Verification: item text for follow-on docs

<b>LMR1M005</b> Logistics Inv. Verification: Release Parked Doc. for Posting

<b>LMR1M006</b> Logistics Invoice Verification: Process XML Invoice

<b>MRMH0001</b> Logistics Invoice Verification: ERS procedure

<b>MRMH0002</b> Logistics Invoice Verification: EDI inbound

<b>MRMH0003</b> Logistics Invoice Verification: Revaluation/RAP

<b>MRMN0001</b> Message output and creation: Logistics Invoice Verification

Reward with points if it is helpful.

Cheers

Alfred

[Former Member]

are you using Ecc 6.0 version or an older version.

If you are using Ecc 6.0 and if you segmentation is Profit Center or fuctional Areas ask you Basis consultants to deactivate the Business Area Node. and try your transaction again this will not give you any errors

Ravi

[Former Member]

Yes Mr. Eddula.

What you might be trying to say was.

IF there Version was Ecc 6.0 and Business Area was Not used as there reporting segment, you asked them to deactivate the Business Area Node in that Transaction Related Role using there basis people help.

Correct me if i am wrong

Hi Mehta,

if you are using Business Area as a Segment for your reporting then try writting a Substiution rule Using the GL Relevent to your Excise transaction.

Hope this resolves your issue

Best Regards,

Ravi Reddy