RFWTCT10 SAP ABAP Report - Withholding Tax Certificates

RFWTCT10 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Program RFWTCT10 generates a list of the withholding tax certificates for those vendors on behalf of which withholding tax is deducted...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter RFWTCT10 into the relevant SAP transactions such as SE38 or SE80

ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.

SUBMIT RFWTCT10. "Basic submit
SUBMIT RFWTCT10 AND RETURN. "Return to original report after report execution complete
SUBMIT RFWTCT10 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement

Text pool values

INCLUDES used within this REPORT RFWTCT10

No INCLUDES are used within this REPORT code!

TABLES used within REPORT and the associated SELECT statement:

No SAP DATABASE tables are accessed within this REPORT code!

Function Modules used within report and the associated call statement:

VENDOR_READ
    CALL FUNCTION 'VENDOR_READ'              " P45K039668
         EXPORTING                           " P45K039668
              I_BUKRS   = SPACE              " P45K039668
              I_LIFNR   = BSEG-LIFNR         " P45K039668
         IMPORTING                           " P45K039668
              E_LFA1    = LFA1.              " P45K039668

CLOSE_FORM
  CALL FUNCTION 'CLOSE_FORM'.

OPEN_FORM
  CALL FUNCTION 'OPEN_FORM'                      " open form for output
*        exporting form    = 'J_1A_F015_WTHCTF'
*        exporting form    = 'F_RFWTCT10_10'            Note  441516
         EXPORTING FORM    = XTDFORM   " Note  441516
                 DIALOG  = 'X'
                 OPTIONS = ITCPO
                 DEVICE  = 'PRINTER'.

ADDR_GET
  CALL FUNCTION 'ADDR_GET'                                     "SADR40A
    EXPORTING ADDRESS_SELECTION = XADDR1_SEL
              READ_SADR_ONLY    = ' '
    IMPORTING SADR = XSADR
    EXCEPTIONS
      PARAMETER_ERROR   = 1
      ADDRESS_NOT_EXIST = 2
      VERSION_NOT_EXIST = 3
      INTERNAL_ERROR    = 4.

BF_PUT_DASHES_TO_STCD2
  CALL FUNCTION 'BF_PUT_DASHES_TO_STCD2'
    EXPORTING
      I_STCD2 = XSTCD2
    IMPORTING
      E_STCD2 = XT001-STCD2.

BF_PUT_DASHES_TO_STCD2
  CALL FUNCTION 'BF_PUT_DASHES_TO_STCD2'
    EXPORTING
      I_STCD2 = BSEC-STCD2
    IMPORTING
      E_STCD2 = XBSEC-STCD2.

BF_PUT_DASHES_TO_STCD2
  CALL FUNCTION 'BF_PUT_DASHES_TO_STCD2'
    EXPORTING
      I_STCD2 = XSTCD2
    IMPORTING
      E_STCD2 = XLFA1-STCD2.

FI_DOCUMENT_TYPE_DATA
    CALL FUNCTION 'FI_DOCUMENT_TYPE_DATA'
      EXPORTING
        i_blart        = bkpf-blart
*       I_KOART        = ' '
*       I_LANGU        = SY-LANGU
*       X_DIALOG       = ' '
      IMPORTING
        E_T003         = lt_t003
*       E_NUMKR        =
*       E_LTEXT        =
              .

CONVERT_TO_FOREIGN_CURRENCY
    CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY'
      EXPORTING
       CLIENT                   = SY-MANDT
        DATE                    = BKPF-BUDAT
        FOREIGN_CURRENCY        = BKPF-WAERS
        LOCAL_AMOUNT            = WITH_ITEM-J_1AF_WT_REPBS
        LOCAL_CURRENCY          = BKPF-HWAER
*       RATE                    = 0
       TYPE_OF_RATE            = lv_KURST"'M'
*       READ_TCURR              = 'X'
     IMPORTING
*       EXCHANGE_RATE           =
       FOREIGN_AMOUNT          =  CODTAB-QSSHB
*       FOREIGN_FACTOR          =
*       LOCAL_FACTOR            =
*       EXCHANGE_RATEX          =
*       DERIVED_RATE_TYPE       =
*       FIXED_RATE              =
     EXCEPTIONS
       NO_RATE_FOUND           = 1
       OVERFLOW                = 2
       NO_FACTORS_FOUND        = 3
       NO_SPREAD_FOUND         = 4
       DERIVED_2_TIMES         = 5
       OTHERS                  = 6
              .

WRITE_FORM
         CALL FUNCTION 'WRITE_FORM'
            EXPORTING
              ELEMENT = 'HEADER_OWC'.

END_FORM
         CALL FUNCTION 'END_FORM'.

START_FORM
  CALL FUNCTION 'START_FORM'
*(del) exporting form      = 'J_1A_F015_WTHCTF'
       EXPORTING FORM      = XT059P-TDFORM
                 STARTPAGE = 'PAGE1'.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'HEADER'.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'CLRD_DOCM'.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'LINES_OWC'.

WRITE_FORM
     CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'LINES_OWC'.

SPELL_AMOUNT
  CALL FUNCTION 'SPELL_AMOUNT'
    EXPORTING
      LANGUAGE = SY-LANGU
                 CURRENCY = T001-WAERS
                 AMOUNT   = CODTAB-QBSHH
                 FILLER   = SPACE
    IMPORTING
      IN_WORDS = SPELL.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'TEXT'.

WRITE_FORM














  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'TOTAL_OWC'.