SAP Reports / Programs | Software Management | Industry Solution High Tech | Software Management(IS-HT-SW) SAP IS

comments icon Comments

RVADIN02 SAP ABAP Report - Printprogram for invoices







RVADIN02 is a standard Executable ABAP Report 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 RVADIN02 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 RVADIN02. "Basic submit
SUBMIT RVADIN02 AND RETURN. "Return to original report after report execution complete
SUBMIT RVADIN02 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Printprogram for invoices


INCLUDES used within this REPORT RVADIN02

INCLUDE RVADTABL.
INCLUDE RVADOPFO.


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:

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'AMOUNT_QUALIFYING_FOR_CASH_DISCOUNT'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

SD_PRINT_TERMS_OF_PAYMENT_SPLI
  CALL FUNCTION 'SD_PRINT_TERMS_OF_PAYMENT_SPLI'
       EXPORTING
            BLDAT            = VBDKR-FKDAT
            BUDAT            = H_FKDAT
            CPUDT            = VBDKR-ERDAT
            LANGUAGE         = SY-LANGU
            TERMS_OF_PAYMENT = VBDKR-ZTERM
            WERT             = H_FKWRT "Warenwert + Tax
            WAERK            = VBDKR-WAERK
            FKDAT            = VBDKR-FKDAT
            SKFBT            = H_SKFBT
*      IMPORTING
*           BASELINE_DATE                 =
       TABLES
            TOP_TEXT_SPLIT   = PAYMENT_SPLIT
       EXCEPTIONS
            TERMS_OF_PAYMENT_NOT_IN_T052  = 01
            TERMS_OF_PAYMENT_NOT_IN_T052S = 02.

CONTROL_FORM
      CALL FUNCTION 'CONTROL_FORM'
        EXPORTING
          COMMAND = 'PROTECT'.

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

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'TERMS_OF_PAYMENT_SPLIT'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

CONTROL_FORM
      CALL FUNCTION 'CONTROL_FORM'
        EXPORTING
          COMMAND = 'ENDPROTECT'.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'ITEM_CONSIGNEE'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'ITEM_DELIVERY_NO'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'ITEM_ORDER_NO'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'ITEM_EXTERN_NO'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'ITEM_PURCHASE_ORDER_NO'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

CONTROL_FORM
  CALL FUNCTION 'CONTROL_FORM'
    EXPORTING
      COMMAND = 'PROTECT'.

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

CONTROL_FORM
  CALL FUNCTION 'CONTROL_FORM'
    EXPORTING
      COMMAND = 'ENDPROTECT'.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'SUPPLEMENT_TEXT'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

CLOSE_FORM
  CALL FUNCTION 'CLOSE_FORM'
    EXCEPTIONS
      OTHERS = 1.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_M'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_N'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
















      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_O'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_P'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_S'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_U'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'TITLE_M'
          WINDOW  = 'TITLE'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'REPEAT'
        WINDOW  = 'REPEAT'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

RV_PRICE_PRINT_REFRESH
  CALL FUNCTION 'RV_PRICE_PRINT_REFRESH'
    TABLES
      TKOMV = TKOMV.

RV_BILLING_PRINT_VIEW
  CALL FUNCTION 'RV_BILLING_PRINT_VIEW'
    EXPORTING
      COMWA = VBCO3
    IMPORTING
      KOPF  = VBDKR
    TABLES
      POS   = TVBDPR.

/SAPHT/SW_VC_I_GET_CONF_IBASE
  CALL FUNCTION '/SAPHT/SW_VC_I_GET_CONF_IBASE'
    EXPORTING
      INSTANCE            = VBDPR-CUOBJ
      LANGUAGE            = NAST-SPRAS
      ANW_SICHT_CUSTOM    = I_TOGCF-PRINT
    TABLES
      CONFIGURATION       = TKOMCON
    EXCEPTIONS
      INSTANCE_NOT_FOUND  = 1
      INTERNAL_ERROR      = 2
      NO_CLASS_ALLOCATION = 3
      INVALID_INSTANCE    = 4
      NO_ENTRY_FOUND      = 5
      OTHERS              = 6.

RV_PRICE_PRINT_ITEM
  CALL FUNCTION 'RV_PRICE_PRINT_ITEM'
    EXPORTING
      COMM_HEAD_I = KOMK
      COMM_ITEM_I = KOMP
      LANGUAGE    = NAST-SPRAS
    IMPORTING
      COMM_HEAD_E = KOMK
      COMM_ITEM_E = KOMP
    TABLES
      TKOMV       = TKOMV
      TKOMVD      = TKOMVD.

RV_PRICE_PRINT_HEAD
  CALL FUNCTION 'RV_PRICE_PRINT_HEAD'
    EXPORTING
      COMM_HEAD_I = KOMK
      LANGUAGE    = NAST-SPRAS
    IMPORTING
      COMM_HEAD_E = KOMK
      COMM_MWSKZ  = PRINT_MWSKZ
    TABLES
      TKOMV       = TKOMV
      TKOMVD      = HKOMVD.

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

WRITE_FORM
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
            ELEMENT = 'UNDER_LINE'
          EXCEPTIONS
            ELEMENT = 1
            WINDOW  = 2.

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

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

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'UNDER_LINE'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'HEADER_TEXT'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'ITEM_LINE_CONFIGURATION_HEADER'
        EXCEPTIONS
          OTHERS  = 1.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'ITEM_LINE_CONFIGURATION'
        EXCEPTIONS
          OTHERS  = 1.

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




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

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

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'           "First header
       EXPORTING  ELEMENT = 'ITEM_HEADER'
       EXCEPTIONS OTHERS  = 1.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'           "Activate header
       EXPORTING  ELEMENT = 'ITEM_HEADER'
                  TYPE    = 'TOP'
       EXCEPTIONS OTHERS  = 1.

CONTROL_FORM
      CALL FUNCTION 'CONTROL_FORM'
        EXPORTING
          COMMAND = 'PROTECT'.

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

CONTROL_FORM
      CALL FUNCTION 'CONTROL_FORM'
        EXPORTING
          COMMAND = 'ENDPROTECT'.

WRITE_FORM
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
            ELEMENT = 'ITEM_LINE_BATCH'
          EXCEPTIONS
            OTHERS  = 1.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'           "Deactivate Header
       EXPORTING  ELEMENT  = 'ITEM_HEADER'
                  FUNCTION = 'DELETE'
                  TYPE     = 'TOP'
       EXCEPTIONS OTHERS   = 1.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'ITEM_TEXT'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

NAST_PROTOCOL_UPDATE
  CALL FUNCTION 'NAST_PROTOCOL_UPDATE'
    EXPORTING
      MSG_ARBGB = SYST-MSGID
      MSG_NR    = SYST-MSGNO
      MSG_TY    = SYST-MSGTY
      MSG_V1    = SYST-MSGV1
      MSG_V2    = SYST-MSGV2
      MSG_V3    = SYST-MSGV3
      MSG_V4    = SYST-MSGV4
    EXCEPTIONS
      OTHERS    = 1.

RV_BILLING_REFERENCES
*  call function 'RV_BILLING_REFERENCES'
*       exporting
*            faktura = vbdkr-vbeln
*       tables
*            pos     = tvbdpr
*       changing
*            kopf    = vbdkr.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'REFERENCE_NUMBER'
      WINDOW  = 'REFNUMB'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'HEADER_CONSGNEE'
        WINDOW  = 'CONSGNEE'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'HEADER_CONSGNEE'
        WINDOW  = 'INFO1'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'ITEM_REFERENCE_NO'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'ITEM_REFERENCE_NO_GG'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      ELEMENT = 'HEADER_DATA'
    EXCEPTIONS
      ELEMENT = 1
      WINDOW  = 2.

SD_ESR_GET_DATA
  CALL FUNCTION 'SD_ESR_GET_DATA'                              "#EC *
       EXPORTING
            VBDKR_BUKRS                   = VBDKR-BUKRS
            VBDKR_VKORG                   = VBDKR-VKORG
            KOMK_FKWRT                    = KOMK-FKWRT
            VBDKR_VBELN                   = VBDKR-VBELN
            VBDKR_KUNRG                   = VBDKR-KUNRG
            VBDKR_WAERK                   = VBDKR-WAERK
       CHANGING
            IVBDRE                        = VBDRE
       EXCEPTIONS
            T049E_NO_ENTRY                = 1
            T001_NO_ENTRY                 = 2
            BNKA_NO_ENTRY                 = 3
            SADR_NO_ENTRY                 = 4
            FKWRT_NOT_VALID               = 5
            ESR_DIGITS_TO_CHECK_NOT_VALID = 6
            ESR_CHECK_METHOD_NOT_VALID    = 7
            OTHERS                        = 8.

START_FORM
    CALL FUNCTION 'START_FORM'
         EXPORTING
*             ARCHIVE_INDEX = ' '
*             FORM          = ' '
*             LANGUAGE      = ' '
              STARTPAGE     = STARTSEITE
*             PROGRAM       = ' '
         IMPORTING
              LANGUAGE      = SPRACHE
         EXCEPTIONS
              FORM          = 1
              FORMAT        = 2
              UNENDED       = 3
              UNOPENED      = 4
              UNUSED        = 5
              OTHERS        = 6.

SERIAL_LS_PRINT
    CALL FUNCTION 'SERIAL_LS_PRINT'
      EXPORTING
        POSNR  = VBDPR-POSNR_VL
        VBELN  = VBDPR-VBELN_VL
      TABLES
        ISERLS = TKOMSER.

SERIAL_WV_PRINT
    CALL FUNCTION 'SERIAL_WV_PRINT'
      EXPORTING
        POSNR  = VBDPR-POSNR_VAUF
        VBELN  = VBDPR-VBELN_VAUF
      TABLES
        ISERNR = TKOMSER
      EXCEPTIONS
        OTHERS = 1.

PROCESS_SERIALS_FOR_PRINT
  CALL FUNCTION 'PROCESS_SERIALS_FOR_PRINT'
    EXPORTING
      I_BOUNDARY_LEFT             = '(_'
      I_BOUNDARY_RIGHT            = '_)'
      I_SEP_CHAR_STRINGS          = ',_'
      I_SEP_CHAR_INTERVAL         = '_-_'
      I_USE_INTERVAL              = 'X'
      I_BOUNDARY_METHOD           = 'C'
      I_LINE_LENGTH               = 50
      I_NO_ZERO                   = 'X'
      I_ALPHABET                  = SY-ABCDE
      I_DIGITS                    = '0123456789'
      I_SPECIAL_CHARS             = '-'
      I_WITH_SECOND_DIGIT         = ' '
    TABLES
      SERIALS                     = TKOMSER
      SERIALS_PRINT               = TKOMSER_PRINT
    EXCEPTIONS
      BOUNDARY_MISSING            = 01
      INTERVAL_SEPARATION_MISSING = 02
      LENGTH_TO_SMALL             = 03
      INTERNAL_ERROR              = 04
      WRONG_METHOD                = 05
      WRONG_SERIAL                = 06
      TWO_EQUAL_SERIALS           = 07
      SERIAL_WITH_WRONG_CHAR      = 08
      SERIAL_SEPARATION_MISSING   = 09.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'ITEM_LINE_SERIAL_HEADER'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'ITEM_LINE_SERIAL'
        EXCEPTIONS
          ELEMENT = 1
          WINDOW  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        ELEMENT = 'EMPTY_LINE'
      EXCEPTIONS
        ELEMENT = 1
        WINDOW  = 2.

/SAPHT/SW_FIND_ORIG_CUOBJ
  CALL FUNCTION '/SAPHT/SW_FIND_ORIG_CUOBJ'
    EXPORTING
      I_CUOBJ_NEW  = VBDPR-CUOBJ
      I_VBTYP      = 'C'               " vbdkr-vbtyp
      I_VBELN      = VBDKR-VBELN_VAUF
      I_POSNR      = VBDPR-POSNR_VAUF
    IMPORTING
      E_CUOBJ_ORIG = H_CUOBJ_ORIG.

/SAPHT/SW_COMPARE_CONFIG
  CALL FUNCTION '/SAPHT/SW_COMPARE_CONFIG'
    EXPORTING
      CUOBJ_OLD        = H_CUOBJ_ORIG
      CUOBJ_NEW        = VBDPR-CUOBJ
      P_LANGUAGE       = NAST-SPRAS
      P_MULTIVAL_ALL   = 'X'
      P_INCLUDE_HIDDEN = 'X'
      ANW_SICHT_CUSTOM = I_TOGCF-PRINT
    TABLES
      COMP_RESULT      = TKOMCON_COMP
    EXCEPTIONS
      SAME_CONFIGURATIONS  = 1.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'ITEM_LINE_CONFIG_HEADER_DELTA'
        EXCEPTIONS
          OTHERS  = 1.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          ELEMENT = 'ITEM_LINE_CONFIGURATION'
        EXCEPTIONS
          OTHERS  = 1.

FI_TERMS_OF_PAYMENT_PROPOSE
  CALL FUNCTION 'FI_TERMS_OF_PAYMENT_PROPOSE'
    EXPORTING
      I_BLDAT               = lv_fkdat
      I_BUDAT               = lv_fkdat
      I_CPUDT               = lv_fkdat
      I_ZFBDT               = lv_fkdat  "Compare SKONTOTERMIN(SAPLVPRI)
      I_ZTERM               = vbdkr-zterm
*     I_REINDAT             =
*     I_LIFNR               =
*     I_BUKRS               =
    IMPORTING
      E_ZBD1T               = ls_terms-days1
      E_ZBD1P               = ls_terms-rate1
      E_ZBD2T               = ls_terms-days2
      E_ZBD2P               = ls_terms-rate2
      E_ZBD3T               = ls_terms-days3
      E_ZFBDT               = lv_fkdat
*     E_SPLIT               =
*     E_ZSCHF               =
*     E_ZLSCH               =
*     E_T052                =
*   CHANGING
*     C_REINDAT             =
    EXCEPTIONS
      TERMS_NOT_FOUND       = 1
      OTHERS                = 2
            .

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      element = 'UNDER_LINE'
    EXCEPTIONS
      element = 1
      window  = 2.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
       element = 'DISCOUNT_HEADER'.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
       element = 'DISCOUNT_TOTAL_LINE'.

WRITE_FORM
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
           element = 'DISCOUNT_TAX_LINE'.

WRITE_FORM
  CALL FUNCTION 'WRITE_FORM'
    EXPORTING
      element = 'UNDER_LINE'
    EXCEPTIONS
      element = 1
      window  = 2.


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 RVADIN02 or its description.


   
 

RVADIN02 - Printprogram for invoices
RVADIN02 - Printprogram for invoices
RVADIN01 - Print program for invoices
RVADIN01 - Print program for invoices
RVADIL01 - Print program for invoice list
RVADIL01 - Print program for invoice list