topic deleting a table. in Application Development and Automation Discussions

deleting a table.

Former Member — Wed, 16 Apr 2008 22:06:36 GMT

Hi Gurus!

I need to write a select query such that if table-field = 0 , then go delete table.

ex :

RSBKREQUEST-linestransferred = 0.

then delete the table /BIC/OHFGL_UN_2.

thx in advance..

Re: deleting a table.

former_member156446 — Wed, 16 Apr 2008 22:09:59 GMT

data: begin of itab.
         include structure URTABLENAME.
data: end if itab.

select * from URTABLENAME
 into table itab.
if sy-subrc eq 0.
delete table URTABLENAME.
endif.

if not itab[] is intial.
delete itab where field eq 0.
modify URTABLENAME by itab.
endif.

Re: deleting a table.

Former Member — Thu, 17 Apr 2008 04:57:47 GMT

I think you want to first check the 0 entry in field of table and then delete entries of other table.Is it??

Re: deleting a table.

Former Member — Thu, 17 Apr 2008 05:19:12 GMT

Hi Sandeep,

Call all the fields in the select query to itab and make a conditon to delecte the fields display 0.

Have this sample code for your guidance.

SELECT MCHB_{MATNR MCHB}WERKS MCHB_{LGORT MCHB}CHARG MCHB_{CLABS MCHB}CINSM MCHB~CSPEM

MAKT~MAKTG

T001L_{LGOBE T001L}LIFNR

INTO CORRESPONDING FIELDS OF TABLE ITAB

FROM MCHB

INNER JOIN MCH1

ON MCHB_{MATNR = MCH1}MATNR AND MCHB_{CHARG = MCH1}CHARG

INNER JOIN MAKT

ON MCHB_{MATNR = MAKT}MATNR

INNER JOIN T001L

ON MCHB_{WERKS = T001L}WERKS AND MCHB_{LGORT = T001L}LGORT

WHERE MCHB~MATNR IN MATERIAL

AND MCHB~WERKS IN PLANT

AND MCH1~LVORM = ''.

LOOP AT ITAB.

ITAB-TOTAL = ITAB-CLABS + ITAB-CINSM + ITAB-CSPEM.

IF ITAB-TOTAL = 0.

DELETE ITAB.

MODIFY ITAB.

ENDIF.

ENDLOOP.

Reward if its useful..

Re: deleting a table.

Former Member — Thu, 17 Apr 2008 05:22:12 GMT

hi,

there are two ways,

this affets ur db table.

1.delete dbtable where tab-field eq 0.

this affect internal table only

2.select * into itab

from table.

delete from itab where itab-field eq 0.

regards,

priya

Edited by: Banupriya R on Apr 17, 2008 7:22 AM

Re: deleting a table.

Former Member — Thu, 17 Apr 2008 06:10:35 GMT

Hi, try like this,

IF RSBKREQUEST-linestransferred = 0.

DELETE FROM /BIC/OHFGL_UN_2.

ENDIF.