SAP Reports / Programs | Financial Accounting | Localization(FI-LOC) SAP FI

MJ1B1I01 SAP ABAP INCLUDE - Include MJ1B1I01







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


Text pool values


Title: Include MJ1B1I01


INCLUDES used within this REPORT MJ1B1I01

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:

J_1BNF_GET_PRINT_CONF CALL FUNCTION 'J_1BNF_GET_PRINT_CONF' EXPORTING headerdata = headerdata IMPORTING PRINT_CONF = print_conf EXCEPTIONS ERROR = 1 OTHERS = 2.

J_1B_NF_PARTNER_READ CALL FUNCTION 'J_1B_NF_PARTNER_READ' EXPORTING PARTNER_TYPE = WK_HEADER-PARTYP PARTNER_ID = WK_HEADER-PARID PARTNER_FUNCTION = WK_HEADER-PARVW IMPORTING PARNAD = WK_PARNAD EXCEPTIONS PARTNER_NOT_FOUND = 1 PARTNER_TYPE_NOT_FOUND = 2 OTHERS = 3.

J_1B_NF_ONE_TIME_ACCOUNT_EDIT CALL FUNCTION 'J_1B_NF_ONE_TIME_ACCOUNT_EDIT' EXPORTING COMPANY = WK_HEADER-BUKRS PARTNER_ID = WK_HEADER-PARID PARTNER_TYPE = WK_HEADER-PARTYP MODE = 'CRE' CHANGING ONE_TIME_ACCOUNT = WK_OT_PARTNER EXCEPTIONS ACCOUNT_NOT_FOUND = 1 NO_ONE_TIME_ACCOUNT = 2 OTHERS = 3.

J_1BNF_FILL_HEADER_FROM_BUPLA CALL FUNCTION 'J_1BNF_FILL_HEADER_FROM_BUPLA' "1844621 CHANGING "1844621 cs_nfdoc = wk_header "1844621 EXCEPTIONS "1844621 others = 1. "1844621

J_1B_NF_OBJECT_ADD CALL FUNCTION 'J_1B_NF_OBJECT_ADD' EXPORTING OBJ_HEADER = WK_HEADER IMPORTING OBJ_NUMBER = OBJNUM TABLES OBJ_PARTNER = WK_PARTNER OBJ_ITEM = WK_ITEM OBJ_ITEM_TAX = WK_ITEM_TAX OBJ_HEADER_MSG = WK_HEADER_MSG OBJ_REFER_MSG = WK_REFER_MSG OBJ_OT_PARTNER = WK_OT_PARTNER "05.09.96: faldey

J_1B_NF_LONGTEXT_INIT CALL FUNCTION 'J_1B_NF_LONGTEXT_INIT' "1844621 EXPORTING "1844621 IV_DOCNUM = '0000000000' "1844621 IV_OBJNUM = OBJNUM "1844621 IV_LANGUAGE = WK_HEADER-SPRAS_BUPLA "1844621 IV_MODEF = 'CRE'. "1844621

J_1B_NF_OBJECT_EDIT CALL FUNCTION 'J_1B_NF_OBJECT_EDIT' EXPORTING OBJ_NUMBER = OBJNUM MODEF = 'CRE' SCREEN_NUMBER = '100' WRITER = 'X' VALUES_INCL_TAXES = WK_INCLTX " 17.05.96

J_1B_NF_DOC_INSERT_FROM_OBJECT CALL FUNCTION 'J_1B_NF_DOC_INSERT_FROM_OBJECT' EXPORTING OBJ_NUMBER = OBJNUM IMPORTING DOC_NUMBER = DOCNUM EXCEPTIONS OBJECT_NOT_FOUND = 1 INSERT_PROBLEM = 2 INTERVAL_NOT_FOUND = 3 NUMBER_RANGE_NOT_INTERNAL = 4 NUMBER_OBJECT_NOT_FOUND = 5 OTHERS = 9.

J_1B_NF_DOCUMENT_PRINT CALL FUNCTION 'J_1B_NF_DOCUMENT_PRINT' IN UPDATE TASK EXPORTING DOC_NUMBER = DOCNUM EXCEPTIONS DOCUMENT_NOT_FOUND = 6 MESSAGING_PROBLEM = 7 OTHERS = 9.

J_1B_NFE_XML_RAED_ACTIVE_TAB CALL FUNCTION 'J_1B_NFE_XML_RAED_ACTIVE_TAB' EXPORTING i_docnum = WK_HEADER-DOCNUM IMPORTING E_ACTTAB = ls_active EXCEPTIONS NO_ENTRY = 1 OTHERS = 2.

ENQUEUE_E_J1BNFE CALL FUNCTION 'ENQUEUE_E_J1BNFE' EXPORTING mode_j_1bnfe_active = 'E' mandt = sy-mandt docnum = WK_HEADER-DOCNUM EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

J_1B_NFE_UPDATE_ACTIVE CALL FUNCTION 'J_1B_NFE_UPDATE_ACTIVE' in update task EXPORTING i_acttab = LS_ACTIVE i_updmode = 'U' EXCEPTIONS UPDATE_ERROR = 1 OTHERS = 2.

J_1B_NF_OBJECT_DROP CALL FUNCTION 'J_1B_NF_OBJECT_DROP' EXPORTING OBJ_NUMBER = OBJNUM EXCEPTIONS OBJECT_NOT_FOUND = 1 OTHERS = 2.

J_1B_NF_DOC_READ_INTO_OBJECT CALL FUNCTION 'J_1B_NF_DOC_READ_INTO_OBJECT' EXPORTING DOC_NUMBER = J_1BDYDOC-DOCNUM IMPORTING OBJ_NUMBER = OBJNUM EXCEPTIONS DOCUMENT_NOT_FOUND = 1 OTHERS = 2.

J_1B_NF_OBJECT_READ CALL FUNCTION 'J_1B_NF_OBJECT_READ' EXPORTING OBJ_NUMBER = OBJNUM IMPORTING OBJ_HEADER = WK_HEADER TABLES OBJ_PARTNER = WK_PARTNER OBJ_ITEM = WK_ITEM OBJ_ITEM_TAX = WK_ITEM_TAX OBJ_HEADER_MSG = WK_HEADER_MSG OBJ_REFER_MSG = WK_REFER_MSG OBJ_OT_PARTNER = WK_OT_PARTNER "10.9.96: faldey

J_1B_NF_OBJECT_EDIT CALL FUNCTION 'J_1B_NF_OBJECT_EDIT' EXPORTING OBJ_NUMBER = OBJNUM MODEF = WK_MODEF SCREEN_NUMBER = '100' WRITER = 'X' * values_incl_taxes = wk_incltx MANUAL_TAXES = ' ' IMPORTING FCODE = OK_CODE EXCEPTIONS OBJECT_NOT_FOUND = 1 SCR_CTRL_NOT_FOUND = 2 SCREEN_NOT_FOUND = 3 OTHERS = 4.

J_1B_NF_DOC_UPDATE_FROM_OBJECT CALL FUNCTION 'J_1B_NF_DOC_UPDATE_FROM_OBJECT' EXPORTING OBJ_NUMBER = OBJNUM EXCEPTIONS OBJECT_NOT_FOUND = 1 DOCUMENT_NOT_FOUND = 2 UPDATE_PROBLEM = 3 DOCUM_LOCK = 4 OTHERS = 5.

J_1B_NF_OBJECT_DROP CALL FUNCTION 'J_1B_NF_OBJECT_DROP' EXPORTING OBJ_NUMBER = OBJNUM EXCEPTIONS OBJECT_NOT_FOUND = 1 OTHERS = 2.

POPUP_CONTINUE_YES_NO





* CALL FUNCTION 'POPUP_CONTINUE_YES_NO' * EXPORTING ** DEFAULTOPTION = 'Y' * TEXTLINE1 = 'Do you really want to reprint ?'(001) ** TEXTLINE2 = ' ' * TITEL = 'Reprint NF'(002) ** START_COLUMN = 25 ** START_ROW = 6 * IMPORTING * ANSWER = ANSWER_REP * EXCEPTIONS * OTHERS = 1.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'N' TEXTLINE1 = 'Do you really want to reprint ?'(001) * TEXTLINE2 = ' ' TITEL = 'Reprint NF'(002) * START_COLUMN = 25 * START_ROW = 6 IMPORTING ANSWER = ANSWER_REP.

J_1B_NF_DOCUMENT_PRINT CALL FUNCTION 'J_1B_NF_DOCUMENT_PRINT' EXPORTING DOC_NUMBER = WK_HEADER-DOCNUM EXCEPTIONS DOCUMENT_NOT_FOUND = 1 MESSAGING_PROBLEM = 2 OTHERS = 3.

J_1B_NF_CANCEL_CHECK_PERIOD CALL FUNCTION 'J_1B_NF_CANCEL_CHECK_PERIOD' EXPORTING I_BUDAT = WK_HEADER-PSTDAT I_BUKRS = WK_HEADER-BUKRS EXCEPTIONS WRONG_PERIOD = 1 OTHERS = 2.

POPUP_CONTINUE_YES_NO * CALL FUNCTION 'POPUP_CONTINUE_YES_NO' * EXPORTING ** DEFAULTOPTION = 'Y' * TEXTLINE1 = 'Do you really want to cancel ?'(003) ** TEXTLINE2 = ' ' * TITEL = 'Cancel NF'(004) ** START_COLUMN = 25 ** START_ROW = 6 * IMPORTING * ANSWER = ANSWER_CAN * EXCEPTIONS * OTHERS = 1.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'N' TEXTLINE1 = 'Do you really want to cancel ?'(003) * TEXTLINE2 = ' ' TITEL = 'Cancel NF'(004) * START_COLUMN = 25 * START_ROW = 6 IMPORTING ANSWER = ANSWER_CAN.

J_1B_NF_DOCUMENT_CANCEL CALL FUNCTION 'J_1B_NF_DOCUMENT_CANCEL' EXPORTING DOC_NUMBER = WK_HEADER-DOCNUM REF_TYPE = SPACE " manual REF_KEY = SPACE IMPORTING DOC_NUMBER = NEW_DOCNUM EXCEPTIONS DOCUMENT_NOT_FOUND = 1 CANCEL_NOT_POSSIBLE = 2 NF_CANCEL_TYPE_NOT_FOUND = 3 DATABASE_PROBLEM = 4 DOCUM_LOCK = 5 OTHERS = 6.

J_1B_NF_DOC_READ_INTO_OBJECT CALL FUNCTION 'J_1B_NF_DOC_READ_INTO_OBJECT' EXPORTING DOC_NUMBER = J_1BDYDOC-COP_DOCNUM IMPORTING OBJ_NUMBER = REF_OBJNUM EXCEPTIONS DOCUMENT_NOT_FOUND = 1 DOCUM_LOCK = 2 OTHERS = 3.

J_1B_NF_OBJECT_READ CALL FUNCTION 'J_1B_NF_OBJECT_READ' EXPORTING OBJ_NUMBER = REF_OBJNUM IMPORTING OBJ_HEADER = WK_HEADER TABLES OBJ_PARTNER = WK_PARTNER OBJ_ITEM = WK_ITEM OBJ_ITEM_TAX = WK_ITEM_TAX OBJ_HEADER_MSG = WK_HEADER_MSG OBJ_REFER_MSG = WK_REFER_MSG OBJ_OT_PARTNER = WK_OT_PARTNER "10.9.96: faldey

J_1B_NF_PARTNER_READ CALL FUNCTION 'J_1B_NF_PARTNER_READ' "1466726 EXPORTING "1466726 partner_type = ls_partner-partyp "1466726 partner_id = ls_partner-parid "1466726 read_address = lv_read_address "1770458 IMPORTING "1466726 PARNAD = ls_parnad "1466726 EXCEPTIONS "1466726 partner_not_found = 01 "1466726 partner_type_not_found = 02. "1466726

J_1B_NF_OBJECT_DROP CALL FUNCTION 'J_1B_NF_OBJECT_DROP' EXPORTING OBJ_NUMBER = REF_OBJNUM EXCEPTIONS OBJECT_NOT_FOUND = 1 OTHERS = 2.

J_1B_NF_PARTNER_READ CALL FUNCTION 'J_1B_NF_PARTNER_READ' EXPORTING PARTNER_TYPE = WK_HEADER-PARTYP PARTNER_ID = WK_HEADER-PARID IMPORTING PARNAD = WK_PARNAD EXCEPTIONS PARTNER_NOT_FOUND = 1 PARTNER_TYPE_NOT_FOUND = 2 OTHERS = 3.



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