//GFun_St_Ruta_Archivo
public string GFun_St_Ruta_Archivo(string P_St_Codigo_Documento, long P_Ln_Orden)
{
try
{
sSql = "";
sSql = sSql + "select D.nombres" + Environment.NewLine;
sSql = sSql + "from cel_directorio D, cel_tipo_comprobante C" + Environment.NewLine;
sSql = sSql + "where D.id_tipo_comprobante = C.id_tipo_comprobante and" + Environment.NewLine;
sSql = sSql + "C.codigo = '" + P_St_Codigo_Documento + "' and" + Environment.NewLine;
sSql = sSql + "D.orden = " + P_Ln_Orden + Environment.NewLine;
sSql = sSql + "and D.estado='A'";
dtConsulta = new DataTable();
dtConsulta.Clear();
bRespuesta = conexion.GFun_Lo_Busca_Registro(dtConsulta, sSql);
if (bRespuesta == true)
{
if (dtConsulta.Rows.Count > 0)
{
sSql = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0].ItemArray[0].ToString(), "");
}
}
else
{
catchMensaje.LblMensaje.Text = sSql;
catchMensaje.ShowDialog();
}
return(sSql);
}
catch (Exception ex)
{
catchMensaje.LblMensaje.Text = ex.ToString();
catchMensaje.ShowDialog();
return("");
}
}
//FUNCION PARA CARGAR LOS PARAMETROS DE ENVIO DEL CORREO CON LOS ARCHIVOS ADJUNTOS
public void traerparametrosMail()
{
try
{
P_St_correo_que_envia = "";
P_Ln_correo_puerto_smtp = 0;
sSql = "";
sSql += "select correo_que_envia,correo_con_copia," + Environment.NewLine;
sSql += "correo_consumidor_final,correo_ambiente_prueba,correo_palabra_clave," + Environment.NewLine;
sSql += "correo_smtp,correo_puerto, maneja_SSL" + Environment.NewLine;
sSql += "from cel_parametro" + Environment.NewLine;
sSql += "where estado = 'A'";
dtConsulta = new DataTable();
dtConsulta.Clear();
bRespuesta = conexion.GFun_Lo_Busca_Registro(dtConsulta, sSql);
if (bRespuesta == true)
{
if (dtConsulta.Rows.Count > 0)
{
P_St_correo_que_envia = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][0].ToString(), "");
P_St_from = P_St_correo_que_envia;
P_St_correo_con_copia = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][1].ToString(), "");
P_St_correo_consumidor_final = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][2].ToString(), "");
P_St_correo_ambiente_prueba = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][3].ToString(), "");
P_St_correo_palabra_clave = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][4].ToString(), "");
P_St_correo_server_smtp = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][5].ToString(), "");
P_Ln_correo_puerto_smtp = Convert.ToInt64(conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][6].ToString(), "0"));
P_In_maneja_SSL = Convert.ToInt32(conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][7].ToString(), "0"));
//P_St_fromname = G_St_Nombre_Empresa;
}
}
else
{
catchMensaje.LblMensaje.Text = sSql;
catchMensaje.ShowDialog();
goto fin;
}
//==================================================================================================
sSql = "";
sSql += "select telefono, nombrecomercial" + Environment.NewLine;
sSql += "from sis_empresa" + Environment.NewLine;
sSql += "where idempresa = " + Program.iIdEmpresa;
dtConsulta = new DataTable();
dtConsulta.Clear();
bRespuesta = conexion.GFun_Lo_Busca_Registro(dtConsulta, sSql);
if (bRespuesta == true)
{
if (dtConsulta.Rows.Count > 0)
{
P_St_telefono_empresa = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][0].ToString(), "");
P_St_nombre_comercial = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][1].ToString(), "");
}
}
else
{
catchMensaje.LblMensaje.Text = sSql;
catchMensaje.ShowDialog();
goto fin;
}
}
catch (Exception ex)
{
catchMensaje.LblMensaje.Text = ex.ToString();
catchMensaje.ShowDialog();
}
fin : { }
}
//FUNCION PARA CARGAR LOS PARAMETROS DE ENVIO DEL CORREO CON LOS ARCHIVOS ADJUNTOS
public void traerparametrosMail()
{
try
{
P_St_correo_que_envia = "";
P_Ln_correo_puerto_smtp = 0;
sSql = "";
sSql += "select correo_que_envia, correo_con_copia," + Environment.NewLine;
sSql += "correo_consumidor_final,correo_ambiente_prueba,correo_palabra_clave," + Environment.NewLine;
sSql += "correo_smtp,correo_puerto, maneja_SSL, wsdl_pruebas," + Environment.NewLine;
sSql += "url_pruebas, wsdl_produccion, url_produccion" + Environment.NewLine;
sSql += "from cel_parametro" + Environment.NewLine;
sSql += "where estado = 'A'";
dtConsulta = new DataTable();
dtConsulta.Clear();
bRespuesta = conexion.GFun_Lo_Busca_Registro(dtConsulta, sSql);
if (bRespuesta == true)
{
if (dtConsulta.Rows.Count > 0)
{
P_St_correo_que_envia = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][0].ToString(), "");
P_St_from = P_St_correo_que_envia;
P_St_correo_con_copia = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][1].ToString(), "");
P_St_correo_consumidor_final = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][2].ToString(), "");
P_St_correo_ambiente_prueba = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][3].ToString(), "");
P_St_correo_palabra_clave = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][4].ToString(), "");
P_St_correo_server_smtp = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][5].ToString(), "");
P_Ln_correo_puerto_smtp = Convert.ToInt64(conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][6].ToString(), "0"));
P_In_maneja_SSL = Convert.ToInt32(conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][7].ToString(), "0"));
sWSEnvioPruebas = dtConsulta.Rows[0]["wsdl_pruebas"].ToString();
sWSConsultaPruebas = dtConsulta.Rows[0]["url_pruebas"].ToString();
sWSEnvioProduccion = dtConsulta.Rows[0]["wsdl_produccion"].ToString();
sWSConsultaProduccion = dtConsulta.Rows[0]["url_produccion"].ToString();
}
}
else
{
catchMensaje = new VentanasMensajes.frmMensajeCatch();
catchMensaje.LblMensaje.Text = "ERROR EN LA SIGUIENTE INSTRUCCIÓN:" + Environment.NewLine + sSql;
catchMensaje.ShowDialog();
return;
}
//==================================================================================================
sSql = "";
sSql += "select telefono, nombrecomercial" + Environment.NewLine;
sSql += "from sis_empresa" + Environment.NewLine;
sSql += "where idempresa = " + Program.iIdEmpresa;
dtConsulta = new DataTable();
dtConsulta.Clear();
bRespuesta = conexion.GFun_Lo_Busca_Registro(dtConsulta, sSql);
if (bRespuesta == true)
{
if (dtConsulta.Rows.Count > 0)
{
P_St_telefono_empresa = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][0].ToString(), "");
P_St_nombre_comercial = conexion.GFun_Va_Valor_Defecto(dtConsulta.Rows[0][1].ToString(), "");
}
}
else
{
catchMensaje = new VentanasMensajes.frmMensajeCatch();
catchMensaje.LblMensaje.Text = "ERROR EN LA SIGUIENTE INSTRUCCIÓN:" + Environment.NewLine + sSql;
catchMensaje.ShowDialog();
return;
}
}
catch (Exception ex)
{
catchMensaje = new VentanasMensajes.frmMensajeCatch();
catchMensaje.LblMensaje.Text = ex.Message;
catchMensaje.ShowDialog();
}
}
