Wednesday, July 16, 2014

Function Module to Get the Vendor Deposit Documents

 1 - Create the Structure as ZSP_VEND_DEPOSIT with the following fields -

LIFNR
BELNR
BUDAT
WRBTR
DMBTR
ZUONR
SGTXT

2 - Import Parameters Enter the following fields-

     I_LIFNR    TYPE    LIFNR

3 - Copy the code in Source Code -

FUNCTION ZSP_VEND_DEPOSIT.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"  IMPORTING
*"     VALUE(I_LIFNR) TYPE  LIFNR
*"  TABLES
*"      ITAB STRUCTURE  ZSP_VEND_DEPOSIT
*"----------------------------------------------------------------------


DATA: IT_BSIK TYPE STANDARD TABLE OF ZSP_VEND_DEPOSIT WITH HEADER LINE.
DATA: WA_BSIK like LINE OF IT_BSIK.

DATA: IT_BSAK TYPE STANDARD TABLE OF ZSP_VEND_DEPOSIT WITH HEADER LINE.
DATA: WA_BSAK like LINE OF IT_BSAK.


SELECT * INTO CORRESPONDING FIELDS OF TABLE IT_BSIK
FROM BSIK WHERE
  BUKRS = 'Your Company Code' AND
  LIFNR = I_LIFNR AND
  UMSKZ IN (Your Special GL Indicator).

SELECT * INTO CORRESPONDING FIELDS OF TABLE IT_BSAK
FROM BSAK WHERE
   BUKRS = 'Your Company Code' AND
   LIFNR = I_LIFNR AND
   UMSKZ IN (Your Special GL Indicator).

LOOP AT IT_BSIK.
APPEND WA_BSIK TO ITAB.
ENDLOOP.

LOOP AT IT_BSAK.
APPEND IT_BSAK TO ITAB.
ENDLOOP.

ENDFUNCTION.

No comments:

Post a Comment