cancel
Showing results for 
Search instead for 
Did you mean: 

Delete Delta initialization with ABAP code

Former Member
0 Kudos

Hello All.

I want to use ABAP to delete a previous Delta Initialization, in order to be able to run again the initialization. Has anyone done this before?

My scenario is as follows:

I have to move Material movements data from teh standard Cube to another cube (let´s say cube2) using delta. Then I run a delta proces in Cube2 to split uploaded records based on information in an ODS. This ODS is updated via a flat file, so when the file is updated, then I have to delete hte Cube2 delta initialization and run it again with all the data.

Thanks and best regards,

Alfonso.

Accepted Solutions (1)

Accepted Solutions (1)

Former Member
0 Kudos

Hi,

look at this thread, you'll find your solution. We have installed the abap + it works fine.

we have made only a few changes to make it running on the BW-system not only on OLTP-system like the orginal version was.

  • DESCRIPTION : Delete the Initselection for a Datasource in OLTP *

  • The original Program could only run on the OLTP, *

  • which makes no sense. I changed it to run in *

  • PChains on a BW-sytem *

  • MODIFICATIONS : *

  • Changed : 26.01.2006 M.Schulze *

  • : *

SELECTION-SCREEN BEGIN OF BLOCK eins WITH FRAME.

DATA: v_count TYPE i.

PARAMETERS: p_dsourc LIKE roosprmsc-oltpsource

OBLIGATORY

DEFAULT '1_CO_PA160AT01SWIF',

p_rlogsy LIKE roosprmsc-rlogsys

OBLIGATORY.

SELECTION-SCREEN END OF BLOCK eins.

  • simple check input params

SELECT COUNT(*) FROM rssdlinit INTO v_count

WHERE oltpsource = p_dsourc

AND logsys = p_rlogsy.

IF sy-subrc NE 0. "MesgTyp E end the program abnormally

MESSAGE e508(db6) WITH 'x' 'x' 'in DSource and/or LogSys'.

ENDIF.

  • Call delete function

CALL FUNCTION 'RSS1_QUEUE_DELETED_IN_OLTP'

EXPORTING

i_oltpsource = p_dsourc "OLTP-Source

i_logsys = p_rlogsy "LogSys (Myself or Remote)

EXCEPTIONS

failed = 1

OTHERS = 2.

IF sy-subrc <> 0.

MESSAGE e508(db6) WITH 'x' 'x' '===> No sucess <==='.

ENDIF.

/manfred

Former Member
0 Kudos

Thnak you Manfred.

This is exactly what I need.

10 points for you.

Answers (0)