This is a Perl trigger to delete CRs on a Telelogic Change server from a shell.

It is intended to administrators, but be warned that the operation is irreversible. This script can be a Weapon of Mass Destruction for your database.

When piped with the get_report.pl script, it allows to query and delete a set of CRs (e.g. from a project) in one command. Think twice before using.

Usage is displayed when invoked with no argument:

[boris@samarcande  ~]$ perl -I /home/boris/Projects/csapi/ delete_record_5.pl
usage: delete_record_5.pl problem_number

delete_record_5.pl allows you to delete a record in a Telelogic Change
database. You have to specify on the command-line the
record ID (i.e. problem_number attribute).

THIS OPERATION CANNOT BE UNDONE!!!!!

[boris@samarcande  ~]$ perl -I /home/boris/Projects/csapi/ delete_record_5.pl -v 154
154: Deletion was successful.

[boris@samarcande  ~]$ perl -I /home/boris/Projects/csapi/ delete_record_5.pl -v 154
154: Failed to delete change request

Developped and tested on Unix -- should be crossplatform.

delete_record_4.pl is tested with Change 4.3, 4.4 -- should run with Change 4.5, 4.6, 4.7.

delete_record_5.pl is tested with Change 5.2 -- should run with Change 5.0 and 5.1.

Attachments:

File	Description	File size
delete_record_4.pl	A perl script to delete a record on a Telelogic Change server.	1 Kb
delete_record_5.pl	A perl script to delete a record on a Telelogic Change server.	1 Kb