[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 : 20.08.2012 Time : 21:36:12 Local Date : 20.08.2012 Local Time : 23:36:12 Local Timezone : CET [Project Information] [Project Name ] : SAPLSMW [Project Text ] : Projects pre-packaged from SAPLSMW.com /SAPDMC/LSGPRO SAPLSMW C-KAUFFMAJ 20120820 /SAPDMC/LSGPROT ESAPLSMW Projects pre-packaged from SAPLSMW.com [Recordings] [Subproject Information] [Subproject ] : MATERIAL [Subproject Text ] : Material Master Functions /SAPDMC/LSGSUB SAPLSMW MATERIAL C-KAUFFMAJ 20120820 /SAPDMC/LSGSUBT ESAPLSMW MATERIAL Material Master Functions [Object Information] [Object ] : CLASSES [Object Text ] : Classes /SAPDMC/LSOTXT ESAPLSMW MATERIAL CLASSES Classes /SAPDMC/LSOATT SAPLSMW MATERIAL CLASSES 0101300001 00000000C-KAUFFMAJ X C-KAUFFMAJ 20120820 /SAPDMC/LSOSTR SAPLSMW MATERIAL CLASSES CL20H header 000101 00000000000000000000 /SAPDMC/LSOSTR SAPLSMW MATERIAL CLASSES CL20I Items CL20H 000202 00000000000000000000 /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20H CLASS 0003C 030 /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20H KLART 0002C 003KLART /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20H MATNR 0001C 018 /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I ATAWE 0007C 003Alternative unit /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I ATFLV 0006C 030Value from /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I ATNAM 0004C 030Characteristic Name /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I ATWRT 0005C 030Characteristic Value /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I CLASS 0003C 030 /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I KLART 0002C 003KLART /SAPDMC/LSOFLD SAPLSMW MATERIAL CLASSES CL20I MATNR 0001C 018Material /SAPDMC/LSOREL SAPLSMW MATERIAL CLASSES 0001BGR00 CL20H 20120816C-KAUFFMAJ /SAPDMC/LSOREL SAPLSMW MATERIAL CLASSES 0002BIKSSK CL20H 20120816C-KAUFFMAJ /SAPDMC/LSOREL SAPLSMW MATERIAL CLASSES 0003BIAUSP CL20I 20120816C-KAUFFMAJ /SAPDMC/LSOMAP SAPLSMW MATERIAL CLASSES 0002BIKSSK CLASS 0001CL20H CLASS C-KAUFFMAJ 20120820 /SAPDMC/LSOMAP SAPLSMW MATERIAL CLASSES 0002BIKSSK KLART 0001CL20H KLART C-KAUFFMAJ 20120820 /SAPDMC/LSOMAP SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0001CL20H MATNR C-KAUFFMAJ 20120820 /SAPDMC/LSOMAP SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0001CL20I ATNAM C-KAUFFMAJ 20120820 /SAPDMC/LSOMAP SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0001CL20I ATWRT C-KAUFFMAJ 20120820 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0000__BEGIN_OF_PROCESSING__ ACC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0000__END_OF_TRANSACTION__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ ACC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 GROUP DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 MANDT DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 NODATA DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 START DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 STYPE DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 USNAM DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 XKEEP DMC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0001BGR00 __END_OF_RECORD__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK CLASS ACC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK KLART MVC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK MAFID DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK ACC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK OBTAB COC-KAUFFMAJ 20120820 MARA 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK STATU COC-KAUFFMAJ 20120820 1 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK STDCL COC-KAUFFMAJ 20120820 X 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK STYPE DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK TCODE DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0002BIKSSK __END_OF_RECORD__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM ACC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT ACC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0003BIAUSP STYPE DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0003BIAUSP __BEGIN_OF_RECORD__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSORUL SAPLSMW MATERIAL CLASSES 0003BIAUSP __END_OF_RECORD__ DFC-KAUFFMAJ 20120820 00000000 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__BEGIN_OF_PROCESSING__ 0001if p_break eq 'X'. break-point. endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__END_OF_TRANSACTION__ 0001transfer_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0001data: cLastMATNR(18) type c, cOBJEK(18) type c, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0002 lMARA like MARA, lCABN like CABN, lKSSK like KSSK, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0003 lKLAH like KLAH, lINOB like INOB, lKSML like KSML, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0004 lCAWN like CAWN. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0005parameters: p_Update as checkbox, p_break as checkbox. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0006 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0007 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0008 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0009 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0010 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0011 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0012 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0013 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0014 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0015 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0016 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0017 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0018 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0019 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0020 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0021 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0022 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0023 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0024 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0025 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0000__GLOBAL_DATA__ 0026 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 GROUP 0001BGR00-GROUP = g_groupname. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 MANDT 0001BGR00-MANDT = SY-MANDT. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 NODATA 0001BGR00-NODATA = '/'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 START 0001BGR00-START = ''. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 STYPE 0001BGR00-STYPE = '0'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 USNAM 0001BGR00-USNAM = g_userid. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 XKEEP 0001BGR00-XKEEP = 'X'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 __BEGIN_OF_RECORD__ 0001BGR00 = INIT_BGR00. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 __END_OF_RECORD__ 0001at_first_transfer_record. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 __END_OF_RECORD__ 0002if g_cnt_transactions_group = 5000. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 __END_OF_RECORD__ 0003 g_cnt_transactions_group = 0. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 __END_OF_RECORD__ 0004 transfer_record. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0001BGR00 __END_OF_RECORD__ 0005endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK CLASS 0001 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK KLART 0001BIKSSK-KLART = CL20H-KLART. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK MAFID 0001BIKSSK-MAFID = 'O'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0001translate CL20H-CLASS to UPPER CASE. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0002if CL20H-MATNR co '1234567890 '. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0003 shift CL20H-MATNR right deleting trailing space. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0004 overlay CL20H-MATNR with '000000000000000000'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0005endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0006if cLastMATNR eq CL20H-MATNR. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0007 skip_transaction. "Only load each material once. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0008else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0009 select single * from KLAH into lKLAH C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0010 where CLASS eq CL20H-CLASS and KLART eq CL20H-KLART. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0011 if sy-subrc ne 0. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0012 write: / CL20H-MATNR, CL20H-KLART, CL20H-CLASS, 'Missing Class.'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0013 skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0014 else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0015 BIKSSK-CLASS = lKLAH-CLASS. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0016 select single * from MARA into lMARA where MATNR eq CL20H-MATNR. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0017 if sy-subrc ne 0. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0018 write: / CL20H-MATNR, CL20H-KLART, CL20H-CLASS, 'Not in MARA.'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0019 skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0020 else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0021 cOBJEK = CL20H-MATNR. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0022 select * from INOB into lINOB C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0023 where OBJEK eq CL20H-MATNR and KLART eq CL20H-KLART. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0024 cOBJEK = lINOB-CUOBJ. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0025 endselect. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0026 select * from KSSK into lKSSK C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0027 where KLART eq CL20H-KLART and OBJEK eq cOBJEK. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0028 select single * from KLAH into lKLAH where CLINT eq lKSSK-CLINT.C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0029 write: / CL20H-MATNR, CL20H-KLART, CL20H-CLASS, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0030 'Material already assigned class:', lKLAH-CLASS. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0031 if lKLAH-CLASS ne CL20H-CLASS. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0032 skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0033 else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0034 if p_update ne 'X'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0035 write: 'skipping.' color 7. skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0036 else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0037 write: 'updating.' color 3. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0038 BIKSSK-CLASS = ''. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0039 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0040 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0041 endselect. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0042 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0043 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0044 BIKSSK-OBJEK = CL20H-MATNR. cLastMATNR = CL20H-MATNR. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0045endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0046 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0047 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0048 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0049 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0050 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0051 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0052 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBJEK 0053 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK OBTAB 0001BIKSSK-OBTAB = 'MARA'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK STATU 0001BIKSSK-STATU = '1'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK STDCL 0001BIKSSK-STDCL = 'X'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK STYPE 0001BIKSSK-STYPE = '1'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK TCODE 0001BIKSSK-TCODE = 'CL20'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK __BEGIN_OF_RECORD__ 0001BIKSSK = INIT_BIKSSK. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0002BIKSSK __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0001*BIAUSP-ATNAM = CL20I-ATNAM. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0002condense CL20I-ATNAM no-gaps. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0003translate CL20I-ATNAM to UPPER CASE. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0004shift CL20I-ATNAM left deleting leading space. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0005select single * from CABN into lCABN where ATNAM eq CL20I-ATNAM. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0006if sy-subrc ne 0. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0007 write: / CL20H-MATNR, CL20H-KLART, CL20H-CLASS, CL20I-ATNAM, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0008 'Characteristic does not exist.'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0009 skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0010else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0011 select single * from KSML into lKSML C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0012 where CLINT eq lKLAH-CLINT C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0013 and KLART eq lKLAH-KLART C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0014 and IMERK eq lCABN-ATINN. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0015 if sy-subrc ne 0. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0016 write: / CL20H-MATNR, CL20H-KLART, CL20H-CLASS, CL20I-ATNAM, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0017 'Characteristic does not exist.'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0018 skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0019 else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0020 BIAUSP-ATNAM = lCABN-ATNAM. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0021 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0022endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0023 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0024 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0025 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0026 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0027 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0028 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0029 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0030 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0031 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0032 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0033 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0034 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATNAM 0035 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0001BIAUSP-ATWRT = CL20I-ATWRT. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0002select single * from CAWN into lCAWN where ATINN eq lCABN-ATINN. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0003if sy-subrc eq 0. "Has some fixed vales . . . C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0004 if lCABN-ATSON ne 'X'. "No additional values--must validate. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0005 if lCABN-ATERF ne 'X' and CL20I-ATWRT eq ''. "Blanks okay! C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0006* Do nothing. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0007 else. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0008 select single * from CAWN into lCAWN C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0009 where ATINN eq lCABN-ATINN and ATWRT eq CL20I-ATWRT. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0010 if sy-subrc ne 0. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0011 write: / CL20H-MATNR, CL20H-KLART, CL20H-CLASS, CL20I-ATNAM, C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0012 'Characteristic value invalid:', CL20I-ATWRT. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0013 skip_transaction. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0014 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0015 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0016 endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0017endif. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP ATWRT 0018 C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP STYPE 0001BIAUSP-STYPE = '2'. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP __BEGIN_OF_RECORD__ 0001BIAUSP = INIT_BIAUSP. C-KAUFFMAJ 20120820 /SAPDMC/LSOCOD SAPLSMW MATERIAL CLASSES 0003BIAUSP __END_OF_RECORD__ 0001transfer_record. C-KAUFFMAJ 20120820 /SAPDMC/LSOFIL SAPLSMW MATERIAL CLASSES SAPLSMW_MATERIAL_CLASSES.lsmw.read SAPLSMW_MATERIAL_CLASSES.lsmw.conv LSMW_LOGICAL_PATH CLASSES.LSMW.CONV /SAPDMC/LSOINP SAPLSMW MATERIAL CLASSES 0001FEC:\saplsmw\class.txt Header 0000X 000000 X X X /SAPDMC/LSOINP SAPLSMW MATERIAL CLASSES 0002FEC:\saplsmw\class.txT items 0000X 000000 X X X /SAPDMC/LSOINS SAPLSMW MATERIAL CLASSES CL20H 0001 /SAPDMC/LSOINS SAPLSMW MATERIAL CLASSES CL20I 0002 /SAPDMC/LSOPAR SAPLSMW MATERIAL CLASSES FROMLINE_CONV 0000000000 /SAPDMC/LSOPAR SAPLSMW MATERIAL CLASSES TOLINE_CONV 0000000000 /SAPDMC/LSOPAR SAPLSMW MATERIAL CLASSES C-CHAUGHTS WILDCARDVALUE /SAPDMC/LSOPAR SAPLSMW MATERIAL CLASSES C-KAUFFMAJ WILDCARDVALUE [Subproject Information] [Subproject ] : ROUTING [Subproject Text ] : Routings /SAPDMC/LSGSUB SAPLSMW ROUTING C-KAUFFMAJ 20120820 /SAPDMC/LSGSUBT ESAPLSMW ROUTING Routings [Documentation ]