Elep

<?php
/*
 * Your installation or use of this SugarCRM file is subject to the applicable
 * terms available at
 * http://support.sugarcrm.com/Resources/Master_Subscription_Agreements/.
 * If you do not agree to all of the applicable terms or do not have the
 * authority to bind the entity as an authorized representative, then do not
 * install or use this SugarCRM file.
 *
 * Copyright (C) SugarCRM Inc. All rights reserved.
 */
/*********************************************************************************
 * Description:
 ********************************************************************************/

global $mod_strings;

$focus = BeanFactory::newBean('WorkFlowAlertShells');

if (!isset($_REQUEST['record'])) {
    sugar_die($mod_strings['ERR_DELETE_RECORD']);
}

$focus->retrieve($_REQUEST['record']);

//mark delete alert components and sub expression components
$alert_object_list = $focus->get_linked_beans('alert_components', 'WorkFlowAlert');

foreach ($alert_object_list as $alert_object) {
    mark_delete_components($alert_object->get_linked_beans('expressions', 'Expression'));
    mark_delete_components($alert_object->get_linked_beans('rel1_alert_fil', 'Expression'));
    mark_delete_components($alert_object->get_linked_beans('rel2_alert_fil', 'Expression'));
    $alert_object->mark_deleted($alert_object->id);

//end foreach alert_object
}

$focus->mark_deleted($_REQUEST['record']);

$workflow_object = $focus->get_workflow_object();
$workflow_object->write_workflow();
$request = http_build_query([
    'module' => $_REQUEST['return_module'],
    'action' => $_REQUEST['return_action'],
    'record' => $_REQUEST['return_id'],
]);

header('Location: index.php?' . $request);