[Legacy System Migration Workbench] LSMW Version Number : 4.0.0 LSMW Version Date : 31.08.2004 R/3 Installation Number : 0020293837 R/3 System Id : ECD R/3 Release : 701 R/3 Client : 200 R/3 Operating System : Windows NT R/3 Database System : MSSQL R/3 Hostname : ECCDEV User Id : C-KAUFFMAJ Date : 05.02.2013 Time : 14:13:38 Local Date : 05.02.2013 Local Time : 15:13:38 Local Timezone : CET [Project Information] [Project Name ] : SAPLSMW [Project Text ] : Development project for SAPLSMW.com /SAPDMC/LSGPRO SAPLSMW C-KAUFFMAJ 20130205 /SAPDMC/LSGPROT ESAPLSMW Development project for SAPLSMW.com [Recordings] [Subproject Information] [Subproject ] : MATERIAL [Subproject Text ] : Material Master Functions /SAPDMC/LSGSUB SAPLSMW MATERIAL C-KAUFFMAJ 20130205 /SAPDMC/LSGSUBT ESAPLSMW MATERIAL Material Master Functions [Object Information] [Object ] : MM02_MASS [Object Text ] : Touch a specified field using the MM02 Transaction. /SAPDMC/LSOTXT ESAPLSMW MATERIAL MM02_MASS Touch a specified field using the MM02 Transaction. /SAPDMC/LSOATT SAPLSMW MATERIAL MM02_MASS 0100200000 00000000SAPLSMW.COM X C-KAUFFMAJ 20130205 /SAPDMC/LSOSTR SAPLSMW MATERIAL MM02_MASS MM02S Source Structure 000101 00000000000000000000 /SAPDMC/LSOFLD SAPLSMW MATERIAL MM02_MASS MM02S DUMMY 0001C 001Dummy /SAPDMC/LSOREL SAPLSMW MATERIAL MM02_MASS 0001BGR00 MM02S 20130203C-KAUFFMAJ /SAPDMC/LSOREL SAPLSMW MATERIAL MM02_MASS 0002BMM00 MM02S 20130203C-KAUFFMAJ /SAPDMC/LSOREL SAPLSMW MATERIAL MM02_MASS 0003BMMH1 MM02S 20130203C-KAUFFMAJ /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000ADR_LSM __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000ADR_LSM __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_PROCESSING__ ACC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ ACC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000__END_OF_TRANSACTION__ DMC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ ACC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ ACC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 GROUP DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 MANDT DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 NODATA DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 START DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 STYPE DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 USNAM DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 XKEEP DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0001BGR00 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0002BMM00 STYPE DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0002BMM00 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0002BMM00 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0003BMMH1 STYPE DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0003BMMH1 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0003BMMH1 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0004BMMH2 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0004BMMH2 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0005BMMH3 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0005BMMH3 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0006BMMH4 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0006BMMH4 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0007BMMH5 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0007BMMH5 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0008BMMH6 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0008BMMH6 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0009BMMH7 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0009BMMH7 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0010BMMH8 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL MM02_MASS 0010BMMH8 __END_OF_RECORD__ DFC-KAUFFMAJ 20130204 00000000 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000ADR_LSM __BEGIN_OF_RECORD__ 0001ADR_LSM = INIT_ADR_LSM. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000ADR_LSM __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_PROCESSING__ 0001if p_break eq 'X'. break-point. endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0001if s_WERKS is initial. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0002 select * from MARA into table it_MARA where MATNR in s_MATNR. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0003else. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0004 select MATNR from MARC into wa_MARA-MATNR C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0005 where MATNR in s_MATNR and WERKS in s_WERKS. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0006 append wa_MARA to it_MARA. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0007 endselect. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0008endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0009if p_Screen eq ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0010 write: / 'No screen selected.' color col_negative. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0011elseif p_Field eq ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0012 write: / 'No field specified.' color col_negative. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0013else. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0014 select single * from T133A into wa_T133A C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0015 where BILDS eq p_Screen+0(2) and AUSWG eq p_Screen+2(2). C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0016 perform bdc_open_group using 'MM02_MASS'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0017 loop at it_MARA into wa_MARA. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0018 " Pick the material. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0019 perform bdc_dynpro using 'SAPLMGMM' '0060'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0020 perform bdc_field using 'BDC_OKCODE' 'ENTR'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0021 perform bdc_field using 'RMMG1-MATNR' wa_MARA-MATNR. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0022 " Select basic view C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0023 perform bdc_dynpro using 'SAPLMGMM' '0070'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0024 perform bdc_field using 'BDC_OKCODE' 'ENTR'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0025 perform bdc_field using 'MSICHTAUSW-KZSEL(01)' 'X'. "Basic view C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0026 " Select the desired screen C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0027 perform bdc_dynpro using 'SAPLMGMM' '4004'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0028 perform bdc_field using 'BDC_OKCODE' wa_T133A-GUIFU. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0029 if wa_T133A-GUIFU ne 'SP01' and wa_T133A-GUIFU ne 'SP02'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0030 "This is not a basic view and there may be Oganizational Levels. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0031 perform bdc_dynpro using 'SAPLMGMM' '0081'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0032 perform bdc_field using 'BDC_OKCODE' 'ENTR'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0033 if p_WERKS ne ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0034 perform bdc_field using 'RMMG1-WERKS' p_WERKS. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0035 endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0036 if p_LGORT ne ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0037 perform bdc_field using 'RMMG1-LGORT' p_LGORT. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0038 endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0039 if p_VKORG ne ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0040 perform bdc_field using 'RMMG1-VKORG' p_VKORG. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0041 endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0042 if p_VTWEG ne ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0043 perform bdc_field using 'RMMG1-VTWEG' p_VTWEG. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0044 endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0045 endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0046 " Find the correct screen number (DYPNO). C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0047 perform bdc_dynpro using 'SAPLMGMM' wa_T133A-DYPNO. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0048 perform bdc_field using 'BDC_OKCODE' 'BU'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0049 perform bdc_field using p_Field p_Value. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0050 perform bdc_insert using 'MM02'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0051 endloop. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0052 perform close_batch_Input. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__BEGIN_OF_TRANSACTION__ 0053endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__END_OF_TRANSACTION__ 0001skip_transaction. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__END_OF_TRANSACTION__ 0002transfer_transaction. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0001************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0002*- BDC OPEN C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0003************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0004FORM bdc_open_group using p_1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0005 CALL FUNCTION 'BDC_OPEN_GROUP' C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0006 EXPORTING C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0007 CLIENT = SY-MANDT C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0008 GROUP = p_1 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0009 KEEP = 'X' C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0010 USER = SY-UNAME. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0011ENDFORM. "bdc_open_group C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0012************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0013*- BDC CLOSE C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0014************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0015FORM close_batch_input. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0016 CALL FUNCTION 'BDC_CLOSE_GROUP'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0017ENDFORM. "close_batch_input C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0018************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0019*-BDC DYNPRO C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0020************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0021FORM bdc_dynpro using p_1 p_2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0022 itbdc-program = p_1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0023 itbdc-dynpro = p_2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0024 itbdc-dynbegin = 'X'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0025 append itbdc. clear itbdc. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0026ENDFORM. "bdc_dynpro C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0027************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0028*- BDC FIELD C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0029************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0030FORM bdc_field using p_1 p_2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0031 itbdc-fnam = p_1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0032 itbdc-fval = p_2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0033 append itbdc. clear itbdc. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0034ENDFORM. "bdc_field C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0035************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0036*- BDC INSERT C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0037************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0038FORM bdc_insert using p_1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0039 CALL FUNCTION 'BDC_INSERT' C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0040 EXPORTING C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0041 tcode = p_1 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0042 TABLES C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0043 dynprotab = itbdc. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0044ENDFORM. "bdc_insert C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0045************************************************************************C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0046 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0047 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0048 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0049 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0050 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__FORM_ROUTINES__ 0051 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0001data: C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0002 wa_T133B like T133B, wa_T133A like T133A, C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0003 it_MARA type standard table of MARA initial size 0, C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0004 wa_MARA like MARA. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0005TYPE-POOLS: VRM. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0006DATA: NAME TYPE VRM_ID, C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0007 LIST TYPE VRM_VALUES, C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0008 VALUE LIKE LINE OF LIST. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0009tables: mara, marc. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0010selection-screen begin of block block1 with frame title bTitle1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0011SELECT-OPTIONS : C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0012 s_MATNR for MARA-MATNR, C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0013 s_WERKS for MARC-WERKS. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0014selection-screen end of block block1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0015selection-screen begin of block block3 with frame title bTitle3. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0016 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0017 selection-screen comment 1(12) cWERKS. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0018 parameters: p_WERKS like MARC-WERKS. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0019 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0020 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0021 selection-screen comment 1(12) cLGORT. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0022 parameters: p_LGORT like MARD-LGORT. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0023 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0024 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0025 selection-screen comment 1(12) cVKORG. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0026 parameters: p_VKORG like MABW-VKORG. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0027 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0028 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0029 selection-screen comment 1(12) cVTWEG. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0030 parameters: p_VTWEG like MABW-VTWEG. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0031 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0032selection-screen end of block block3. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0033selection-screen begin of block block2 with frame title bTitle2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0034 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0035 selection-screen comment 1(12) cScreen. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0036 parameters: p_Screen(30) as listbox visible length 50. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0037 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0038 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0039 selection-screen comment 1(12) cField. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0040 parameters: p_Field(30) type c. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0041 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0042 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0043 selection-screen comment 1(12) cValue. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0044 parameters: p_Value(50) type c. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0045 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0046selection-screen end of block block2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0047selection-screen begin of block block4 with frame title bTitle4. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0048 selection-screen begin of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0049 parameters: p_Break as checkbox. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0050 selection-screen comment 3(60) cBreak. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0051 selection-screen end of line. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0052selection-screen end of block block4. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0053AT SELECTION-SCREEN OUTPUT. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0054 select * from T133A into wa_T133A C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0055 where BILDS eq 'Z1' and GUIST eq 'DATE00'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0056 select * from T133B into wa_T133B C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0057 where BILDS eq wa_T133A-BILDS and AUSWG eq wa_T133A-AUSWG C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0058 and SPRAS eq sy-langu. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0059 concatenate wa_T133A-BILDS wa_T133A-AUSWG into VALUE-KEY. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0060 VALUE-TEXT = wa_T133B-DYTXT. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0061 APPEND VALUE TO LIST. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0062 endselect. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0063 endselect. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0064 NAME = 'P_SCREEN'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0065 CALL FUNCTION 'VRM_SET_VALUES' C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0066 EXPORTING C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0067 ID = NAME C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0068 VALUES = LIST. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0069Initialization. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0070bTitle1 = 'Select the materials to be updated.'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0071bTitle2 = 'Select the screen and field to be updated.'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0072bTitle3 = 'Fields on the "Organizational Levels" screen.'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0073bTitle4 = 'Troubleshooting tools.'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0074cScreen = 'Screen:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0075cField = 'Field:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0076cValue = 'Value:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0077cWERKS = 'WERKS:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0078cLGORT = 'LGORT:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0079cVKORG = 'VKORG:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0080cVTWEG = 'VTWEG:'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0081cBreak = 'Launch debugger.'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0082data: begin of itbdc occurs 1000. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0083 include structure bdcdata. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0084data: end of itbdc. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0085 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0086 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0087 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0000__GLOBAL_DATA__ 0088 C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 GROUP 0001BGR00-GROUP = g_groupname. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 MANDT 0001BGR00-MANDT = SY-MANDT. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 NODATA 0001BGR00-NODATA = '/'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 START 0001BGR00-START = ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 STYPE 0001BGR00-STYPE = '0'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 USNAM 0001BGR00-USNAM = g_userid. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 XKEEP 0001BGR00-XKEEP = ''. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 __BEGIN_OF_RECORD__ 0001BGR00 = INIT_BGR00. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 __END_OF_RECORD__ 0001at_first_transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 __END_OF_RECORD__ 0002if g_cnt_transactions_group = 5000. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 __END_OF_RECORD__ 0003 g_cnt_transactions_group = 0. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 __END_OF_RECORD__ 0004 transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0001BGR00 __END_OF_RECORD__ 0005endif. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0002BMM00 STYPE 0001BMM00-STYPE = '1'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0002BMM00 __BEGIN_OF_RECORD__ 0001BMM00 = INIT_BMM00. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0002BMM00 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0003BMMH1 STYPE 0001BMMH1-STYPE = '2'. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0003BMMH1 __BEGIN_OF_RECORD__ 0001BMMH1 = INIT_BMMH1. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0003BMMH1 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0004BMMH2 __BEGIN_OF_RECORD__ 0001BMMH2 = INIT_BMMH2. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0004BMMH2 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0005BMMH3 __BEGIN_OF_RECORD__ 0001BMMH3 = INIT_BMMH3. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0005BMMH3 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0006BMMH4 __BEGIN_OF_RECORD__ 0001BMMH4 = INIT_BMMH4. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0006BMMH4 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0007BMMH5 __BEGIN_OF_RECORD__ 0001BMMH5 = INIT_BMMH5. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0007BMMH5 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0008BMMH6 __BEGIN_OF_RECORD__ 0001BMMH6 = INIT_BMMH6. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0008BMMH6 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0009BMMH7 __BEGIN_OF_RECORD__ 0001BMMH7 = INIT_BMMH7. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0009BMMH7 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0010BMMH8 __BEGIN_OF_RECORD__ 0001BMMH8 = INIT_BMMH8. C-KAUFFMAJ 20130204 /SAPDMC/LSOCOD SAPLSMW MATERIAL MM02_MASS 0010BMMH8 __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20130204 /SAPDMC/LSOFIL SAPLSMW MATERIAL MM02_MASS /SAPDMC/LSOINP SAPLSMW MATERIAL MM02_MASS 0001FEc:\temp\dummy.txt Dummy 0000X 000000 XX X /SAPDMC/LSOINS SAPLSMW MATERIAL MM02_MASS MM02S 0001 [Subproject Information] [Subproject ] : ROUTING [Subproject Text ] : Routings /SAPDMC/LSGSUB SAPLSMW ROUTING C-KAUFFMAJ 20130205 /SAPDMC/LSGSUBT ESAPLSMW ROUTING Routings [Subproject Information] [Subproject ] : WORK_CENTER [Subproject Text ] : Create Work Center /SAPDMC/LSGSUB SAPLSMW WORK_CENTER C-KAUFFMAJ 20130205 /SAPDMC/LSGSUBT ESAPLSMW WORK_CENTER Create Work Center [Documentation ]