SAP Reports / Programs | Cross-Application Components | Joint Venture und Production Sharing Accounting(CA-JVA) SAP CA

RGJBUR00_PM SAP ABAP Report - Report RGJBUR00_PM







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


Text pool values


Title: Report RGJBUR00_PM


INCLUDES used within this REPORT RGJBUR00_PM

INCLUDE RGJBURR1.
INCLUDE RGJBURD1.
INCLUDE RGJBURD1_PM. "1180738
INCLUDE: GJV_SCHEDMAN_DATA_DEFINITION.
INCLUDE: RKASMAWF.


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:

JV_AUTHORITY_CHECK_PROCESS CALL FUNCTION 'JV_AUTHORITY_CHECK_PROCESS' EXPORTING PROCESS_CODE = 'PAY-BURDEN' ACTIVITY = '48' BUKRS = COMPANY.

JV_AUTHORITY_CHECK_PROCESS CALL FUNCTION 'JV_AUTHORITY_CHECK_PROCESS' "SO3K010466 EXPORTING "SO3K010466 PROCESS_CODE = 'PAY-BURDEN' "SO3K010466 ACTIVITY = '16' "SO3K010466 BUKRS = COMPANY. "SO3K010466

JV_INITIALISE_MESSAGE CALL FUNCTION 'JV_INITIALISE_MESSAGE' exporting no_co = 'X'.

JV_PM_ACTIVE CALL FUNCTION 'JV_PM_ACTIVE' "1180738 EXPORTING I_BUKRS = company IMPORTING E_PM_ACTIVE = W_PM_ACTIVE.

JV_WRITE_MESSAGE CALL FUNCTION 'JV_WRITE_MESSAGE'.

JV_CLEAR_EQUITY_GROUP_DATES CALL FUNCTION 'JV_CLEAR_EQUITY_GROUP_DATES'.

POSTING_INTERFACE_END CALL FUNCTION 'POSTING_INTERFACE_END' EXCEPTIONS SESSION_NOT_PROCESSABLE = 01.

JV_WRITE_MESSAGE CALL FUNCTION 'JV_WRITE_MESSAGE' "453041 EXPORTING "453041 SORT_ORDER = 1. "453041

JV_JVTO1_AND_PM CALL FUNCTION 'JV_JVTO1_AND_PM' "1180738 EXPORTING T_JVTO1 = i_jvto1_orig IMPORTING T_JVTO1_PM = i_jvto1_pm.

JVA_LAST_DATE_OF_MONTH CALL FUNCTION 'JVA_LAST_DATE_OF_MONTH' "1180738 EXPORTING "1180738 YEAR_MONTH = save_prodper "1180738 IMPORTING "1180738 LAST_DATE_OF_MONTH = ls_proddate "1180738 EXCEPTIONS "1180738 INVALIDE_MONTH = 1 "1180738 OTHERS = 2. "1180738

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "453041 EXPORTING "453041 MSGID = 'G5' "453041 MSGNO = '262' "453041 STATUS = 'W' "453041 VAR1 = SCREEN_WBS "453041 IMPORTING "453041 MAX_SEVERITY = SEVERITY. "453041

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "547154 EXPORTING "547154 MSGID = 'GJ' "547154 MSGNO = '099' "547154 STATUS = 'W' "547154 VAR1 = TEXT-CCB "547154 VAR2 = SCREEN_CENTRE "547154 IMPORTING "547154 MAX_SEVERITY = SEVERITY. "547154

JVA_LAST_DATE_OF_MONTH CALL FUNCTION 'JVA_LAST_DATE_OF_MONTH' "1180738 EXPORTING "1180738 YEAR_MONTH = save_prodper "1180738 IMPORTING "1180738 LAST_DATE_OF_MONTH = ls_proddate "1180738 EXCEPTIONS "1180738 INVALIDE_MONTH = 1 "1180738 OTHERS = 2. "1180738

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "453041 EXPORTING "453041 MSGID = 'G5' "453041 MSGNO = '262' "453041 STATUS = 'W' "453041 VAR1 = SCREEN_WBS "453041 IMPORTING "453041 MAX_SEVERITY = SEVERITY. "453041

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "547154 EXPORTING "547154 MSGID = 'GJ' "547154 MSGNO = '099' "547154 STATUS = 'W' "547154 VAR1 = TEXT-CCB "547154 VAR2 = SCREEN_CENTRE "547154 IMPORTING "547154 MAX_SEVERITY = SEVERITY. "547154

JV_JVTO1_AND_PM CALL FUNCTION 'JV_JVTO1_AND_PM' "1180738 EXPORTING T_JVTO1 = i_jvto1_orig IMPORTING T_JVTO1_PM = i_jvto1_pm.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "453041 EXPORTING "453041 MSGID = 'G5' "453041 MSGNO = '262' "453041 STATUS = 'W' "453041 VAR1 = SCREEN_WBS "453041 IMPORTING "453041 MAX_SEVERITY = SEVERITY. "453041

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "547154 EXPORTING "547154 MSGID = 'GJ' "547154 MSGNO = '099' "547154 STATUS = 'W' "547154 VAR1 = TEXT-CCB "547154 VAR2 = SCREEN_CENTRE "547154 IMPORTING "547154 MAX_SEVERITY = SEVERITY. "547154

JV_COLLECT_MESSAGE





CALL FUNCTION 'JV_COLLECT_MESSAGE' "453041 EXPORTING "453041 MSGID = 'G5' "453041 MSGNO = '262' "453041 STATUS = 'W' "453041 VAR1 = SCREEN_WBS "453041 IMPORTING "453041 MAX_SEVERITY = SEVERITY. "453041

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' "547154 EXPORTING "547154 MSGID = 'GJ' "547154 MSGNO = '099' "547154 STATUS = 'W' "547154 VAR1 = TEXT-CCB "547154 VAR2 = SCREEN_CENTRE "547154 IMPORTING "547154 MAX_SEVERITY = SEVERITY. "547154

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '017' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'PAYB' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '053' STATUS = 'E' VAR1 = 'PAYB' VAR2 = 'EX' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '054' STATUS = 'E' VAR1 = 'PAYB' VAR2 = 'EX' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '053' STATUS = 'E' VAR1 = 'PAYB' VAR2 = 'OF' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '054' STATUS = 'E' VAR1 = 'PAYB' VAR2 = 'OF' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '053' STATUS = 'E' VAR1 = 'PAYB' VAR2 = 'AD' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '054' STATUS = 'E' VAR1 = 'PAYB' VAR2 = 'AD' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 95.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '016' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'EX' VAR2 = 'PAYB' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 94.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '016' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'OF' VAR2 = 'PAYB' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 94.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '016' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'AD' VAR2 = 'PAYB' IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 94.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '021' "Account not found VAR1 = VARIABLE1 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '018' VAR1 = 'JPE' VAR2 = VARIABLE2 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '023' "Account not found VAR1 = VARIABLE1 VAR2 = VARIABLE2 VAR3 = VARIABLE3 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '446' "Incorrect field VAR1 = VARIABLE1 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '020' "Incorrect field VAR1 = VARIABLE1 VAR2 = VARIABLE2 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '021' "Account not found VAR1 = VARIABLE1 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '023' "Account not found VAR1 = VARIABLE1 VAR2 = VARIABLE2 VAR3 = VARIABLE3 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '446' "Incorrect field VAR1 = VARIABLE1 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.




JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '020' "Incorrect field VAR1 = VARIABLE1 VAR2 = VARIABLE2 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '021' "Account not found VAR1 = VARIABLE1 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '023' "Account not found VAR1 = VARIABLE1 VAR2 = VARIABLE2 VAR3 = VARIABLE3 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '446' "Incorrect field VAR1 = VARIABLE1 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '020' "Incorrect field VAR1 = VARIABLE1 VAR2 = VARIABLE2 STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '012' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'JPE' VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 1.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '012' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'JPA' VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 1.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '012' STATUS = 'E' "Correction # SO3K002924 VAR1 = 'JPO' VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 1.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '013' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE1 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 91.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '069' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE2 "Correction # SO3K002924 VAR2 = VARIABLE2 "Correction # SO3K002924 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 92.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '013' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE1 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 91.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '069' "Correction # SO3K002924 STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE2 "Correction # SO3K002924 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 92.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '013' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE1 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 91.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '068' "Correction # SO3K002924 STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE2 "Correction # SO3K002924 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 93.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '013' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE1 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 91.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '068' "Correction # SO3K002924 STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE2 "Correction # SO3K002924 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 93.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '013' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE1 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 91.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '068' "Correction # SO3K002924 STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE2 "Correction # SO3K002924 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 93.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '013' STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE1 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 91.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '068' "Correction # SO3K002924 STATUS = 'E' "Correction # SO3K002924 VAR1 = VARIABLE2 "Correction # SO3K002924 VAR2 = VARIABLE2 IMPORTING MAX_SEVERITY = SEVERITY EXCEPTIONS INCOMPLETE = 93.

G_POSTING_DATE_OF_PERIOD_GET CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET' EXPORTING PERIOD = PERIOD VARIANT = COMPANY_DATA-PERIV YEAR = YEAR IMPORTING TO_DATE = LAST_DAY FROM_DATE = FIRST_DAY EXCEPTIONS PERIOD_NOT_DEFINED = 100 VARIANT_NOT_DEFINED = 101.

G_SET_GET_ID_FROM_NAME CALL FUNCTION 'G_SET_GET_ID_FROM_NAME' EXPORTING SHORTNAME = SET_ID IMPORTING NEW_SETID = SET_NBR EXCEPTIONS NO_SET_FOUND = 1 NO_SET_PICKED_FROM_POPUP = 2 WRONG_CLASS = 3 WRONG_SUBCLASS = 4 TABLE_FIELD_NOT_FOUND = 5 FIELDS_DONT_MATCH = 6 SET_IS_EMPTY = 7 FORMULA_IN_SET = 8 OTHERS = 9.

G_SET_INSERT CALL FUNCTION 'G_SET_INSERT' EXPORTING CLASS = ' ' "is always SPACE MAINTENANCE = ' ' "no reading for maintenance * setname = set_id "name of set SETNAME = SET_NBR "name of set TABLE = 'JVTO1' "table of set IMPORTING HEADER = RGSMH "set information INDEX = SET_INDEX "index of set in buffer EXCEPTIONS SET_NOT_FOUND = 01.

G_CONTROL_BLOCK_RESET CALL FUNCTION 'G_CONTROL_BLOCK_RESET' EXPORTING CONTROL_BLOCK = 1.

G_INTERVAL_GET_NEXT CALL FUNCTION 'G_INTERVAL_GET_NEXT' EXPORTING CONTROL_BLOCK = 1 "control block from above INDEX = SET_INDEX "index of set in buffer IMPORTING ENTRY = RGSMV "entry data EXCEPTIONS END_OF_INTERVALS = 01 "set after last entry INVALID_INDEX = 02. "should not happen

G_INTERVAL_GET_NEXT CALL FUNCTION 'G_INTERVAL_GET_NEXT' EXPORTING CONTROL_BLOCK = 1 INDEX = SET_INDEX IMPORTING ENTRY = RGSMV EXCEPTIONS END_OF_INTERVALS = 01 INVALID_INDEX = 02.

G_BUFFER_RESET CALL FUNCTION 'G_BUFFER_RESET'.

JV_WRITE_MESSAGE CALL FUNCTION 'JV_WRITE_MESSAGE'.

JV_WRITE_MESSAGE CALL FUNCTION 'JV_WRITE_MESSAGE'.

POSTING_INTERFACE_DOCUMENT CALL FUNCTION 'POSTING_INTERFACE_DOCUMENT' EXPORTING I_TCODE = 'FB01' * I_NO_AUTH = 'X' "503089 "504074 TABLES T_BLNTAB = XBLNTAB "FOR CALL TRANS T_FTPOST = FTPOST "posting table T_FTTAX = XFTTAX "FOR TAXES IF NEC.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '005' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '009' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '006' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '011' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING DATE = POST_DATE FOREIGN_AMOUNT = FVAL FOREIGN_CURRENCY = COMPANY_DATA-WAERS LOCAL_CURRENCY = WS_CURR2 TYPE_OF_RATE = T8JZ-KURST IMPORTING LOCAL_AMOUNT = WS_AMT_2 EXCEPTIONS NO_RATE_FOUND = 1 OTHERS = 5.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '887' STATUS = 'E' VAR1 = COMPANY_DATA-WAERS VAR2 = WS_CURR2 VAR3 = T8JZ-KURST IMPORTING MAX_SEVERITY = SEVERITY.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING DATE = POST_DATE FOREIGN_AMOUNT = FVAL FOREIGN_CURRENCY = COMPANY_DATA-WAERS LOCAL_CURRENCY = WS_CURR3 TYPE_OF_RATE = T8JZ-KURST IMPORTING LOCAL_AMOUNT = WS_AMT_3 EXCEPTIONS NO_RATE_FOUND = 1 OTHERS = 5.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '887' STATUS = 'E' VAR1 = COMPANY_DATA-WAERS VAR2 = WS_CURR3 VAR3 = T8JZ-KURST IMPORTING MAX_SEVERITY = SEVERITY.

AC_DOCUMENT_DIRECT_INPUT CALL FUNCTION 'AC_DOCUMENT_DIRECT_INPUT' * EXPORTING * I_NODATA = '/' * I_TESTRUN = IMPORTING E_BUKRS = FAST-BUKRS E_GJAHR = FAST-GJAHR E_BELNR = FAST-BELNR TABLES T_BBKPF = T_BBKPF T_BBSEG = T_BBSEG T_BBTAX = T_BBTAX EXCEPTIONS OTHERS = 1.

POSTING_INTERFACE_START CALL FUNCTION 'POSTING_INTERFACE_START' EXPORTING I_CLIENT = CLIENT I_FUNCTION = 'B' "open BDC I_GROUP = SESSION_NAME "name of session * I_HOLDDATE = ' ' I_KEEP = KEEP_SES"keep session I_MODE = 'N' I_UPDATE = 'S' I_USER = USER "name of user I_XBDCC = ' ' EXCEPTIONS CLIENT_INCORRECT = 01 FUNCTION_INVALID = 02 GROUP_NAME_MISSING = 03 MODE_INVALID = 04 UPDATE_INVALID = 05.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '001' STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '002' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'GJ' MSGNO = '003' STATUS = 'E' IMPORTING MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '004' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

JV_COLLECT_MESSAGE * CALL FUNCTION 'JV_COLLECT_MESSAGE' * EXPORTING * MSGID = 'GJ' * MSGNO = '005' * STATUS = 'E' * IMPORTING * MAX_SEVERITY = SEVERITY.

JV_GET_EQUITY_GROUP_DATES CALL FUNCTION 'JV_GET_EQUITY_GROUP_DATES' EXPORTING COMPANY = COMPANY_DATA-BUKRS EQUITY_GROUP = L_EQUITY_GROUP LAST_DATE = POST_DATE VENTURE = L_VENTURE IMPORTING VALID_TO_DATE = L_VALID_TO_DATE EXCEPTIONS DATES_NOT_SAME = 1 GROUP_NOT_FOUND = 2 NO_DATE_PASSED = 3.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'G5' MSGNO = '401' STATUS = 'E' VAR1 = POST_DATE EXCEPTIONS INCOMPLETE = 1 OTHERS = 2.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'G5' MSGNO = '402' STATUS = 'E' VAR1 = L_EQUITY_GROUP VAR2 = L_VENTURE EXCEPTIONS INCOMPLETE = 1 OTHERS = 2.

JV_COLLECT_MESSAGE CALL FUNCTION 'JV_COLLECT_MESSAGE' EXPORTING MSGID = 'G5' MSGNO = '403' STATUS = 'E' EXCEPTIONS INCOMPLETE = 1 OTHERS = 2.

CJPN_PROJECT_ACCOUNT CALL FUNCTION 'CJPN_PROJECT_ACCOUNT' "453041 EXPORTING "453041 ACTIVITY = 'RFBU' "453041 CHANGE_STATUS = ' ' "453041 INT_NUM = INTERNAL "453041 EXCEPTIONS "453041 INPUT_ERROR = 1 "453041 NOT_ALLOWED = 2 "453041 NOT_FOUND = 3 "453041 NO_ACCOUNT_ELEMENT = 4 "453041 NO_GSBER = 5 "453041 NO_INVOICE_ELEMENT = 6 "453041 OBJECT_NOT_FOUND = 7 "453041 WRONG_BUKRS = 8 "453041 WRONG_GSBER = 9 "453041 WRONG_KOKRS = 10 "453041 OTHERS = 11. "453041

JV_AND_FI_CURRENCIES CALL FUNCTION 'JV_AND_FI_CURRENCIES' EXPORTING BUKRS = COMPANY_DATA-BUKRS IMPORTING HWAE2 = WS_CURR2 HWAE3 = WS_CURR3.

JV_MESSAGE_GET_HANDLE CALL FUNCTION 'JV_MESSAGE_GET_HANDLE' IMPORTING E_LOG_HANDLE = ls_message-log_handle. .

KPEP_MONI_CLOSE_RECORD CALL FUNCTION 'KPEP_MONI_CLOSE_RECORD' EXPORTING LS_KEY = gs_key LS_MESSAGE = ls_message * LD_OBJECTS = * LS_EXT = * LS_RL = * LS_SCMA_EVENT = * TABLES * LT_SPOOL = CHANGING LD_APLSTAT = ld_aplstat. "#EC *

KPEP_MONI_INIT_RECORD call function 'KPEP_MONI_INIT_RECORD' exporting ls_detail = ls_detail * ls_witem = ls_witem ls_appl = ls_appl_JV * ld_worklist_flag = ld_worklist_flag importing ls_key = gs_key tables lt_selkrit = lt_selkrit.

RK_KOKRS_FIND CALL FUNCTION 'RK_KOKRS_FIND' EXPORTING BUKRS = COMPANY IMPORTING KOKRS = L_KOKRS EXCEPTIONS ASSIGNMENT_NOT_ALLOWED = 1 INSUFFICIENT_INPUT = 2 NO_KOKRS_ASSIGNED = 3 NO_KOKRS_FOR_BUKRS = 4 NO_KOKRS_FOR_BU_GB = 5 WRONG_KOKRS_FOR_BUKRS = 6 WRONG_KOKRS_FOR_BU_GB = 7 OTHERS = 8 .



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