function GeraVersaoRelatorios() {
//Cria as tabelas
$Script = '
SET SQL DIALECT 3;
DROP TABLE "webreport_admin";
DROP TABLE "webreport_settings";
DROP TABLE "webreport_sql";
DROP TABLE "webreport_style";
DROP TABLE "webreport_users";
DROP TABLE "webreports";
DROP SEQUENCE "g_webreport_admin";
DROP SEQUENCE "g_webreport_settings";
DROP SEQUENCE "g_webreport_sql";
DROP SEQUENCE "g_webreport_style";
DROP SEQUENCE "g_webreport_users";
DROP SEQUENCE "g_webreports";
CREATE GENERATOR "g_webreport_admin";
CREATE TABLE "webreport_admin" (
"id" INTEGER NOT NULL,
"tablename" VARCHAR(250),
"db_type" VARCHAR(10),
"group_name" VARCHAR(250)
);
ALTER TABLE "webreport_admin" ADD PRIMARY KEY ("id");
SET TERM ^ ;
/* Trigger: "t_webreport_admin" */
CREATE OR ALTER TRIGGER "t_webreport_admin" FOR "webreport_admin"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW."id" IS NULL)
THEN NEW."id" = GEN_ID("g_webreport_admin", 1);
END
^
SET TERM ; ^
SET SQL DIALECT 3;
CREATE GENERATOR "g_webreport_settings";
CREATE TABLE "webreport_settings" (
"id" INTEGER NOT NULL,
"version" VARCHAR(10)
);
ALTER TABLE "webreport_settings" ADD PRIMARY KEY ("id");
SET TERM ^ ;
CREATE OR ALTER TRIGGER "t_webreport_settings" FOR "webreport_settings"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW."id" IS NULL)
THEN NEW."id" = GEN_ID("g_webreport_settings",1);
END
^
SET TERM ; ^
SET SQL DIALECT 3;
CREATE GENERATOR "g_webreport_sql";
CREATE TABLE "webreport_sql" (
"id" INTEGER NOT NULL,
"sqlname" VARCHAR(100),
"sqlcontent" BLOB SUB_TYPE 1 SEGMENT SIZE 80
);
ALTER TABLE "webreport_sql" ADD PRIMARY KEY ("id");
SET TERM ^ ;
CREATE OR ALTER TRIGGER "t_webreport_sql" FOR "webreport_sql"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW."id" IS NULL)
THEN NEW."id" = GEN_ID("g_webreport_sql", 1);
END
^
SET TERM ; ^
SET SQL DIALECT 3;
CREATE GENERATOR "g_webreport_style";
CREATE TABLE "webreport_style" (
"report_style_id" INTEGER NOT NULL,
"type" VARCHAR(6),
"field" INTEGER,
"group" INTEGER,
"style_str" BLOB SUB_TYPE 1 SEGMENT SIZE 80,
"uniq" INTEGER,
"repname" VARCHAR(255),
"styletype" VARCHAR(40)
);
ALTER TABLE "webreport_style" ADD PRIMARY KEY ("report_style_id");
SET TERM ^ ;
CREATE OR ALTER TRIGGER "t_webreport_style" FOR "webreport_style"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW."report_style_id" IS NULL)
THEN NEW."report_style_id" = GEN_ID("g_webreport_style", 1);
END
^
SET TERM ; ^
SET SQL DIALECT 3;
CREATE GENERATOR "g_webreport_users";
CREATE TABLE "webreport_users" (
"id" INTEGER NOT NULL,
"username" VARCHAR(200),
"password" VARCHAR(200),
"email" VARCHAR(200)
);
ALTER TABLE "webreport_users" ADD PRIMARY KEY ("id");
SET TERM ^ ;
CREATE OR ALTER TRIGGER "t_webreport_users" FOR "webreport_users"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW."id" IS NULL)
THEN NEW."id" = GEN_ID("g_webreport_users", 1);
END
^
SET TERM ; ^
SET SQL DIALECT 3;
CREATE GENERATOR "g_webreports";
CREATE TABLE "webreports" (
"rpt_id" INTEGER NOT NULL,
"rpt_name" VARCHAR(100),
"rpt_title" VARCHAR(500),
"rpt_cdate" TIMESTAMP NOT NULL,
"rpt_mdate" TIMESTAMP,
"rpt_content" BLOB SUB_TYPE 1 SEGMENT SIZE 80,
"rpt_owner" VARCHAR(100),
"rpt_status" VARCHAR(10),
"rpt_type" VARCHAR(10) NOT NULL
);
ALTER TABLE "webreports" ADD PRIMARY KEY ("rpt_id");
SET TERM ^ ;
CREATE OR ALTER TRIGGER "t_webreports" FOR "webreports"
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
IF (NEW."rpt_id" IS NULL)
THEN NEW."rpt_id" = GEN_ID("g_webreports", 1);
END
^
SET TERM ; ^
';
//Populando a tabela webreports webreport_admin
$sqlQuery = "SELECT * FROM " . '"webreport_admin"';
if ($result = parent::execute_query($sqlQuery)) {
while ($linha = ibase_fetch_assoc($result, IBASE_TEXT)){
$Script .= 'INSERT INTO'
. '"webreport_admin"'
. '('
. '"id", '
. '"tablename", '
. '"db_type" , '
. '"group_name" '
. ')'
. 'VALUES'
. '('
. $linha['id'] . ', '
. "'" . $linha['tablename'] . "'" . ','
. "'" . $linha['db_type'] . "'" . ','
. "'" . $linha['group_name'] . "'"
. ");";
//echo $Insert . "<br>";
}
}
########################################################################################
//Populando a tabela webreport_settings
$sql = "SELECT * FROM " . '"webreport_settings"';
if ($result = parent::execute_query($sql)) {
while ($linha = ibase_fetch_assoc($result, IBASE_TEXT)){
$Script .= 'INSERT INTO'
. '"webreport_settings" '
. '("id", '
. '"version" '
. ')'
. 'VALUES'
. '('
. $linha['id'] . ', '
. "'" . $linha['version'] . "'"
. ");";
//echo $Insert . "<br>";
}
}
########################################################################################
//Populando a tabela webreport_sql
$sqlQuery = "SELECT * FROM " . '"webreport_sql"';
if ($result = parent::execute_query($sqlQuery)) {
while ($linha = ibase_fetch_assoc($result, IBASE_TEXT)){
$Script .= 'INSERT INTO'
. '"webreport_sql"'
. '("id", '
. '"sqlname", '
. '"sqlcontent" '
. ' ) '
. 'VALUES'
. '('
. $linha['id'] . ', '
. "'" . $linha['sqlname'] . "'" . ','
. "'" . $linha['sqlcontent'] . "'"
. ");";
//echo $Insert . "<br><br>";
}
}
########################################################################################
//Populando a tabela webreport_style
$sql = "SELECT * FROM " . '"webreport_style"';
if ($result = parent::execute_query($sql)) {
while ($linha = ibase_fetch_assoc($result, IBASE_TEXT)){
$Script .= 'INSERT INTO'
. '"webreport_style" '
. '('
. '"report_style_id", '
. '"type", '
. '"field", '
. '"group", '
. '"style_str", '
. '"uniq", '
. '"repname", '
. '"styletype"'
. ')'
. 'VALUES'
. '('
. $linha['report_style_id'] . ', '
. "'" . $linha['type'] . "'" . ','
. $linha['field'] . ', '
. $linha['group'] . ', '
. "'" . $linha['style_str'] . "'" . ', '
. $linha['uniq'] . ', '
. "'" . $linha['repname'] . "'" . ','
. "'" . $linha['styletype'] . "'"
. ');';
//echo $Insert . "<br><br>";
}
}
########################################################################################
//Populando a tabela webreport_users
$sql = "SELECT * FROM " . '"webreport_users"';
if ($result = parent::execute_query($sql)) {
while ($linha = ibase_fetch_assoc($result, IBASE_TEXT)){
$Script .= 'INSERT INTO'
. '"webreport_users"'
. '("id", '
. '"username", '
. '"password", '
. '"email" '
. ') '
. 'VALUES'
. '('
. $linha['id'] . ', '
. "'" . $linha['username'] . "'" . ','
. "'" . $linha['password'] . "'" . ','
. "'" . $linha['email'] . "'"
. ");";
//echo $Insert . "<br>";
}
}
########################################################################################
//Populando a tabela webreports
$sql = "SELECT * FROM " . '"webreports"';
if ($result = parent::execute_query($sql)) {
while ($linha = ibase_fetch_assoc($result, IBASE_TEXT)){
$Script .= 'INSERT INTO '
. '"webreports"'
. '('
. '"rpt_id", '
. '"rpt_name", '
. '"rpt_title", '
. '"rpt_cdate", '
. '"rpt_mdate", '
. '"rpt_content", '
. '"rpt_owner", '
. '"rpt_status", '
. '"rpt_type"'
. ') '
. 'VALUES'
. '('
. $linha['rpt_id'] . ', '
. "'" . $linha['rpt_name'] . "'" . ','
. "'" . $linha['rpt_title'] . "'" . ','
. "'" . $linha['rpt_cdate'] . "'" . ','
. "'" . $linha['rpt_mdate'] . "'" . ','
. "'" . $linha['rpt_content'] . "'" . ','
. "'" . $linha['rpt_owner'] . "'" . ','
. "'" . $linha['rpt_status'] . "'" . ','
. "'" . $linha['rpt_type'] . "'"
. ");";
//echo $Insert . "<br><br>";
}
}
//Abre o arquivo
$Scriptt = $this->removerAcento($Script);
$fp = fopen("C:\\BHSistemas\\SGMO\\teste\\teste.sql", "w");
// grava no arquivo.
fwrite($fp, "$Scriptt");
// fecha o arquivo
fclose($fp);
}
