*&---------------------------------------------------------------------*
*& Report Z_MMERP101_CN
*&
*&---------------------------------------------------------------------*
*&Purpose: Interface for China Custom . IEDS UOM
*& Program will generate a UOM excel file
*&
*&ISSUE Date Author
*& 05-DEC-2007 Tom
*&---------------------------------------------------------------------*
REPORT z_mmcust101_cn MESSAGE-ID z_dev_custom_cn .
INCLUDE z_mmcust101_cn_top. "Global Data
INCLUDE zgeneralmsglog. " message log
*----------------------------------------------------------------------*
* S E L E C T I O N S C R E E N
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE text-T01.
SELECT-OPTIONS:
so_uom FOR t006-msehi.
PARAMETERS:p_file1 TYPE rlgrap-filename.
*RC - 2007.04.07 -->
* p_langu TYPE spras DEFAULT 'EN'.
PARAMETERS:p_langu TYPE spras MEMORY ID spr OBLIGATORY.
SELECTION-SCREEN END OF BLOCK bl1.
INCLUDE z_mmcust101_cn_f01.
INCLUDE z_mmcust101_cn_pbo.
INCLUDE z_mmcust101_cn_pai.
*----------------------------------------------------------------------*
* Initialization
*----------------------------------------------------------------------*
INITIALIZATION.
MOVE sy-repid TO gv_repid.
CONCATENATE 'C:/temp/ERP101_' sy-datum '.xls' INTO p_file1.
*----------------------------------------------------------------------*
* S T A R T - O F - S E L E C T I O N
*----------------------------------------------------------------------*
START-OF-SELECTION.
PERFORM select_data.
*RC 2008.04.01 --->
END-OF-SELECTION.
*&---------ALV DISPLAY DATA---------------------------------------------*
CALL SCREEN 100.
*& Report Z_MMERP101_CN
*&
*&---------------------------------------------------------------------*
*&Purpose: Interface for China Custom . IEDS UOM
*& Program will generate a UOM excel file
*&
*&ISSUE Date Author
*& 05-DEC-2007 Tom
*&---------------------------------------------------------------------*
REPORT z_mmcust101_cn MESSAGE-ID z_dev_custom_cn .
INCLUDE z_mmcust101_cn_top. "Global Data
INCLUDE zgeneralmsglog. " message log
*----------------------------------------------------------------------*
* S E L E C T I O N S C R E E N
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE text-T01.
SELECT-OPTIONS:
so_uom FOR t006-msehi.
PARAMETERS:p_file1 TYPE rlgrap-filename.
*RC - 2007.04.07 -->
* p_langu TYPE spras DEFAULT 'EN'.
PARAMETERS:p_langu TYPE spras MEMORY ID spr OBLIGATORY.
SELECTION-SCREEN END OF BLOCK bl1.
INCLUDE z_mmcust101_cn_f01.
INCLUDE z_mmcust101_cn_pbo.
INCLUDE z_mmcust101_cn_pai.
*----------------------------------------------------------------------*
* Initialization
*----------------------------------------------------------------------*
INITIALIZATION.
MOVE sy-repid TO gv_repid.
CONCATENATE 'C:/temp/ERP101_' sy-datum '.xls' INTO p_file1.
*----------------------------------------------------------------------*
* S T A R T - O F - S E L E C T I O N
*----------------------------------------------------------------------*
START-OF-SELECTION.
PERFORM select_data.
*RC 2008.04.01 --->
END-OF-SELECTION.
*&---------ALV DISPLAY DATA---------------------------------------------*
CALL SCREEN 100.