7deb103424
FILES: workflow/engine/methods/processes/ajaxListener.php workflow/engine/methods/processes/downloadPML.php workflow/engine/methods/processes/downloadPML_ImportExisting.php workflow/engine/methods/processes/index.php workflow/engine/methods/processes/main.php workflow/engine/methods/processes/mainInit.php workflow/engine/methods/processes/process_DeleteCases.php
99 lines
4.1 KiB
PHP
Executable File
99 lines
4.1 KiB
PHP
Executable File
<?php
|
|
/**
|
|
* processes_ImportFileExisting.php
|
|
*
|
|
* ProcessMaker Open Source Edition
|
|
* Copyright (C) 2004 - 2008 Colosa Inc.23
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Affero General Public License as
|
|
* published by the Free Software Foundation, either version 3 of the
|
|
* License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Affero General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
|
|
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
|
|
*/
|
|
|
|
try {
|
|
//load the variables
|
|
G::LoadClass( 'processes' );
|
|
$oProcess = new Processes();
|
|
|
|
if (! isset( $_POST['form']['IMPORT_OPTION'] )) {
|
|
throw (new Exception( 'Please select an option before to continue' ));
|
|
}
|
|
|
|
$option = $_POST['form']['IMPORT_OPTION'];
|
|
$filename = $_POST['form']['PRO_FILENAME'];
|
|
$ObjUid = $_POST['form']['OBJ_UID'];
|
|
|
|
$path = PATH_DOCUMENT . 'input' . PATH_SEP;
|
|
$oData = $oProcess->getProcessData( $path . $filename );
|
|
|
|
$Fields['PRO_FILENAME'] = $filename;
|
|
$sProUid = $oData->process['PRO_UID'];
|
|
$oData->process['PRO_UID_OLD'] = $sProUid;
|
|
|
|
//Update the current Process, overwriting all tasks and steps
|
|
if ($option == 1) {
|
|
$oProcess->updateProcessFromData( $oData, $path . $filename );
|
|
if (file_exists( PATH_OUTTRUNK . 'compiled' . PATH_SEP . 'xmlform' . PATH_SEP . $sProUid )) {
|
|
$oDirectory = dir( PATH_OUTTRUNK . 'compiled' . PATH_SEP . 'xmlform' . PATH_SEP . $sProUid );
|
|
while ($sObjectName = $oDirectory->read()) {
|
|
if (($sObjectName != '.') && ($sObjectName != '..')) {
|
|
unlink( PATH_OUTTRUNK . 'compiled' . PATH_SEP . 'xmlform' . PATH_SEP . $sProUid . PATH_SEP . $sObjectName );
|
|
}
|
|
}
|
|
$oDirectory->close();
|
|
}
|
|
$sNewProUid = $sProUid;
|
|
}
|
|
|
|
//Disable current Process and create a new version of the Process
|
|
if ($option == 2) {
|
|
$oProcess->disablePreviousProcesses( $sProUid );
|
|
$sNewProUid = $oProcess->getUnusedProcessGUID();
|
|
$oProcess->setProcessGuid( $oData, $sNewProUid );
|
|
$oProcess->setProcessParent( $oData, $sProUid );
|
|
$oData->process['PRO_TITLE'] = "New - " . $oData->process['PRO_TITLE'] . ' - ' . date( 'M d, H:i' );
|
|
$oProcess->renewAllTaskGuid( $oData );
|
|
$oProcess->renewAllDynaformGuid( $oData );
|
|
$oProcess->renewAllInputGuid( $oData );
|
|
$oProcess->renewAllOutputGuid( $oData );
|
|
$oProcess->renewAllStepGuid( $oData );
|
|
$oProcess->renewAllTriggerGuid( $oData );
|
|
$oProcess->renewAllSubProcessGuid( $oData );
|
|
$oProcess->createProcessFromData( $oData, $path . $filename );
|
|
}
|
|
|
|
//Create a completely new Process without change the current Process
|
|
if ($option == 3) {
|
|
//krumo ($oData);
|
|
$sNewProUid = $oProcess->getUnusedProcessGUID();
|
|
$oProcess->setProcessGuid( $oData, $sNewProUid );
|
|
$oData->process['PRO_TITLE'] = "Copy of - " . $oData->process['PRO_TITLE'] . ' - ' . date( 'M d, H:i' );
|
|
$oProcess->renewAllTaskGuid( $oData );
|
|
$oProcess->renewAllDynaformGuid( $oData );
|
|
$oProcess->renewAllInputGuid( $oData );
|
|
$oProcess->renewAllOutputGuid( $oData );
|
|
$oProcess->renewAllStepGuid( $oData );
|
|
$oProcess->renewAllTriggerGuid( $oData );
|
|
$oProcess->renewAllSubProcessGuid( $oData );
|
|
$oProcess->createProcessFromData( $oData, $path . $filename );
|
|
}
|
|
G::header( 'Location: processes_Map?PRO_UID=' . $sNewProUid );
|
|
} catch (Exception $e) {
|
|
$G_PUBLISH = new Publisher();
|
|
$aMessage['MESSAGE'] = $e->getMessage();
|
|
$G_PUBLISH->AddContent( 'xmlform', 'xmlform', 'login/showMessage', '', $aMessage );
|
|
G::RenderPage( 'publish', 'blank' );
|
|
}
|