Copy of Master Characterstics

Hi experts
How to Copy the Master Characterstics in one plant from other Plant.
We want to just copy whole Master Characterstics from One Plant to Others within diferent Company Code.
Rgds
Pankaj Agarwal

Why are you copying them?
You can just use them in the new plant without having to copy them. Unless you have a real business reason there is no need to have to copy them over.
In fact, we discourage making multiple copies in multiple plants since if you in the future want to use batch management, you can only link a general characteristic to one MIC.
FF

Similar Messages

How to add a role so user can do Export, Copy & paste Master Data?

How to add a role so user can do Export, Copy & paste Master Data? Thanks!

Add S_GUI to the user role.

Copy single master page from one document to another?

The answer to a previously posted question seems to involve creating a document differently (than I had). A lot of work went into the creation of the master pages in the original document which I will now need to recreate in the new document. Is there a way I can copy one master page from one document to another?
Many thanks,
Theresa

There are a number of ways to do this.
Create a copy of the document you want to copy the Master page from. Delete all pages except for the one you want (but you have to leave Right and Left alone as FM must always have these two pages available).
Open the new document and the one that you want to import the master pages from.
In the new document:
Import from Document: (select the document with the Master Page that you want)
then
File > Import > Formats
and select Page Layouts only.
Note that Right/Left always come along for the ride.
Alternative and probably best way to get a single Master Page:
In new document, add a new Master Page and select "Empty".
In the old document, on the desired Master Page, Select All on page (ctrl+A) and then copy (ctrl+v).
In the new document on the new master page, paste (ctrl+v) to add the layout. Note: you may need to rotate the page first if it isn't in the same orientation as in the old document.

Can I copy a Master Page from one document to another?

Hi - this might be a basic question, but I haven't figured out the answer yet. I have one .muse site with a Master Page that I used... I want to use that same Master Page on another .muse site that I'm working on. Is there a way I can copy the Master Page from the finished site into the other one that I'm working on?? Any help is appreciated.
Thanks,
Blair

Hi Blair,
You should be able to do this by simply selecting (Ctrl+A) and copying (Ctrl+C) all content of the Master page of Site1 and Paste in Place (Ctrl+Alt+Shift+V) in the Master page of Site2.
Thanks,
Vinayak

Copy only master data

Dear All,
Is it possible to copy only master data using TDMS Client Cpoy.
In TDMS there is a pack called ERP Initial Pack for Master data & Customizing, but is there any chance to copy only Master Data by skipping Customizing.
Regards,
Raja Ram

Hi Raja,
seems to me that this is a complete other question.
For details concerning HCM I suggest you to look into the operations guide on
Links, Documents, Support Pack Schedule
Regards,
Eddy

Client Copy: copy only master data

Hi!
Is it possible to copy only master data from e.g. client 100 to client 200?
If yes, which technical steps are necessary (tcode, etc.)?
Client 100 is the copy of client 200 without master data.
Thank you,
regards
Thom

You can Copy all the customizing data from one client to another client using clent copy(SCC1). Ie, data stored in a customizing request.

Client Copy "only" Master data

Hi,
How can i copy only master data from a client ?
Thank's

Hello Eduardo,
Client copy of master data alone maynot possible. I mean even if you use SAP_APPL even then transactional data will also get migrated. So I would suggest of sending the data through ALE (idocs).
We do it on large scale regularily.
But still please wait for opinion from others. May be they might have a better solution.
Regards.
Ruchit Khushu.

Set copy as master on LOT of photos - LC5.2

Hello everyone!
I switched from LR4 yesterday and I'm confused with "set copy as master" action. I have a lot of virtual copies (about 200) and I want all of them become masters. Photo -> Set copy as master works only on one photo from selection each time pressed. As I remember in LR4 it worked on all selected photos. Is it possible to make them all masters without clicking it 200 times?
If it helps, I'll describe situation: I picked 200 photos, created VCs, converted all of them to B&W. And now I like bw more and want to delete old masters. But it will delete all copies as well. I want to swtich masters with copies and delete copies. Help anybody?

I think - can't verlfy just now, sorry, please check and test carefully, backup everything, check again - that when you "remove" an image with master status from the catalog, where there also exists a VC as well, that this VC automatically changes its status to being a master. LR wil AFAIK not permit there to be only VCs, but no master, against a given file on disk. If there are several VCs present, only one of them will perform this feat, of course.
So if you do want to get rid of the current master version altogether, that might be a quick method.
If you don't want to get rid of the current master versions, it may still be possible. You could export just these masters as a separate (temporary) Catalog; then remove them from the current catalog (as above) causing the current VCs to change their status. Then Import From (temporary) Catalog back again; at which point IIRC Lightroom detects the "clash" of more than one image trying to refer to the same file, and IIRC offers to resolve that via VCs, as one of the options presented.
RP

Price update from Original Material to copied Material Master

I have a scenario,
We are selling Raw materials to outside companies who have shortage of materials on Loan Basis. Once they have materials, they will return the materials within a time period. If they don't have the materials and unable to return within the said time, they will make the payment.
We will follow the normal sales process to sell the item to the customer.
1. creating sales order,
2. Outbound Delivery, and
3. Billing
Return process when receiving the materials from the company.
1. Billing Cancellation
2. PGI Cancellation
Since this is not an actual sale, hence we need to maintain selling price same as the purchase price.
We are planning to extend the Raw Materials to Sales View in the material master. However, we came to know that this will be Violation of Act. Hence we are planning to create a new material by copying the existing Raw Material master but the Material type will be Issue on Loan. This material will have sales view and purchase view.
This material will have a separate Valuation Class. Price control indicator will be V, since the item should be valuated at Purchase Price and the purchase price will keep changing as and when the price changes. This moving average price will be used as selling price.
The same price needs to be updated in the Sales Order automatically from the Loan Material Master when selling the Loan Material.
Now, the problem we are facing is, if we create a new Loan Material by copying Raw Material master with ROH material type, how will the price update in New Loan Material since, we will not purchase the Loan Material. We are purchasing the original item as raw material. Hence, this will not update the Loan Material Price automatically and the price will remain unchanged.
Please suggest a work around?

Hi,
Let me explain to you how I am proceeding.
Step 1:
Create new material master by copying existing Raw Material with Issue on Loan material type. I am assigning a new Valuation Class in this material master. Also, we keep the pricing
Step 2:
Transfer stock from old material to new material in MB1B with movement type 309.
Step 3: Issue of Loan Material to Customer on loan basis.
Creating Sales Order, PGI and Billing
Step 4: Receipt of Item back from Customer
Sales Return process.
Step 5: In case Customer does not return goods, then we will collect payment from them
In the entire process we need to maintain the selling price at purchase price of the original material. Can you suggest any work around, in case this process is not advisable.

Copy materail master only on selected fields

Hi guru,
I am exploring the possibility on copying exisitng materail master ( when createing a new matearil master ), only copy certain fields as deseired. Does anyone know if it's possible and where to do the config.
Thanks

Share your findings.
Thanks,
Anil

FM to copy material master data

Hi there
I am looking for an FM where i can copy existing material master data to a new one. In my case the material is a material variant and therefore i also want to copy the characteritic values of this variant. While copying i want to change some of the characeristic values of my oroginal material master, so that the only difference to the new material variant are characteritic values. All other date (sales, plant and so on) can be the same
Regards
Markus

If you want to copy the properties of material A to material B
first copy the FM
goto se37>Press cntrl+f5>enter the from and to FM and FG and press ok.
BAPI to Copy Materials from one Plant to Another
http://www.sap-img.com/abap/bapi-to-copy-materials-from-one-plant-to-another.htm
regards,
srinivas
*reward for useful answers*

Copy Material Master Record -- All Answers will be rewarded

Hello All,
I need to copy the set of materials from one plant to another plant.
Say I need to copy Materials from plant 1123 to 1128.
Say some 10000 materials approximately.
one way is to create using MM01 with the reference Material. However this is not possible as different material numbers can have different Views.
Is there a smart way to do this.
Please let me know Marting...I will Reward all Answers
Regards
Marting

try this sample program in which it will copy one material to another material it will work
REPORT ZM_MAT_EXT_TO_PLANT
 NO STANDARD PAGE HEADING
 LINE-SIZE 255
 MESSAGE-ID ZI.
Program : ZM_MAT_EXT_TO_PLANT *
Author : warun kumar todimala P *
Type : Extend Material from one plant to another using BDC *
Description : The program will use BDC CALL TRANSACTION to extend *
 material from one plant to another plant. If error *
 occurs, an error session will be created with name *
 given on selection screen. So that it can be manually *
 processed using SM35 *
TCODE used : MM01 - Create Material *
SAP Request : D51K912730 *
Date : 13SEP2006 *
C H A N G E L O G *
Date | Req No | Initial | Description
14SEP06 D51K912772 Plant validation from T001W *
 Warehouse view validation *
18SEP06 D51K912817 Change for xl file *
 Tables Declaration
TABLES: MARA, "General Material Data
 MARC, "Plant Data for Material
 MVKE, "Sales Data for Material
 MBEW, "Material Valuation
 MARD, "Storage Location Data for Material
 MAKT, "Material Descriptions
 T100, "Messages
 T130M, "Transaction control parameters: mat. master maintenance
 MLGN. "Material Data for Each Warehouse Number
Internal table declaration
*--Internal table for Sales data for material
DATA: BEGIN OF INT_MVKE OCCURS 0,
 MATNR LIKE MVKE-MATNR,
 VKORG LIKE MVKE-VKORG,
 VTWEG LIKE MVKE-VTWEG,
 VMSTA LIKE MVKE-VMSTA,
 VMSTD LIKE MVKE-VMSTD,
 DWERK LIKE MVKE-DWERK,
 KONDM LIKE MVKE-KONDM,
 PRODH LIKE MVKE-PRODH,
 MTPOS LIKE MVKE-MTPOS,
 END OF INT_MVKE.
*--Internal table for material if input file is given
TYPES: BEGIN OF T_MAT,
 MATNR LIKE MATERIALID-MATNR_EXT,
 SLGORT LIKE MARD-LGORT,
 TLGORT LIKE MARD-LGORT,
 END OF T_MAT.
TYPES: BEGIN OF T_VALID_MAT,
 MATNR LIKE MATERIALID-MATNR_EXT,
 END OF T_VALID_MAT.
DATA: BEGIN OF IT_RMAT OCCURS 0,
 MATNR LIKE MARA-MATNR,
 TLGORT LIKE MARD-LGORT,
 SLGORT LIKE MARD-LGORT,
 END OF IT_RMAT.
*--Warehouse data
DATA: BEGIN OF INT_WAREH OCCURS 0,
 MATNR LIKE MLGN-MATNR,
 LGNUM LIKE MLGN-LGNUM,
 LTKZA LIKE MLGN-LTKZA,
 LTKZE LIKE MLGN-LTKZE,
 LGBKZ LIKE MLGN-LGBKZ,
 END OF INT_WAREH.
*--Marked for deletion
TYPES: BEGIN OF T_MAR_DEL,
 MATNR LIKE MARA-MATNR,
 LVORM LIKE MARA-LVORM,
 END OF T_MAR_DEL.
*--Range for material FOR input file in
in internal format
RANGES: R_MATNR FOR MARA-MATNR.
*--Internal table for Material Valuation
DATA: BEGIN OF INT_MBEW OCCURS 0,
 MATNR LIKE MBEW-MATNR,
 VPRSV LIKE MBEW-VPRSV,
 STPRS LIKE MBEW-STPRS,
 BKLAS LIKE MBEW-BKLAS,
 ZPLD1 LIKE MBEW-ZPLD1,
 ZPLD2 LIKE MBEW-ZPLD2,
 END OF INT_MBEW.
*--Types for inal internal table contains all the data used to extend
*--the material(s)
TYPES: BEGIN OF T_FINAL,
 MATNR LIKE MARA-MATNR,
 MTART LIKE MARA-MTART,
 VPSTA LIKE MARA-VPSTA,
 MBRSH LIKE MARA-MBRSH,
 MEINS LIKE MARA-MEINS,
 MATKL LIKE MARA-MATKL,
 GEWEI LIKE MARA-GEWEI,
 RAUBE LIKE MARA-RAUBE,
 SPART LIKE MARA-SPART,
 PRDHA LIKE MARA-PRDHA,
 MAGRV LIKE MARA-MAGRV,
 WERKS LIKE MARC-WERKS,
 PSTAT LIKE MARC-PSTAT,
 PLIFZ LIKE MARC-PLIFZ,
 SSQSS LIKE MARC-SSQSS,
 LADGR LIKE MARC-LADGR,
 SERNP LIKE MARC-SERNP,
 PERIV LIKE MARC-PERIV,
 STAWN LIKE MARC-STAWN,
 HERKL LIKE MARC-HERKL,
 EKGRP LIKE MARC-EKGRP,
 DISMM LIKE MARC-DISMM,
 DISPO LIKE MARC-DISPO,
 DISLS LIKE MARC-DISLS,
 LGPRO LIKE MARC-LGPRO,
 FHORI LIKE MARC-FHORI,
 DZEIT LIKE MARC-DZEIT,
 BWSCL LIKE MARC-BWSCL,
 AWSLS LIKE MARC-AWSLS,
 LGFSB LIKE MARC-LGFSB,
 MAKTX LIKE MAKT-MAKTX,
 TLGORT LIKE MARD-LGORT,
 SLGORT LIKE MARD-LGORT,
 VKORG LIKE MVKE-VKORG,
 VTWEG LIKE MVKE-VTWEG,
 VMSTA LIKE MVKE-VMSTA,
 VMSTD LIKE MVKE-VMSTD,
 DWERK LIKE MVKE-DWERK,
 KONDM LIKE MVKE-KONDM,
 PRODH LIKE MVKE-PRODH,
 MTPOS LIKE MVKE-MTPOS,
 VPRSV LIKE MBEW-VPRSV,
 STPRS LIKE MBEW-STPRS,
 BKLAS LIKE MBEW-BKLAS,
 ZPLD1 LIKE MBEW-ZPLD1,
 ZPLD2 LIKE MBEW-ZPLD2,
 LGNUM LIKE MLGN-LGNUM,
 LTKZA LIKE MLGN-LTKZA,
 LTKZE LIKE MLGN-LTKZE,
 LGBKZ LIKE MLGN-LGBKZ,
 END OF T_FINAL.
TYPES: BEGIN OF T_LOG,
 MATNR LIKE MATERIALID-MATNR_EXT,
 MTART LIKE MARA-MTART,
 WERKS LIKE MARC-WERKS,
 MSG(480),
 MSGTYP TYPE C,
 END OF T_LOG.
TYPES: BEGIN OF T_INVALID,
 MATNR LIKE MATERIALID-MATNR_EXT,
 WERKS LIKE MARC-WERKS,
 MSG(100),
 END OF T_INVALID.
*--Internal to for mateial descriptions
*DATA: BEGIN OF INT_MAT_DES OCCURS 0,
 MATNR LIKE MAKT-MATNR,
 MAKTX LIKE MAKT-MAKTX,
 END OF INT_MAT_DES.
DATA: BEGIN OF IT_FINAL1 OCCURS 0,
 MATNR LIKE MATERIALID-MATNR_EXT,
 MTART LIKE MARA-MTART,
 MBRSH LIKE MARA-MBRSH,
 WERKS LIKE MARC-WERKS,
 PSTAT LIKE MARC-PSTAT,
 LGPRO LIKE MARC-LGPRO,
 LGFSB LIKE MARC-LGFSB,
 TLGORT LIKE MARD-LGORT,
 SLGORT LIKE MARD-LGORT,
 END OF IT_FINAL1.
*--Internal table for Storage Location Data
DATA : BEGIN OF INT_MARD OCCURS 0,
 MATNR LIKE MARD-MATNR,
 WERKS LIKE MARD-WERKS,
 LGORT LIKE MARD-LGORT,
 END OF INT_MARD.
*--For Views
TYPES: BEGIN OF T_XBILDTAB.
 INCLUDE STRUCTURE MBILDTAB.
TYPES: END OF T_XBILDTAB.
*--Internal table for VIEWS
DATA: IT_XBILDTAB TYPE STANDARD TABLE OF T_XBILDTAB WITH HEADER LINE.
*--Final internal table contains all the data used to extend the
material(s)
DATA: IT_FINAL TYPE STANDARD TABLE OF T_FINAL WITH HEADER LINE,
 IT_TPLANT TYPE STANDARD TABLE OF T_FINAL WITH HEADER LINE,
 int_fplant TYPE STANDARD TABLE OF t_final WITH HEADER LINE,
 IT_TOTAL TYPE STANDARD TABLE OF T_FINAL WITH HEADER LINE,
 WA_FINAL TYPE T_FINAL,
 WA_TPLANT TYPE T_FINAL,
 INT_TEST TYPE STANDARD TABLE OF T_FINAL WITH HEADER LINE,
 WA_T130M LIKE T130M,
*--table for bdcdata to store the bdc data
 IT_BDCDATA TYPE STANDARD TABLE OF BDCDATA WITH HEADER LINE,
*--table for messages come from the 'CALL TRANSACTION'
 IT_MESSTAB LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE,
 IT_SREP TYPE STANDARD TABLE OF T_LOG WITH HEADER LINE,
 IT_EREP TYPE STANDARD TABLE OF T_LOG WITH HEADER LINE,
 IT_AVL TYPE STANDARD TABLE OF T_LOG WITH HEADER LINE,
 IT_ERR TYPE STANDARD TABLE OF T_LOG WITH HEADER LINE,
 IT_DUPREC TYPE STANDARD TABLE OF T_MAT WITH HEADER LINE,
 IT_MAT TYPE STANDARD TABLE OF T_MAT WITH HEADER LINE,
 IT_MAT1 TYPE STANDARD TABLE OF T_MAT WITH HEADER LINE,
 IT_DELREC TYPE STANDARD TABLE OF T_MAT WITH HEADER LINE,
 IT_MAR_DEL TYPE STANDARD TABLE OF T_MAR_DEL WITH HEADER LINE,
 IT_DELREC35 TYPE STANDARD TABLE OF T_MAT WITH HEADER LINE,
 IT_VALID_REC TYPE STANDARD TABLE OF T_VALID_MAT WITH HEADER LINE,
 IT_IN_VALID TYPE STANDARD TABLE OF T_VALID_MAT WITH HEADER LINE,
 IT_INVALID TYPE STANDARD TABLE OF T_INVALID WITH HEADER LINE,
 IT_INVALID1 TYPE STANDARD TABLE OF T_INVALID WITH HEADER LINE,
*--Standard views
 IT_T133A TYPE STANDARD TABLE OF T133A WITH HEADER LINE,
 IT_T134 TYPE STANDARD TABLE OF T_XBILDTAB WITH HEADER LINE.
 Global variables declaration
DATA:
 GV_TRANS_CODE TYPE SY-TCODE VALUE 'MM01',"Tcode
 GV_MTART LIKE MARA-MTART, "Material type
 GV_MATNR LIKE MATERIALID-MATNR_EXT, "40 char material
 HOLDDATE LIKE SY-DATUM, "Holdate for session
 GV_SES_OPEN, "Session open check
 GV_LAST LIKE MBILDTAB-GUIFU, "View code
 GV_VIEW_CODE LIKE MBILDTAB-GUIFU, "Function code
 GV_PURCH_VIEW TYPE I, "Purch view
 GV_FIRST_VIEW(2) TYPE N, "First view
 GV_OKCODE TYPE SY-UCOMM, "Ok code
 GV_MSG1(150), "Message
 GV_CNTR TYPE I VALUE '1', "Counter
 GV_VIEW_CNT LIKE SY-TABIX, "View count
 GV_NXT_VIEW LIKE MBILDTAB-GUIFU, "Function code
 GV_ERCNT TYPE I, "Error records count
 GV_SCNT TYPE I, "Success records count
 GV_VALIDREC TYPE I, "Valid record count
 GV_DUPREC TYPE I, "Duplicate record count
 GV_AVL TYPE I, "Available records count
 GV_MSG(120), "Message
 GV_INREC TYPE I, "Input records count
 GV_MAR_DEL TYPE I, "Marked for deletion
 GV_FILE_STR TYPE STRING, "Hold file name except 'txt'
 GV_LAST_4_CHARS TYPE STRING, "To hold '.txt' from inpfile
 GV_TCNT TYPE I, "Total record count
 GV_INVALID_REC TYPE I, "Invalide record count
 GV_FILE_CRT_Y_OR_NO TYPE C. "file created or not
CONSTANTS
CONSTANTS:
 TCODE_MM01 LIKE TSTC-TCODE VALUE 'MM01',
 C_UPDATE TYPE C VALUE 'A'.
S E L E C T - O P T I O N S
SELECTION-SCREEN : BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 1(25) TEXT-009.
SELECTION-SCREEN: POSITION 33.
PARAMETER P_WH AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN: END OF LINE.
SELECT-OPTIONS : S_MATNR FOR MARA-MATNR.
PARAMETERS : P_FWERKS LIKE MARC-WERKS OBLIGATORY,
 P_TWERKS LIKE MARC-WERKS OBLIGATORY.
SELECTION-SCREEN : END OF BLOCK B1.
SELECTION-SCREEN : BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 1(25) TEXT-004.
SELECTION-SCREEN: POSITION 32.
*--Input file
PARAMETERS: P_IFILE LIKE RLGRAP-FILENAME. "input file
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 1(25) TEXT-005.
SELECTION-SCREEN: POSITION 32.
*--Unix output file
PARAMETERS: P_OFILE LIKE RLGRAP-FILENAME LOWER CASE DEFAULT
 './sap_out/matextplnt'. "Output file in UNIX
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN: COMMENT 1(25) TEXT-012.
SELECTION-SCREEN: POSITION 32.
*--PC file ( used to create the files from internal tables)
PARAMETERS: P_PCFILE LIKE RLGRAP-FILENAME LOWER CASE OBLIGATORY
 DEFAULT 'C:\'.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN : END OF BLOCK B2.
SELECTION-SCREEN : BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-003.
*--Session Name
PARAMETERS : P_GROUP LIKE APQI-GROUPID DEFAULT 'MAT_Extension'.
*--Mode (like All Screen - A)
PARAMETERS P_MODE LIKE CTU_PARAMS-DISMODE DEFAULT 'N'.
SELECTION-SCREEN: END OF BLOCK B3.
*- A T S E L E C T I O N S C R E E N
AT SELECTION-SCREEN.
IF ( P_IFILE = ' ' ) AND ( S_MATNR[] IS INITIAL ).
 MESSAGE E000(ZI) WITH 'Please Enter the Material or Input file'.
ENDIF.
*--download the data from pc file
IF P_IFILE NE ' '.
 PERFORM VALIDATE_IN_FILE.
 PERFORM GET_DATA_FRM_FILE.
ENDIF.
Validate selection screen entries
PERFORM VALIDATE_SEL_SCREEN_ENTRIES.
*- A T S E L E C T I O N S C R E E N --- Value Request
*--F4 help for input flie
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_IFILE.
PERFORM VALUE_REQUEST_FOR_PC_FILE USING P_IFILE.
*--F4 help for pc file
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_PCFILE.
PERFORM VALUE_REQUEST_FOR_PC_FILE USING P_PCFILE.
*--F4 help for Unix file
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_OFILE.
PERFORM VALUE_REQ_FOR_UNIX_FILE USING P_OFILE.
 T O P O F P A G E
TOP-OF-PAGE.
PERFORM TOP_OF_PAGE.
S E L E C T - O P T I O N S
START-OF-SELECTION.
*--Fecth the data from the Data Base tables
PERFORM GET_DATA.
*--Process the above data to create the final internal table
PERFORM PROCESS_DATA.
*--Extend the data to plant
PERFORM EXTEND_DATA_2_PLANT.
end of selection
END-OF-SELECTION.
PERFORM MAT_CONV_FOR_ALL_INT_TABLES.
*--Success
DESCRIBE TABLE IT_SREP LINES GV_SCNT.
*--Error
DESCRIBE TABLE IT_EREP LINES GV_ERCNT.
*--Already existing
DESCRIBE TABLE IT_AVL LINES GV_AVL.
*--Input
DESCRIBE TABLE IT_MAT LINES GV_INREC.
*--Valid
DESCRIBE TABLE IT_FINAL1 LINES GV_VALIDREC.
*--Duplicate
DESCRIBE TABLE IT_DUPREC LINES GV_DUPREC.
*--Marked for deletion
DESCRIBE TABLE IT_DELREC LINES GV_MAR_DEL.
*--Invalid
DESCRIBE TABLE IT_INVALID LINES GV_INVALID_REC.
GV_TCNT =
GV_ERCNT + GV_SCNT + GV_AVL + GV_INVALID_REC + GV_DUPREC +
GV_MAR_DEL + GV_VALIDREC + GV_INREC.
IF GV_TCNT NE 0.
*--create output PC files for each internal table
 PERFORM PC_FILES_CREATION.
*--Create Unix file all internal tables
 PERFORM OUT_UNIX_FILE. "create unix file for output.
*--Create the report
 PERFORM REPORT_DIS.
*--Clear the contents
 CLEAR: IT_SREP,
 IT_EREP,
 IT_AVL,
 IT_MAT,
 IT_FINAL1,
 IT_DUPREC,
 IT_DELREC,
 IT_INVALID.
 REFRESH:
 IT_SREP,
 IT_EREP,
 IT_AVL,
 IT_MAT,
 IT_FINAL1,
 IT_DUPREC,
 IT_DELREC,
 IT_INVALID.
ELSE.
 FORMAT COLOR 6 INTENSIFIED ON.
 WRITE:/ 'No Data found for the Selection Criteria'(007).
 FORMAT RESET.
ENDIF.
*& Form get_data
*--Fetch the data from required data base tables
FORM GET_DATA .
DATA: LV_TABIX LIKE SY-TABIX.
**--Material type is in BAPI structures filling.
IF P_IFILE NE ' '.
 PERFORM CONVERT_MAT_FRM_FILE.
ENDIF.
*--Ranges for the plants
RANGES:R_WERKS FOR MARC-WERKS.
R_WERKS-SIGN = 'I'.
R_WERKS-OPTION = 'EQ'.
R_WERKS-LOW = P_FWERKS.
APPEND R_WERKS.
R_WERKS-SIGN = 'I'.
R_WERKS-OPTION = 'EQ'.
R_WERKS-LOW = P_TWERKS.
APPEND R_WERKS.
CLEAR R_WERKS.
*--Fetch the data for the given selection from the DB table MARA & MARC
(General Material Data)
IF P_IFILE NE ' '.
 SELECT R~MATNR "R = MARA
 R~VPSTA
 R~MTART
 R~MATKL
 R~MBRSH
 R~MEINS
 R~GEWEI
 R~RAUBE
 R~SPART
 R~PRDHA
 R~MAGRV
 C~MATNR "C = MARC
 C~WERKS
 C~PSTAT
 C~PLIFZ
 C~SSQSS
 C~LADGR
 C~SERNP
 C~PERIV
 C~STAWN
 C~HERKL
 C~EKGRP
 C~DISMM
 C~DISPO
 C~DISLS
 C~LGPRO
 C~FHORI
 C~DZEIT
 C~BWSCL
 C~AWSLS
 C~LGFSB
 INTO CORRESPONDING FIELDS OF TABLE IT_TOTAL
 FROM ( MARA AS R
 INNER JOIN MARC AS C ON CMATNR = RMATNR )
 WHERE R~MATNR IN R_MATNR AND
 R~MTART IN S_MTART AND
 C~WERKS IN R_WERKS .
 LOOP AT IT_TOTAL.
 LV_TABIX = SY-TABIX.
 READ TABLE IT_RMAT WITH KEY MATNR = IT_TOTAL-MATNR.
 IF SY-SUBRC = 0.
 IT_TOTAL-TLGORT = IT_RMAT-TLGORT.
 IT_TOTAL-SLGORT = IT_RMAT-SLGORT.
 MODIFY IT_TOTAL INDEX LV_TABIX.
 ENDIF.
 ENDLOOP.
ELSE.
 SELECT R~MATNR "R = MARA
 R~VPSTA
 R~MTART
 R~MATKL
 R~MBRSH
 R~MEINS
 R~GEWEI
 R~RAUBE
 R~SPART
 R~PRDHA
 R~MAGRV
 C~MATNR "C = MARC
 C~WERKS
 C~PSTAT
 C~PLIFZ
 C~SSQSS
 C~LADGR
 C~SERNP
 C~PERIV
 C~STAWN
 C~HERKL
 C~EKGRP
 C~DISMM
 C~DISPO
 C~DISLS
 C~LGPRO
 C~FHORI
 C~DZEIT
 C~BWSCL
 C~AWSLS
 C~LGFSB
 INTO CORRESPONDING FIELDS OF TABLE IT_TOTAL
 FROM ( MARA AS R
 INNER JOIN MARC AS C ON CMATNR = RMATNR )
 WHERE R~MATNR IN S_MATNR AND
 R~MTART IN S_MTART AND
 C~WERKS IN R_WERKS .
ENDIF. " if P_IFILE ne ' '.
IF NOT IT_TOTAL[] IS INITIAL.
 SORT IT_TOTAL BY WERKS.
 IT_FINAL[] = IT_TOTAL[].
 IT_TPLANT[] = IT_TOTAL[].
 SORT IT_FINAL BY WERKS.
 SORT IT_TPLANT BY WERKS.
*Logic 1
*--Delete all entries having the plant value equal to 'to plant' value
*--So, IT_FINAL have only from plant data. But in which some data
*--already in 'to plant'
 DELETE IT_FINAL WHERE WERKS = P_TWERKS.
*Logic 2
*--Delete all entries having the plant value equal to 'from plant' value
 DELETE IT_TPLANT WHERE WERKS = P_FWERKS.
IF NOT IT_FINAL[] IS INITIAL.
 SORT IT_FINAL BY MATNR WERKS.
 SORT IT_TPLANT BY MATNR WERKS.
*Logic 3
*--Delete all the material from the 'IT_FINAL', which is already
extended to 'to plnat'.
In Logic 1 and Logic 2, just deleted the materials having the plant
value equal same. Here 'IT_FINAL' contains materials of 'from plant'
only,because 'to plant' materials have been deleted in the 'Logic1'.
But it contains the materials already extended to 'to plant', So we
Need to delete those. And it is done in the below Logic. From now
'IT_FINAL table contains materials that are to be extended.
(Already extended materials have been deleted)
 LOOP AT IT_TPLANT.
 READ TABLE IT_FINAL
 WITH KEY MATNR = IT_TPLANT-MATNR
 WERKS = P_FWERKS
 BINARY SEARCH.
 LV_TABIX = SY-TABIX.
 IF SY-SUBRC EQ 0.
*--continue the process. This materil to be extend for other views
 IF IT_FINAL-PSTAT = IT_TPLANT-PSTAT.
 IT_AVL-MATNR = IT_TPLANT-MATNR.
 IT_AVL-WERKS = P_TWERKS.
 IT_AVL-MTART = IT_TPLANT-MTART.
 IT_AVL-MSG = 'Material already in plant'.
 IT_AVL-MSGTYP = 'E'.
 APPEND IT_AVL.
 CLEAR IT_AVL.
 DELETE IT_FINAL INDEX LV_TABIX.
 CLEAR IT_FINAL.
*--If the material already exist in the target plant, check for the
*--warehouse view. If only warehoues view does not exist and checked
warehouse not required, then consider that the record is exist
in target plant
 ELSEIF IT_FINAL-PSTAT CA 'S' AND IT_TPLANT-PSTAT NA 'S'.
If warehouse view does not require, then no need to copy again
 IF P_WH = 'X'.
 IT_AVL-MATNR = IT_TPLANT-MATNR.
 IT_AVL-WERKS = P_TWERKS.
 IT_AVL-MTART = IT_TPLANT-MTART.
 IT_AVL-MSG = 'Material already in plant'.
 IT_AVL-MSGTYP = 'E'.
 APPEND IT_AVL.
 CLEAR IT_AVL.
 DELETE IT_FINAL INDEX LV_TABIX.
 CLEAR IT_FINAL.
 ENDIF.
 ENDIF.
 ENDIF.
 ENDLOOP.
ENDIF.
*--Logic 4 ( Get the data from MARD, MVKE, MBEW and MAKT)
IF NOT IT_FINAL[] IS INITIAL.
*--Get the data from DB tabel MVKE (Sales Data for Material)
for all the materials in 'IT_FINAL'.
 SELECT
 MATNR
 VKORG
 VTWEG
 VMSTA
 VMSTD
 DWERK
 KONDM
 PRODH
 MTPOS
 FROM MVKE
 INTO TABLE INT_MVKE
 FOR ALL ENTRIES IN IT_FINAL
 WHERE MATNR = IT_FINAL-MATNR.
*--Get the data from DB table MBEW (Material Valuation)
for all the materials in 'IT_FINAL'.
 SELECT
 MATNR
 VPRSV
 STPRS
 BKLAS
 ZPLD1
 ZPLD2
 FROM MBEW
 INTO TABLE INT_MBEW
 FOR ALL ENTRIES IN IT_FINAL
 WHERE MATNR = IT_FINAL-MATNR AND
 BWKEY = IT_FINAL-WERKS.
Start of change by Hema on 09/21/06
Since basic view is not required to copy, no need description also
*--Get the data from DB table MAKT (Material Descriptions)
for all the materials in 'IT_FINAL'.
 SELECT MATNR
 MAKTX
 FROM MAKT
 INTO CORRESPONDING FIELDS OF TABLE INT_MAT_DES
 FOR ALL ENTRIES IN IT_FINAL
 WHERE MATNR = IT_FINAL-MATNR AND
 SPRAS = SY-LANGU.
End of change by Hema on 09/21/06
*--Get the warehouse data.
 SELECT MATNR
 LTKZA
 LTKZE
 LGBKZ
 INTO CORRESPONDING FIELDS OF TABLE INT_WAREH
 FROM MLGN
 FOR ALL ENTRIES IN IT_FINAL
 WHERE MATNR = IT_FINAL-MATNR.
 SELECT SINGLE * FROM T130M
 INTO WA_T130M
 WHERE TCODE = GV_TRANS_CODE.
*--Sort the internal table by material
 SORT INT_MARD BY MATNR WERKS.
 SORT INT_MVKE BY MATNR.
 SORT INT_MBEW BY MATNR.
 SORT INT_MAT_DES BY MATNR.
 SORT INT_WAREH BY MATNR.
ENDIF.
ENDFORM. " get_data
*& Form process_data
*--Fill the final internal with data from all the internal tables
FORM PROCESS_DATA .
DATA: LV_LINES TYPE I.
*--Logic 5: Fill the 'IT_FINAL' table from the 'int_mard', 'int_mvke'
 'int_mat_des' and int_mbew' as follows.
LOOP AT IT_FINAL.
*--Copy Target storage locaction to Prod.Stor.Loc and stor.Loc.for EP
 IT_FINAL-LGPRO = IT_FINAL-TLGORT.
 IT_FINAL-LGFSB = IT_FINAL-TLGORT.
 READ TABLE INT_MVKE WITH KEY MATNR = IT_FINAL-MATNR
 BINARY SEARCH.
 IF SY-SUBRC EQ 0.
 IT_FINAL-VKORG = INT_MVKE-VKORG.
 IT_FINAL-VTWEG = INT_MVKE-VTWEG.
 IT_FINAL-VMSTA = INT_MVKE-VMSTA.
 IT_FINAL-VMSTD = INT_MVKE-VMSTD.
 IT_FINAL-DWERK = INT_MVKE-DWERK.
 IT_FINAL-KONDM = INT_MVKE-KONDM.
 IT_FINAL-PRODH = INT_MVKE-PRODH.
 IT_FINAL-MTPOS = INT_MVKE-MTPOS.
 ENDIF.
 READ TABLE INT_MAT_DES WITH KEY MATNR = IT_FINAL-MATNR
 BINARY SEARCH.
 IF SY-SUBRC EQ 0.
 IT_FINAL-MAKTX = INT_MAT_DES-MAKTX.
 ENDIF.
 READ TABLE INT_MBEW WITH KEY MATNR = IT_FINAL-MATNR
 BINARY SEARCH.
 IF SY-SUBRC EQ 0.
 IT_FINAL-VPRSV = INT_MBEW-VPRSV.
 IT_FINAL-STPRS = INT_MBEW-STPRS.
 IT_FINAL-BKLAS = INT_MBEW-BKLAS.
 IT_FINAL-ZPLD1 = INT_MBEW-ZPLD1.
 IT_FINAL-ZPLD2 = INT_MBEW-ZPLD2.
 ENDIF.
 READ TABLE INT_WAREH WITH KEY MATNR = IT_FINAL-MATNR
 BINARY SEARCH.
 IF SY-SUBRC EQ 0.
 IT_FINAL-LGNUM = INT_WAREH-LGNUM.
 IT_FINAL-LTKZA = INT_WAREH-LTKZA.
 IT_FINAL-LTKZE = INT_WAREH-LTKZE.
 IT_FINAL-LGBKZ = INT_WAREH-LGBKZ.
 ENDIF.
 MODIFY IT_FINAL
 TRANSPORTING
 VKORG
 VTWEG
 VMSTA
 VMSTD
 LGPRO
 LGFSB
 DWERK
 KONDM
 PRODH
 MTPOS
 MAKTX
 VPRSV
 STPRS
 BKLAS
 ZPLD1
 ZPLD2
 LGNUM
 LTKZA
 LTKZE
 LGBKZ.
ENDLOOP.
ENDFORM. " process_data
*& Form value_request_for_pc_file
*--F4 help for the file names.
FORM VALUE_REQUEST_FOR_PC_FILE USING P_FILE.
CALL FUNCTION 'F4_FILENAME'
 EXPORTING
 PROGRAM_NAME = SY-CPROG
 DYNPRO_NUMBER = SY-DYNNR
 FIELD_NAME = ' '
 IMPORTING
 FILE_NAME = P_FILE.
ENDFORM. " value_request_for_pc_file
*& Form extend_data_2_plant
*--Use the final internal table to extend the material from one plant 2
*--another using the following logic which involved in 'four performs'
FORM EXTEND_DATA_2_PLANT .
DATA: BEGIN OF INT_VIEWS OCCURS 0.
 INCLUDE STRUCTURE MBILDTAB.
DATA END OF INT_VIEWS.
IF NOT IT_FINAL[] IS INITIAL.
 LOOP AT IT_FINAL.
 GV_MTART = IT_FINAL-MTART.
*--Get the 32 char Lenth Material number
 PERFORM MATERIAL_CON USING IT_FINAL-MATNR.
 CALL FUNCTION 'CONVERSION_EXIT_MATN2_OUTPUT'
 EXPORTING
 INPUT = IT_FINAL-MATNR
 IMPORTING
 OUTPUT = GV_MATNR.
*--Get the views for the current material
 PERFORM GET_THE_VIEWS_4_MAT.
*--Fill bdctable for all view available in 'copy from material'
 PERFORM CREATE_DATA_FOR_VIEWS.
*--Use the above structures and call the 'MM01' to extend the material
 PERFORM EXTEND_MAT_2_PLANT.
 CLEAR: GV_FIRST_VIEW, GV_NXT_VIEW, GV_MATNR.
 ENDLOOP.
*--close the session if open
 IF GV_SES_OPEN EQ 'X'.
 PERFORM CLOSE_GRP.
 SKIP 1.
 WRITE:/5 'Session Created', 40 P_GROUP COLOR 4.
 ENDIF.
ELSE.
 SKIP 2.
 WRITE:/5 TEXT-010 COLOR 4.
 'No Data exists for the given selection'.
ENDIF.
IF NOT IT_EREP[] IS INITIAL.
 LOOP AT IT_EREP.
 CALL FUNCTION 'CONVERSION_EXIT_MATN2_OUTPUT'
 EXPORTING
 INPUT = IT_EREP-MATNR
 IMPORTING
 OUTPUT = IT_EREP-MATNR.
 IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ELSE.
 MODIFY IT_EREP.
 ENDIF.
 ENDLOOP.
ENDIF.
ENDFORM. " extend_data_2_plant
*& Form get_the_views_4_mat
*--Get the views for current material
FORM GET_THE_VIEWS_4_MAT .
DATA: LV_BILDSEQUENZ TYPE T133A-BILDS,
 LV_PSTAT LIKE T134-PSTAT.
CLEAR: T130M,
 LV_BILDSEQUENZ,
 IT_XBILDTAB.
REFRESH IT_XBILDTAB.
*--Get the Build sequece for particular Material type
CALL FUNCTION 'BILDSEQUENZ_IDENTIFY'
 EXPORTING
 BRANCHE = IT_FINAL-MBRSH
 MATERIALART = IT_FINAL-MTART
 TCODE_REF = WA_T130M-TRREF
 KZRFB = ' '
 IMPORTING
 BILDSEQUENZ = LV_BILDSEQUENZ
 KZ_BILDS_CHANGED =
 EXCEPTIONS
 WRONG_CALL = 1
 NOT_FOUND = 2
 OTHERS = 3
*--Get the actual number views for the current material will stored
*--in the internal table 'IT_XBILDTAB'.
IF SY-SUBRC = 0.
 CALL FUNCTION 'SELECTION_VIEWS_FIND'
 EXPORTING
 BILDSEQUENZ = LV_BILDSEQUENZ
 PFLEGESTATUS = IT_FINAL-VPSTA
 PFLEGESTATUS = IT_FINAL-PSTAT
 TABLES
 BILDTAB = IT_XBILDTAB
 EXCEPTIONS
 CALL_WRONG = 1
 EMPTY_SELECTION = 2
 OTHERS = 3.
ENDIF.
*--Build actual table for view sequence
SELECT SINGLE PSTAT FROM T134
 INTO LV_PSTAT
 WHERE MTART = GV_MTART.
CALL FUNCTION 'SELECTION_VIEWS_FIND'
 EXPORTING
 BILDSEQUENZ = '01'
 PFLEGESTATUS = LV_PSTAT
 TABLES
 BILDTAB = IT_T134
 EXCEPTIONS
 CALL_WRONG = 1
 EMPTY_SELECTION = 2
 OTHERS = 3.
IF NOT IT_XBILDTAB[] IS INITIAL.
*--Delete the Basic(SP01),
*--Classification(SP02)
*--Sales: Sales Organization Data(SP03)
*--Sales: General/Plant Data(SP04)
*--Sales Text(SP05)
*--Production Resources and Tools(SP12) which are not required
 LOOP AT IT_XBILDTAB.
 CASE IT_XBILDTAB-GUIFU.
 WHEN 'SP01'.
 DELETE IT_XBILDTAB." WITH KEY GUIFU = 'SP01'.
 WHEN 'SP02'.
 DELETE IT_XBILDTAB." WITH KEY GUIFU = 'SP02'.
 WHEN 'SP03'.
 DELETE IT_XBILDTAB." WITH KEY GUIFU = 'SP03'.
 WHEN 'SP04'.
 DELETE IT_XBILDTAB." WITH KEY GUIFU = 'SP04'.
 WHEN 'SP05'.
 DELETE IT_XBILDTAB." WITH KEY GUIFU = 'SP05'.
 WHEN 'SP12'.
 DELETE IT_XBILDTAB." WITH KEY GUIFU = 'SP12'.
 WHEN 'SP14'.
*--If 'do not copy warehouse' is ticked, delete the view from table.
*--problem is, if that view is last view then Save problem will
*--come in the BDC.
 IF P_WH EQ 'X'.
 DELETE IT_XBILDTAB.
 ENDIF.
 ENDCASE.
 ENDLOOP.
ENDIF.
*--Get the first view of the material to select that view from Views
*-- List of the MM01
LOOP AT IT_XBILDTAB.
 READ TABLE IT_T134 WITH KEY GUIFU = IT_XBILDTAB-GUIFU.
 IF SY-SUBRC EQ 0.
 GV_FIRST_VIEW = SY-TABIX.
 GV_NXT_VIEW = IT_XBILDTAB-GUIFU.
 EXIT.
 ENDIF.
ENDLOOP.
ENDFORM. " get_the_views_4_mat
*& Form CREATE_DATA_FOR_VIEWS
 text
--> p1 text
<-- p2 text
FORM CREATE_DATA_FOR_VIEWS .
DATA: LV_LAST_VIEW_NO TYPE I.
DESCRIBE TABLE IT_XBILDTAB LINES LV_LAST_VIEW_NO.
LOOP AT IT_XBILDTAB.
 IF LV_LAST_VIEW_NO EQ SY-TABIX.
 MOVE IT_XBILDTAB-GUIFU TO GV_LAST.
 ENDIF.
ENDLOOP.
*--Hit the Basic view in the 'View selection Pop up', i.e very beginning
*--in Tcode: MM01. So that, only views which already in (Copy from)
*--Material can extend to the Target Plant. Int.,table IT_XBILDTAB
*--contains these views. Here flexibilty is that, not all views are
*--extended, whether the 'copy from material' contains or not.
*--i.e Dynamic selection of views.
*--So in order to ease the Dynamic selection (of views), first
*--Hit the Basic view in the 'View selection Pop up'.
PERFORM FILL_BASIC_VIEW.
PERFORM FILL_ORG_DATA USING GV_VIEW_CODE.
LOOP AT IT_XBILDTAB.
 MOVE IT_XBILDTAB-GUIFU TO GV_VIEW_CODE.
 CASE IT_XBILDTAB-GUIFU.
 --Purchasing view
 WHEN 'SP06'.
 PERFORM FILL_PURCH_VIEW USING GV_VIEW_CODE.
 --Purchase Order Text View
 WHEN 'SP07'.
 PERFORM FILL_PURCH_ORD_TEXT USING GV_VIEW_CODE.
 --MRP1 View
 WHEN 'SP08'.
 PERFORM FILL_MRP1_VIEW USING GV_VIEW_CODE.
 --MRP2 View
 WHEN 'SP09'.
 PERFORM FILL_MRP2_VIEW USING GV_VIEW_CODE.
 --Forecast View
 WHEN 'SP10'.
 PERFORM FILL_FORECAST_VIEW USING GV_VIEW_CODE.
 WHEN 'SP11'.
 IF GV_FLG NE 'Y'.
 PERFORM FILL_WORKSCHED_VIEW USING GV_VIEW_CODE.
 ENDIF.
 --General Plant Data / Storage View
 WHEN 'SP13'.
 PERFORM FILL_PLANT_STRGE_VIEW USING GV_VIEW_CODE.
 --Warehouse Management View
 WHEN 'SP14'.
 IF P_WH <> 'X'.
 -- If the 'do not warehouse' check box unchecked on sele screen
 PERFORM FILL_WAREHOUSE_VIEW USING GV_VIEW_CODE.
 ENDIF.
 --Quality Management View
 WHEN 'SP15'.
 PERFORM FILL_QUALITY_VIEW USING GV_VIEW_CODE.
 -- Accounting View
 WHEN 'SP16'.
 PERFORM FILL_ACCOUNTING_VIEW USING GV_VIEW_CODE.
 --Costing View
 WHEN 'SP17'.
 PERFORM FILL_COSTING_VIEW USING GV_VIEW_CODE.
 --Plant/Storage Location Stock View
 WHEN 'SP18'.
 PERFORM FILL_PLANT_ST_LOC_STK_VIEW USING GV_VIEW_CODE.
 ENDCASE.
 CLEAR GV_OKCODE.
ENDLOOP.
ENDFORM. " CREATE_DATA_FOR_VIEWS
*& Form fill_basic_view
 text
--> p1 text
<-- p2 text
FORM FILL_BASIC_VIEW .
DATA FIELD_STR(40).
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0060'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
 'RMMG1-MATNR'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '/00'.
PERFORM BDC_FIELD USING 'RMMG1-MATNR'
 GV_MATNR."nt_final-matnr.
PERFORM BDC_FIELD USING 'RMMG1_REF-MATNR'
 GV_MATNR."IT_FINAL-matnr.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0070'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
 'MSICHTAUSW-DYTXT(01)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '=ENTR'.
CONCATENATE 'MSICHTAUSW-KZSEL(' GV_FIRST_VIEW ')' INTO FIELD_STR.
PERFORM BDC_FIELD USING FIELD_STR 'X'.
ENDFORM. " fill_basic_view
*& Form fill_purch_view
Purchasing view
FORM FILL_ORG_DATA USING GV_VIEW_CODE.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0080'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
 'RMMG1_REF-WERKS'.
PERFORM BDC_FIELD USING 'RMMG1-WERKS'
 P_TWERKS.
PERFORM BDC_FIELD USING 'RMMG1_REF-WERKS'
 P_FWERKS.
IF GV_NXT_VIEW EQ 'SP08'.
 PERFORM BDC_FIELD USING 'RMMG1-LGORT'
 IT_FINAL-TLGORT.
 PERFORM BDC_FIELD USING 'RMMG1_REF-LGORT'
 IT_FINAL-SLGORT.
ENDIF.
ENDFORM. " fill_org_data
*& Form fill_purch_ord_text
Purchase order text
FORM FILL_PURCH_ORD_TEXT USING GV_VIEW_CODE.
CONCATENATE '=' GV_VIEW_CODE INTO GV_OKCODE.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '=SP07'.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3050'.
IF GV_VIEW_CODE EQ GV_LAST.
 PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '=BU'.
ENDIF.
ENDFORM. " fill_purch_ord_text
*& Form fill_MRP1_view
MRP1
FORM FILL_MRP1_VIEW USING GV_VIEW_CODE.
CONCATENATE '=' GV_VIEW_CODE INTO GV_OKCODE.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '=SP08'.
IF GV_NXT_VIEW EQ 'SP06'.
 PERFORM BDC_DYNPRO USING 'SAPLMGMM' '0081'.
 PERFORM BDC_FIELD USING 'RMMG1-LGORT'
 IT_FINAL-TLGORT.
 PERFORM BDC_FIELD USING 'RMMG1_REF-LGORT'
 IT_FINAL-SLGORT.
 PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '=ENTR'.
 CLEAR GV_NXT_VIEW.
ENDIF.
PERFORM BDC_DYNPRO USING 'SAPLMGMM' '3006'.
PERFORM BDC_FIELD USING 'MARC-LGPRO'
 IT_FINAL-LGPRO.
PERFORM BDC_FIELD USING 'MARC-LGFSB'
 IT_FINAL-LGFSB.
IF GV_VIEW_COD

Copy CS3 Master Collection folder to another Windows System (licensing issue)

Hello,
In my laptop I have two hard drives with two distinct Windows operating systems. CS3 Master Collection is installed on the first drive and works. But I want to use it on the other system as well. So I just copied the CS3 folder to the second hard drive and booted from it. Unfortunately, I can't start any of the CS3 applications from there because it complains about a missing / broken license. I can't do a proper CS3 install on the other system because I have no install media (it came pre-installed with my school laptop). How can I use CS3 on both systems?
Any help would be greatly appreciated!

If it came pre-installed on your school laptop it most likely is a volume license. Since we don't know the terms of that license we can't really say much with any certainty, but my guess would be that legally YOU can't install it on more than one "computer" which in this case would be one or the other of your hard drives. If that's the case, since it's already on one, it would have to be uninstalled to install on the other.
If your school tells you that you are allowed to have it on both operating systems at the same time you'll need the installation media. As you've seen, you can't just copy the program folders. The installer needs to do a lot of other stuff, including writing a lot of registry information, that is required for things to run. Perhaps the IT department will install it for you.
Peter

Copy Inventory Master Data to another Item Number

For the new database setup, I would like to copy from one Item Master Data (all tab details) to another Item Number to save time. Then just edit few fields only. How can I do it?

Hi Lily,
If there is provision of changing the item codes then you can try the import from Excel option also. As changing the item codes in an excel list will be much easier than opening each master data and changing the codes.
Try this-
1. Go to the test database where you create the test items.
2. Open the item master data in the find mode and open the search list.
3. With the f=Form Settings just make those columns visible which you want to import.
for ex in a DB i have some items, I wnt to import the to other, only the item code, item descrption and the manufactures. then i open the search list and only make these columns visible.
4. Now export this list to excel
5. Now change the iem codes of the desired in the excel format.
5. Save it as a txt file and import through the "Import From Excel Option"
Administration> Data Import/Export> Data Import> Import from Excel
Regards,
Raj

Copy Material Master data - cannot copy "Proportion/Prod.Unit" view

Hello,
When I try to create material master data using the "Copy from..." option, data from the "Proportion/Prod.Unit" view is not copied to the new material. We are using SAP for Mill products.
Any clues?
Regards,
Joao

Hello Joao,
There are two things, which have to be done :
The first thing of course is, that for the field MARA-KZWSM the field
"Propose Field Content from the Reference" must be set in transaction
OMSR.
The second is, that the user have to enter this screen, because if he
don't display this screen, then it is technically not possible to
copy the reference values.
(To copy this data from the reference material you have to go to the
subscreen SAPLMWSM 8030 and press enter).
Regards,
Mauro

Copy of Master Characterstics

Similar Messages

Maybe you are looking for