2010-12-02 23:34:41 +00:00
< ? php
2012-10-25 16:08:30 -04:00
2010-12-02 23:34:41 +00:00
/**
* class . dynaFormField . php
2012-10-09 12:43:39 -04:00
*
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
2012-10-09 12:43:39 -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-09 12:43:39 -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-09 12:43:39 -04:00
*
2010-12-02 23:34:41 +00:00
*/
/**
2012-10-09 12:43:39 -04:00
* 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
2012-10-09 12:43:39 -04:00
{
2012-10-25 16:08:30 -04:00
2012-10-25 15:05:26 -04:00
private $fileName ;
2012-10-25 16:08:30 -04:00
2012-10-25 15:05:26 -04:00
public function getFileName ()
{
return $this -> fileName ;
}
public function setFileName ( $fileName )
{
$this -> fileName = $fileName ;
}
2010-12-02 23:34:41 +00:00
2012-10-09 12:43:39 -04:00
/**
* Function SetTo
*
* @ param string $objConnection
* @ return void
*/
2012-10-25 16:08:30 -04:00
public function SetTo ( $objConnection )
2012-10-09 12:43:39 -04:00
{
2012-10-25 16:08:30 -04:00
DBTable :: SetTo ( $objConnection , 'dynaForm' , array ( 'XMLNODE_NAME'
));
2010-12-02 23:34:41 +00:00
}
2012-10-09 12:43:39 -04:00
/**
* Load a dynaForm
*
* @ param string $sUID
* @ return void
*/
2012-10-25 16:08:30 -04:00
public function Load ( $sUID )
2012-10-09 12:43:39 -04:00
{
2012-10-25 16:08:30 -04:00
parent :: Load ( $sUID );
if ( is_array ( $this -> Fields )) {
2012-10-09 12:43:39 -04:00
foreach ( $this -> Fields as $name => $value ) {
2012-10-25 16:08:30 -04:00
if ( strcasecmp ( $name , 'dependentfields' ) == 0 ) {
$this -> Fields [ $name ] = explode ( ',' , $value );
2012-10-09 12:43:39 -04:00
}
}
}
2010-12-02 23:34:41 +00:00
}
2012-10-09 12:43:39 -04:00
/**
* Delete Fields of a dynaForm
*
* @ param string $uid
* @ return void
*/
2012-10-25 16:08:30 -04:00
public function Delete ( $uid )
2012-10-09 12:43:39 -04:00
{
$this -> Fields [ 'XMLNODE_NAME' ] = $uid ;
parent :: Delete ();
2010-12-02 23:34:41 +00:00
}
2012-10-09 12:43:39 -04:00
/**
* Save Fields of a dynaform
*
* @ param array $Fields
* @ param array $labels
* @ param array $options
* @ return void
*/
2012-10-25 16:08:30 -04:00
public function Save ( $Fields , $labels = array (), $options = array ())
2012-10-09 12:43:39 -04:00
{
if ( $Fields [ 'TYPE' ] === 'javascript' ) {
$Fields [ 'XMLNODE_VALUE' ] = $Fields [ 'CODE' ];
2012-10-25 16:08:30 -04:00
unset ( $Fields [ 'CODE' ]);
$labels = array ();
2012-10-09 12:43:39 -04:00
}
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' ];
}
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $Fields [ 'XMLNODE_NAME' ] . '"' );
2012-10-09 12:43:39 -04:00
} 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' ];
}
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $Fields [ 'XMLNODE_NAME_OLD' ] . '"' );
2012-10-09 12:43:39 -04:00
}
$this -> is_new = ( $res -> count () == 0 );
$this -> Fields = $Fields ;
2012-10-25 16:08:30 -04:00
unset ( $this -> Fields [ 'XMLNODE_NAME_OLD' ]);
2012-10-09 12:43:39 -04:00
/*
2012-10-25 16:08:30 -04:00
* MPD - 10 to create fields that do not appear many attributes , only the main ones ?
* The show those who are not white
*/
2012-10-09 12:43:39 -04:00
if ( $this -> is_new ) {
foreach ( $this -> Fields as $key => $value ) {
2012-10-25 16:08:30 -04:00
if ( $value == " " ) {
unset ( $this -> Fields [ $key ]);
}
2012-10-09 12:43:39 -04:00
}
} else {
$this -> Fields [ 'XMLNODE_NAME' ] = $Fields [ 'XMLNODE_NAME_OLD' ];
}
2012-10-25 16:08:30 -04:00
/* $res = $this -> _dbses -> Execute ( 'INSERT INTO dynaForm' .
' (XMLNODE_TYPE,XMLNODE_VALUE)' .
' VALUES ("cdata", "' . " \n " . '")' ); */
2012-10-09 12:43:39 -04:00
parent :: Save ();
if ( $this -> is_new ) {
/*
2012-10-25 16:08:30 -04:00
* Create a new field .
*/
2012-10-09 12:43:39 -04:00
foreach ( $labels as $lang => $value ) {
2012-10-25 16:08:30 -04:00
/* $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 ])) {
2012-10-09 12:43:39 -04:00
foreach ( $options [ $lang ] as $option => $text ) {
2012-10-25 16:08:30 -04:00
$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")' );
2012-10-09 12:43:39 -04:00
}
}
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'INSERT INTO dynaForm.' . $Fields [ 'XMLNODE_NAME' ] . ' (XMLNODE_NAME,XMLNODE_VALUE,XMLNODE_TYPE) ' . 'VALUES ("","' . " \n " . '","cdata")' );
2012-10-09 12:43:39 -04:00
}
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'INSERT INTO dynaForm' . ' (XMLNODE_TYPE,XMLNODE_VALUE)' . ' VALUES ("cdata", "' . " \n " . '")' );
2012-10-09 12:43:39 -04:00
} else {
/*
2012-10-25 16:08:30 -04:00
* Update an existing field .
*/
$this -> _dbses -> Execute ( 'UPDATE dynaForm SET XMLNODE_NAME = "' . $Fields [ 'XMLNODE_NAME' ] . '" WHERE XMLNODE_NAME = "' . $Fields [ 'XMLNODE_NAME_OLD' ] . '"' );
2012-10-09 12:43:39 -04:00
foreach ( $labels as $lang => $value ) {
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'SELECT * FROM dynaForm.' . $Fields [ 'XMLNODE_NAME' ] . ' WHERE XMLNODE_NAME ="' . $lang . '"' );
2012-10-09 12:43:39 -04:00
if ( $res -> count () > 0 ) {
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'UPDATE dynaForm.' . $Fields [ 'XMLNODE_NAME' ] . ' SET XMLNODE_VALUE = ' . '"' . str_replace ( '"' , '""' , $value ) . '" WHERE XMLNODE_NAME ="' . $lang . '"' );
2012-10-09 12:43:39 -04:00
} else {
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'INSERT INTO dynaForm.' . $Fields [ 'XMLNODE_NAME' ] . ' (XMLNODE_NAME,XMLNODE_VALUE) ' . 'VALUES ("' . $lang . '","' . str_replace ( '"' , '""' , $value ) . '")' );
2012-10-09 12:43:39 -04:00
}
2012-10-25 16:08:30 -04:00
if ( isset ( $options [ $lang ])) {
$res = $this -> _dbses -> Execute ( 'DELETE FROM dynaForm.' . $Fields [ 'XMLNODE_NAME' ] . '.' . $lang . ' WHERE 1' );
2012-10-09 12:43:39 -04:00
foreach ( $options [ $lang ] as $option => $text ) {
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'INSERT INTO dynaForm.' . $Fields [ 'XMLNODE_NAME' ] . '.' . $lang . ' (XMLNODE_NAME,XMLNODE_VALUE,name) ' . 'VALUES ("option","' . str_replace ( '"' , '""' , $text ) . '","' . str_replace ( '"' , '""' , $option ) . '")' );
2012-10-09 12:43:39 -04:00
}
}
}
2010-12-02 23:34:41 +00:00
}
}
2012-10-09 12:43:39 -04:00
2012-10-25 16:08:30 -04:00
public function saveField ( $Fields , $attributes = array (), $options = array ())
2012-10-25 15:05:26 -04:00
{
2017-08-08 16:45:49 -04:00
$dynaform = new DynaformHandler ( $this -> getFileName ());
2012-10-25 15:05:26 -04:00
if ( $Fields [ 'TYPE' ] === 'javascript' ) {
$Fields [ 'XMLNODE_VALUE' ] = $Fields [ 'CODE' ];
2012-10-25 16:08:30 -04:00
unset ( $Fields [ 'CODE' ]);
$attributes = array ();
2012-10-25 15:05:26 -04:00
}
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' ];
}
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $Fields [ 'XMLNODE_NAME' ] . '"' );
2012-10-25 15:05:26 -04:00
} 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' ];
}
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $Fields [ 'XMLNODE_NAME_OLD' ] . '"' );
2012-10-25 15:05:26 -04:00
}
$this -> is_new = ( $res -> count () == 0 );
$this -> Fields = $Fields ;
2012-10-25 16:08:30 -04:00
unset ( $this -> Fields [ 'XMLNODE_NAME_OLD' ]);
2012-10-25 15:05:26 -04:00
/*
* 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 == " " ) {
2012-10-25 16:08:30 -04:00
unset ( $this -> Fields [ $key ]);
2012-10-25 15:05:26 -04:00
}
}
} else {
$this -> Fields [ 'XMLNODE_NAME' ] = $Fields [ 'XMLNODE_NAME_OLD' ];
}
// parent::Save();
2013-01-31 10:41:53 -04:00
if ( ! isset ( $Fields [ 'XMLNODE_VALUE' ])) {
$Fields [ 'XMLNODE_VALUE' ] = '' ;
}
2012-10-25 15:05:26 -04:00
if ( trim ( $Fields [ 'XMLNODE_VALUE' ]) != " " ) {
$attributes [ '#cdata' ] = $Fields [ 'XMLNODE_VALUE' ];
}
$aOptions = array ();
2012-10-25 16:08:30 -04:00
if ( isset ( $Fields [ 'OPTIONS' ]) && is_array ( $Fields [ 'OPTIONS' ])) {
2012-10-25 15:05:26 -04:00
foreach ( $Fields [ 'OPTIONS' ] as $key => $value ) {
2012-10-25 16:08:30 -04:00
$aOptions [] = Array ( 'name' => 'option' , 'value' => $value [ 'LABEL' ],
'attributes' => array ( 'name' => $value [ 'NAME' ]));
2012-10-25 15:05:26 -04:00
}
}
if ( $this -> is_new ) {
// Create a new field
$dynaform -> add ( $Fields [ 'XMLNODE_NAME' ], $attributes , $options , $aOptions );
} else {
$dynaform -> replace ( $Fields [ 'XMLNODE_NAME_OLD' ], $Fields [ 'XMLNODE_NAME' ], $attributes , $options , $aOptions );
}
}
2012-10-09 12:43:39 -04:00
/**
* Verify if is New the Field
*
* @ return array
*/
2012-10-25 16:08:30 -04:00
public function isNew ()
2012-10-09 12:43:39 -04:00
{
2012-10-25 16:08:30 -04:00
$res = $this -> _dbses -> Execute ( 'SELECT * FROM dynaForm WHERE XMLNODE_NAME="' . $this -> Fields [ 'XMLNODE_NAME' ] . '"' );
2012-10-09 12:43:39 -04:00
return ( $res -> count () == 0 );
}
2010-12-02 23:34:41 +00:00
}