180 lines
8.0 KiB
PHP
Executable File
180 lines
8.0 KiB
PHP
Executable File
<?php
|
|
/**
|
|
* class.dynaFormField.php
|
|
*
|
|
* @package workflow.engine.classes
|
|
*
|
|
* 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.
|
|
*
|
|
*/
|
|
|
|
G::LoadClass( 'xmlDb' );
|
|
|
|
/**
|
|
* Dynaform Field - DynaformField class
|
|
*
|
|
* @package workflow.engine.classes
|
|
*/
|
|
class DynaFormField extends DBTable
|
|
{
|
|
|
|
/**
|
|
* Function SetTo
|
|
*
|
|
* @param string $objConnection
|
|
* @return void
|
|
*/
|
|
function SetTo ($objConnection)
|
|
{
|
|
DBTable::SetTo( $objConnection, 'dynaForm', array ('XMLNODE_NAME'
|
|
) );
|
|
}
|
|
|
|
/**
|
|
* Load a dynaForm
|
|
*
|
|
* @param string $sUID
|
|
* @return void
|
|
*/
|
|
function Load ($sUID)
|
|
{
|
|
parent::Load( $sUID );
|
|
if (is_array( $this->Fields )) {
|
|
foreach ($this->Fields as $name => $value) {
|
|
if (strcasecmp( $name, 'dependentfields' ) == 0) {
|
|
$this->Fields[$name] = explode( ',', $value );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Delete Fields of a dynaForm
|
|
*
|
|
* @param string $uid
|
|
* @return void
|
|
*/
|
|
function Delete ($uid)
|
|
{
|
|
$this->Fields['XMLNODE_NAME'] = $uid;
|
|
parent::Delete();
|
|
}
|
|
|
|
/**
|
|
* Save Fields of a dynaform
|
|
*
|
|
* @param array $Fields
|
|
* @param array $labels
|
|
* @param array $options
|
|
* @return void
|
|
*/
|
|
function Save ($Fields, $labels = array(), $options = array())
|
|
{
|
|
|
|
if ($Fields['TYPE'] === 'javascript') {
|
|
$Fields['XMLNODE_VALUE'] = $Fields['CODE'];
|
|
unset( $Fields['CODE'] );
|
|
$labels = array ();
|
|
}
|
|
if ($Fields['XMLNODE_NAME_OLD'] == '') {
|
|
if (($Fields['XMLNODE_NAME'][0] == '1') || ($Fields['XMLNODE_NAME'][0] == '2') || ($Fields['XMLNODE_NAME'][0] == '3') || ($Fields['XMLNODE_NAME'][0] == '4') || ($Fields['XMLNODE_NAME'][0] == '5') || ($Fields['XMLNODE_NAME'][0] == '6') || ($Fields['XMLNODE_NAME'][0] == '7') || ($Fields['XMLNODE_NAME'][0] == '8') || ($Fields['XMLNODE_NAME'][0] == '9') || ($Fields['XMLNODE_NAME'][0] == '10')) {
|
|
$Fields['XMLNODE_NAME'] = '_' . $Fields['XMLNODE_NAME'];
|
|
}
|
|
$res = $this->_dbses->Execute( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $Fields['XMLNODE_NAME'] . '"' );
|
|
} else {
|
|
if (($Fields['XMLNODE_NAME_OLD'][0] == '1') || ($Fields['XMLNODE_NAME_OLD'][0] == '2') || ($Fields['XMLNODE_NAME_OLD'][0] == '3') || ($Fields['XMLNODE_NAME_OLD'][0] == '4') || ($Fields['XMLNODE_NAME_OLD'][0] == '5') || ($Fields['XMLNODE_NAME_OLD'][0] == '6') || ($Fields['XMLNODE_NAME_OLD'][0] == '7') || ($Fields['XMLNODE_NAME_OLD'][0] == '8') || ($Fields['XMLNODE_NAME_OLD'][0] == '9') || ($Fields['XMLNODE_NAME_OLD'][0] == '10')) {
|
|
$Fields['XMLNODE_NAME_OLD'] = '_' . $Fields['XMLNODE_NAME_OLD'];
|
|
}
|
|
$res = $this->_dbses->Execute( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $Fields['XMLNODE_NAME_OLD'] . '"' );
|
|
}
|
|
$this->is_new = ($res->count() == 0);
|
|
$this->Fields = $Fields;
|
|
unset( $this->Fields['XMLNODE_NAME_OLD'] );
|
|
/*
|
|
* MPD-10 to create fields that do not appear many attributes, only the main ones?
|
|
* The show those who are not white
|
|
*/
|
|
if ($this->is_new) {
|
|
foreach ($this->Fields as $key => $value) {
|
|
if ($value == "")
|
|
unset( $this->Fields[$key] );
|
|
}
|
|
} else {
|
|
$this->Fields['XMLNODE_NAME'] = $Fields['XMLNODE_NAME_OLD'];
|
|
}
|
|
/*$res = $this->_dbses->Execute('INSERT INTO dynaForm'.
|
|
' (XMLNODE_TYPE,XMLNODE_VALUE)'.
|
|
' VALUES ("cdata", "'."\n".'")');*/
|
|
parent::Save();
|
|
if ($this->is_new) {
|
|
/*
|
|
* Create a new field.
|
|
*/
|
|
foreach ($labels as $lang => $value) {
|
|
/*$res = $this->_dbses->Execute('INSERT INTO dynaForm'.
|
|
' (XMLNODE_TYPE,XMLNODE_VALUE)'.
|
|
' VALUES ("cdata", "'."\n".'")');*/
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . ' (XMLNODE_NAME,XMLNODE_VALUE,XMLNODE_TYPE) ' . 'VALUES ("","' . "\n " . '","cdata")' );
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . ' (XMLNODE_NAME,XMLNODE_VALUE) ' . 'VALUES ("' . $lang . '","' . str_replace( '"', '""', $value )/*."\n "*/.'")' );
|
|
if (isset( $options[$lang] )) {
|
|
foreach ($options[$lang] as $option => $text) {
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . '.' . $lang . ' (XMLNODE_NAME,XMLNODE_VALUE,XMLNODE_TYPE) ' . 'VALUES ("","' . " " . '","cdata")' );
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . '.' . $lang . ' (XMLNODE_NAME,XMLNODE_VALUE,name) ' . 'VALUES ("option","' . str_replace( '"', '""', $text ) . '","' . str_replace( '"', '""', $option ) . '")' );
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . '.' . $lang . ' (XMLNODE_NAME,XMLNODE_VALUE,XMLNODE_TYPE) ' . 'VALUES ("","' . "\n " . '","cdata")' );
|
|
}
|
|
}
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . ' (XMLNODE_NAME,XMLNODE_VALUE,XMLNODE_TYPE) ' . 'VALUES ("","' . "\n" . '","cdata")' );
|
|
}
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm' . ' (XMLNODE_TYPE,XMLNODE_VALUE)' . ' VALUES ("cdata", "' . "\n" . '")' );
|
|
} else {
|
|
/*
|
|
* Update an existing field.
|
|
*/
|
|
$this->_dbses->Execute( 'UPDATE dynaForm SET XMLNODE_NAME = "' . $Fields['XMLNODE_NAME'] . '" WHERE XMLNODE_NAME = "' . $Fields['XMLNODE_NAME_OLD'] . '"' );
|
|
foreach ($labels as $lang => $value) {
|
|
$res = $this->_dbses->Execute( 'SELECT * FROM dynaForm.' . $Fields['XMLNODE_NAME'] . ' WHERE XMLNODE_NAME ="' . $lang . '"' );
|
|
if ($res->count() > 0) {
|
|
$res = $this->_dbses->Execute( 'UPDATE dynaForm.' . $Fields['XMLNODE_NAME'] . ' SET XMLNODE_VALUE = ' . '"' . str_replace( '"', '""', $value ) . '" WHERE XMLNODE_NAME ="' . $lang . '"' );
|
|
} else {
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . ' (XMLNODE_NAME,XMLNODE_VALUE) ' . 'VALUES ("' . $lang . '","' . str_replace( '"', '""', $value ) . '")' );
|
|
}
|
|
if (isset( $options[$lang] )) {
|
|
$res = $this->_dbses->Execute( 'DELETE FROM dynaForm.' . $Fields['XMLNODE_NAME'] . '.' . $lang . ' WHERE 1' );
|
|
foreach ($options[$lang] as $option => $text) {
|
|
$res = $this->_dbses->Execute( 'INSERT INTO dynaForm.' . $Fields['XMLNODE_NAME'] . '.' . $lang . ' (XMLNODE_NAME,XMLNODE_VALUE,name) ' . 'VALUES ("option","' . str_replace( '"', '""', $text ) . '","' . str_replace( '"', '""', $option ) . '")' );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Verify if is New the Field
|
|
*
|
|
* @return array
|
|
*/
|
|
function isNew ()
|
|
{
|
|
$res = $this->_dbses->Execute( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $this->Fields['XMLNODE_NAME'] . '"' );
|
|
return ($res->count() == 0);
|
|
}
|
|
}
|
|
|
|
?>
|