2010-12-02 23:34:41 +00:00
|
|
|
<?php
|
|
|
|
|
/**
|
|
|
|
|
* class.dynaFormField.php
|
2011-02-01 12:49:40 +00:00
|
|
|
* @package workflow.engine.classes
|
2010-12-02 23:34:41 +00:00
|
|
|
*
|
|
|
|
|
* 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.
|
2011-02-01 12:49:40 +00:00
|
|
|
*
|
2010-12-02 23:34:41 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
G::LoadClass('xmlDb');
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Dynaform Field - DynaformField class
|
2011-02-01 12:49:40 +00:00
|
|
|
* @package workflow.engine.classes
|
2010-12-02 23:34:41 +00:00
|
|
|
*/
|
|
|
|
|
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);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
?>
|