MOIJAI01 SAP ABAP INCLUDE - IS-Oil TSW: Master Data - TSW Transport System (PAI modules)

MOIJAI01 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 MOIJAI01 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.

Text pool values

INCLUDES used within this REPORT MOIJAI01

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:

FUNCTION_EXECUTE
  CALL FUNCTION 'FUNCTION_EXECUTE'
    EXPORTING
      PROGRAMM        = T180-AGIDV
      KOPFGRUPPE      = G_KOPGR
      POSITIONSGRUPPE = G_POSGR
      FUNKTION        = FCODE
    IMPORTING
      CUA_STATUS      = T185V-STATUS
      CUA_TITEL       = T185V-CTITEL
      CUA_PARA1       = T185V-PARA1
      CUA_PARA2       = T185V-PARA2
      CUA_PARA3       = T185V-PARA3
      CUA_PARA4       = T185V-PARA4
      FOLGEFUNKTION   = FCODE
      DUNKEL          = T185-DUNKEL
      LEAVE           = FLAG_LEAVE
      LEAVE_SCREEN    = FLAG_LEAVE_SCREEN.

SCREEN_SEQUENCE_CONTROL
  CALL FUNCTION 'SCREEN_SEQUENCE_CONTROL'
    EXPORTING
      PROGRAMM        = 'SAPMOIJA'
      KOPFGRUPPE      = G_KOPGR
      POSITIONSGRUPPE = G_POSGR
      FUNKTION        = FCODE
    IMPORTING
      CUA_STATUS      = T185V-STATUS
      CUA_TITEL       = T185V-CTITEL
      CUA_PARA1       = T185V-PARA1
      CUA_PARA2       = T185V-PARA2
      CUA_PARA3       = T185V-PARA3
      CUA_PARA4       = T185V-PARA4
      FOLGEFUNKTION   = FCODE
      DUNKEL          = T185-DUNKEL
      LEAVE           = FLAG_LEAVE.

OIJTS_CD_INITIALIZE_DATA
    CALL FUNCTION 'OIJTS_CD_INITIALIZE_DATA'.             "SO7K022909 YS

OIJTS_CD_SET_OLD_DATA
    CALL FUNCTION 'OIJTS_CD_SET_OLD_DATA'                 "SO7K022909 YS
       EXPORTING
          IS_OIJTS = OIJTS
          IT_ROIJTSMATSEQ = G_MATSEQ_TAB[]
          IT_ROIJTSLOC = OIJTSLOC_TAB[]
          IT_ROIJTSMAT = OIJTSMAT_TAB[].

DIMENSIONCHECK_VOLUME
  CALL FUNCTION 'DIMENSIONCHECK_VOLUME'
    EXPORTING
      VOLEH                = OIJTS-TSSUOMV
    EXCEPTIONS
      DIMENSION_NOT_VOLUME = 1
      T006D_ENTRY_MISSING  = 2
      T006_ENTRY_MISSING   = 3
      OTHERS               = 4.

DIMENSIONCHECK_MASS
  CALL FUNCTION 'DIMENSIONCHECK_MASS'
    EXPORTING
      GEWEI               = OIJTS-TSSUOMM
    EXCEPTIONS
      DIMENSION_NOT_MASS  = 1
      T006D_ENTRY_MISSING = 2
      T006_ENTRY_MISSING  = 3
      OTHERS              = 4.

DIMENSIONCHECK_TIME
*  CALL FUNCTION 'DIMENSIONCHECK_TIME'
*       EXPORTING
*            MEINH               = OIJTS-CONLUOM
*       EXCEPTIONS
*            DIMENSION_NOT_TIME  = 1
*            T006D_ENTRY_MISSING = 2
*            T006_ENTRY_MISSING  = 3
*            OTHERS              = 4.

DIMENSIONCHECK_VOLUME
  CALL FUNCTION 'DIMENSIONCHECK_VOLUME'
    EXPORTING
      VOLEH                = OIJTS-BULTOLUOM
    EXCEPTIONS
      DIMENSION_NOT_VOLUME = 1
      T006D_ENTRY_MISSING  = 2
      T006_ENTRY_MISSING   = 3
      OTHERS               = 4.

DIMENSIONCHECK_MASS
    CALL FUNCTION 'DIMENSIONCHECK_MASS'
      EXPORTING
        GEWEI               = OIJTS-BULTOLUOM
      EXCEPTIONS
        DIMENSION_NOT_MASS  = 1
        T006D_ENTRY_MISSING = 2
        T006_ENTRY_MISSING  = 3
        OTHERS              = 4.

DIMENSIONCHECK_TIME
  CALL FUNCTION 'DIMENSIONCHECK_TIME'
    EXPORTING
      MEINH               = OIJTS-CYCPUOM
    EXCEPTIONS
      DIMENSION_NOT_TIME  = 1
      T006D_ENTRY_MISSING = 2
      T006_ENTRY_MISSING  = 3
      OTHERS              = 4.

HELP_VALUES_GET_NO_DD_NAME
  CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME'
    EXPORTING
      SELECTFIELD                  = 'VSART'
      TITEL                        = TEXT-031
    IMPORTING
      IND                          = L_TABIND
    TABLES
      FIELDS                       = L_F4_HELP_TAB
      FULL_TABLE                   = L_VSART_TAB
    EXCEPTIONS
      FULL_TABLE_EMPTY             = 1
      NO_TABLESTRUCTURE_GIVEN      = 2
      NO_TABLEFIELDS_IN_DICTIONARY = 3
      MORE_THEN_ONE_SELECTFIELD    = 4
      NO_SELECTFIELD               = 5
      OTHERS                       = 6.

DYNP_VALUES_UPDATE
    CALL FUNCTION 'DYNP_VALUES_UPDATE'
      EXPORTING
        DYNAME               = 'SAPMOIJA'
        DYNUMB               = SY-DYNNR
      TABLES
        DYNPFIELDS           = SCR_FIELDS
      EXCEPTIONS
        INVALID_ABAPWORKAREA = 1
        INVALID_DYNPROFIELD  = 2
        INVALID_DYNPRONAME   = 3
        INVALID_DYNPRONUMMER = 4
        INVALID_REQUEST      = 5
        NO_FIELDDESCRIPTION  = 6
        UNDEFIND_ERROR       = 7
        OTHERS               = 8.