2010-12-02 23:34:41 +00:00
|
|
|
<?php
|
|
|
|
|
/**
|
|
|
|
|
* fields_Delete.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
|
2012-10-18 11:53:05 -04:00
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
2010-12-02 23:34:41 +00:00
|
|
|
* GNU Affero General Public License for more details.
|
|
|
|
|
*
|
|
|
|
|
* You should have received a copy of the GNU Affero General Public License
|
2012-10-18 11:53:05 -04:00
|
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
2010-12-02 23:34:41 +00:00
|
|
|
*
|
|
|
|
|
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
|
|
|
|
|
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
|
|
|
|
|
*/
|
2012-10-18 11:53:05 -04:00
|
|
|
if (($RBAC_Response = $RBAC->userCanAccess( "PM_FACTORY" )) != 1) {
|
|
|
|
|
return $RBAC_Response;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//G::genericForceLogin( 'WF_MYINFO' , 'login/noViewPage', $urlLogin = 'login/login' );
|
|
|
|
|
|
|
|
|
|
if (! (isset( $_POST['A'] ) && $_POST['A'] !== '')) {
|
|
|
|
|
return;
|
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
2012-10-18 11:53:05 -04:00
|
|
|
$file = G::decrypt( $_POST['A'], URL_KEY );
|
2010-12-02 23:34:41 +00:00
|
|
|
|
2012-10-18 11:53:05 -04:00
|
|
|
$dbc = new DBConnection( PATH_DYNAFORM . $file . '.xml', '', '', '', 'myxml' );
|
|
|
|
|
$ses = new DBSession( $dbc );
|
2010-12-02 23:34:41 +00:00
|
|
|
|
2012-10-18 11:53:05 -04:00
|
|
|
$fields = new DynaFormField( $dbc );
|
2010-12-02 23:34:41 +00:00
|
|
|
|
2012-10-18 11:53:05 -04:00
|
|
|
if (! isset( $_POST['XMLNODE_NAME'] )) {
|
|
|
|
|
return;
|
|
|
|
|
}
|
2010-12-02 23:34:41 +00:00
|
|
|
|
2012-10-18 11:53:05 -04:00
|
|
|
$fields->Delete( $_POST['XMLNODE_NAME'] );
|
2010-12-02 23:34:41 +00:00
|
|
|
|
2012-10-18 11:53:05 -04:00
|
|
|
$i = 0;
|
|
|
|
|
$aFields = array ();
|
|
|
|
|
$aFields[] = array ('XMLNODE_NAME' => 'char','TYPE' => 'char','UP' => 'char','DOWN' => 'char');
|
|
|
|
|
$oSession = new DBSession( new DBConnection( PATH_DYNAFORM . $file . '.xml', '', '', '', 'myxml' ) );
|
|
|
|
|
$oDataset = $oSession->Execute( 'SELECT * FROM dynaForm WHERE NOT( XMLNODE_NAME = "" )' );
|
|
|
|
|
$iMaximun = $oDataset->count();
|
|
|
|
|
while ($aRow = $oDataset->Read()) {
|
|
|
|
|
$aFields[] = array ('XMLNODE_NAME' => $aRow['XMLNODE_NAME'],'TYPE' => $aRow['TYPE'],'UP' => ($i > 0 ? G::LoadTranslation( 'ID_UP' ) : ''),'DOWN' => ($i < $iMaximun - 1 ? G::LoadTranslation( 'ID_DOWN' ) : '') );
|
|
|
|
|
$i ++;
|
|
|
|
|
}
|
|
|
|
|
global $_DBArray;
|
|
|
|
|
$_DBArray['fields'] = $aFields;
|
|
|
|
|
$_SESSION['_DBArray'] = $_DBArray;
|
2010-12-02 23:34:41 +00:00
|
|
|
|