SAP Reports / Programs | Financial Accounting | General Ledger Accounting | Information System(FI-GL-IS) SAP FI

comments icon Comments

KQST70I2 SAP ABAP INCLUDE - Include LIBRT_CORECD1







KQST70I2 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter KQST70I2 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 KQST70I2. "Basic submit
SUBMIT KQST70I2 AND RETURN. "Return to original report after report execution complete
SUBMIT KQST70I2 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


INCLUDES used within this REPORT KQST70I2

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:

SELECT_FORM
  CALL FUNCTION 'SELECT_FORM'
       EXPORTING
*           CLIENT          = SY-MANDT
            FORM            = FORM_NAME
            LANGUAGE        = T001-SPRAS
            STATUS          = '*'
            THROUGHCLIENT   = 'X'
       IMPORTING
            ENTRIES         = ENTRIES
       TABLES
            SELECTIONS      = SELECTIONS
       EXCEPTIONS
            OTHERS          = 1.

GET_CURRENT_YEAR
  CALL FUNCTION 'GET_CURRENT_YEAR'
    EXPORTING
      BUKRS = BSIK-BUKRS
      DATE  = BSIK-AUGDT
    IMPORTING
      CURRY = AUG_YEAR.

CONVERT_TO_LOCAL_CURRENCY
  CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
    EXPORTING
      DATE             = BKPF-WWERT
      FOREIGN_CURRENCY = BKPF-WAERS
      LOCAL_CURRENCY   = T001-WAERS
      FOREIGN_AMOUNT   = BSIK-QSSHB
      RATE             = BKPF-KURSF
      TYPE_OF_RATE     = 'M'
    IMPORTING
      LOCAL_AMOUNT     = BSIK-QSSHB.

OPEN_FORM
  CALL FUNCTION 'OPEN_FORM'
    EXPORTING
      FORM     = P_FORM81
      LANGUAGE = T001-SPRAS
      DIALOG   = SPACE
      OPTIONS  = ITCPO.

ADDR_GET
      CALL FUNCTION 'ADDR_GET'
        EXPORTING
          ADDRESS_SELECTION = ADDR1_SEL
        IMPORTING
          SADR              = SADR
        EXCEPTIONS
          OTHERS            = 1.

START_FORM
      CALL FUNCTION 'START_FORM'.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          WINDOW = 'FIRST'.

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

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          WINDOW = 'YEAR'.

FI_WT_READ_T059ZT
      CALL FUNCTION 'FI_WT_READ_T059ZT'
        EXPORTING
          I_BUKRS     = VENDOR_TAB-BUKRS
          I_TYPE      = VENDOR_TAB-WITHT
          I_WT_WITHCD = VENDOR_TAB-QSSKZ
          I_SPRAS     = SY-LANGU
        TABLES
          T_T059ZT    = H_T059ZT
        EXCEPTIONS
          NOT_FOUND   = 1
          OTHERS      = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        WINDOW  = 'MAIN'
        ELEMENT = 'INCOME_TYPE'.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          WINDOW  = 'TOTALALL'                "cleared + uncleared
          ELEMENT = 'TOTAL'.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'                   "company address
           EXPORTING
                WINDOW  = 'COMPANY'.

WRITE_FORM
**       CALL FUNCTION 'WRITE_FORM'
**           EXPORTING
**                WINDOW  = 'VENDOR'.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'                   "vendor address
           EXPORTING
                WINDOW  = 'VENDOR'
                ELEMENT = 'VENDOR'.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          WINDOW  = 'TOTAL'                  "only cleared
          ELEMENT = 'TOTAL'.

END_FORM
      CALL FUNCTION 'END_FORM'.

CLOSE_FORM
      CALL FUNCTION 'CLOSE_FORM'.                  "close spool request

OPEN_FORM
















      CALL FUNCTION 'OPEN_FORM'
        EXPORTING
          FORM     = P_FORM25
          LANGUAGE = T001-SPRAS
          DIALOG   = SPACE
          OPTIONS  = ITCPO.

START_FORM
      CALL FUNCTION 'START_FORM'.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          WINDOW  = 'MAIN'
          ELEMENT = 'VENDOR_ITEM'.

WRITE_FORM
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
            WINDOW = 'TOTAL'.

CONTROL_FORM
        CALL FUNCTION 'CONTROL_FORM'                "trigger page break
             EXPORTING
                  COMMAND   = 'NEW-PAGE'.

END_FORM
      CALL FUNCTION 'END_FORM'.

CLOSE_FORM
      CALL FUNCTION 'CLOSE_FORM'.


Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name KQST70I2 or its description.


   
 

KQST70I2 - Include LIBRT_CORECD1
KQST70I1 - Include for RFKQST70
KQST6001 - Include for RFKQST60 - Print SAPScript for Vendor
KQST5002 - Include RFKQST50 and RFKQST60 Routines for Data Selection
KQST5001 - Include for RFKQST50 and RFKQST60 List Display / Log
KQST2003 - documentation and ABAP source code