Script to delete template and Data Definition of XML Publisher

Script to delete template and Data Definition of XML Publisher

select * from XDO_TEMPLATES_B        where template_code    = :p_template_code;

select * from XDO_TEMPLATES_TL       where template_code    = :p_template_code;

select * from XDO_LOBS               where lob_code         = :p_template_code;

select * from XDO_DS_DEFINITIONS_TL  where data_source_code = :p_template_code;

select * from XDO_DS_DEFINITIONS_B   where data_source_code = :p_template_code;

declare
p_template_code XDO_TEMPLATES_B.template_code%type := 'XXGRREP' ;
begin
delete   from XDO_TEMPLATES_B        where template_code    = :p_template_code
delete   from XDO_TEMPLATES_TL       where template_code    = :p_template_code
delete   from xdo_lobs               where lob_code         = :p_template_code
delete   from XDO_DS_DEFINITIONS_TL  where data_source_code = :p_template_code
delete   from XDO_DS_DEFINITIONS_b   where data_source_code = :p_template_code
end;