SAP Reports / Programs | Logistics - General | SAP Retail Store(LO-SRS) SAP LO

AS_FORMS SAP ABAP INCLUDE - ASFORMS







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


INCLUDES used within this REPORT AS_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:

MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting * KZRFB = ' ' * MAXTZ = 0 matnr = pxt_addi_as-matnr * SPERRMODUS = ' ' * STD_SPERRMODUS = ' ' * OUTPUT_NO_MESSAGE = importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.

WTAD_READ_ADDI_4_MATNR call function 'WTAD_READ_ADDI_4_MATNR' exporting matnr = pxt_addi_as-matnr * FLAG_ADDIPRASS_ALWAYS = 'X' * FLAG_ADDIPRASS_PROMO_ONLY = 'X' * FLAG_ADDIPRASS_PROMO_NEVER = 'X' * READ_FLAG = 'M' * READ_MAMT = ' ' * READ_VARIANTS = 'X' * AKTNR = * PROMO_DATE = * FI_SM_TRANSACTION = '000' * FI_PLANT = * FI_QUANTITY = * FI_UNIT_OF_MEASURE = * FI_ADDI_APPLICATION = '' * FI_SD_DOC = * FI_ITM_NUMBER = * FI_SD_DOC_CAT = * FI_SD_REF_COPY = tables iwtaddi = iwtaddi * IWTADDI_PR = * IMAMT = * IMARA = * FET_MATNRS_AND_QUANT = * FET_WTADAB = * FET_WTADABT = exceptions wrong_call = 1 db_error = 2 others = 3.

LISTING_CHECK call function 'LISTING_CHECK' exporting pi_article = pxt_addi_as-matnr pi_datab = sy-datum pi_datbi = sy-datum pi_filia = g_werks * PI_IGNORE_EXCL = ' ' * PI_VRKME = ' ' pi_no_ean_check = 'X' * PI_WLK1_READ = ' ' * PI_VKORG = ' ' * PI_VTWEG = ' ' * PI_LOCNR = ' ' * TABLES * PET_LIST_KOND = * PET_BEW_KOND = * PIT_VRKME = exceptions kond_not_found = 1 vrkme_not_found = 2 vkdat_not_found = 3 ass_owner_not_found = 4 others = 5.

MAKT_SINGLE_READ call function 'MAKT_SINGLE_READ' exporting * KZRFB = ' ' * MAXTZ = 0 matnr = px_wtad_as_edit-matnr spras = sy-langu importing wmakt = smakt exceptions wrong_call = 1 not_found = 2 others = 3.

MAKT_SINGLE_READ call function 'MAKT_SINGLE_READ' exporting * KZRFB = ' ' * MAXTZ = 0 matnr = px_wtad_as_edit-addimatnr spras = sy-langu importing wmakt = smakt exceptions wrong_call = 1 not_found = 2 others = 3.

WTAD_TWTFM_READ call function 'WTAD_TWTFM_READ' * EXPORTING * KZRFB = ' ' tables i_fb_twtfm = itwtfm exceptions not_found = 1 others = 2.

WTAD_CHECK_PLANT_IN_CLASS call function 'WTAD_CHECK_PLANT_IN_CLASS' exporting clint = pxt_wtaddi-addiclint * LOCNR = plant = pi_store * FLAG_RFB = ' ' importing flag = flag exceptions wrong_call = 1 others = 2.

WTAD_TWTFM_READ call function 'WTAD_TWTFM_READ' * EXPORTING * KZRFB = ' ' tables i_fb_twtfm = itwtfm exceptions not_found = 1 others = 2.

WTAD_READ_ADDI_4_MATNR call function 'WTAD_READ_ADDI_4_MATNR' exporting matnr = pi_addi_as-matnr * FLAG_ADDIPRASS_ALWAYS = 'X' * FLAG_ADDIPRASS_PROMO_ONLY = 'X' * FLAG_ADDIPRASS_PROMO_NEVER = 'X' * READ_FLAG = 'M' * READ_MAMT = ' ' read_variants = ' ' * AKTNR = * PROMO_DATE = * FI_SM_TRANSACTION = '000' * FI_PLANT = * FI_QUANTITY = * FI_UNIT_OF_MEASURE = * FI_ADDI_APPLICATION = '' * FI_SD_DOC = * FI_ITM_NUMBER = * FI_SD_DOC_CAT = * FI_SD_REF_COPY = tables iwtaddi = iwtaddi * IWTADDI_PR = * IMAMT = * IMARA = * FET_MATNRS_AND_QUANT = * FET_WTADAB = * FET_WTADABT = exceptions wrong_call = 1 db_error = 2 others = 3.

WTAD_CHECK_PLANT_IN_CLASS call function 'WTAD_CHECK_PLANT_IN_CLASS' exporting clint = iwtaddi-addiclint * LOCNR = plant = pi_store * FLAG_RFB = ' ' importing flag = flag exceptions wrong_call = 1 others = 2.

WTAD_MESSAGE_TYPE_DERIVE call function 'WTAD_MESSAGE_TYPE_DERIVE' exporting addi_matnr = iaddi_info-addimat * MAX_BUFFER_LINES = 10000 importing message_type = pet_addi_idoc_keys-mestyp * MATERIAL_GROUP = exceptions additional_is_no_material = 1 message_type_not_found = 2 others = 3.

HANDLE_FIRST_SCREEN_STORE_WB CALL FUNCTION 'HANDLE_FIRST_SCREEN_STORE_WB' * IMPORTING * FIELDS_FIRST_SCREEN = CHANGING P_STOREWB_EINSTIEG = storewb_parameters EXCEPTIONS NO_STORE_NUMBER = 1 STORE_NUMBER_NOT_VALID = 2 OTHERS = 3.

T001W_SINGLE_READ call function 'T001W_SINGLE_READ' exporting * KZRFB = ' ' t001w_werks = pe_werks importing wt001w = st001w exceptions not_found = 1 others = 2.

WTAD_TWTFM_READ call function 'WTAD_TWTFM_READ' * EXPORTING * KZRFB = ' ' tables i_fb_twtfm = itwtfm exceptions not_found = 1 others = 2.

WTAD_READ_ADDI_4_MATNR call function 'WTAD_READ_ADDI_4_MATNR' exporting matnr = pi_addi_as-matnr * FLAG_ADDIPRASS_ALWAYS = 'X' * FLAG_ADDIPRASS_PROMO_ONLY = 'X' * FLAG_ADDIPRASS_PROMO_NEVER = 'X' * READ_FLAG = 'M' read_mamt = 'X' read_variants = ' ' * AKTNR = * PROMO_DATE = * FI_SM_TRANSACTION = '000' * FI_PLANT = * FI_QUANTITY = * FI_UNIT_OF_MEASURE = * FI_ADDI_APPLICATION = '' * FI_SD_DOC = * FI_ITM_NUMBER = * FI_SD_DOC_CAT = * FI_SD_REF_COPY = tables iwtaddi = iwtaddi * IWTADDI_PR = imamt = imamt * IMARA = * FET_MATNRS_AND_QUANT = * FET_WTADAB = * FET_WTADABT = exceptions wrong_call = 1 db_error = 2 others = 3.

WTAD_CHECK_PLANT_IN_CLASS call function 'WTAD_CHECK_PLANT_IN_CLASS' exporting clint = iwtaddi-addiclint * LOCNR = plant = pi_werks * FLAG_RFB = ' ' importing flag = flag exceptions wrong_call = 1 others = 2.

WTAD_WTADDI_TO_ADDILIST call function 'WTAD_WTADDI_TO_ADDILIST' exporting pi_werks = pi_werks * PI_LOCNR = '' * PI_ADD_MAKT_DESCRIPTION = 'X' tables iwtaddi = iwtaddi * IWTADDI_PR = imamt = imamt iaddilist = pet_addi_info.

STOREWB_STORE_DATA_PROVIDE CALL FUNCTION 'STOREWB_STORE_DATA_PROVIDE' IMPORTING PE_T001W = L_T001W PE_RETURN1 = L_RETURN.

TVTA_SINGLE_READ





CALL FUNCTION 'TVTA_SINGLE_READ' EXPORTING I_VKORG = L_T001W-VKORG I_VTWEG = L_T001W-VTWEG I_SPART = L_T001W-SPART IMPORTING O_TVTA = L_TVTA EXCEPTIONS NOT_FOUND = 1 PARAMETER_ERROR = 2 OTHERS = 3.

WSRS_MSG_EXCEPTION_CATCH CALL FUNCTION 'WSRS_MSG_EXCEPTION_CATCH' EXPORTING PI_PROGRAM_CALLING = 'ADDI_STWB_REQUEST' CHANGING px_return = pe_return.

MVKE_SINGLE_READ CALL FUNCTION 'MVKE_SINGLE_READ' EXPORTING MATNR = PI_MATNR VKORG = L_TVTA-VKORG VTWEG = L_TVTA-VTWKU IMPORTING WMVKE = L_MVKE EXCEPTIONS LOCK_ON_MVKE = 1 LOCK_SYSTEM_ERROR = 2 WRONG_CALL = 3 NOT_FOUND = 4 OTHERS = 5.

WSRS_MSG_EXCEPTION_CATCH CALL FUNCTION 'WSRS_MSG_EXCEPTION_CATCH' EXPORTING PI_PROGRAM_CALLING = 'ADDI_STWB_REQUEST' CHANGING px_return = pe_return.



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