private void btnProcesar_Click(object sender, EventArgs e)
{
//Procesa los registros - Los deja en la tabla Temporal COACEHL.LST_REQ_PEPS
string ConnectionString = Utiles.conOracleXE("coacehl", "123456", "127.0.0.1", "1521", "XE");
//string ConnectionString = Utiles.conProduccion("coacehl", "123456", "192.168.101.4", "1521", "COAPROD1");
//string ConnectionString = Utiles.conDesarrollo("coacehl", "123456", "192.168.101.99999999994", "1521", "COADES");
int columnas = dataGridView1.ColumnCount; int filas = dataGridView1.RowCount;
DataGridViewCell celda; String Mensaje = "";
String Identidad = ""; String Nombre = ""; String Clncco; String Clobsr; DateTime Fecha_Registro; Int16 Clmmco;
String Clpers; String FechaSTR = "";
foreach (DataGridViewRow fila in dataGridView1.Rows)
{
//AgregarRegistro()
FechaSTR = DateTime.Parse(fila.Cells[0].Value.ToString()).ToShortDateString(); Fecha_Registro = DateTime.Parse(FechaSTR.ToString());
Clobsr = fila.Cells[1].Value.ToString();
Nombre = fila.Cells[2].Value.ToString();
Identidad = fila.Cells[3].Value.ToString();
Clpers = fila.Cells[4].Value.ToString();
Clncco = fila.Cells[5].Value.ToString(); // Tipo ID
Clmmco = Int16.Parse(fila.Cells[6].Value.ToString()); // Tipo de Lista.
//MessageBox.Show(Fecha_Registro + " " + Clobsr + " " + Nombre + " " + Identidad + " " + Clpers + " " + Clncco + " " + Clmmco.ToString());
Listas listas1 = new Listas();
if (listas1.AgregarTemporal(Identidad, Nombre, Clncco, Clobsr, Fecha_Registro, Clmmco, Clpers, FechaSTR, Mensaje) != "OK")
{
MessageBox.Show(Mensaje);
}
}
}
public String AgregarTemporal(String Identidad, String Nombre, String Clncco, String Clobsr,
DateTime Fecha_Registro, Int16 Clmmco, String Clpers, String FechaSTR, String Mensaje)
{
Mensaje = "OK";
using (OracleConnection objConn = new OracleConnection(Utiles.conOracleXE("coacehl", "123456", "127.0.0.1", "1521", "XE")))
{
try
{
OracleCommand objComando = new OracleCommand();
objComando.Connection = objConn;
objComando.CommandText = "COACEHL.LST_REQ_PEPS_TMP";
objComando.CommandType = System.Data.CommandType.StoredProcedure;
objComando.Parameters.Add("pCLIDEN", OracleDbType.Varchar2, 20, "CLIDEN").Value = Identidad.Trim();
objComando.Parameters.Add("pCLNOMB", OracleDbType.Varchar2, 70, "CLNOMB").Value = Nombre.Trim();
objComando.Parameters.Add("pCLNNCO", OracleDbType.Char, 1, "CLNNCO").Value = Clncco.Trim();
objComando.Parameters.Add("pOBSR", OracleDbType.Varchar2, 200, "CLOBSR").Value = Clobsr.Trim();
objComando.Parameters.Add("pFECHAINGRESOOBSR", OracleDbType.Date, 10, "FECHA_INGRESO").Value = Fecha_Registro;
objComando.Parameters.Add("pCLMMCO", OracleDbType.Int16, 3, "CLMMCO").Value = Clmmco;
objComando.Parameters.Add("pCLPERS", OracleDbType.Char, 1, "CLPERS").Value = Clpers.Trim();
objComando.Parameters.Add("pERROR", OracleDbType.Varchar2, 200).Direction = System.Data.ParameterDirection.Output;
objConn.Open();
objComando.ExecuteNonQuery();
Mensaje = objComando.Parameters["pERROR"].Value.ToString();
}
catch (Exception ex)
{
Mensaje = "Hubo un Error al Insertar el Registro " + Identidad.Trim() + " " + Nombre.Trim() + ex.Message.Trim();
throw;
}
finally
{
}
return(Mensaje);
}
}