BAPI for posting Down payment Request F-47

Note :For the F-47 posting, it only post to 1 line item whereby BAPI "BAPI_ACC_DOCUMENT_POST" have to post in 2 lines for balance the account. 


*&---------------------------------------------------------------------*
*& REPORT  ZFI_DOWNPAYMENT
*&
*&---------------------------------------------------------------------*
*&Source : http://abaptechnicalhelp.blogspot.com
*&Author : Kartikeyan K
*&Email : Karthikeyana2z@gmail.com
*&---------------------------------------------------------------------*

REPORT  ZFI_DOWNPAYMENT.

DATA :  T_ACCHD TYPE TABLE OF ACCHD WITH HEADER LINE,
        T_ACCIT TYPE TABLE OF ACCIT  WITH HEADER LINE,
        T_ACCCR TYPE TABLE OF ACCCR  WITH HEADER LINE,
        T_RETURN TYPE TABLE OF MESSAGE_STRUCT  WITH HEADER LINE.
T_ACCHD-MANDT = SY-MANDT.
T_ACCHD-AWTYP = 'BKPFF'.
T_ACCHD-GLVOR = 'RFBU'.
T_ACCHD-TCODE = 'F-47'.
T_ACCHD-BKTXT = 'TEST1'.
T_ACCHD-USNAM = SY-UNAME.
APPEND T_ACCHD.
CLEAR T_ACCHD.

T_ACCIT-MANDT = SY-MANDT.
T_ACCIT-POSNR = '000001'.
T_ACCIT-GSBER = '1015'.
T_ACCIT-BUKRS = '5010'.
T_ACCIT-BLDAT = SY-DATUM.
T_ACCIT-BUDAT = SY-DATUM.
T_ACCIT-BLART = 'KA'.
T_ACCIT-XBLNR = 'XBLNR-TEST'.
T_ACCIT-VORGN = 'AZAF'.
*T_ACCIT-BUPLA = .
T_ACCIT-UMSKZ = 'F'.
T_ACCIT-ZUMSK = 'A'.
T_ACCIT-BSTAT = 'S'.
T_ACCIT-BSCHL = '39'.
T_ACCIT-SHKZG = 'H'.
T_ACCIT-KOART = 'K'.
T_ACCIT-ZFBDT = '20140430'.
T_ACCIT-ZLSPR = 'P'.
T_ACCIT-EBELN = '4500000664'.
T_ACCIT-EBELP = '000001'.
T_ACCIT-LIFNR = '0000020070'.
APPEND T_ACCIT.
CLEAR T_ACCIT.
T_ACCCR-MANDT = SY-MANDT.
T_ACCCR-AWTYP = 'BKPFF'.
T_ACCCR-POSNR = '000001'.
T_ACCCR-WAERS = 'INR'.
T_ACCCR-WRBTR = '-1000'.
T_ACCCR-CURTP = '00'.
*T_ACCCR-CURTP = '10'.
APPEND T_ACCCR.
CLEAR T_ACCCR.
T_ACCCR-MANDT = SY-MANDT.
T_ACCCR-AWTYP = 'BKPFF'.
T_ACCCR-POSNR = '000001'.
T_ACCCR-WAERS = 'INR'.
T_ACCCR-WRBTR = '-1000'.
T_ACCCR-CURTP = '10'.
APPEND T_ACCCR.
CLEAR T_ACCCR.
DATA : E_BUKRS TYPE  BUKRS,
       E_BELNR TYPE  BELNR_D,
       E_GJAHR TYPE  GJAHR.
CALL FUNCTION 'RFIDPT_ACC_DOCUMENT_POST_ADJ'
* EXPORTING
*   I_COMP             = ' '
*   I_COMP_CHECK       = ' '
*   I_FREE_TABLE       = 'X'
*   I_TEST             = 'X'
 IMPORTING
   E_BUKRS            = E_BUKRS
   E_BELNR            = E_BELNR
   E_GJAHR            = E_GJAHR
  TABLES
    T_ACCHD            = T_ACCHD
    T_ACCIT            = T_ACCIT
    T_ACCCR            = T_ACCCR
*   T_ACCTX            =
    T_RETURN           = T_RETURN
          .
FREE T_RETURN.

Adding extra tabs in standard transactions for sales and contracts without access key

NTRODUCTION:

This post will explain in detail about adding an additional Tab to standard transactions for sales order (VA01, VA02, and VA03), contract documents (VA41, VA42, and VA43) and other related transactions of the program SAPMV45A.

HISTORY:

-->When I had this requirement of adding an additional tab, I started with my research on this across SCN and other SAP related sites. Irrespective of my long research I could not find any solution for this requirement without the need of ACCESS KEY.

-->However there are solution for this requirement which requires ACCESS KEY.  There are two additional tabsADDITIONAL TAB A and ADDITIONAL TAB B which SAP has provided to add customer specific fields. The related screens for modifying these tabs are 8459, 8309.

FEW IMPORTANT POINTS ABOUT THESE TABS:

è The Additional TAB A and B are designed by SAP before the advent of BADI based plug in screens.

è The screens 8309, 8549 are never touched during upgrades, however taking access key could mean that the objects we are changing should be registered for SCCR and special care should be taken during upgrades to protect the change as they fall in SAP naming spaces.

è SAPMV45A / 8459 or 8309 even if they are in SAP naming space they are for customer modifications and SAP won’t overwrite them during upgrades.

è There are few ABAPers who are in a wrong assumption that SAP didn’t provide any BADI for this screen modification since many customers have already satisfied their need with the TABS A and B which is wrong.

è SAP has provided a BADI to add additional TABS up to 5(as far as my knowledge) to accommodate any user specific fields which depends on the later requirements of the customer.

STEP BY STEP IMPLEMENTATION OF THE BADI:

In this blog post I will explain in detail steps on how to implement the BADI.

STEP 1:

Go to transaction SE18 and give the badi name as BADI_SLS_ITEM_SCR_CUS. Click Display.

TEP 2:

You will be lead into this page where you can see several BADI definitions, you can see the purpose of each BADIs by reading its description.

STEP 3:

Now our intention here is to add additional tabs only at item level so we select the BADI accordingly, however there are different BADI for different purpose.

Now right click on the badi BADI_SLS_ITEM_SCR_CUS as below and select create implementation.

 

STEP 4:

Click on the paper icon as marked below in red to create a new implementation.

STEP 5:

Give a meaningful name for the implementation as shown below.

STEP 6:

Give a meaningful name for the enhancement implementation and description as shown below and click the TICK icon as shown below marked in red.

STEP 7:

Now you will be popped up with another window as below.

STEP 8:

Give a meaningful name for the implementation as shown below in the boxes below.

STEP 9:

Give a meaningful name for the implementation as shown below in the boxes below. Please note that all the details that you have filled earlier is for enhancement and now it is for BADI.

STEP 10:

Give a meaningful name for the implementation as shown below in the boxes below. Class name should be same as given below, this is the class method where you will write the code.

STEP 11:

Activate now, after activation you will be displayed with a screen as shown below which indicates that the enhancement and BADI implementation is complete.

STEP 12:

Now Go out and come again into the transaction SE18 and you can see the below screen.

STEP 13:

Click on the enhancement implementation tab and you will see the implementation that you have created, double click on that.

STEP 14:

Now you will be able to see the window as below.

STEP 15:

Now you will be able to see the window as below. Double click on the class method.

STEP 16:

Now you will be able to see the window as below. Double click on the first method as shown below to code for adding the tab.

Now you will be able to see the screen as below, in the field caption give the ‘name of the tab’,

In the field program give the ‘module program name’, in the field dynpro give the ‘screen number’, give all the details in single quants.

Important points:

1)      Module Program: This program should contain the screen which will have the required fields and the respective logic for the fields.

2)      Screen Number: This should be screen which you want to get displayed under the Tab that you have defined.

3)      Please note that the screen that you create here must be a sub screen and not main screen failing which it will lead to a runtime error.

4)      Please note that in the if condition I have given as

                                                --> If sy-tcode cp ‘VA4*’.

Which means this tab will be there for all the item details in the contract transactions like va41, va42, va43. So you can code as per your requirement.

Now after activating if you go to the required transaction you will be able to see the tab you have added as below. These fields are placed as per your requirement.