function modify_trigger($name, $triggerdefs)
{
global $s_login, $isql, $binary_output, $binary_error;
$isql = 'DROP TRIGGER ' . $name . ";\n" . trigger_create_source($triggerdefs);
if (DEBUG) {
add_debug('isql', __FILE__, __LINE__);
}
list($binary_output, $binary_error) = isql_execute($isql, $s_login['user'], $s_login['password'], $s_login['database'], $s_login['host']);
return $binary_error != '' || count($binary_output) > 0 ? FALSE : TRUE;
}
function create_procedure($proceduredefs)
{
global $s_login, $isql, $binary_output, $binary_error;
if (empty($proceduredefs['source'])) {
return FALSE;
}
$isql = "SET TERM !! ;\n" . $proceduredefs['source'] . "\n" . "SET TERM ; !!\n";
if (DEBUG) {
add_debug('isql', __FILE__, __LINE__);
}
// this must be done by isql because 'create procedure' is not supported from within php
list($binary_output, $binary_error) = isql_execute($isql, $s_login['user'], $s_login['password'], $s_login['database'], $s_login['host']);
return $binary_error != '' || count($binary_output) > 0 ? FALSE : TRUE;
}
$len = strlen($disable);
foreach ($lines as $line) {
if (strncasecmp($disable, $line, $len) == 0) {
$error = sprintf($ERRORS['DISABLED_CMD'], $disable);
break 2;
}
}
}
}
$s_sql['queries'] = $lines;
} else {
$lines = $s_sql['queries'];
}
// execute command/script by isql
if (isset($isql_flag) && empty($error)) {
list($binary_output, $binary_error) = isql_execute($sql_script);
$s_sql['buffer'] = '';
array_shift($binary_output);
// discard the first line
foreach ($binary_output as $line) {
$s_sql['buffer'] .= nl2br(str_replace(' ', ' ', $line)) . "<br>\n";
}
} elseif ($s_connected == TRUE && empty($error)) {
$s_sql['more'] = FALSE;
$results = array();
foreach ($lines as $lnr => $cmd) {
$cnt = 0;
$trans = fbird_trans(TRANS_WRITE, $dbhandle);
$res = @fbird_query($trans, $cmd) or $ib_error = fbird_errmsg();
// if sql_output-panel is open
$idx = get_panel_index($s_sql_panels, 'sql_output');
