ISJPINVSUM02_FORMS SAP ABAP INCLUDE - Include ISJPINVSUM02_FORMS

ISJPINVSUM02_FORMS 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 ISJPINVSUM02_FORMS 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 ISJPINVSUM02_FORMS. "Basic submit
SUBMIT ISJPINVSUM02_FORMS AND RETURN. "Return to original report after report execution complete
SUBMIT ISJPINVSUM02_FORMS 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 ISJPINVSUM02_FORMS

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:

LVC_FIELDCATALOG_MERGE
  CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
    EXPORTING
      i_structure_name = 'ISJPVIRTACCT_L'
    CHANGING
      ct_fieldcat      = gt_virtacct_fcat[].

LVC_FIELDCATALOG_MERGE
  CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
    EXPORTING
      i_structure_name = 'ISJPVIRTACCT_P'
    CHANGING
      ct_fieldcat      = gt_virtacct_p_fcat[].

ENQUEUE_EISJPVIRTACCT
        CALL FUNCTION 'ENQUEUE_EISJPVIRTACCT'
          EXPORTING
            mode_isjpvirtacct = 'X'
            banks             = ls_virtacct_out-banks
            bankl             = ls_virtacct_out-bankl
            virtacctnr        = ls_virtacct_out-virtacctnr
          EXCEPTIONS
            foreign_lock      = 1
            system_failure    = 2
            OTHERS            = 3.

MESSAGE_STORE
        CALL FUNCTION 'MESSAGE_STORE'
          EXPORTING
            arbgb = '00'
            msgty = 'E'
            txtnr = '055'.

MESSAGE_STORE
        CALL FUNCTION 'MESSAGE_STORE'
          EXPORTING
            arbgb = 'ISJP'
            msgty = 'E'
            msgv1 = ls_virtacct-banks
            msgv2 = ls_virtacct-bankl
            msgv3 = ls_virtacct-virtacctnr
            txtnr = '207'.

MESSAGE_STORE
        CALL FUNCTION 'MESSAGE_STORE'
          EXPORTING
            arbgb = 'ISJP'
            msgty = 'E'
            msgv1 = ls_virtacct-banks
            msgv2 = ls_virtacct-bankl
            msgv3 = ls_virtacct-virtacctnr
            msgv4 = ls_virtacct-bukrs
            txtnr = '205'.

MESSAGES_STOP
  CALL FUNCTION 'MESSAGES_STOP'
    EXCEPTIONS
      a_message = 1
      e_message = 2
      w_message = 3
      i_message = 4
      s_message = 5
      OTHERS    = 6.

MESSAGES_SHOW
    CALL FUNCTION 'MESSAGES_SHOW'
      EXPORTING
        object = 'Maintain Virtual Accounts'(005).

ISJP_VIRTACCT_INSERT
  CALL FUNCTION 'ISJP_VIRTACCT_INSERT'
    CHANGING
      ct_virtacct = gt_ins
    EXCEPTIONS
      error       = 1
      OTHERS      = 2.

ISJP_VIRTACCT_UPDATE
  CALL FUNCTION 'ISJP_VIRTACCT_UPDATE'
    CHANGING
      ct_virtacct = gt_upd
    EXCEPTIONS
      error       = 1
      OTHERS      = 2.

POPUP_TO_CONFIRM
  CALL FUNCTION 'POPUP_TO_CONFIRM'
    EXPORTING
      titlebar              = 'Leave Maintenance'(003)
      text_question         = 'Save before leaving programme?'(004)
      text_button_1         = 'Ja'(001)
      text_button_2         = 'Nein'(002)
      default_button        = '1'
      display_cancel_button = 'X'
    IMPORTING
      answer                = cv_answer.

MESSAGES_INITIALIZE
  CALL FUNCTION 'MESSAGES_INITIALIZE'.

MESSAGE_STORE
      CALL FUNCTION 'MESSAGE_STORE'
        EXPORTING
          arbgb = 'ISJP'
          msgty = 'E'
          msgv1 = ls_virtacct-banks
          msgv2 = ls_virtacct-bankl
          msgv3 = ls_virtacct-virtacctnr
          txtnr = '207'.

DYNP_VALUES_READ
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname             = prog
      dynumb             = dynm
      translate_to_upper = 'X'
    TABLES
      dynpfields         = loc_dynpread.

SEARCH_BANK_ADDRESS
  CALL FUNCTION 'SEARCH_BANK_ADDRESS'
    EXPORTING
      i_banks = lv_banks
    IMPORTING
      e_bnka  = ls_bnka.

ENQUEUE_EISJPVIRTACCT
    CALL FUNCTION 'ENQUEUE_EISJPVIRTACCT'
      EXPORTING
        mode_isjpvirtacct = 'X'
        banks             = ls_virtacct-banks
        bankl             = ls_virtacct-bankl
        virtacctnr        = ls_virtacct-virtacctnr
      EXCEPTIONS
        foreign_lock      = 1
        system_failure    = 2
        OTHERS            = 3.

POPUP_TO_CONFIRM
  CALL FUNCTION 'POPUP_TO_CONFIRM'
    EXPORTING
      titlebar              = text-009
      text_question         = text-010
      text_button_1         = 'Ja'(001)
      text_button_2         = 'Nein'(002)
      display_cancel_button = ' '
*     START_COLUMN          = 25
*     START_ROW             = 6
    IMPORTING
      answer                = lv_answer.

ISJP_VIRTACCT_DELETE
    CALL FUNCTION 'ISJP_VIRTACCT_DELETE'
      EXPORTING
        it_virtacct = gt_del
      EXCEPTIONS
        error       = 1
        OTHERS      = 2.

DEQUEUE_EISJPVIRTACCT














    CALL FUNCTION 'DEQUEUE_EISJPVIRTACCT'
      EXPORTING
*       MODE_ISJPVIRTACCT = 'X'
        banks             = ls_virtacct-banks
        bankl             = ls_virtacct-bankl
        virtacctnr        = ls_virtacct-virtacctnr.

DEQUEUE_EISJPVIRTACCT
    CALL FUNCTION 'DEQUEUE_EISJPVIRTACCT'
      EXPORTING
*       MODE_ISJPVIRTACCT = 'X'
        banks             = gs_upd_key-banks
        bankl             = gs_upd_key-bankl
        virtacctnr        = gs_upd_key-virtacctnr.