private void tlsButExecute_Click(object sender, EventArgs e)
{
// OracleMetadataDL meta = new OracleMetadataDL();
OracleMetadataBL ometaBL = new OracleMetadataBL();
// string scrap;
try
{
if (tblPrinc.SelectedTab == tblPrinc.TabPages["tblOraMetadata"])
{
List <OracleMetadataBE> lst = ometaBL.GetSqlTblMetaData(txtOwner.Text.ToUpper(), txtTableName.Text.ToUpper(),
txtVarRow.Text, txtEntityName1.Text);
dgrCode.DataSource = lst;
/* DataSet ds = meta.sqlTblMetaData(txtOwner.Text.ToUpper(), txtTableName.Text.ToUpper(),
* txtVarRow.Text, txtEntityName1.Text);
* dgrCode.DataSource = ds.Tables[0]; */
}
else
{
string scrap = ometaBL.ObtCallCSharp(txtServName.Text, txtServName.Text, txtEntityName.Text,
Convert.ToInt32(txtEntityOption.Text), txtDbOwner.Text);
txtCSharpInvok.Text = scrap;
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
private void SaveListDbsToFile(List <DbObjectBE> pLstDbObjs)
{
string codigo = string.Empty;
OracleMetadataBL oraMetaBL = new OracleMetadataBL();
string pathGuarda = ConfigurationManager.AppSettings["pathGuarda"];
string owner = string.Empty;
string type = string.Empty;
string fname = string.Empty;
string ffname = string.Empty;
int numLinea = 0;
foreach (var objDb in pLstDbObjs)
{
try
{
if (objDb.Type.CompareTo("PACKAGE BODY") != 0)
{
fname = objDb.Name + "_" + (objDb.Type.CompareTo("PACKAGE") == 0 ? "PCK" : objDb.Type) + ".sql";
// codigo = pckBL.PackageSpecCode(owner, packaName);
codigo = oraMetaBL.GetDll(objDb.Owner, objDb.Type, objDb.Name);
GuardarArchivo(pathGuarda, fname, codigo);
}
}
catch (Exception ex)
{
Console.WriteLine(string.Format("Excepcion en linea {0} => ", numLinea + 1) + ex.Message + Environment.NewLine);
}
++numLinea;
}
}
private void tlsStrProcess_Click(object sender, EventArgs e)
{
OracleMetadataBL oraMetaBL = new OracleMetadataBL();
DbObjectBE dbObjBE = new DbObjectBE();
List <DbObjectBE> lst = new List <DbObjectBE>();
// Set cursor as hourglass
Cursor.Current = Cursors.WaitCursor;
try
{
txtResult.Text = string.Empty;
dbObjBE.Owner = txtOwner.Text;
dbObjBE.Type = txtType.Text;
dbObjBE.Name = txtDbObjName.Text;
oraMetaBL.GetAllDependencies(dbObjBE, lst);
if (lst != null)
{
foreach (var item in lst)
{
txtResult.Text += (item.ToString() + Environment.NewLine);
}
SaveListDbsToFile(lst);
}
MessageBox.Show("Proceso finalizado!!!");
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
finally
{
// Set cursor as default arrow
Cursor.Current = Cursors.Default;
}
}
