110 lines
3.2 KiB
C#
110 lines
3.2 KiB
C#
using System;
|
|
using System.Data;
|
|
using System.Data.SqlClient;
|
|
using System.Windows.Forms;
|
|
|
|
namespace ServerExplorer.UI
|
|
{
|
|
public partial class FrmProcedimientos : Form
|
|
{
|
|
#region Declarations
|
|
|
|
private SqlConnection cnx;
|
|
|
|
#endregion
|
|
|
|
#region Form life cycle
|
|
|
|
public FrmProcedimientos(string cnxString)
|
|
{
|
|
InitializeComponent();
|
|
|
|
cnx = new SqlConnection(cnxString);
|
|
}
|
|
|
|
private void frmProcedimientos_Load(object sender, EventArgs e)
|
|
{
|
|
LoadProcedures();
|
|
}
|
|
|
|
#endregion
|
|
|
|
#region Events
|
|
|
|
private void lsvProcs_SelectedIndexChanged(object sender, EventArgs e)
|
|
{
|
|
if (lsvProcs.SelectedItems.Count <= 0) { return; }
|
|
|
|
string schema, name;
|
|
name = lsvProcs.SelectedItems[0].SubItems[0].Text;
|
|
schema = lsvProcs.SelectedItems[0].SubItems[1].Text;
|
|
LoadProcedure(schema, name);
|
|
}
|
|
|
|
private void btnRefresh_Click(object sender, EventArgs e)
|
|
{
|
|
LoadProcedures();
|
|
}
|
|
|
|
#endregion
|
|
|
|
#region Private methods
|
|
|
|
private void LoadProcedures()
|
|
{
|
|
DataTable dt;
|
|
SqlDataAdapter da;
|
|
|
|
// Obtener un datatable con todos los procedimientos de la base de datos.
|
|
da = new SqlDataAdapter(
|
|
"SELECT ROUTINE_NAME Name, ROUTINE_SCHEMA [Schema], CREATED CreateDate, ROUTINE_TYPE [Type] FROM INFORMATION_SCHEMA.ROUTINES",
|
|
cnx);
|
|
dt = new DataTable();
|
|
cnx.Open();
|
|
da.Fill(dt);
|
|
cnx.Close();
|
|
|
|
// Mostrar todos los procedimientos
|
|
lsvProcs.Items.Clear();
|
|
foreach (DataRow dr in dt.Rows)
|
|
{
|
|
ListViewItem item = lsvProcs.Items.Add((String)dr["Name"]);
|
|
item.SubItems.Add((string)dr["Schema"]);
|
|
item.SubItems.Add(((DateTime)dr["CreateDate"]).ToShortDateString());
|
|
item.SubItems.Add((string)dr["Type"]);
|
|
}
|
|
}
|
|
|
|
private void LoadProcedure(string schema, string name)
|
|
{
|
|
var da = new SqlDataAdapter(@"
|
|
SELECT
|
|
ISNULL(smsp.definition, ssmsp.definition) AS [Definition]
|
|
FROM sys.all_objects AS sp
|
|
LEFT OUTER JOIN sys.sql_modules AS smsp ON smsp.object_id = sp.object_id
|
|
LEFT OUTER JOIN sys.system_sql_modules AS ssmsp ON ssmsp.object_id = sp.object_id
|
|
WHERE
|
|
(sp.type = N'P' OR sp.type = N'RF' OR sp.type='PC')
|
|
and
|
|
(sp.name=@name and SCHEMA_NAME(sp.schema_id)=@schema)
|
|
", cnx);
|
|
|
|
da.SelectCommand.Parameters.AddWithValue("@Name", name);
|
|
da.SelectCommand.Parameters.AddWithValue("@Schema", schema);
|
|
var dt = new DataTable();
|
|
cnx.Open();
|
|
da.Fill(dt);
|
|
cnx.Close();
|
|
|
|
// Mostrar el contenido del procedimiento
|
|
txtProc.Text = String.Empty;
|
|
foreach (DataRow dr in dt.Rows)
|
|
{
|
|
txtProc.Text += ((string)dr[0]).Replace("\r", "").Replace("\n", "\r\n");
|
|
}
|
|
}
|
|
|
|
#endregion
|
|
}
|
|
}
|