CCM automated (batch) upload program to Procurement Catalog

Hello to all,
There does not appear to be a report to enable an automated (batch) upload program to a CCM Procurement Catalog. This is a problem for customers who need off-hours periodic updating of their procurement catalog.
Has anyone encountered this problem and has found or developed a solution?
Thanks in advance for you help and comments.
Frank Heisner

Frank: to clarify things, the process is to upload content into Supplier Catalogs, and then map to Master and Procurement.
And you're correct - there is no standard report for uploads. But you can develop a custom one. An example of such can be found in the <a href="https://websmp206.sap-ag.de/~sapdownload/011000358700002122802006E/CCM_Migr_enhanceMarch_9th.ppt">Requisite-to-CCM Migration Toolkit</a>.
Cheers,
Serguei

Similar Messages

CCM - content of customer characteristic not mapped to procurement catalog

Hi experts,
I uploaded a sample CSV-file supplier catalog. Within the supplier catalog I defined a customer characteristic of type /CCM/ATTACHMENT.
The supplier catalog is uploaded without any problems and also the /CCM/ATTACHMENT characteristic is filled correctly with description, mime type and URL.
I mapped now the supplier catalog to the master catalog and then to the procurement catalog.
All the content except the content of the customer characteristic /CCM/ATTACHMNENT is mapped to the master and procurement catalog. The characteristic /CCM/ATTACHMENT is available in the master and procurement catalog and I can even see the characteristic there. But no content is in there.
Are there any additional steps when I try to map customer characteristic? The characteristic is in definitely available in the master and procurement catalog schema and catalog.
Thanks in advance for your help! I will reward points.
Tom

Hi,
Try select both the characteristic in mapping, do "Assign Characteristics" for automatic characteristic assignment, include sub categories and SAVE.
A message will appear for assigning characteristic, then go for MAP CONTENT all items will be mapped and will be obtained in Procurement catalog.
Best Reg.,
Sridhar

Problem with catalog upload program !!

Hi GURUs,
Using CCM upload program we are trying to upload a file for deleting/adding/changing supplier catalog items.
- Some times it work fine.
- But some times supplier catalog is going into error.
- The display log on CCM screen is all green with no errors.
- When checked in SLG1 we are getting error "Error when deleting item XXXXXXX (ID)",though the item is present in supplier catalog.
Kindly help.
Note: We are at CCM2.0
Thanks in Adv. !!
Vivek

Hi Serguei,
Thanks for your reply.
our content file format is XLS (Excel sheet). We are having customized program to load the data into CCM. The program inturn convert the .XLS file into XML format. This program is directly submitting the jobs in background to load the data into CCM.
Due to this I am not sure how to debug this and capture the defect.
Kindly help.
Thanks in Adv. !!
Vivek

CCM - need advise on procurement catalog

Hi,
I'm in the process of creating catalog using CCM for different legal entities. As I undrestand, I can either creating various master catalog views or different procurement catalogs so that I can control users only see the content belongs to his/her own legal entity. But I'm not sure what is the best way.
Can somebody help to advise which one is better, creating different master catalog view or creating procurement catalogs? Or is there any other good solutions?
Thanks so much.

Hi Masa,
Thanks so much for your answer. It proved some of my thoughts. But my case is not that simple.
First of all, item price might not be same, but it should be able to be separated by different suppplier number;
Second, some companies will use same category structure but a few may use a different one. But as I see, most of structure should be very similar. In this case, is it a better idea to use one master catalog and multiple views? Or, can I use procurement catalog for a few companies but others use different master catalog views?
And I have two more questions:
1. After a catalog is created, can catalog ID be changed? Our master catalog ID is not very proper, so I am wondering whether I can change it.
2. For category structure, can one product category show under multiple parent categories? If yes, how to realize it?
Thanks a lot!

Automating Cash Journal Posting using inbound proxy interface and upload program

Hi Experts,
I have a requirement where in cash journal posting needs to be carried out automatically by an inbound interface on a periodic basis and at the start during cut over an upload program needs to be used to upload beg balance data . For this purpose I have used BAPI_CASHJOURNALDOC_CREATE to save cash journal entries along with BAPI TRANSACTION COMMIT.
Once the Data is successfully saved I am using FM FCJ_GET_DATA_FOR_SCREEN to get prerequisite data for the FM FCJ_POST_ALL which is used by the Standard cash journal program internally to post the saved data. ( I got this by debugging the standard transaction and both FMs are not yet released )
The issues I am facing is that the the FM FCJ_POST_ALL does not always post the data it behaves in random fashion i.e some times it posts the entries where as sometimes it does not post the entries.
I have tried using commit work after the FM but that also does not result in consistent behavior of the program. One more issue is the i am not allowed to use commit work in a an inbound proxy so how do i proceed ?
I am attaching the code for further analysis:
DATA: LIT_TCJ_TRANS_NAMES TYPE TABLE OF TCJ_TRANS_NAMES,
 LWA_TCJ_TRANS_NAMES TYPE TCJ_TRANS_NAMES,
 LV_WAIT TYPE BAPITA-WAIT VALUE '1',
 LV_RECORD_NO TYPE SY-TABIX.
 DATA : LIT_POSTING TYPE STANDARD TABLE OF ISCJ_POSTINGS,
 LIT_WTAX_ITEMS TYPE STANDARD TABLE OF TCJ_WTAX_ITEMS,
 LIT_SPLIT_POSTINGS TYPE STANDARD TABLE OF ISCJ_POSTINGS,
 LIT_CPD TYPE STANDARD TABLE OF TCJ_CPD.
 DATA: LV_BEG_BALANCE TYPE CJAMOUNT,
 LV_TOTAL_RECEIPTS TYPE CJAMOUNT,
 LV_TOTAL_PAYMENTS TYPE CJAMOUNT,
 LV_TOTAL_CHECKS TYPE CJAMOUNT,
 LV_RUN_BALANCE TYPE CJAMOUNT,
 LV_RUN_CASH_BALANCE TYPE CJAMOUNT,
 LV_NUMB_OF_REC TYPE I,
 LV_NUMB_OF_PAYM TYPE I,
 LV_NUMB_OF_CHECKS TYPE I.
 DESCRIBE TABLE GIT_CJ LINES GV_TOTAL_RECORDS.
 SELECT MANDT COMP_CODE TRANSACT_NUMBER LANGU TRANSACT_NAME LONG_TEXT
 FROM TCJ_TRANS_NAMES
 INTO TABLE LIT_TCJ_TRANS_NAMES
 WHERE LANGU = GC_EN.
 IF SY-SUBRC <> 0.
 MESSAGE 'No Business Transaction maintained for Company Code in this client'(016) TYPE GC_I.
 LEAVE LIST-PROCESSING.
 ENDIF.
 DESCRIBE TABLE GIT_CJ LINES GV_TOTAL_RECORDS.
 LOOP AT GIT_CJ INTO GWA_CJ.
 LV_RECORD_NO = SY-TABIX.
 CLEAR: GS_HEADER_BAPI,
 GS_CJ_KEY,
 GWA_ITEMS.
 REFRESH: GIT_ITEMS,
 GIT_RETURN.
 GS_HEADER_BAPI-COMP_CODE = GWA_CJ-BUKRS.
 GS_HEADER_BAPI-CAJO_NUMBER = GWA_CJ-CJNR.
 GS_HEADER_BAPI-CURRENCY = GC_PHP.
 CLEAR LWA_TCJ_TRANS_NAMES.
 READ TABLE LIT_TCJ_TRANS_NAMES INTO LWA_TCJ_TRANS_NAMES WITH KEY COMP_CODE = GWA_CJ-BUKRS
 LANGU = GC_EN
 TRANSACT_NAME = GWA_CJ-BTNAM.
 IF SY-SUBRC = 0.
 GWA_ITEMS-TRANSACT_NUMBER = LWA_TCJ_TRANS_NAMES-TRANSACT_NUMBER.
 GWA_ITEMS-P_RECEIPTS = GWA_CJ-CJRAT.
 GWA_ITEMS-TAX_CODE = GWA_CJ-TXCOD.
 GS_HEADER_BAPI-BP_NAME = GWA_CJ-BPNAM.
 GWA_ITEMS-POSITION_TEXT = GWA_CJ-POTXT.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-LIFNR
 IMPORTING
 OUTPUT = GWA_ITEMS-VENDOR_NO.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-KUNNR
 IMPORTING
 OUTPUT = GWA_ITEMS-CUSTOMER.
 PERFORM SUB_DATE_FROMAT_BAPI CHANGING GWA_CJ-BLDAT
 GS_HEADER_BAPI-DOC_DATE.
 PERFORM SUB_DATE_FROMAT_BAPI CHANGING GWA_CJ-BUDAT
 GS_HEADER_BAPI-PSTNG_DATE.
 GS_HEADER_BAPI-REF_DOC_NO = GWA_CJ-XBLNR.
 GS_HEADER_BAPI-ALLOC_NMBR = GWA_CJ-ALLNO.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-KOSTL
 IMPORTING
 OUTPUT = GWA_ITEMS-COSTCENTER.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-PRCTR
 IMPORTING
 OUTPUT = GWA_ITEMS-PROFIT_CTR.
 APPEND GWA_ITEMS TO GIT_ITEMS.
 CALL FUNCTION 'BAPI_CASHJOURNALDOC_CREATE'
 EXPORTING
 HEADER = GS_HEADER_BAPI
 IMPORTING
 COMPANY_CODE = GS_CJ_KEY-COMP_CODE
 CASH_JOURNAL_NUMBER = GS_CJ_KEY-CAJO_NUMBER
 FISCAL_YEAR = GS_CJ_KEY-FISC_YEAR
 CASH_JOURNAL_DOC_NO = GS_CJ_KEY-POSTING_NUMBER
 TABLES
 ITEMS = GIT_ITEMS
 RETURN = GIT_RETURN.
 IF GIT_RETURN IS NOT INITIAL.
 READ TABLE GIT_RETURN INTO GWA_RETURN WITH KEY TYPE = GC_E.
 IF SY-SUBRC <> 0.
 CLEAR GWA_CJ_S.
 MOVE-CORRESPONDING GS_CJ_KEY TO GWA_CJ_S.
 CLEAR GWA_RETURN.
 READ TABLE GIT_RETURN INTO GWA_RETURN WITH KEY TYPE = GC_S.
 IF SY-SUBRC = 0.
 MOVE GWA_RETURN-MESSAGE TO GWA_CJ_S-MSG.
 CLEAR GWA_RETURN.
 READ TABLE GIT_RETURN INTO GWA_RETURN WITH KEY TYPE = GC_I.
 IF SY-SUBRC = 0.
 CLEAR GWA_CJ_E.
 CONCATENATE GWA_RETURN-MESSAGE GWA_CJ_S-MSG INTO GWA_CJ_E-MSG SEPARATED BY GC_PIPE_FORMAT.
 MOVE-CORRESPONDING GS_HEADER_BAPI TO GWA_CJ_E.
 GWA_CJ_E-POSTING_NUMBER = LV_RECORD_NO.
 APPEND GWA_CJ_E TO GIT_CJ_E.
 GV_ERROR_RECORDS = GV_ERROR_RECORDS + GC_1.
 ELSE.
 IF P_TEST NE GC_X.
 CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
 EXPORTING
 WAIT = LV_WAIT.
 REFRESH:LIT_POSTING ,
 LIT_WTAX_ITEMS ,
 LIT_SPLIT_POSTINGS ,
 LIT_CPD .
 CLEAR: LV_BEG_BALANCE ,
 LV_TOTAL_RECEIPTS ,
 LV_TOTAL_PAYMENTS ,
 LV_TOTAL_CHECKS ,
 LV_RUN_BALANCE ,
 LV_RUN_CASH_BALANCE ,
 LV_NUMB_OF_REC ,
 LV_NUMB_OF_PAYM ,
 LV_NUMB_OF_CHECKS .
 CALL FUNCTION 'FCJ_GET_DATA_FOR_SCREEN'
 EXPORTING
 I_COMP_CODE = GS_CJ_KEY-COMP_CODE
 I_CAJO_NUMBER = GS_CJ_KEY-CAJO_NUMBER
 I_DISPLAY_PERIOD_LO = GS_HEADER_BAPI-PSTNG_DATE
 I_DISPLAY_PERIOD_HI = GS_HEADER_BAPI-PSTNG_DATE
 IMPORTING
 E_BEGINNING_BALANCE = LV_BEG_BALANCE
 E_RUNNING_BALANCE = LV_RUN_BALANCE
 E_RUNNING_CASH_BALANCE = LV_RUN_CASH_BALANCE
 E_TOTAL_RECEIPTS = LV_TOTAL_RECEIPTS
 E_TOTAL_REC_NUMBER = LV_NUMB_OF_REC
 E_TOTAL_PAYMENTS = LV_TOTAL_PAYMENTS
 E_TOTAL_PAYM_NUMBER = LV_NUMB_OF_PAYM
 E_TOTAL_CHECKS = LV_TOTAL_CHECKS
 E_TOTAL_CHECKS_NUMBER = LV_NUMB_OF_CHECKS
 TABLES
 E_POSTINGS = LIT_POSTING
 E_WTAX_ITEMS = LIT_WTAX_ITEMS
 E_SPLIT_POSTINGS = LIT_SPLIT_POSTINGS
 E_CPD = LIT_CPD.
 CALL FUNCTION 'FCJ_POST_ALL'
 EXPORTING
 I_COMP_CODE = GS_CJ_KEY-COMP_CODE
 I_CAJO_NUMBER = GS_CJ_KEY-CAJO_NUMBER
 I_CURRENCY = GS_HEADER_BAPI-CURRENCY
 I_TYP = 'R'
 I_DISPLAY_PERIOD_LO = GS_HEADER_BAPI-PSTNG_DATE
 I_DISPLAY_PERIOD_HI = GS_HEADER_BAPI-PSTNG_DATE
* IMPORTING
* E_ERROR_NUMBER =
 TABLES
 ITCJ_POSTINGS = LIT_POSTING
 ITCJ_WTAX_ITEMS = LIT_WTAX_ITEMS
 ITCJ_SPLIT_POSTINGS = LIT_SPLIT_POSTINGS
 ITCJ_CPD = LIT_CPD
 CHANGING
 P_BEG_BALANCE = LV_BEG_BALANCE
 P_TOTAL_RECEIPTS = LV_TOTAL_RECEIPTS
 P_TOTAL_PAYMENTS = LV_TOTAL_PAYMENTS
 P_TOTAL_CHECKS = LV_TOTAL_CHECKS
 P_RUN_BALANCE = LV_RUN_BALANCE
 P_RUN_CASH_BALANCE = LV_RUN_CASH_BALANCE
 P_NUMB_OF_REC = LV_NUMB_OF_REC
 P_NUMB_OF_PAYM = LV_NUMB_OF_PAYM
 P_NUMB_OF_CHECKS = LV_NUMB_OF_CHECKS.
 COMMIT WORK.
 ENDIF.
 APPEND GWA_CJ_S TO GIT_CJ_S.
 GV_SUCCESS_RECORDS = GV_SUCCESS_RECORDS + GC_1.
 CLEAR GWA_CJ_S.
 ENDIF.
 ENDIF.
 ELSE.
 CLEAR GWA_CJ_E.
 MOVE-CORRESPONDING GS_HEADER_BAPI TO GWA_CJ_E.
 MOVE GWA_RETURN-MESSAGE TO GWA_CJ_E-MSG.
 GWA_CJ_E-POSTING_NUMBER = LV_RECORD_NO.
 APPEND GWA_CJ_E TO GIT_CJ_E.
 GV_ERROR_RECORDS = GV_ERROR_RECORDS + GC_1.
 ENDIF.
 ENDIF.
 ELSE.
 GWA_RETURN-MESSAGE = 'Transaction Name does not correspond to any Transaction Number'(017).
 CLEAR GWA_CJ_E.
 MOVE-CORRESPONDING GS_HEADER_BAPI TO GWA_CJ_E.
 MOVE GWA_RETURN-MESSAGE TO GWA_CJ_E-MSG.
 GWA_CJ_E-POSTING_NUMBER = LV_RECORD_NO.
 APPEND GWA_CJ_E TO GIT_CJ_E.
 GV_ERROR_RECORDS = GV_ERROR_RECORDS + GC_1.
 ENDIF.
 ENDLOOP.
ENDFORM. " SUB_BAPI_CALL

Hi Experts,
I have a requirement where in cash journal posting needs to be carried out automatically by an inbound interface on a periodic basis and at the start during cut over an upload program needs to be used to upload beg balance data . For this purpose I have used BAPI_CASHJOURNALDOC_CREATE to save cash journal entries along with BAPI TRANSACTION COMMIT.
Once the Data is successfully saved I am using FM FCJ_GET_DATA_FOR_SCREEN to get prerequisite data for the FM FCJ_POST_ALL which is used by the Standard cash journal program internally to post the saved data. ( I got this by debugging the standard transaction and both FMs are not yet released )
The issues I am facing is that the the FM FCJ_POST_ALL does not always post the data it behaves in random fashion i.e some times it posts the entries where as sometimes it does not post the entries.
I have tried using commit work after the FM but that also does not result in consistent behavior of the program. One more issue is the i am not allowed to use commit work in a an inbound proxy so how do i proceed ?
I am attaching the code for further analysis:
DATA: LIT_TCJ_TRANS_NAMES TYPE TABLE OF TCJ_TRANS_NAMES,
 LWA_TCJ_TRANS_NAMES TYPE TCJ_TRANS_NAMES,
 LV_WAIT TYPE BAPITA-WAIT VALUE '1',
 LV_RECORD_NO TYPE SY-TABIX.
 DATA : LIT_POSTING TYPE STANDARD TABLE OF ISCJ_POSTINGS,
 LIT_WTAX_ITEMS TYPE STANDARD TABLE OF TCJ_WTAX_ITEMS,
 LIT_SPLIT_POSTINGS TYPE STANDARD TABLE OF ISCJ_POSTINGS,
 LIT_CPD TYPE STANDARD TABLE OF TCJ_CPD.
 DATA: LV_BEG_BALANCE TYPE CJAMOUNT,
 LV_TOTAL_RECEIPTS TYPE CJAMOUNT,
 LV_TOTAL_PAYMENTS TYPE CJAMOUNT,
 LV_TOTAL_CHECKS TYPE CJAMOUNT,
 LV_RUN_BALANCE TYPE CJAMOUNT,
 LV_RUN_CASH_BALANCE TYPE CJAMOUNT,
 LV_NUMB_OF_REC TYPE I,
 LV_NUMB_OF_PAYM TYPE I,
 LV_NUMB_OF_CHECKS TYPE I.
 DESCRIBE TABLE GIT_CJ LINES GV_TOTAL_RECORDS.
 SELECT MANDT COMP_CODE TRANSACT_NUMBER LANGU TRANSACT_NAME LONG_TEXT
 FROM TCJ_TRANS_NAMES
 INTO TABLE LIT_TCJ_TRANS_NAMES
 WHERE LANGU = GC_EN.
 IF SY-SUBRC <> 0.
 MESSAGE 'No Business Transaction maintained for Company Code in this client'(016) TYPE GC_I.
 LEAVE LIST-PROCESSING.
 ENDIF.
 DESCRIBE TABLE GIT_CJ LINES GV_TOTAL_RECORDS.
 LOOP AT GIT_CJ INTO GWA_CJ.
 LV_RECORD_NO = SY-TABIX.
 CLEAR: GS_HEADER_BAPI,
 GS_CJ_KEY,
 GWA_ITEMS.
 REFRESH: GIT_ITEMS,
 GIT_RETURN.
 GS_HEADER_BAPI-COMP_CODE = GWA_CJ-BUKRS.
 GS_HEADER_BAPI-CAJO_NUMBER = GWA_CJ-CJNR.
 GS_HEADER_BAPI-CURRENCY = GC_PHP.
 CLEAR LWA_TCJ_TRANS_NAMES.
 READ TABLE LIT_TCJ_TRANS_NAMES INTO LWA_TCJ_TRANS_NAMES WITH KEY COMP_CODE = GWA_CJ-BUKRS
 LANGU = GC_EN
 TRANSACT_NAME = GWA_CJ-BTNAM.
 IF SY-SUBRC = 0.
 GWA_ITEMS-TRANSACT_NUMBER = LWA_TCJ_TRANS_NAMES-TRANSACT_NUMBER.
 GWA_ITEMS-P_RECEIPTS = GWA_CJ-CJRAT.
 GWA_ITEMS-TAX_CODE = GWA_CJ-TXCOD.
 GS_HEADER_BAPI-BP_NAME = GWA_CJ-BPNAM.
 GWA_ITEMS-POSITION_TEXT = GWA_CJ-POTXT.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-LIFNR
 IMPORTING
 OUTPUT = GWA_ITEMS-VENDOR_NO.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-KUNNR
 IMPORTING
 OUTPUT = GWA_ITEMS-CUSTOMER.
 PERFORM SUB_DATE_FROMAT_BAPI CHANGING GWA_CJ-BLDAT
 GS_HEADER_BAPI-DOC_DATE.
 PERFORM SUB_DATE_FROMAT_BAPI CHANGING GWA_CJ-BUDAT
 GS_HEADER_BAPI-PSTNG_DATE.
 GS_HEADER_BAPI-REF_DOC_NO = GWA_CJ-XBLNR.
 GS_HEADER_BAPI-ALLOC_NMBR = GWA_CJ-ALLNO.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-KOSTL
 IMPORTING
 OUTPUT = GWA_ITEMS-COSTCENTER.
 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
 EXPORTING
 INPUT = GWA_CJ-PRCTR
 IMPORTING
 OUTPUT = GWA_ITEMS-PROFIT_CTR.
 APPEND GWA_ITEMS TO GIT_ITEMS.
 CALL FUNCTION 'BAPI_CASHJOURNALDOC_CREATE'
 EXPORTING
 HEADER = GS_HEADER_BAPI
 IMPORTING
 COMPANY_CODE = GS_CJ_KEY-COMP_CODE
 CASH_JOURNAL_NUMBER = GS_CJ_KEY-CAJO_NUMBER
 FISCAL_YEAR = GS_CJ_KEY-FISC_YEAR
 CASH_JOURNAL_DOC_NO = GS_CJ_KEY-POSTING_NUMBER
 TABLES
 ITEMS = GIT_ITEMS
 RETURN = GIT_RETURN.
 IF GIT_RETURN IS NOT INITIAL.
 READ TABLE GIT_RETURN INTO GWA_RETURN WITH KEY TYPE = GC_E.
 IF SY-SUBRC <> 0.
 CLEAR GWA_CJ_S.
 MOVE-CORRESPONDING GS_CJ_KEY TO GWA_CJ_S.
 CLEAR GWA_RETURN.
 READ TABLE GIT_RETURN INTO GWA_RETURN WITH KEY TYPE = GC_S.
 IF SY-SUBRC = 0.
 MOVE GWA_RETURN-MESSAGE TO GWA_CJ_S-MSG.
 CLEAR GWA_RETURN.
 READ TABLE GIT_RETURN INTO GWA_RETURN WITH KEY TYPE = GC_I.
 IF SY-SUBRC = 0.
 CLEAR GWA_CJ_E.
 CONCATENATE GWA_RETURN-MESSAGE GWA_CJ_S-MSG INTO GWA_CJ_E-MSG SEPARATED BY GC_PIPE_FORMAT.
 MOVE-CORRESPONDING GS_HEADER_BAPI TO GWA_CJ_E.
 GWA_CJ_E-POSTING_NUMBER = LV_RECORD_NO.
 APPEND GWA_CJ_E TO GIT_CJ_E.
 GV_ERROR_RECORDS = GV_ERROR_RECORDS + GC_1.
 ELSE.
 IF P_TEST NE GC_X.
 CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
 EXPORTING
 WAIT = LV_WAIT.
 REFRESH:LIT_POSTING ,
 LIT_WTAX_ITEMS ,
 LIT_SPLIT_POSTINGS ,
 LIT_CPD .
 CLEAR: LV_BEG_BALANCE ,
 LV_TOTAL_RECEIPTS ,
 LV_TOTAL_PAYMENTS ,
 LV_TOTAL_CHECKS ,
 LV_RUN_BALANCE ,
 LV_RUN_CASH_BALANCE ,
 LV_NUMB_OF_REC ,
 LV_NUMB_OF_PAYM ,
 LV_NUMB_OF_CHECKS .
 CALL FUNCTION 'FCJ_GET_DATA_FOR_SCREEN'
 EXPORTING
 I_COMP_CODE = GS_CJ_KEY-COMP_CODE
 I_CAJO_NUMBER = GS_CJ_KEY-CAJO_NUMBER
 I_DISPLAY_PERIOD_LO = GS_HEADER_BAPI-PSTNG_DATE
 I_DISPLAY_PERIOD_HI = GS_HEADER_BAPI-PSTNG_DATE
 IMPORTING
 E_BEGINNING_BALANCE = LV_BEG_BALANCE
 E_RUNNING_BALANCE = LV_RUN_BALANCE
 E_RUNNING_CASH_BALANCE = LV_RUN_CASH_BALANCE
 E_TOTAL_RECEIPTS = LV_TOTAL_RECEIPTS
 E_TOTAL_REC_NUMBER = LV_NUMB_OF_REC
 E_TOTAL_PAYMENTS = LV_TOTAL_PAYMENTS
 E_TOTAL_PAYM_NUMBER = LV_NUMB_OF_PAYM
 E_TOTAL_CHECKS = LV_TOTAL_CHECKS
 E_TOTAL_CHECKS_NUMBER = LV_NUMB_OF_CHECKS
 TABLES
 E_POSTINGS = LIT_POSTING
 E_WTAX_ITEMS = LIT_WTAX_ITEMS
 E_SPLIT_POSTINGS = LIT_SPLIT_POSTINGS
 E_CPD = LIT_CPD.
 CALL FUNCTION 'FCJ_POST_ALL'
 EXPORTING
 I_COMP_CODE = GS_CJ_KEY-COMP_CODE
 I_CAJO_NUMBER = GS_CJ_KEY-CAJO_NUMBER
 I_CURRENCY = GS_HEADER_BAPI-CURRENCY
 I_TYP = 'R'
 I_DISPLAY_PERIOD_LO = GS_HEADER_BAPI-PSTNG_DATE
 I_DISPLAY_PERIOD_HI = GS_HEADER_BAPI-PSTNG_DATE
* IMPORTING
* E_ERROR_NUMBER =
 TABLES
 ITCJ_POSTINGS = LIT_POSTING
 ITCJ_WTAX_ITEMS = LIT_WTAX_ITEMS
 ITCJ_SPLIT_POSTINGS = LIT_SPLIT_POSTINGS
 ITCJ_CPD = LIT_CPD
 CHANGING
 P_BEG_BALANCE = LV_BEG_BALANCE
 P_TOTAL_RECEIPTS = LV_TOTAL_RECEIPTS
 P_TOTAL_PAYMENTS = LV_TOTAL_PAYMENTS
 P_TOTAL_CHECKS = LV_TOTAL_CHECKS
 P_RUN_BALANCE = LV_RUN_BALANCE
 P_RUN_CASH_BALANCE = LV_RUN_CASH_BALANCE
 P_NUMB_OF_REC = LV_NUMB_OF_REC
 P_NUMB_OF_PAYM = LV_NUMB_OF_PAYM
 P_NUMB_OF_CHECKS = LV_NUMB_OF_CHECKS.
 COMMIT WORK.
 ENDIF.
 APPEND GWA_CJ_S TO GIT_CJ_S.
 GV_SUCCESS_RECORDS = GV_SUCCESS_RECORDS + GC_1.
 CLEAR GWA_CJ_S.
 ENDIF.
 ENDIF.
 ELSE.
 CLEAR GWA_CJ_E.
 MOVE-CORRESPONDING GS_HEADER_BAPI TO GWA_CJ_E.
 MOVE GWA_RETURN-MESSAGE TO GWA_CJ_E-MSG.
 GWA_CJ_E-POSTING_NUMBER = LV_RECORD_NO.
 APPEND GWA_CJ_E TO GIT_CJ_E.
 GV_ERROR_RECORDS = GV_ERROR_RECORDS + GC_1.
 ENDIF.
 ENDIF.
 ELSE.
 GWA_RETURN-MESSAGE = 'Transaction Name does not correspond to any Transaction Number'(017).
 CLEAR GWA_CJ_E.
 MOVE-CORRESPONDING GS_HEADER_BAPI TO GWA_CJ_E.
 MOVE GWA_RETURN-MESSAGE TO GWA_CJ_E-MSG.
 GWA_CJ_E-POSTING_NUMBER = LV_RECORD_NO.
 APPEND GWA_CJ_E TO GIT_CJ_E.
 GV_ERROR_RECORDS = GV_ERROR_RECORDS + GC_1.
 ENDIF.
 ENDLOOP.
ENDFORM. " SUB_BAPI_CALL

.CSV File upload program in CCM

HI Gurus,
Is there any possibility of calling file upload program from another program which should pick the file stored in server and upload as we do it in manually selecting the supplier and upload the .csv file by specifying the path.Kindly advice.
Thanks and Regards,
Sathya kumar.

Hi
I have not tried this.. But i guess it's possible.
What's your detailed business requirement ?
Do let me know.
Regards
- Atul

SRM - CCM 1.0 - How we can recover deleted procurement catalog

Hi,
We are using CCM1.0.
Is there any method to recover deleted procurement catalog?
Appropriate answer will be rewarded.
Thanks

Hi
Welcome to World of SRM !!!
I don't think it's possible to recover the deleted catalogs. Anyways, will try to find something and come back on this.
Meanwhile, have a word with SAP, by raising a Customer OSS Message on this as well.
Regards
- Atul

Deleting all items in a Procurement Catalog

I loaded a Procurement Catalog with new data via supplier catalog => master catalog => procurement catalog. There were some problems with the original data, however now I loaded it 3 times and many of the items in the Procurement catalog are tripled!
How can I just delete all the items in the Procurement Catalog and republish from the Master catalog? That way the tripled items (and some old corrupted items) will all go away and I can start fresh. We have CCM .
Thanks,
Laetitia

Once you archive than oyu can create new PI document for the same mateirals.
For archiving you need to set up the
Instead of MM-MATBEL select Physical iunventory object then follow
Presently trying to archive material documents through SARA and using object MM_MATBEL. Is this only for inventory maange ment or mat doc generated through process orders can also be archived (transaction type WR).
For variant picking the document on the date basis. But when execute it says no document found while documents are there in the MKPF table.
Further when trying using program RM07MARCNot able to do archive the same.
it display the following message
"Plants/Transact./Event Types for Which Doc. Ret. Period Has Not Been Maintained"

CCM 2.0 - Upload

Hi,
Our master catalog contents around 55000 items. I want to load news items via procurement catalog. The upload stop and no error message.
Please could you on this case?
Thanks, Ete
Hi Atul,
I'm using back end R/3 MM - 4.7
I checked SLG1 and no error message .
Best regards,

Hi
Refer to few links which might help.
1. Catalog Content Management: Configuration Guide Release SAP CCM 2.0 on Basis 640
The guide is located in SAP Service Marketplace under quick link /ibc-srm Catalog Content Management
2. SAP NetWeaver 04 Installation Guide Search and Classification (TREX) 6.1
The guide is located in SAP Service Marketplace under quick link /instguides SAP NetWeaver
Release 04 Installation Cross-NW
3. service.sap.com/instguides SAP NetWeaver Release 04 Installation SAP XI Configuration Guide SAP XI 3.0
4. http://help.sap.com/saphelp_nw04/helpdata/en/start.htm
5. http://service.sap.com/ibc-srm
Self-Service Procurement link: If you are using SRM 4.0 with SAP
Catalog Content Management 2.0
Open the CCM 1.0 Business Scenario Description (English)
https://websmp102.sap-ag.de/~sapidb/011000358700000216232004E/BSDCatalog.pdf
Open the CCM 2.0 Business Scenario Description (English)
https://websmp102.sap-ag.de/~sapidb/011000358700003992162005E/BSD_CCM200.pdf
Master Guide
https://websmp102.sap-ag.de/~sapidb/011000358700002817082004E
Other links of interest->
Transferring SRM Materials to CCM - SRM_EXTRACTED_CTLG
Re: CCM Create catalog link
Item deletion from procurement catalog in CCM?
CCM 2.0 Simple search on CSE does not show any result
Re: Problem with CCM view assignement
Hope this will help.
Please reward suitable points, incase it suits your requirements.
Regards
- Atul

Package processing in CCM (AUTH_UPDATE batch-job)

Hello all
We're using CCM 2.0 with SP03. We send CatalogueUpdateNotification_in messages (in XML format) to our XI and route it 1:1 to our CCM system. There it is processed by an async started AUTH_UPDATE batch-job. This job finally processes our catalog items.
As log as this batch-job runs the concerned catalog being updated is locked for other updates. And this is what causes us some head aches!
We send XML messages containing up to 2000 catalog items. This makes the batch job run quite long (up to 1.5h). Now, when we have more than 2000 updates to send to our catalog, we split it up into packages with up to 2000 items each.
Each package being sent from XI to CCM creates such a AUTH_UPDATE batch-job. The 1st starting is able to lock the catalog but this way of course also blocks processing of all other packages.
Every single minute the next (waiting / blocked) package tries to lock the catalog itself before it can be processed. This ensures parallel update processings but the other way around it also causes to fall into a timeout after lets say ca. 30 retries.
From XI point of view the timedout out package(s) sent to CCM were successfully processed... means: not restartable!
In CCM I can't find a way trying to re-process such a timedout package.
Re-generating the same package from the source system is not an option for us as well... it takes to much efforts.
Is there a way to change the wait time between retrying to lock the catalog?
OR
Is there a way to ensure that only 1 AUTH_UPDATE batch-job is started at the same time?
Thanks for some ideas to solve this.
Renaud

Hi
Please go through the SAP OSS Notes and pointers as well ->
Note 908054 - CCM 2.0 SP03 on Netweaver 04s SP Stack 06
Note 1002775 - Asynchronous deletion of old version after publication
Note 955096 - Rule condition (Not Equal with Not Valuated) in the view
Note 887328 - CCM20 - modifications for /CCM/VERIFY_CATALOG
Note 865138 - CCM20SP0 upload overview message "Category not found"
Note 873340 - Problems with BMECat mapping after patching XI
Note 864313 - Input help for mass editor
Related links ->
Re: Transfer Contract Data to CCM
Re: CCM CSE_ENRICHMENT BAdI debuging
Incase this does not help, please raise a customer OSS Message with SAP as well for faster resolution of your queries.
Do let me know. Hope this will help.
Regards
- Atul

How to batch upload PDF files into database BLOB

Hello.
I have a requirement to batch upload PDF files into BLOB column of an Oracle 8.1.7 table from Forms 6i Web. The content of the blob column (ie. the PDF content) MUST be displayable from all client software (eg. Oracle Web forms, HTML forms, etc.)
Our environment is
Middle-tier is 9iAS on Windows/2000
Database is Oracle 8.1.7.0.0 on VMS
Oracle Web Forms 6i Patch 10
Basically my Oracle web form program will display a list of PDF files to upload and then the user can click on the <Upload> button to do the batch upload. I have experimented the following approaches but with no luck.
1. READ_IMAGE_FILE forms built-in = does NOT work because it cannot read PDF file. I got error FRM-47100: Cannot read image file
2. OCX and OLE form item = cannot use this because it does NOT work on the Web. I got error FRM-41344 OLE object not defined
3. I cannot use DBMS_LOB to do the load because the PDF files are not in the database machine.
4. Metalink Note 1682771.1 (How to upload binary documents back to database blob column from forms). When I used this, I got ORA-6502 during the hextoraw conversion. In using this solution, I have downloaded a bin2hex.exe from the Google site. I've noticed that when I looked at the converted HEX file, each line has the character : (colon) at the beginning of each line. I know the PDF file has been converted correctly to HEX format because when I convert the HEX file back to BIN format using hex2bin.exe, I'm able to display the converted bin file in Acrobat Reader. When I removed the : (colon) in the HEX file, I did NOT get the ORA-6502 error but I CANNOT display the file in Acrobat Reader. It gives an error "corrupted file".
5. upload facility in PL/SQL Web toolkit - I tried to automatically submit the html form (with htp.p) but it does NOT load the contents of the file. I called the URL from Oracle forms using web.show_document. There seems to be issues with Oracle Web forms (JInitiator) and HTML (+ htp.p).
The other options I can think of at this point are:
1. Use SQL*Loader to do the batch upload via SQL*Net connection and use HOST() built-in from Oracle Webforms to execute SQL*Loader from the 9iAS.
2. Write a Visual Basic program that reads a binary file and output the contents of the file into a byte array. Then build a DLL that can be called from Oracle webforms 6i via ORA_FFI. I don't prefer this because it means the solution will only work for Windows.
3. Write a JSP program that streams the PDF file and insert the contents of the PDF file into blob column via JDBC. Call JSP from forms using web.show_document. With this I have to do another connection to the database when I load the file.
4. Maybe I can use dbms_lob by using network file system (NFS) between the application server and VMS. But this will be network resource hungry as far as I know because the network connection has to be kept open.
Please advise. Thank you.
Regards,
Armando

I have downloaded a bin2hex.exe from the Google site.
... each line has the character : (colon) at the
beginning of each line. I'm afraid it isn't a correct utility. I hope you'll find the source code of a correct one at metalink forum:
Doc ID: 368771.996
Type: Forum
Subject: Uploading Binary Files: bin2hex and hex2bin do not reproduce the same file
There is some links to metalink notes and some example about working with BLOB at http://www.tigralen.spb.ru/oracle/blob/index.htm. Maybe it helps. Sorry for my English. If there is any problem with code provided there, let me know by e-mail.

Need upload program for Vendor master partners (XK02)

Hello Experts,
I need to write data uplaod program for XK02 for vendor master Partner functions. ( Basically we created some custom partner functions and attach it to many existing vendors ).
So kindly advice me which is the suitable upload method for this.
1) There is no BAPI available for editing vendors.
2) BDC is not possible because the Vendor partner screen is having table control and some records are already filled. (No of row not fixed).
Is there any IDOC available or any standard input pgm?
Please give suggestion.
Thanks and rgds,
Anand

Hi,
You can use LSMW --> Vendor Master which supports bothe XK01 and XK02.
This is a standard Batch input program (RFBIKR00). Look at this program documentation for more info.
Regards
Sudhir Atluru

Image batch converter program

hi. i have a lot of images to upload for online gallery. total space and probably and more later, 1.1GB, which of them each photo is around 1, something MB.
i use archlinux. is there any batch converter program which gives me the option to convert many images together? if not on linux perhaps on windows?
ty in advanced

Yeah, I clicked here to post about mogrify.
It's very easy once you get a handle on what you want it to do (and work out the command), and if you do the same conversion often it is actually faster (for you) than having to click through some interface to select a batch of images and tell some gui-based application to process them.
I'm not one of these anti-gui guys, but mogrify is remarkably useful and convenient.
Here is some good info:
http://www.imagemagick.org/www/mogrify.html

Upload Program(sap-abap)

Hi Friends,
 I am using existing program to upload data(MM01 - BASIC VIEW ).But one of the field(MARA-BISMT) for old material number is neither uploading to transaction nor database.I have to uoload for other views(Purchasing, Accounting and so on) also which are depended on this old material number field.
 Secondly, Functional guy suggest me to add some of the fileds into it which are not available in upload structure.
Could you guide me how to fix this issue in below code and upload data safely ?
* Description : Migration Program for Material Master Basic View
* Using xls-structure in Migration Overview: MM-Basic View
* NAME SR DATE VER. XLS DESCRIPTION OF VERSION
* 8804 04.05.2008 1.0 1.0 Original program
* 8804 27.05.2004 1.1 1.0 Changed check for pack size
* multi pack size, EAN no,
* does not write to initial
* bdc_fields FORMT and FERTH
* 8804 09.06.2006 1.2 1.0 added flag for intercompany
* materials on converting table, also changed FM
* ZMM_ADD_OLD_MATNR_TO_CONV_TABL
REPORT z_basic.
* Structure for batch input
CONSTANTS: c_structure TYPE tabname VALUE 'ZMM_BASIC_VIEW'.
TABLES: makt, t006a, t024l, t002, zpmg, zsf1, zsf2, zsf3, zsf4, zsf5,
 zdrc, zdkb, zcce, zpsz, zcns, zusz, zatc, zmsz, t006, tntp, t179
* Internal Tables
DATA: i_data TYPE STANDARD TABLE OF zmm_basic_view.
DATA: i_spras TYPE STANDARD TABLE OF makt-spras.
* selection screen
SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME TITLE text-001.
PARAMETERS: p_file(128) DEFAULT 'U:\My Documents\mm_basic.txt'.
SELECTION-SCREEN SKIP.
PARAMETERS: p_mode LIKE ctu_params-dismode DEFAULT 'N'.
PARAMETERS: p_test NO-DISPLAY DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK block1.
INCLUDE Z_BASIC_A.
*INCLUDE zmigration.
* START-OF-SELECTION
START-OF-SELECTION.
PERFORM upload_file.
PERFORM check_entries.
PERFORM add_icons.
IF p_test NE 'X'.
 PERFORM update.
 update_run = 'X'.
ENDIF.
PERFORM show_result.
*& Form UPDATE
* text
* --> p1 text
* <-- p2 text
FORM update.
CALL FUNCTION 'ZMM_BASIC'
 EXPORTING
 mode = p_mode
 TABLES
 i_data = i_data
 i_mess = i_mess.
* update conversion table for materials where SAP-number already
* exists and material description also already exist for language in
* field SPRAS_2. This will only happen for inter company materials.
LOOP AT i_data INTO wa_data WHERE zman_update EQ 'X'.
 CALL FUNCTION 'ZMM_ADD_OLD_MATNR_TO_CONV_TABL'
 EXPORTING
 zzomp = wa_data-old_matnr
 werks = '54' " dummy plant
 matnr = wa_data-matnr
 bismt = wa_data-old_matnr
 inter_company = 'X'.
 wa_data-msgtx = 'Conversion table for material updated'.
 wa_data-msgtyp = 'I'.
 WRITE icon_led_yellow AS ICON TO wa_data-icon.
 MODIFY i_data FROM wa_data TRANSPORTING icon msgtyp msgtx.
ENDLOOP.
ENDFORM. " UPDATE
*& Form SHOW_RESULT
* text
* --> p1 text
* <-- p2 text
FORM show_result.
PERFORM generate_fieldcatalog.
PERFORM hide_blank_fields.
PERFORM unhide_message_columns.
PERFORM move_message_columns.
* PERFORM add_sorting_to_grid. " sort by first column in file
IF called_screen_100 EQ space.
 called_screen_100 = 'X'.
 CALL SCREEN 100.
ENDIF.
ENDFORM. " SHOW_RESULT
*& Form check_entries
* text
* --> p1 text
* <-- p2 text
FORM check_entries.
DATA: wa_find_new_material TYPE zfind_new_material_number.
LOOP AT i_data INTO wa_data.
* if file has been downloaded, it may already contain messages
 CLEAR: wa_data-icon,
 wa_data-msgtyp,
 wa_data-msgtx.
 TRANSLATE wa_data-spras_2 TO UPPER CASE.
 TRANSLATE wa_data-meins TO UPPER CASE.
 TRANSLATE wa_data-gewei TO UPPER CASE.
 TRANSLATE wa_data-voleh TO UPPER CASE.
 TRANSLATE wa_data-zzcce TO UPPER CASE.
* If the material already exists, only texts should be maintained
 IF NOT wa_data-matnr IS INITIAL.
* Required fields filled?
 CASE space.
 WHEN wa_data-spras_2.
 wa_data-msgtx = 'Field language key (SPRAS_2) is required'.
 WHEN wa_data-maktx_2.
 wa_data-msgtx = 'Field mat. description (MAKTX_2) is required'.
 ENDCASE.
* Set old_matnr to SAP number if it is not filled
 IF wa_data-old_matnr IS INITIAL.
 wa_data-old_matnr = wa_data-matnr.
 ENDIF.
 IF wa_data-msgtx EQ space.
* Language key allowed
 SELECT SINGLE * FROM t002
 WHERE spras = wa_data-spras_2.
 IF sy-subrc NE 0.
 wa_data-msgtx = 'Language key does not exist (spras_2)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx IS INITIAL.
 SHIFT wa_data-matnr RIGHT DELETING TRAILING space.
 OVERLAY wa_data-matnr WITH '000000000000000000'.
 SELECT SINGLE * FROM makt
 WHERE matnr EQ wa_data-matnr
 AND spras EQ wa_data-spras_2.
 IF sy-subrc EQ 0.
 CONCATENATE 'Mat. description already exists for language'
 wa_data-spras_2
 INTO wa_data-msgtx SEPARATED BY space.
 MOVE 'X' TO wa_data-zman_update.
 ENDIF.
 ENDIF.
* Change material - Find line to insert the new description.
 IF wa_data-msgtx IS INITIAL.
 SELECT spras
 INTO TABLE i_spras
 FROM makt
 WHERE matnr = wa_data-matnr.
 DESCRIBE TABLE i_spras LINES l_lines.
 IF l_lines > 3.
* All screen fields for descriptions are filled - Must be updated
* manually -
* ( or add code to insert into MAKT in an other way... )
 wa_data-msgtx =
'Description must be added manually - only 4 lines available on screen'.
 wa_data-zman_update = 'X'.
* added to converting table after update run
 ENDIF.
 ENDIF.
 ELSE.
* Check if required fields are filled
 CASE space.
 WHEN wa_data-spras_2.
 wa_data-msgtx = 'Field language key (SPRAS_2) is required'.
 WHEN wa_data-maktx_1.
 wa_data-msgtx = 'Field mat. description (MAKTX_1) is required'.
 WHEN wa_data-maktx_2.
 wa_data-msgtx = 'Field mat. description (MAKTX_2) is required'.
 WHEN wa_data-mbrsh.
 wa_data-msgtx = 'Field Industry sector (mbrsh) is required'.
 WHEN wa_data-mtart.
 wa_data-msgtx = 'Field Material type (mtart) is required'.
 WHEN wa_data-meins.
 wa_data-msgtx = 'Field Base unit of measure (meins) is required'.
 WHEN wa_data-prdha.
 wa_data-msgtx = 'Field Product hierarchy (prdha) is required'.
 WHEN wa_data-labor.
 wa_data-msgtx = 'Field Laboratory design (labor) is required'.
 ENDCASE.
* Values allowed?
 IF wa_data-msgtx EQ space.
* Base unit of measure
 SELECT SINGLE * FROM t006a
 WHERE spras = sy-langu
 AND mseh3 = wa_data-meins.
 IF sy-subrc NE 0.
 wa_data-msgtx = 'Base unit of measure does not exist (mseh3)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space.
* Lab./Office
 SELECT SINGLE * FROM t024l
 WHERE labor = wa_data-labor.
 IF sy-subrc NE 0.
 wa_data-msgtx = 'Lab./Office does not exist (labor)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space.
* Language key
 SELECT SINGLE * FROM t002
 WHERE spras = wa_data-spras_2.
 IF sy-subrc NE 0.
 wa_data-msgtx = 'Language key does not exist (spras_2)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space.
* Product hierarchy
 SELECT SINGLE * FROM t179
 WHERE prodh = wa_data-prdha.
 IF sy-subrc NE 0.
 wa_data-msgtx = 'Product hierarchy does not exist (PRDHA)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzpmg IS INITIAL.
* ProdMatGrp (ABC ind)
 SELECT SINGLE * FROM zpmg
 WHERE zzpmg = wa_data-zzpmg.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'ProdMatGrp (ABC ind) does not exist (zzpmg)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzsf1 IS INITIAL.
* Sort field 1
 SELECT SINGLE * FROM zsf1
 WHERE zzsf1 = wa_data-zzsf1.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Sort field 1 does not exist (ZZSF1)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzsf2 IS INITIAL.
* Sort field 2
 SELECT SINGLE * FROM zsf2
 WHERE zzsf2 = wa_data-zzsf2.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Sort field 2 does not exist (ZZSF2)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzsf3 IS INITIAL.
* Sort field 3
 SELECT SINGLE * FROM zsf3
 WHERE zzsf3 = wa_data-zzsf3.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Sort field 3 does not exist (ZZSF3)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzsf4 IS INITIAL.
* Sort field 4
 SELECT SINGLE * FROM zsf4
 WHERE zzsf4 = wa_data-zzsf4.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Sort field 4 does not exist (ZZSF4)'.
 ENDIF.
 ENDIF.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzsf5 IS INITIAL.
* Sort field 5
 SELECT SINGLE * FROM zsf5
 WHERE zzsf5 = wa_data-zzsf5.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Sort field 5 does not exist (ZZSF5)'.
 ENDIF.
 ENDIF.
* Drug Code
 IF wa_data-msgtx EQ space AND NOT wa_data-zzdrc IS INITIAL.
 SELECT SINGLE * FROM zdrc
 WHERE zzdrc = wa_data-zzdrc.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Drug Code does not exist (zzdrc)'.
 ENDIF.
 ENDIF.
* Narco Base
 IF wa_data-msgtx EQ space AND NOT wa_data-zzdkb IS INITIAL.
 SELECT SINGLE * FROM zdkb
 WHERE zzdkb = wa_data-zzdkb.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Narco Base does not exist (zzdkb)'.
 ENDIF.
 ENDIF.
* Country code, Emscope standard
 IF wa_data-msgtx EQ space AND NOT wa_data-zzcce IS INITIAL.
 SELECT SINGLE * FROM zcce
 WHERE zzcce = wa_data-zzcce.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Country code, Emscope standard does not exist (zzcce)'.
 ENDIF.
 ENDIF.
* Package size
 IF wa_data-msgtx EQ space AND NOT wa_data-zzpsz IS INITIAL.
 CONDENSE wa_data-zzpsz.
 SELECT SINGLE * FROM zpsz
 WHERE zzpsz = wa_data-zzpsz.
 IF sy-subrc NE 0.
 wa_data-msgtx = 'Package size does not exist (zzpsz)'.
 ENDIF.
 ENDIF.
* Concentration
 IF wa_data-msgtx EQ space AND NOT wa_data-zzcns IS INITIAL.
 SELECT SINGLE * FROM zcns
 WHERE zzcns = wa_data-zzcns.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Concentration does not exist (ZZCNS)'.
 ENDIF.
 ENDIF.
* Unit Size
 IF wa_data-msgtx EQ space AND NOT wa_data-zzusz IS INITIAL.
 SELECT SINGLE * FROM zusz
 WHERE zzusz = wa_data-zzusz.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Unit Size does not exist (ZZUSZ)'.
 ENDIF.
 ENDIF.
* ATC-no.
 IF wa_data-msgtx EQ space AND NOT wa_data-zzatc IS INITIAL.
 SELECT SINGLE * FROM zatc
 WHERE zzatc = wa_data-zzatc.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'ATC-no. does not exist (ZZATC)'.
 ENDIF.
 ENDIF.
* Multi pack size
 IF wa_data-msgtx EQ space AND NOT wa_data-zzmsz IS INITIAL.
 CONDENSE wa_data-zzmsz.
 SELECT SINGLE * FROM zmsz
 WHERE zzmsz = wa_data-zzmsz.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Multi pack size does not exist (ZZMSZ)'.
 ENDIF.
 ENDIF.
* Weight Unit
 IF wa_data-msgtx EQ space AND NOT wa_data-gewei IS INITIAL.
 SELECT SINGLE * FROM t006
 WHERE msehi = wa_data-gewei.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Weight Unit does not exist (GEWEI)'.
 ENDIF.
 ENDIF.
* Volume Unit
 IF wa_data-msgtx EQ space AND NOT wa_data-voleh IS INITIAL.
 SELECT SINGLE * FROM t006
 WHERE msehi = wa_data-voleh.
 IF sy-subrc NE 0.
 wa_data-msgtx =
 'Volume Unit does not exist (VOLEH)'.
 ENDIF.
 ENDIF.
* EAN for Germany will be entered manually by Cato.
 if wa_data-ean11 ne space and wa_data-msgtx eq space.
 data: l_ean_length type i.
 l_ean_length = strlen( wa_data-ean11 ).
 if l_ean_length ne 13 or wa_data-matnr ne space.
 wa_data-msgtx =
 'Enter EAN numbers manually for Germany and common materials'.
 elseif wa_data-numtp is initial.
 wa_data-msgtx = 'EAN category must be given for EAN number'.
 endif.
 endif.
 if wa_data-ean11 eq space and wa_data-numtp ne space.
* Makes no sense to have an EAN category when there is no EAN
 clear: wa_data-numtp.
 endif.
 ENDIF. " IF NOT wa_data-matnr IS INITIAL.
* Has material already been migrated?
 IF wa_data-msgtx EQ space and wa_data-msgtyp ne 'W'.
 CLEAR: wa_find_new_material.
 MOVE: wa_data-old_matnr TO wa_find_new_material-matnr_old,
 '54' TO wa_find_new_material-werks.
 CALL FUNCTION 'ZFIND_NEW_MATERIAL_NUMBER'
 EXPORTING
 get_from_marc = space
 CHANGING
 wa_data = wa_find_new_material.
 IF NOT wa_find_new_material-matnr IS INITIAL.
 CONCATENATE: 'Material already created:'
 wa_find_new_material-matnr
 INTO wa_data-msgtx
 SEPARATED BY space.
 wa_data-msgtyp = 'E'.
 ENDIF.
 ENDIF.
* Set all messages that are not Warning to Error
 IF wa_data-msgtx NE space AND wa_data-msgtyp EQ space.
 MOVE: 'E' TO wa_data-msgtyp.
 ENDIF.
 MODIFY i_data FROM wa_data.
ENDLOOP.
ENDFORM. " check_entries
*& Module USER_COMMAND_0100 INPUT
* text
MODULE user_command_0100 INPUT.
DATA: local_commands.
PERFORM user_commands_local CHANGING local_commands.
IF local_commands EQ 'X'.
* local user command has been executed - clear ok_code
 CLEAR ok_code.
ELSE.
 PERFORM user_commands.
ENDIF.
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Form user_commands_local
* text
* <--P_LOCAL_COMMANDS text
FORM user_commands_local CHANGING p_local_commands.
* Add your own user commands here and overwrite default handling if
* necessary
DATA: local_ok TYPE ok.
local_commands = 'X'.
local_ok = ok_code.
CASE local_ok.
 WHEN OTHERS.
 CLEAR: local_commands.
ENDCASE.
ENDFORM. " user_commands_local
Pls treat it as urgent.
I ll reward for usefull response.
Thx in Adv.
Bobby

Hi,
 I didn't recieve any response from you regarding issues in upload program.
 Could you pls send some solution for this issue ?
 Pls treat it as urgent.
Thx in Adv.
Bobby

LSMW Standard Batch Input Program

Hi,
I have one requirement on creating BOM.
I have to upload data from legacy system to SAP for T-Code ' CS01'
I have to use the Standard Batch input Program 'RCSBI010'.
I have source structure and Target Structure.
In Source structure i have Header and item data.
In Header i have 11 fields and in Item i have 23 fields.
In Target Structure i have upto 130 fields.
In the Standard program who have 4 structures and each structure have fields.
So How many fields i have to map with Standard structure. and in my source structure i dont have the fields like T-code, session name, user name,and xkeep.
So how to pass these fields (T-code, session name, user name,and xkeep) to the standard structure. and is it necessary to pass these fields to the standard batch input program.
Advance thanks,
Kumar A

Hi,
Hi,
Record type 0: one session record (structure BGR00) per session..
The session header contains general administrative data on the batch input session to be created. All records that follow the header in the sequential file are assigned to the current session, until the next header occurs in the file.
Record type 1: one session record (structure BICSK) for each BOM
The BOM header record contains the transaction code (for example, CS01 Create material BOM) and the header data
Record type 2: one item record (structure BICSP) per item
All BOM item records are assigned to the preceding BOM header, until the next BOM header or session header occurs in the sequential file
Record type 3: one sub-item record (structure BICSU) per sub-item
All BOM sub-item records are assigned to the preceding BOM item, until the next item header, BOM header, or session header occurs in the sequential file
and x-line which will be used as index while retreiveing
and the file to be imported should contain values in this format
BGR00 data will be in first line (0-stype)
BICSK in second line (1 stype)
BICSP in 3rd line
BICSU in 4th line
e.g:
0 sessname 800
1 CS01 123
2 values req
3 values req
Hope this gives u some idea...
Reward points
Regards

CCM automated (batch) upload program to Procurement Catalog

Similar Messages

Maybe you are looking for