Excise duty Refund on Exports

Dear experts,
                      Excise Duty paid on Exports which is a current Asset account should be debited to Excise Duty Refund on Export but debited to ED paid Account at Factory level at the time of utilization.
For Example:
Actual Entry to be posted:
                                         ED Refund on Exports    100
                                               To ED Payable                    100
But posting as :
                                           ED Paid A/c                    100
                                                 To ED payable A/c                100
Please help me ...
Regards
Satish

Hi,
You can change the account determination in SPRO > Logistics Execution > Tax on Goods movement > India
Regards,
SDNer

Similar Messages

Excise Duty Value in Export Invoice - Very Urgent

Hi Gurus,
I have created a Export delivery & Billing Documents. I am trying to create Excise Invoice in which Excise Duty values are coming as "0". We are using TAXINN Procedure , ECC 6.0
Is there any specific note or any customization required for this ?
Due to this ARE1 is also giving "0" values & subsequent "0" value in Bond Register.
Can anybody help me on this ? It is very urgent.
Thanks in advance
Vikas

Hi Vikas,
Could you help yaar ...if you got solution for it ..I am facing same problem..We are going live very soon,
help of ur's could help me lot ..My mail id [email protected]
Thanks in advanec in for your help.
regards,
Vijay Khochare

Excise Duty in Export Invoice

Hi Gurus,
I have created a Export delivery & Billing Documents. I am trying to create Excise Invoice in which Excise Duty values are coming as "0". We are using TAXINN Procedure on ECC 6.0
Is there any specific note or any customization required for this , because due to this ARE1 is also givibg "0" values & subsequent "0" value in Bond Register.
Can anybody help me on this ? It is very urgent.
Thanks in advance
Vikas

Closing the thread.

Excise Duty posting in case of Export under Bond - in J1iin

Hi SAP CIN Gurus,
One of our client products has the following excise components during the Export
BED- Duty nill under Bond
Cess- Duty has to pay (No exempt)
Ed cess- payble only on Cess
She Cess- payble only on Cess
In SAP during the Export Excise Invoice (J1iin) Excise duty will not be posted when we select the Bound/LUT
And When I select NO bond and Post while creating ARE1 I will not get the Bound TAB so I cannot track the Bound at all.
How can I address this requirement?
Is there anyway tnat during excise invoice creation u2013under bound selection system should post the excise amount.
Pls help me resolve the issue
Jeevan

Hi Amrish,,
Let me explain you through an example for the above mentioned scenario:
Say for example you have done 10 transaction on 01.01.2009 (By transaction here I mean complete one cycle) out of which 8 transaction is for domestic (Factory Sale) sales and 2 for export ( any export sale whether is BOND/NO BOND/LOUT).
Now while updating the RG1 (J1I5)register for issues (Here I assume you have updated the RG1 for reciepts using right classification ROP/RMA) if you have selected IDH and executed the transaction (F8) for the date 01.01.2009 you will have total 10 Material documents is displayed.Assuming if you have updated all the 10 transactions (including exports i.e 2 transaction). System will update all these transaction for domestic sales/factory sales.
Now If you go back again to J1I5 to update for export and select the Classification IWE/IWT/IWO and execute (F8). You will not be able to see any material documents to be updated. As all the documents are upated for factory sales.
For this it is always suggested to update the RG1 register on daily basis and upate the documents chosing right classifications.
FOR YOUR INFOMATION THERE IS NO CONTROL OF MATERIAL DOCUMENT THROUGH SELECTING CLASSIFICATION. SYSTEM WILL BRING ALL THE MATERIAL DOCUMENTS IRRESPECTIVE OF WHICH CLASSIFICATION YOU CHOOSE.
If you want to have control over while updating RG1 register.. You explore below user exit and write logic as per you requirement.
J_1I7_USEREXIT_J1I5_VALIDATE
J_1I7_USEREXIT_J1I5_MATFORM
Hope I am able answer your querry....!!!
Regards
MBS

Excise Duty Not geting calculated in Export excise Invoice

Hi;
As subject line specifies; in J1IIn for export excise invoice after pressing the calculate button system does not calculate the excise duty in document. This leads to no value in ARE1 & no consumption of bond Value.
Kindly let me know what kind of data is missing.
Avinash

Hi Avinash,
Could you help yaar ...if you got solution for it ..I am facing same problem..We are going live very soon,
help of ur's could help me lot ..My mail id [email protected]
Thanks in advanec in for your help.
regards,
Vijay Khochare

Basic excise duty calculated in duty free deemed export

Hi Experts,
We are facing an issue where system calculates basic excise duty in case of deemed export(duty free) . In some invoices it calculates basic excise duty though it should not calculate as it is duty free.
Our scenario is like this:-
At sales order in deemed export we take alternative tax classification as "7"( Header level - Billing tab). Due to this my JMOD value becomes Zero which is ok. Another condition type is JEX2 which is 100% of JMOD.
Now while creating invoice at VF01, value of JMOD AND JEX2 are Zero which is absolutely OK. But at the time of release to accounting system update 12% value in JEX2 only which flows to G/L.
Example:-
This case is ok.
Condition type                                      Price
PR00                                                  100
UTXJ(100% Of PR00)                           100
JMOD                                                 0
JEX2(100% OF JMOD)                         0
Wrong duty calulation
Condition type                                      Price
PR00                                                  100
UTXJ(100% Of PR00)                           100
JMOD                                                 0
JEX2(100% OF JMOD)                         12
In our most case this work fine means if JMOD is 0 then JEX2 is also 0, But in some invoices system calculate or update JEX2 with 12% value after release to account which is not at all required.
We have checked all the customization setting which are ok.
Please advise why system is behaving this way only in case of some invoices.
Your efforts will be highly appreciable.
Regards,
Dharminder

Dear Experts,
If anyone face this issue please give your valuable inputs. I will highly appreciates if got some advise or suggestion on the issue in J1IIN
We have done the debug at our end and following is the observation
The name of the include is - MJ1IINF01
The variable that needs to be watched is - CUST_TYP
The perform called during the execution is DETERMINE_INVOICE_TYPE
1) Export first and deemed next
When we first create invoice for export the variable CUST_TYP is set to
“F” and the invoice is created as per expected with correct duties.
After this if we create a deemed invoice without exiting the screen the
invoice type under “UTILIZATION”, include keeps CUST_TYP as “F” and
do
not change it to “L”. Hence it remains export. Which is the cause of
problem we are facing at present..
But in next case it changes CUST_TYP properly as explained below.
2) Deemed first and Export next
When we first create invoice for deemed the variable CUST_TYP is set to
“L” and the invoice is created as per expected with correct duties.
After this if we create a export invoice without exiting the screen the
invoice type under “UTILIZATION” include changes CUST_TYP as “F” and
hence we get desired effect.
Our analysis shows that the include is not able to change variable
CUST_TYP to “L” from “F” in first case. But in second case it is
correctly changes to “F” from “L”.
Please advise.
Regards,
Dharminder

Export Sale without Tax and Without Excise duty

Hi Experts
The Scenario is like this
The material has no tax and no excise duty (e.g Books)
how to configure this Export sale scenario for Books
Thanks in advance

Dear
For creating Export sales scenario, create Export sales org ZEXP, create distribution channel might be EX, do the required plant etc assignment to Sales org-distribution channel.Create seperate sales order , delivery and billing type and maintain required copy control between them. Create export customer, custommer pricing procedure02 in customer master sales area data-sales, document pricing procedure "N" in VOV8 & vofa.
If u are following taxinn, then you may copy jinexp for pricing prosedure. Pricing procedure must contain condition types for frieght and insurance. Then assign the procedure to sales area.
Please maintain account determination in vkoa with sales org customer account grp, material account grp, account key. Assign separate GLs according to the requirement
pls revert for any further query
Thanks
Chandra
Edited by: Chandra Mukherjee on Dec 15, 2009 10:05 AM
Edited by: Chandra Mukherjee on Dec 15, 2009 10:13 AM

NO values of excise duty in J1IIN for Export

dear
When i am doing J1IIN for export, the excise duty are not reflected on main screen of J1IIN.But it is displayed in Utilization Tab.I have maintain excise rate inJ1ID.
Wht is the reason?

Hi swamy
If u want a differenciate pricing for two different customer.. Thatmeans when u create normal invoice for normal customer it should pick up normal pricing procedure.
If u are raising Cin invoice to customer then it should pick up Cin Pricing Procedure.
For this u have to create two pricing procedures
one for normal
one for Cin
and u have to create two different Customer Pricing procedure and Document Pricing Procedures.
U have to create two order types and delivery and billing types
IF u done all these then u will make differenciate between customers.
Because v have created this process
Any quries revert back to me.
Regards
Srinivas.

No excise duty for exports

Just so that I don't violate forum rules. I searched this forum for the keywords "Exports Excise Invoice". Did not find a question in the first three pages. So, I am posting mine.
Hello,
I'm working on a export scenario, I want the excise invoice NOT TO capture excise duty (none of these BED,AED,SED). I am not sure but I think it's called ZERO Duty Excise invoice. In exports, as we all know exports are excise exempted.
There are several items in the invoice(approx 15 items), unfortunately in my case the excise invoice is capturing all of BED,AED,SED for each material and my Excise Duty total is exceeding the total invoice(VF01). Which should not be the case.
Simply put my excise invoice should be similar to my commercial invoice in terms of Net value and each material value and it should print Zero Excise duty for each material.
To achieve my objective can I go to FTXP and for the TAX Code maintained for UTXJ put zero for BED,AED,SED and also make the excise condition types statistical in my pricing procedure.
Is this the right approach?
Edited by: SAP SD_Newbie on Sep 11, 2011 7:30 PM
btw, I am using TAXINJ
Edited by: SAP SD_Newbie on Sep 11, 2011 8:01 PM
To make my life miserable, they are using the same Document and Same pricing procedure for other exports scenario where it is mandatory to capture excise and other taxes(can't argue it's their requirement). So the second option of making the tax condition types statistical is ruled out. So, apart from FTXP do I have any other options.

Same pricing procedure for other exports scenario
where it is mandatory to capture excise and other taxes
It is nothing wrong capturing ED in export invoice but it should be statistical.
my Excise Duty total is exceeding the total invoice
Check in J1ID > Excise Tax Rate as to what percent has been maintained for those chapter ids. System will calculate based on this assignment only.
G. Lakshmipathi

Excise duty credit against customer in Export under Bond

Hi dude
In export under bond process, billing document acct determination document the excise duty + net value is showing against customer. Is it correct ? Please let me know the values credit in the billing document.
regards,
madhav

Hi,
In case of Export Sales Under Bond
The accounting entry is:
Customer Account Dr
Revenue (Exports Sales) Cr
In case of Export there is no accounting entries for excise bcoz of exemption of excise duties for export.
Only u have to create ARE1 for Export Sales.
Regards,
PM

You cannot create ARE3 for duty paid Deemed exports excise invoice!

You cannot create ARE3 for duty paid Deemed exports excise invoice!
Message no. 4F326

Hi murali,
How can you create ARE document for duty paid excise invoice
ARE docs are for excise exption purpose only
regards
bvdv

Difference between Additional Excise duty and Additional Duty on imports

Dear All,
I want to know the difference between additional excise duty on domestic procurement and additional duty on imported material, mainly in context of the credit availing. How much credit we can avail if we procure a capital material (domestic and imported).
Regards,
Ashish

Dear,
Excise duty is a duty on production or manufacture of goods, It is levied on manufacture of goods and the liability to pay excise duty arises immediately on manufacture or production of goods.
Additional duty is levied as per custom tarff act and is equal to excise duty levied on a LIKE product manufactured or produced in India.
Sometimes, foreign sellers abroad may export to India goods at below the amounts charged by them in their domestic markets in order to capture Indian markets to the detriment of Indian Industry.
Please check: http://help.sap.com/bp_bblibrary/600/html/J84_EN_IN.htm
http://www.sdn.sap.com/irj/scn/go/portal/prtroot/docs/library/uuid/808c60ca-013b-2c10-34a2-94d1eb442e6f?quicklink=index&overridelayout=true
Regards,
Syed Hussain.

Excise duty for differential amount

Dear Sir,
i want to charge Excise duty to customer(Excise JV) but i dont have Excise invoice
is it possible?
Scenario is as follows,
Export invoice and excise invoice for 500 ton(qty)
After loading it on ship the weight is 520 tons.
now for additional 20 tons we are passing debit note on customer, i need to pay excise duty for 20tons
Entry at the time of J1IH
Excise duty Clearing A/c Dr.
Excise duty Basic Payable A/c Cr.
Excise duty Edu Cess Payable A/c Cr.
Excise duty Higher Edu Cess Payable A/c Cr.
pls suggest the solution
Reg,
Amol

Hi Suresh,
We will be passing debit memo from Finance module by passing FI JV entries so i wont be having Debit memo number.
any other way of passing Excise JV?
Reg,
Amol

Excise Duty Base Amount not flowing into ARE -1

Dear Friends,
While Iam creating ARE-1 for the Exports Excise Invoice - Excise Duty Base Amount not flowing into ARE1
thanks
Sasi

Dear Lakshmipathi,
Earlier Liable to AT1 is ticked but not Indicator NCCD,I have checked after ticking the NCCD as well....
In my pricing procedure i dont have the NCCD condition .....as its not required.
In classify consditiontypes: I have maintained PR00 condition type as well along with Excise condition types...Do i need to maintain this PR00 anywhere else
or
Is there anything I need to do with the assesable value.......if so how should be the entry like in the pricing procedure?
Can someone please provide me the solution...its very urgent
Thanks
Sasi

% Excise Duty is coming wrong in Report

Hi,
I have a report of Gross Margin (FI)....
My problem is that when i m picking the % Excise Duty from J_1IEXCTAX table against the Chapter ID....it is showing the 4 values against it...means 4 time % Excise Duty....i.e. periodic changed...
like....
8538 90 00................1................08.12.2008................31.12.9999................10.0000
8538 90 00................1................01.03.2008................07.12.2008................14.0000
8538 90 00................1................28.02.2005................29.02.2008................16.0000
8538 90 00................1................01.01.2001................28.02.2005................16.0000
when i m executing my report with period from 01/11/2008 to 15/11/2008..it is showing the 16%...but as per my given period, it must display 14%...
Please tell me that what should the condition there....
I m sending my code...
REPORT z_fi_gross_margin NO STANDARD PAGE HEADING LINE-SIZE 125 .
TABLES : t179t, tvkbt, mara, vbrp, s501, mbew.
TYPE-POOLS : slis.
DATA : BEGIN OF itab OCCURS 0,
       vkbur   LIKE s501-vkbur,
       matnr   LIKE s501-matnr,
       prodh   LIKE s501-prodh,
       ummenge LIKE s501-ummenge,
       gumenge LIKE s501-gumenge,
       umnetwr LIKE s501-umnetwr,
       gunetwr LIKE s501-gunetwr,
       sptag   LIKE s501-sptag,
       peinh   LIKE mbew-peinh,
       stprs   LIKE mbew-stprs,
       lplpx   LIKE mbew-lplpx,
       vtext LIKE t179t-vtext,
       mtart LIKE mara-mtart,
       bezei LIKE tvkbt-bezei,
       net_sqty TYPE p DECIMALS 2,
       s_amt TYPE p DECIMALS 2,
       j_1ichid LIKE j_1imtchid-j_1ichid,
       rate LIKE j_1iexctax-rate,
       excise TYPE p DECIMALS 2,
       l_excise TYPE p DECIMALS 2,
       s_unit TYPE p DECIMALS 2,
       m_unit TYPE p DECIMALS 2,
       t_mcost TYPE p DECIMALS 2,
       m_cost% TYPE p DECIMALS 2,
       g_margin TYPE p DECIMALS 2,
       g_marg% TYPE p DECIMALS 2,
       END OF itab.
DATA : v_index TYPE sy-tabix.
DATA : cnt TYPE i.
DATA : w_container TYPE scrfname VALUE 'CL_GRID',
       w_cprog TYPE lvc_s_layo,
       g_repid LIKE sy-repid,
       w_save TYPE c,
       w_exit TYPE c,
       cl_grid TYPE REF TO cl_gui_alv_grid,
       cl_custom_container TYPE REF TO cl_gui_custom_container,
       it_fld_catalog TYPE slis_t_fieldcat_alv,
       wa_fld_catalog TYPE slis_t_fieldcat_alv WITH HEADER LINE ,
       layout TYPE slis_layout_alv,
       col_pos LIKE sy-cucol ,
       alvfc TYPE slis_t_fieldcat_alv.
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS   : vkbur FOR s501-vkbur.
SELECT-OPTIONS   : matnr FOR s501-matnr.
SELECT-OPTIONS   : sptag FOR s501-sptag.
SELECTION-SCREEN : END OF BLOCK b1.
PERFORM fill_catalog1 USING:
**'SPTAG'    'ITAB'    'DATE',
**'VKBUR'    'ITAB'    'Sales Office',
'BEZEI'    'ITAB'    'S.Off. Desc.',
'MATNR'    'ITAB'    'Material',
'PRODH'    'ITAB'    'LEVEL',
'VTEXT'    'ITAB'    'Level I',
'MTART'    'ITAB'    'Material Type',
'NET_SQTY' 'ITAB'    'Net Sales Qty.',
'S_AMT'    'ITAB'    'Sales with Ex. Duty',
'EXCISE'   'ITAB'    'Excise Duty',
'RATE'     'ITAB'    '% Excise Duty',
'L_EXCISE' 'ITAB'    'Sales less Ex. Duty',
'S_UNIT'   'ITAB'    'Sales / Unit',
'M_UNIT'   'ITAB'    'Mat / Unit',
'T_MCOST'   'ITAB'    'Total Material Cost',
'M_COST%' 'ITAB'    '% Material Cost',
'G_MARGIN' 'ITAB'    'Gross Margin',
'G_MARG%' 'ITAB'    '% Gross Margin'.
SELECT DISTINCT a~sptag a~vkbur a~matnr a~prodh a~ummenge a~gumenge a~umnetwr a~gunetwr b~vtext c~mtart d~bezei
         INTO CORRESPONDING FIELDS OF TABLE itab
         FROM s501 AS a
         INNER JOIN t179t AS b ON a~prodh = b~prodh
         INNER JOIN mara AS c ON a~matnr = c~matnr
         INNER JOIN tvkbt AS d ON a~vkbur = d~vkbur
         WHERE a~matnr IN matnr
         AND   a~sptag IN sptag
         AND   a~vkbur IN vkbur.
IF sy-subrc <> 0.
MESSAGE 'DATA NOT FOUND.' TYPE 'I'(001).
ENDIF.
SORT itab BY matnr.
LOOP AT itab .
cnt = v_index.
SELECT peinh stprs lplpx FROM mbew INTO (itab-peinh, itab-stprs, itab-lplpx) WHERE matnr = itab-matnr.
    itab-m_unit = itab-stprs - itab-lplpx / itab-peinh.
    v_index = cnt + sy-dbcnt.
    MODIFY itab INDEX v_index TRANSPORTING m_unit.
ENDSELECT.
SELECT j_1ichid FROM j_1imtchid INTO itab-j_1ichid WHERE matnr = itab-matnr.
    MODIFY itab INDEX sy-tabix TRANSPORTING j_1ichid .
ENDSELECT.
SELECT rate FROM j_1iexctax INTO itab-rate WHERE j_1ichid = itab-j_1ichid AND j_1iexcind = '1'.
    MODIFY itab INDEX sy-tabix TRANSPORTING rate .
ENDSELECT.
ENDLOOP.
LOOP AT itab .
itab-net_sqty = itab-ummenge - itab-gumenge .
MODIFY itab INDEX sy-tabix TRANSPORTING net_sqty.
itab-s_amt = itab-umnetwr - itab-gunetwr .
MODIFY itab INDEX sy-tabix TRANSPORTING s_amt.
itab-excise = itab-s_amt * itab-rate / 100.
MODIFY itab INDEX sy-tabix TRANSPORTING excise.
itab-l_excise = itab-s_amt - itab-excise.
MODIFY itab INDEX sy-tabix TRANSPORTING l_excise.
itab-s_unit = itab-l_excise / itab-net_sqty.
MODIFY itab INDEX sy-tabix TRANSPORTING s_unit.
itab-t_mcost = itab-m_unit * itab-net_sqty.
MODIFY itab INDEX sy-tabix TRANSPORTING t_mcost.
itab-m_cost% = itab-t_mcost / itab-s_amt * 100.
MODIFY itab INDEX sy-tabix TRANSPORTING m_cost%.
itab-g_margin = itab-l_excise - itab-t_mcost.
MODIFY itab INDEX sy-tabix TRANSPORTING g_margin.
itab-g_marg% = itab-g_margin / itab-s_amt * 100.
MODIFY itab INDEX sy-tabix TRANSPORTING g_marg%.
ENDLOOP.
layout-zebra = 'X' .
layout-colwidth_optimize(1) = 'X'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    i_callback_program = 'Z_FI_GROSS_MARGIN'
    is_layout          = layout
    it_fieldcat        = it_fld_catalog
    i_default          = 'X'
    i_save             = 'A'
TABLES
    t_outtab           = itab
EXCEPTIONS
    program_error      = 1
    OTHERS             = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
*&      Form FILL_CATALOG1
      text
     -->P_FIELDNAME text
     -->P_REF_TABLE text
     -->P_SCRTEXT    text
FORM fill_catalog1 USING   p_fieldname TYPE any
                            p_ref_table TYPE any
                            p_scrtext   TYPE any.
CLEAR : wa_fld_catalog.
wa_fld_catalog-fieldname = p_fieldname.
wa_fld_catalog-tabname    = p_ref_table.
wa_fld_catalog-seltext_s = p_scrtext.
wa_fld_catalog-seltext_m = p_scrtext.
wa_fld_catalog-seltext_l = p_scrtext.
wa_fld_catalog-outputlen = 15.
APPEND wa_fld_catalog TO it_fld_catalog.
ENDFORM.                    " fill_catalog1
Please check .....
Thanks...

I think ur code will do the same in my report do...
Please check my code again and modify where as u needed.....
REPORT z_fi_gross_margin NO STANDARD PAGE HEADING LINE-SIZE 125 .
TABLES : t179t, t179, tvkbt, mara, vbrp, s501, mbew, t134t, v_t179, t023t, t247.
TYPE-POOLS : slis.
DATA : BEGIN OF itab OCCURS 0,
       vkbur   LIKE s501-vkbur,
       matnr   LIKE s501-matnr,
       prodh   LIKE s501-prodh,
       ummenge LIKE s501-ummenge,
       gumenge LIKE s501-gumenge,
       umnetwr LIKE s501-umnetwr,
       gunetwr LIKE s501-gunetwr,
       sptag   LIKE s501-sptag,
       peinh   LIKE mbew-peinh,
       stprs   LIKE mbew-stprs,
       lplpx   LIKE mbew-lplpx,
       prdha LIKE mara-prdha,       " Product hierarchy
       prdha2 LIKE mara-prdha,       " Product hierarchy
       prdha3 LIKE mara-prdha,       " Product hierarchy
       prodh_text LIKE t179t-vtext, "Product Hierarchy Text
       prodh2_text LIKE t179t-vtext, "Product Hierarchy Text
       prodh3_text LIKE t179t-vtext, "Product Hierarchy Text
       matkl LIKE mara-matkl,
       wgbez LIKE t023t-wgbez,
       fcktx LIKE t247-ktx,
       mtart LIKE mara-mtart,
       bezei LIKE tvkbt-bezei,
       net_sqty TYPE p DECIMALS 2,
       s_amt TYPE p DECIMALS 2,
       mtbez LIKE t134t-mtbez,
       j_1ichid LIKE j_1imtchid-j_1ichid,
       rate LIKE j_1iexctax-rate,
       excise TYPE p DECIMALS 2,
       l_excise TYPE p DECIMALS 2,
       s_unit TYPE p DECIMALS 2,
       m_unit TYPE p DECIMALS 2,
       t_mcost TYPE p DECIMALS 2,
       m_cost% TYPE p DECIMALS 2,
       g_margin TYPE p DECIMALS 2,
       g_marg% TYPE p DECIMALS 2,
       new TYPE i,
       new1(6) TYPE c,
       s_period TYPE i,
       END OF itab.
DATA : BEGIN OF itab3 OCCURS 0.
        INCLUDE STRUCTURE itab.
DATA : END OF itab3.
DATA : v_index TYPE sy-tabix.
DATA : cnt TYPE i.
DATA : w_container TYPE scrfname VALUE 'CL_GRID',
       w_cprog TYPE lvc_s_layo,
       g_repid LIKE sy-repid,
       w_save TYPE c,
       w_exit TYPE c,
       cl_grid TYPE REF TO cl_gui_alv_grid,
       cl_custom_container TYPE REF TO cl_gui_custom_container,
       it_fld_catalog TYPE slis_t_fieldcat_alv,
       wa_fld_catalog TYPE slis_t_fieldcat_alv WITH HEADER LINE ,
       layout TYPE slis_layout_alv,
       col_pos LIKE sy-cucol ,
       alvfc TYPE slis_t_fieldcat_alv.
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS   : vkbur FOR s501-vkbur.
SELECT-OPTIONS   : matnr FOR s501-matnr.
SELECT-OPTIONS   : sptag FOR s501-sptag.
SELECTION-SCREEN : END OF BLOCK b1.
PERFORM fill_catalog1 USING:
'SPTAG'    'ITAB'    'DATE',
'VKBUR'    'ITAB'    'Sales Office',
'BEZEI'    'ITAB'    'S.Off. Desc.',
'MATNR'    'ITAB'    'Material',
*'PRODH'    'ITAB'    'LEVEL',
'PRODH_TEXT'    'ITAB'    'Level I',
'PRODH2_TEXT'   'ITAB'    'Level II',
'PRODH3_TEXT'   'ITAB'    'Level III',
'WGBEZ'    'ITAB'    'Level IV',
'MTBEZ'    'ITAB'    'Material Type',
'NET_SQTY' 'ITAB'    'Net Sales Qty.',
'S_AMT'    'ITAB'    'Sales with Ex. Duty',
'EXCISE'   'ITAB'    'Excise Duty',
'RATE'     'ITAB'    '% Excise Duty',
'L_EXCISE' 'ITAB'    'Sales less Ex. Duty',
'S_UNIT'   'ITAB'    'Sales / Unit',
'M_UNIT'   'ITAB'    'Mat / Unit',
'T_MCOST'   'ITAB'    'Total Material Cost',
'M_COST%' 'ITAB'    '% Material Cost',
'G_MARGIN' 'ITAB'    'Gross Margin',
'G_MARG%' 'ITAB'    '% Gross Margin',
'NEW1'      'ITAB'    'Month'.
SELECT DISTINCT asptag avkbur amatnr aprodh aummenge agumenge aumnetwr agunetwr cmtart cmatkl dbezei emtbez
         INTO CORRESPONDING FIELDS OF TABLE itab
         FROM s501 AS a
         INNER JOIN mara AS c ON amatnr = cmatnr
         INNER JOIN tvkbt AS d ON avkbur = dvkbur
         INNER JOIN t134t AS e ON cmtart = emtart
         WHERE a~matnr IN matnr
         AND   a~sptag IN sptag
         AND   a~vkbur IN vkbur
         AND   e~spras EQ 'EN'.
IF sy-subrc <> 0.
MESSAGE 'DATA NOT FOUND.' TYPE 'I'(001).
ENDIF.
SORT itab BY matnr.
LOOP AT itab .
cnt = v_index.
SELECT SINGLE peinh stprs lplpx FROM mbew INTO (itab-peinh, itab-stprs, itab-lplpx) WHERE matnr = itab-matnr.
itab-m_unit = itab-stprs - itab-lplpx / itab-peinh.
v_index = cnt + sy-dbcnt.
MODIFY itab INDEX v_index TRANSPORTING m_unit.
SELECT SINGLE j_1ichid FROM j_1imtchid INTO itab-j_1ichid WHERE matnr = itab-matnr.
MODIFY itab INDEX sy-tabix TRANSPORTING j_1ichid .
SELECT SINGLE rate FROM j_1iexctax INTO itab-rate WHERE j_1ichid = itab-j_1ichid AND j_1iexcind = '1' AND validfrom GE sptag-low AND validto LE sptag-high.
MODIFY itab INDEX sy-tabix TRANSPORTING rate .
SELECT SINGLE prdha FROM mara INTO (itab-prdha) WHERE matnr = itab-matnr .
MODIFY itab INDEX sy-tabix TRANSPORTING prdha .
SELECT SINGLE wgbez FROM t023t INTO itab-wgbez WHERE matkl = itab-matkl .
MODIFY itab INDEX sy-tabix TRANSPORTING wgbez .
ENDLOOP.
LOOP AT itab .
itab-net_sqty = itab-ummenge - itab-gumenge .
MODIFY itab INDEX sy-tabix TRANSPORTING net_sqty.
itab-s_amt = itab-umnetwr - itab-gunetwr .
MODIFY itab INDEX sy-tabix TRANSPORTING s_amt.
itab-excise = itab-s_amt * itab-rate / 100.
MODIFY itab INDEX sy-tabix TRANSPORTING excise.
itab-l_excise = itab-s_amt - itab-excise.
MODIFY itab INDEX sy-tabix TRANSPORTING l_excise.
IF itab-net_sqty NE '0'.
    itab-s_unit = itab-l_excise / itab-net_sqty.
    MODIFY itab INDEX sy-tabix TRANSPORTING s_unit.
ENDIF.
itab-t_mcost = itab-m_unit * itab-net_sqty.
MODIFY itab INDEX sy-tabix TRANSPORTING t_mcost.
itab-m_cost% = itab-t_mcost / itab-s_amt * 100.
MODIFY itab INDEX sy-tabix TRANSPORTING m_cost%.
itab-g_margin = itab-l_excise - itab-t_mcost.
MODIFY itab INDEX sy-tabix TRANSPORTING g_margin.
itab-new = itab-sptag+4(2).
SELECT SINGLE ktx FROM t247 INTO itab-new1 WHERE mnr = itab-new AND spras EQ 'EN' .
CONCATENATE itab-new1 itab-sptag+2(2) INTO itab-new1 SEPARATED BY '-'.
itab-g_marg% = itab-g_margin / itab-s_amt * 100.
MODIFY itab INDEX sy-tabix TRANSPORTING g_marg% new1.
ENDLOOP.
LOOP AT itab.
SELECT SINGLE vtext INTO itab-prodh3_text FROM t179t WHERE prodh = itab-prdha.
itab-prdha2 = itab-prdha+0(5).
SELECT SINGLE vtext INTO itab-prodh_text FROM t179t WHERE prodh = itab-prdha2.
itab-prdha3 = itab-prdha+0(10).
SELECT SINGLE vtext INTO itab-prodh2_text FROM t179t WHERE prodh = itab-prdha3.
MODIFY itab INDEX sy-tabix TRANSPORTING prodh3_text prodh_text prodh2_text prdha3.
ENDLOOP.
layout-zebra = 'X' .
layout-colwidth_optimize(1) = 'X'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    i_callback_program = 'Z_FI_GROSS_MARGIN'
    is_layout          = layout
    it_fieldcat        = it_fld_catalog
    i_default          = 'X'
    i_save             = 'A'
TABLES
    t_outtab           = itab
EXCEPTIONS
    program_error      = 1
    OTHERS             = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
*&      Form FILL_CATALOG1
      text
     -->P_FIELDNAME text
     -->P_REF_TABLE text
     -->P_SCRTEXT    text
FORM fill_catalog1 USING   p_fieldname TYPE any
                            p_ref_table TYPE any
                            p_scrtext   TYPE any.
CLEAR : wa_fld_catalog.
wa_fld_catalog-fieldname = p_fieldname.
wa_fld_catalog-tabname    = p_ref_table.
wa_fld_catalog-seltext_s = p_scrtext.
wa_fld_catalog-seltext_m = p_scrtext.
wa_fld_catalog-seltext_l = p_scrtext.
wa_fld_catalog-outputlen = 15.
APPEND wa_fld_catalog TO it_fld_catalog.
ENDFORM.                    " fill_catalog1
please tell....

Excise duty Refund on Exports

Similar Messages

Maybe you are looking for