function delete_gl($id)
{
log_debug("gl_manage_soap", "Executing delete_gl({$id})");
if (user_permissions_get("accounts_gl_write")) {
$obj_gl = new gl_transaction();
/*
Load SOAP Data
*/
$obj_gl->id = @security_script_input_predefined("int", $id);
if (!$obj_gl->id || $obj_gl->id == "error") {
throw new SoapFault("Sender", "INVALID_INPUT");
}
/*
Error Handling
*/
// verify transaction ID
if (!$obj_gl->verify_id()) {
throw new SoapFault("Sender", "INVALID_ID");
}
// check that the transaction can be safely deleted
if ($obj_gl->check_delete_lock()) {
throw new SoapFault("Sender", "LOCKED");
}
/*
Perform Changes
*/
if ($obj_gl->action_delete()) {
return 1;
} else {
throw new SoapFault("Sender", "UNEXPECTED_ACTION_ERROR");
}
} else {
throw new SoapFault("Sender", "ACCESS DENIED");
}
}
if (user_permissions_get('accounts_gl_write')) {
$obj_gl = new gl_transaction();
/*
Import POST Data
*/
$obj_gl->id = @security_form_input_predefined("int", "id_transaction", 1, "");
// these exist to make error handling work right
$obj_gl->data["code_gl"] = @security_form_input_predefined("any", "code_gl", 0, "");
$obj_gl->data["description"] = @security_form_input_predefined("any", "description", 0, "");
// confirm deletion
$obj_gl->data["delete_confirm"] = @security_form_input_predefined("any", "delete_confirm", 1, "You must confirm the deletion");
/*
Error Handling
*/
// make sure the transaction actually exists
if (!$obj_gl->verify_id()) {
log_write("error", "process", "The transaction you have attempted to edit - " . $obj_gl->id . " - does not exist in this system.");
}
if ($obj_gl->check_delete_lock()) {
log_write("error", "process", "This transaction can not be deleted, because it is locked");
}
// return to input page in event of an error
if ($_SESSION["error"]["message"]) {
$_SESSION["error"]["form"]["transaction_delete"] = "failed";
header("Location: ../../index.php?page=accounts/gl/delete.php&id=" . $obj_gl->id);
exit(0);
}
/*
Action
*/
$obj_gl->action_delete();
