SAP Reports / Programs

RWSORT14 SAP ABAP Report - Create Individual Listing Material/Assortment







RWSORT14 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 RWSORT14 into the relevant SAP transactions such as SE38 or SE80


Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

WSP4 - Create indiv. listing, mat. - plant


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


Text pool values


Selection Text: SSTUF = Assortment Grade (optional)
Selection Text: SATNR = Material
Selection Text: PFLKN = Priority
Selection Text: LSTFL = Listing Procedure
Selection Text: FLVON = Listed from
Selection Text: FLBIS = Listed to
Selection Text: DELIV_PL = Also list supplying plants
Selection Text: ASORT = Assortment
Title: Create Individual Listing Material/Assortment
Text Symbol: 012 = Control
Text Symbol: 011 = Rules and validities
Text Symbol: 010 = Validity range
Text Symbol: 002 = Errors cannot be processed
Text Symbol: 001 = Errors can be processed


INCLUDES used within this REPORT RWSORT14

INCLUDE MWWCONST.


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:

ENQUEUE_EMMARAE * call function 'ENQUEUE_EMMARAE' * exporting * matnr = satnr * exceptions * foreign_lock = 4 * system_failure = 8.

DEQUEUE_EMMATAE * call function 'DEQUEUE_EMMATAE' * exporting * matnr = satnr.

ASSORTMENT_GET_DATA_AND_USER_B CALL FUNCTION 'ASSORTMENT_GET_DATA_AND_USER_B' EXPORTING ASORT = ASORT * VALID_AT = ' ' * STATUS = '1' IMPORTING ASORT_DATA = WINT_CARRH EXCEPTIONS NO_DATA = 1 NO_VALID_DATA = 2 OTHERS = 3.

ASSORTMENT_USE_OF_LISTMETHOD CALL FUNCTION 'ASSORTMENT_USE_OF_LISTMETHOD' EXPORTING LSTFL = LSTFL.

ASSORTMENT_CHECK_ATTYP CALL FUNCTION 'ASSORTMENT_CHECK_ATTYP' EXPORTING ATTYP = MARA-ATTYP * MTART = ' ' EXCEPTIONS GENERIC_ARTICLE = 1 STRUCTURED_ARTICLE = 2 VARIANT_ARTICLE = 3 VALUE_ARTICLE = 4 EMPTY_ARTICLE = 5 OTHERS = 6.

VARIANT_ITEM_READ_ALL CALL FUNCTION 'VARIANT_ITEM_READ_ALL' EXPORTING DATE = FLVON INACTIVE_ITEMS = ' ' ITEM = MARA-MATNR TYPE_F = 'X' * IMPORTING * E_ATTYP = TABLES VARIANT_LIST = VARIANTEN EXCEPTIONS NO_VARIANTS_FOUND = 01.

ASSORTMENT_CHECK_ATTYP CALL FUNCTION 'ASSORTMENT_CHECK_ATTYP' EXPORTING ATTYP = MARA-ATTYP * MTART = ' ' EXCEPTIONS GENERIC_ARTICLE = 1 STRUCTURED_ARTICLE = 2 VARIANT_ARTICLE = 3 VALUE_ARTICLE = 4 EMPTY_ARTICLE = 5 OTHERS = 6.

ASSORTMENT_CHECK_CATEGORY CALL FUNCTION 'ASSORTMENT_CHECK_CATEGORY' EXPORTING MATNR = VARIANTEN-MATNR MATKL = VARIANTEN-MATKL.

ASSORTMENT_CHECK_ENQ_MATNR CALL FUNCTION 'ASSORTMENT_CHECK_ENQ_MATNR' EXPORTING MATNR = VARIANTEN-MATNR.

ASSORTMENT_CHECK_ATTYP CALL FUNCTION 'ASSORTMENT_CHECK_ATTYP' EXPORTING ATTYP = MARA-ATTYP * MTART = ' ' EXCEPTIONS GENERIC_ARTICLE = 1 STRUCTURED_ARTICLE = 2 VARIANT_ARTICLE = 3 VALUE_ARTICLE = 4 EMPTY_ARTICLE = 5 OTHERS = 6.

WWS_ENQ_ASSORTMENT CALL FUNCTION 'WWS_ENQ_ASSORTMENT' EXPORTING ARTIKEL = VARIANTEN-MATNR " BAUSTEIN = ' ' " DATUMBIS = ' ' FILIA = WINT_CARRH-ASORT SPERR_MODUS = 'E' " VKORG = ' ' " VRKME = ' ' " VTWEG = ' ' WAS = '3' "WLK1-Kopf-Eintrag EXCEPTIONS FOREIGN_LOCK = 01 NO_MODUS = 02 NO_WAS = 03 SYSTEM_FAILURE = 04.

ENQUEUE_EMMARAE CALL FUNCTION 'ENQUEUE_EMMARAE' EXPORTING MATNR = VARIANTEN-MATNR _SCOPE = '1' EXCEPTIONS FOREIGN_LOCK = 4 SYSTEM_FAILURE = 8.

WRS1_SINGLE_READ CALL FUNCTION 'WRS1_SINGLE_READ' EXPORTING ASORT = ASORT * SPRAS = ONLY_SINGLE_SELECT = 'X' IMPORTING WRS1_OUT = WRS1 * WRST_OUT = EXCEPTIONS NO_RECORD_FOUND = 1 SPRAS_NOT_FOUND = 2 OTHERS = 3 .

ASSORTMENT_CHECK_RACKJOBBER CALL FUNCTION 'ASSORTMENT_CHECK_RACKJOBBER' EXPORTING MATNR = VARIANTEN-MATNR ASORT = WRS1-ASORT " INSERT COLLETT 4.6A

ASSORTMENT_ISSUING_SELECT * CALL FUNCTION 'ASSORTMENT_ISSUING_SELECT' * EXPORTING * ITEM = VARIANTEN-MATNR * SHOP = WINT_CARRH-ASORT * DATE = FLVON * MATKL = MARA-MATKL * BWSCL = MARA-BWSCL * TABLES * ISSUING_PLANTS = DELIVER * EXCEPTIONS * NO_ISSUING_PLANT = 01.

ASSORTMENT_ALL_ISSUING_SELECT CALL FUNCTION 'ASSORTMENT_ALL_ISSUING_SELECT' EXPORTING ITEM = VARIANTEN-MATNR ASORT = WINT_CARRH-ASORT MATKL = MARA-MATKl BWSCL = MARA-BWSCL DATE = FLVON TABLES ISSUING_PLANTS = DELIVER EXCEPTIONS NO_ISSUING_PLANT = 1 OTHERS = 2.

WWS_ENQ_ASSORTMENT CALL FUNCTION 'WWS_ENQ_ASSORTMENT' EXPORTING ARTIKEL = VARIANTEN-MATNR FILIA = PLANT_LIST-ASORT SPERR_MODUS = 'E' WAS = '3' "WLK1-Kopf-Eintrag EXCEPTIONS FOREIGN_LOCK = 01 NO_MODUS = 02 NO_WAS = 03 SYSTEM_FAILURE = 04.

ASSORTMENT_CHECK_ENQ_MATNR CALL FUNCTION 'ASSORTMENT_CHECK_ENQ_MATNR' EXPORTING MATNR = VARIANTEN-MATNR.

ENQUEUE_EMMARAE





CALL FUNCTION 'ENQUEUE_EMMARAE' EXPORTING MATNR = VARIANTEN-MATNR EXCEPTIONS FOREIGN_LOCK = 4 SYSTEM_FAILURE = 8.

DEQUEUE_E_WLKE CALL FUNCTION 'DEQUEUE_E_WLKE' EXPORTING ARTNR = VARIANTEN-MATNR FILIA = WINT_CARRH-ASORT.

DEQUEUE_EMMATAE CALL FUNCTION 'DEQUEUE_EMMATAE' EXPORTING MATNR = VARIANTEN-MATNR.

LISTING_RULES_CHECK_DIALOG CALL FUNCTION 'LISTING_RULES_CHECK_DIALOG' EXPORTING ASS_LEVEL_SHOP = ' ' ASS_LEVEL_ITEM = SSTUF * date = '00000000' " COLLETT 4.5B

MODULE_CREATE CALL FUNCTION 'MODULE_CREATE' EXPORTING FUNCTION = '1' LOCATION = PLANT_LIST-ASORT MERCHANDISE_GROUP = MARA-MATKL DATE_BEGIN = SY-DATUM DATE_END = '99991231' IMPORTING MODULE = WSOH MODULE_TEXT = WSOT WSCOR = WSCOR EXCEPTIONS MODULE_ALREADY_EXISTS = 01 WRONG_FUNCTION = 02.

ASSORTMENT_POS_HANDLING CALL FUNCTION 'ASSORTMENT_POS_HANDLING' EXPORTING ASSORTMENT_HEAD = WSOH ASSORTMENT_POS_NEW = WINT_POS ASSORTMENT_POS_OLD = POS_OLD FUNCTION = '1' LOCATION = PLANT_LIST-ASORT * vkorg = ' ' * vtweg = ' ' IMPORTING WSCOR = WSCOR TABLES * units = * variants = CONNECTIONS = IWSOF2 EXCEPTIONS ASSORTMENT_POS_ALREADY_EXISTS = 01 ASSORTMENT_POS_NOT_FOUND = 02 NEW_TIME_RANGE_TOO_LONG = 03 NEW_TIME_RANGE_TOO_SMALL = 04 WRONG_FUNCTION = 05.

WSOH_READ_PROFILE_MODULE CALL FUNCTION 'WSOH_READ_PROFILE_MODULE' EXPORTING MATKL = P_MATERIAL-MATKL ASORT = P_ASORT ONLY_ACTIVE = 'X' IMPORTING EWSOH = WSOH EXCEPTIONS KEY_UNCOMPLETE = 1 REC_ENQUEUED = 2 REC_NOT_ACTIVE = 3 REC_NOT_VALID_IN_TIME = 4 NO_REC_FOUND = 5 OTHERS = 6.

MODULE_CREATE CALL FUNCTION 'MODULE_CREATE' EXPORTING FUNCTION = '1' LOCATION = P_ASORT MERCHANDISE_GROUP = P_MATERIAL-MATKL DATE_BEGIN = SY-DATUM DATE_END = '99991231' IMPORTING MODULE = WSOH MODULE_TEXT = WSOT WSCOR = WSCOR EXCEPTIONS MODULE_ALREADY_EXISTS = 01 WRONG_FUNCTION = 02.

WLK1_CHANGE CALL FUNCTION 'WLK1_CHANGE' EXPORTING FUNCTION = '1' * VKORG = ' ' * VTWEG = ' ' * MODULE = ' ' * WINT_POS = * LAST_LISTING = ' ' * SELECT_ASSORTMENT = ' ' TABLES INT_WLK1 = PT_WLK1 EXCEPTIONS NO_WLK1 = 1 WLK1_EXISTS = 2 WRONG_DATES = 3 WRONG_FUNCTION = 4 ALWAYS_RJ_CONNECTED = 5 OTHERS = 6.

WLK1_READ_MULTIPLE_FUNCTIONS CALL FUNCTION 'WLK1_READ_MULTIPLE_FUNCTIONS' EXPORTING * BUFFERS_READ = ' ' WLK1_SINGLE_SELECT = WLK1 FUNCTION = 'K' * ATTYP = ' ' * SELECT_ASSORTMENT = ' ' KZRFB = 'X' " N:399913 * SORT_DIRECTION = ' ' * SELECT_WHOLE_ARTICLE = 'X' * IMPORTING * WLK1_OUTPUT = TABLES * WLK1_ARRAY_SELECT = WLK1_RESULTS = TAB_WLK1 * SAMMEL_ITEM = * PLANT_LIST = * MATNR_ME_ONLY = EXCEPTIONS NO_REC_FOUND = 1 OTHERS = 2.

WSOH_READ_PROFILE_MODULE CALL FUNCTION 'WSOH_READ_PROFILE_MODULE' EXPORTING MATKL = MARA-MATKL ASORT = ASORT IMPORTING EWSOH = P_WSOH EXCEPTIONS KEY_UNCOMPLETE = 1 REC_ENQUEUED = 2 REC_NOT_ACTIVE = 3 REC_NOT_VALID_IN_TIME = 4 NO_REC_FOUND = 5 OTHERS = 6.



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