etraxis / etraxis-obsolete

 * @param int $value New integer value (could be NULL).

 * @return int Always {@link NO_ERROR}.

 */

function value_modify_number ($record_id, $event_id, $field_id, $value = NULL)

{

    debug_write_log(DEBUG_TRACE, '[value_modify_number]');

    debug_write_log(DEBUG_DUMP,  '[value_modify_number] $record_id = ' . $record_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_number] $event_id  = ' . $event_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_number] $field_id  = ' . $field_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_number] $value     = ' . $value);

    $rs = dal_query('values/fndk.sql', $record_id, $field_id);

    if ($rs->rows != 0)

    {

        $value_id = $rs->fetch('value_id');

        // If current value and new one are different - register changes.

        if ($value_id != $value)

        {

            debug_write_log(DEBUG_NOTICE, '[value_modify_number] Register changes.');

            dal_query('changes/create.sql',

                      $event_id,

                      $field_id,

                      is_null($value_id) ? NULL : $value_id,

                      is_null($value)    ? NULL : $value);

        }

    }

    $rs = dal_query('values/efndid.sql',

                    $record_id,

                    $field_id);

    dal_query('values/modify.sql',

              $rs->fetch('event_id'),

              $field_id,

              is_null($value) ? NULL : $value);

    return NO_ERROR;

}

/**

 * Finds in database specified float value and returns its ID.

 * @param string $value New float value (could be NULL).

 * @return int Always {@link NO_ERROR}.

 */

function value_modify_float ($record_id, $event_id, $field_id, $value = NULL)

{

    debug_write_log(DEBUG_TRACE, '[value_modify_float]');

    debug_write_log(DEBUG_DUMP,  '[value_modify_float] $record_id = ' . $record_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_float] $event_id  = ' . $event_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_float] $field_id  = ' . $field_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_float] $value     = ' . $value);

    $id = value_find_float($value);

    $rs = dal_query('values/fndk.sql', $record_id, $field_id);

    if ($rs->rows != 0)

    {

        $value_id = $rs->fetch('value_id');

        // If current value and new one are different - register changes.

        if ($value_id != $id)

        {

            debug_write_log(DEBUG_NOTICE, '[value_modify_float] Register changes.');

            dal_query('changes/create.sql',

                      $event_id,

                      $field_id,

                      is_null($value_id) ? NULL : $value_id,

                      is_null($id)       ? NULL : $id);

        }

    }

    $rs = dal_query('values/efndid.sql',

                    $record_id,

                    $field_id);

    dal_query('values/modify.sql',

              $rs->fetch('event_id'),

              $field_id,

              is_null($id) ? NULL : $id);

    return NO_ERROR;

}

/**

 * Finds in database specified single string value and returns its ID.

 * @param string $value New string value (could be NULL).

 * @return int Always {@link NO_ERROR}.

 */

function value_modify_string ($record_id, $event_id, $field_id, $value = NULL)

{

    debug_write_log(DEBUG_TRACE, '[value_modify_string]');

    debug_write_log(DEBUG_DUMP,  '[value_modify_string] $record_id = ' . $record_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_string] $event_id  = ' . $event_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_string] $field_id  = ' . $field_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_string] $value     = ' . $value);

    $id = value_find_string($value);

    $rs = dal_query('values/fndk.sql', $record_id, $field_id);

    if ($rs->rows != 0)

    {

        $value_id = $rs->fetch('value_id');

        // If current value and new one are different - register changes.

        if ($value_id != $id)

        {

            debug_write_log(DEBUG_NOTICE, '[value_modify_string] Register changes.');

            dal_query('changes/create.sql',

                      $event_id,

                      $field_id,

                      is_null($value_id) ? NULL : $value_id,

                      is_null($id)       ? NULL : $id);

        }

    }

    $rs = dal_query('values/efndid.sql',

                    $record_id,

                    $field_id);

    dal_query('values/modify.sql',

              $rs->fetch('event_id'),

              $field_id,

              is_null($id) ? NULL : $id);

    return NO_ERROR;

}

/**

 * Finds in database specified multilined text value and returns its ID.

 * @param string $value New text value (could be NULL).

 * @return int Always {@link NO_ERROR}.

 */

function value_modify_multilined ($record_id, $event_id, $field_id, $value = NULL)

{

    debug_write_log(DEBUG_TRACE, '[value_modify_multilined]');

    debug_write_log(DEBUG_DUMP,  '[value_modify_multilined] $record_id = ' . $record_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_multilined] $event_id  = ' . $event_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_multilined] $field_id  = ' . $field_id);

    debug_write_log(DEBUG_DUMP,  '[value_modify_multilined] $value     = ' . $value);

    $id = value_find_multilined($value);

    $rs = dal_query('values/fndk.sql', $record_id, $field_id);

    if ($rs->rows != 0)

    {

        $value_id = $rs->fetch('value_id');

        // If current value and new one are different - register changes.

        if ($value_id != $id)

        {

            debug_write_log(DEBUG_NOTICE, '[value_modify_multilined] Register changes.');

            dal_query('changes/create.sql',

                      $event_id,

                      $field_id,

                      is_null($value_id) ? NULL : $value_id,

                      is_null($id)       ? NULL : $id);

        }

    }

    $rs = dal_query('values/efndid.sql',

                    $record_id,

                    $field_id);

    dal_query('values/modify.sql',

              $rs->fetch('event_id'),

              $field_id,

              is_null($id) ? NULL : $id);

    return NO_ERROR;

}

?>