public int ObtenerModoAfectacion(string ptCodigoTipo, string ptCodigoTipoSuby, string Look)
{
string ltConsulta;
int success = 0;
if (ptCodigoTipoSuby == string.Empty)
{
ptCodigoTipoSuby = "-1";
}
ltConsulta = "exec svc_cle_cna_mod_afe_por_tip '" + ptCodigoTipo + "', '" + ptCodigoTipoSuby + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count != 0)
{
if (Look == "sbyasume70")
{
success = (int)rec.Rows[0][10];
}
}
}
else
{
errlist.AddRange(db.errlist);
//modLCEData.GenericError("TipoProducto.ObtenerModoAfectacion", Information.Err().Number, Information.Err().Description);
}
}
return(success);
}
public DataTable GetListLimitesAfectados(ref short success, int plNroCot)
{
// Descripción : Obtiene la lista de límites 'que afectan a una cotizacion
// Parámetros : plNroCot
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
string ltConsulta = "exec svc_lce_lst_lim_rel_ctz_ctz " + Convert.ToString(plNroCot);
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable precCotizacion = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (precCotizacion.Rows.Count == 0)
{
success = 3;
}
else
{
success = 0;
}
return(precCotizacion);
}
else
{
// ManejoError:
//modLCEData.GenericError("RelacionLimiteCotizacion.GetListLimitesAfectados", Information.Err().Number, Information.Err().Description);
success = 4;
}
}
return(null);
}
public short Obtener(int piCodigo)
{
// Descripción : Obtiene un nivel de desarrollo por codigo
// Parámetros : piCodigo
// Retorno : 0 OK
// 3 No existe
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success = 0;
string ltConsulta; DataTable rec;
ltConsulta = "exec sp_lce_cna_nivel_desrr " + Convert.ToString(piCodigo);
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
Codigo = Convert.ToInt16(rec.Rows[0]["cod_nivel_desrr"]);
Nombre = Convert.ToString(rec.Rows[0]["gls_dscrn_nivel_desrr"]) + "";
if (VBtoConverter.IsNull(rec.Rows[0]["Nds_por_flj_exp"]))
{
PercFlujo = 0;
}
else
{
PercFlujo = Convert.ToSingle(rec.Rows[0]["Nds_por_flj_exp"]);
}
if (VBtoConverter.IsNull(rec.Rows[0]["Nds_por_lim_gbl_gpa"]))
{
PercLimGlobal = 0;
}
else
{
PercLimGlobal = Convert.ToSingle(rec.Rows[0]["Nds_por_lim_gbl_gpa"]);
}
success = 0;
}
}
else
{
//modLCEData.GenericError("Desarrollo.Obtener", Information.Err().Number, Information.Err().Description);
success = 4;
}
}
return(success);
}
public short Obtener(string piCodigo)
{
// Descripción : Obtiene un tipo de producto LCE por codigo
// Parámetros : piCodigo
// Retorno : 0 OK
// 3 No existe
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success;
string ltConsulta;
ltConsulta = "exec svc_cle_obt_tip_ope_por_cod '" + piCodigo + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
errlist.Add("No se encontró el regoistro Codigo '" + piCodigo + "'");
success = 3;
}
else
{
Codigo = rec.Rows[0]["cod_tipo_ctzcn_lcext"].ToString();
CodigoPlazo = Convert.ToInt32(rec.Rows[0]["cod_rango_plazo"]);
Nombre = rec.Rows[0]["gls_dscrn_tipo_ctzcn_lcext"].ToString();
CodigoFamilia = rec.Rows[0]["cod_fmlia_ctzcn_lcext"].ToString();
TipoCredito = (rec.Rows[0]["tip_cod_tip_cre"] == DBNull.Value) ? (short)0 : short.Parse(rec.Rows[0]["tip_cod_tip_cre"].ToString());
EsSaldoLinea = (rec.Rows[0]["tip_cod_exg_lin"] == DBNull.Value) ? (short)0 : short.Parse(rec.Rows[0]["tip_cod_exg_lin"].ToString());
ExigeSubyacente = (rec.Rows[0]["tip_cod_exg_deu_ind"] == DBNull.Value) ? (short)0 : short.Parse(rec.Rows[0]["tip_cod_exg_deu_ind"].ToString());
PosicSicomar = (rec.Rows[0]["tip_cod_pos_sic"] == DBNull.Value) ? (short)0 : short.Parse(rec.Rows[0]["tip_cod_pos_sic"].ToString());
TipoAfectacion = (rec.Rows[0]["tip_cod_afe_lim"] == DBNull.Value) ? (short)0 : short.Parse(rec.Rows[0]["tip_cod_afe_lim"].ToString());
mfEsNuevo = false;
success = 0;
}
}
else
{
//modLCEData.GenericError("TipoProducto.Obtener", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
success = 4;
}
}
return(success);
}
public DataTable GetListFamilia(ref short suceso, string ptFamilia)
{
// Descripción : Obtiene la lista de productos LCE que pertenecen
// a una familia
// Parámetros : precProducto, ptFamilia
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
DataTable rec = new DataTable();
ltConsulta = "exec sp_lce_cna_lst_cod_ctzcn_fml '" + ptFamilia + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
DataRow headrow = rec.NewRow();
headrow["cod_ctzcn_lcext"] = "0";
headrow["gls_dscrn_ctzcn_lcext"] = " No Definido ";
headrow["cod_centa_cntbl"] = "0";
headrow["cod_tipo_ctzcn_lcext"] = "";
rec.Rows.Add(headrow);
DataView dv = rec.DefaultView;
dv.Sort = "cod_ctzcn_lcext asc";
DataTable sortedDT = dv.ToTable();
return(sortedDT);
}
else
{
suceso = 4;
//modLCEData.GenericError("ProductoLCE.GetListFamilia", Information.Err().Number, Information.Err().Description);
}
}
return(rec);
}
public DataTable GetList(ref short suceso)
{
// Descripción : Obtiene la lista de tipos de productos
// Parámetros : Ninguno
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
ltConsulta = "exec sp_lce_cna_lst_tipo_ctzcn ";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
rec.Columns.Add("Rotulo");
rec.Columns.Add("Item");
foreach (DataRow r in rec.Rows)
{
r["Rotulo"] = Convert.ToString(r["cod_tipo_ctzcn_lcext"]) + "-" + Convert.ToString(r["gls_dscrn_tipo_ctzcn_lcext"]);
r["Item"] = Convert.ToString(r["cod_tipo_ctzcn_lcext"]) + "-" + Convert.ToString(r["cod_fmlia_ctzcn_lcext"]) + "-" + Convert.ToString(r["tip_cod_tip_cre"]);
}
return(rec);
}
else
{
suceso = 4;
errlist.AddRange(db.errlist);
//modLCEData.GenericError("TipoProducto.GetList", Information.Err().Number, Information.Err().Description);
}
}
return(null);
}
//public short Existe(int piCodigo)
//{
// short Existe = 0;
// // Descripción : Verifica la existencia de un ProductoLCE
// // Parámetros : piCodigo
// // Retorno : 0 OK
// // 3 No existe
// // 4 Error en la BD
// // E. laterales: Ninguno
// //
// // =============================================
// // Declaración de constantes/variables locales
// // =============================================
// string ltComando;
// int liResultado;
// VBtoRecordSet lrecConsulta;
// try
// { // On Error GoTo ManejoError
// ltComando = "exec sp_lce_cna_cod_ctzcn_lcext "+Convert.ToString(piCodigo);
// lrecConsulta = modAjuste32.GetRecordset(modLCEData.gbasAlce, ltComando); // , dbOpenSnapshot, dbSQLPassThrough)
// if (lrecConsulta.BOF && lrecConsulta.EOF) {
// // No hay registro
// Existe = 3;
// } else {
// Existe = 0;
// }
// return Existe;
// }
// catch
// { // ManejoError:
// modLCEData.GenericError("ProductoLCE.Existe", Information.Err().Number, Information.Err().Description);
// Existe = 4;
// }
// return Existe;
//}
//public short GetList(ref VBtoRecordSet precProducto)
//{
// short GetList = 0;
// // Descripción : Obtiene la lista de productos LCE
// // Parámetros : Ninguno
// // Retorno : 0 OK
// // 3 No existe
// // 4 Error en la base de datos
// // E. laterales: Ninguno
// //
// // =============================================
// // Declaración de constantes/variables locales
// // =============================================
// string ltConsulta;
// string ltLlave = "";
// try
// { // On Error GoTo ManejoError
// ltConsulta = "exec sp_lce_cna_lst_cod_ctzcn_lce ";
// precProducto = modAjuste32.GetRecordset(modLCEData.gbasAlce, ltConsulta); // , dbOpenSnapshot,
// // dbSQLPassThrough)
// if (precProducto.BOF && precProducto.EOF) {
// GetList = 3;
// } else {
// GetList = 0;
// }
// return GetList;
// }
// catch
// { // ManejoError:
// modLCEData.GenericError("ProductoLCE.GetList", Information.Err().Number, Information.Err().Description);
// GetList = 4;
// }
// return GetList;
//}
//// VBto upgrade warning: piCodigo As short --> As int OnWrite(VBtoField, int)
public short Obtener(int piCodigo)
{
// Descripción : Obtiene un ProductoLCE por codigo
// Parámetros : piCodigo
// Retorno : 0 OK
// 3 No existe
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success = 0;
string ltConsulta; DataTable rec;
ltConsulta = "exec sp_lce_cna_cod_ctzcn_lcext " + Convert.ToString(piCodigo);
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
Codigo = Convert.ToInt32(rec.Rows[0]["cod_ctzcn_lcext"]);
Cuenta = VBtoConverter.ObjectToDouble(rec.Rows[0]["cod_centa_cntbl"]);
Nombre = Convert.ToString(rec.Rows[0]["gls_dscrn_ctzcn_lcext"]) + "";
CodigoBancomex = Convert.ToInt32(rec.Rows[0]["cod_tipo_oprcn_comex"]);
CodigoFamilia = Convert.ToString(rec.Rows[0]["cod_tipo_ctzcn_lcext"]); // cod_fmlia_ctzcn_lcext")
mfEsNuevo = false;
success = 0;
}
}
else
{
//modLCEData.GenericError("ProductoLCE.Obtener", Information.Err().Number, Information.Err().Description);
success = 4;
}
}
return(success);
}
public short Obtener(string ptNumero)
{
// Descripción : Obtiene una persona por número
// Parámetros : ptNumero
// Retorno : 0 OK
// 3 No existe Persona
// 4 Error en la BD
// 5 No existe Direccion
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success = 0;
string ltConsulta; DataTable rec;
ptNumero = Global.ConvertirRutNro(ptNumero);
// bd_persona..
ltConsulta = "exec svc_dat_mat_rut_cli '" + Strings.Trim(ptNumero) + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
Child = Strings.Trim(ptNumero);
Numero = Global.ConvertirNroRut(Convert.ToString(rec.Rows[0]["nro_prsna_relcn"])) + "";
NombreEstructurado = Convert.ToString(rec.Rows[0]["nom_prsna_etcdo"]) + "";
success = 0;
}
}
else
{
// GenericError "CasaMatriz.Obtener", Err.Number, Err.Description
success = 4;
}
}
return(success);
}
public DataTable GetList(ref short success, int piTipoPersona)
{
// Descripción : Obtiene la lista de personas según código tipo persona
// Parámetros : piTipoPersona
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta; DataTable rec;
ltConsulta = "exec sva_cle_lst_per_lst " + Convert.ToString(piTipoPersona);
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
rec.Columns.Add("rutcliente");
foreach (DataRow r in rec.Rows)
{
r["RutCliente"] = Global.ConvertirNroRut(r["nro_prsna"].ToString());
}
success = 0;
}
}
else
{
// GenericError "Persona.GetList", Err.Number, Err.Description
success = 4;
}
}
return(rec);
}
public short Generar(double pdMonto, double pdActPond, DateTime pxFecha)
{
// Descripción : Genera o actualiza los montos otorgados de 30% y 70%
// a una fecha, según el monto del Patrimonio
// Parámetros : pdMonto, pxFecha
// Retorno : 0 OK
// 3 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltComando;
short suceso = 0;
using (DataFinder db = new DataFinder(dataConnectionString))
{
ltComando = "sp_slc_tmosp_exist";
DataTable prec = db.GetRecordset(ltComando);
if (db.errlist.Count == 0)
{
if (prec.Rows.Count == 0)
{
suceso = 2;
}
else
{
ltComando = "exec sp_lce_gnr_cap_3b5 " + Global.ConvertirComaPorPunto(Convert.ToString(pdMonto)) + ", " + Global.ConvertirComaPorPunto(Convert.ToString(pdActPond)) + ",'" + pxFecha.ToString("yyyy/mm/dd") + "'";
// liResultado = gbasAlce_ExecuteSQL(ltComando)
int resultado = db.ExecuteCommand(ltComando);
suceso = 0;
}
}
else
{
// ManejoError:
//modLCEData.GenericError("RelacionLimiteCotizacion.Getlist", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
suceso = 3;
}
}
return(suceso);
}
public DataTable GetListRestricciones(ref short success, int piPais)
{
// Descripción : Obtiene la lista de personas de un Pais Determinado
// Parámetros : piPais
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta; DataTable rec;
ltConsulta = "exec svc_cle_obt_rst_pai " + Convert.ToString(piPais);
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
success = 0;
foreach (DataRow row in rec.Rows)
{
char[] rest = row["gls_dsc_rst"].ToString().ToCharArray();
row["gls_dsc_rst"] = row["gls_dsc_rst"].ToString().Replace(" ", "\r\n");
}
}
}
else
{
//modLCEData.GenericError("Persona.GetListxPais", Information.Err().Number, Information.Err().Description);
success = 4;
}
}
return(rec);
}
public DataTable GetListConAfectacion(ref short suceso) // VBtoRecordSet precTipoProducto)
{
// Descripción : Obtiene la lista de tipos de productos
// Parámetros : Ninguno
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
ltConsulta = "exec svc_cle_cna_lst_tip_con_afe ";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
return(rec);
}
else
{
suceso = 4;
errlist.AddRange(db.errlist);
//modLCEData.GenericError("TipoProducto.GetListConAfectacion", Information.Err().Number, Information.Err().Description);
}
}
return(null);
}
public string TieneLineasVigentes()
{
string Msg = "";
string ltConsulta; DataTable rec;
ltConsulta = "svc_cle_lst_vig_lim_seg_cli ";
ltConsulta += " '" + Global.ConvertirRutNro(Numero) + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
Msg = "El Cliente RUT: " + Numero + " " + NombreEstructurado + ", No posee Ningún Limite Aplicable";
//success = 3;
}
else
{
foreach (DataRow row in rec.Rows) //while (!lrecConsulta.EOF)
{
if (DateAndTime.DateDiff("d", DateTime.Now, (DateTime)row[0], FirstDayOfWeek.System, FirstWeekOfYear.System) < 10)
{
// Msg = Msg & vbCrLf & lrecConsulta(0) & ": " & lrecConsulta(1)
Msg = "Existen Lineas Del Cliente RUT: " + Numero + " " + NombreEstructurado + " que vencen el " + row[0].ToString() + ". ";
}
}
if (Msg.Length == 0)
{
Msg = "OK";
}
}
}
else
{
//modLCEData.GenericError("Persona.TieneLineasVigentes", Information.Err().Number, Information.Err().Description);
Msg = "El Cliente RUT: " + Numero + " " + NombreEstructurado + ", No posee Ningún Limite Aplicable";
}
}
return(Msg);
}
public DataTable GetList(ref short suceso, int plCodigo, int plCorrelativo)
{
// Descripción : Obtiene la lista de las cotizaciones que afectan
// a un límite
// Parámetros : plCodigo
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
ltConsulta = "exec svc_lce_lst_lim_rel_ctz_lim " + Convert.ToString(plCodigo) + "," + Convert.ToString(plCorrelativo);
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable precLimite = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (precLimite.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
return(precLimite);
}
else
{
// ManejoError:
//modLCEData.GenericError("RelacionLimiteCotizacion.Getlist", Information.Err().Number, Information.Err().Description);
suceso = 4;
}
}
return(null);
}
public double ParidadMoneda(int piCodigoMoneda, DateTime pxFecha, short piOpcion)
{
double paridadMoneda = 0;
string ltConsulta; DataTable rec;
StringBuilder sbXML;
sbXML = new StringBuilder();
sbXML.Append("exec svc_cle_obt_par_mon '");
sbXML.Append(pxFecha.ToString("yyyyMMdd"));
sbXML.Append("', ");
sbXML.Append(piCodigoMoneda);
sbXML.Append(", ");
sbXML.Append(piOpcion);
// ltConsulta = "exec svc_cle_obt_par_mon '" & Format(pxFecha, "yyyyMMdd") & "', " &
// piCodigoMoneda & ", " & piOpcion
ltConsulta = sbXML.ToString();
sbXML = null;
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
paridadMoneda = 0;
}
else
{
paridadMoneda = double.Parse(rec.Rows[0]["paridad"].ToString());
}
}
else
{
//modLCEData.GenericError("modGlobal.ParidadMoneda", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
paridadMoneda = 0;
}
}
return(paridadMoneda);
}
public short Obtener(int plNumCot)
{
// Descripción : Obtiene una Exepcion por Numero Cotizacion
// Parámetros : plNumCot
// Retorno : 0 OK
// 3 No existe la exepcion
// 4 Error en la BD
// =============================================
// Declaración de constantes/variables locales
// =============================================
String ltConsulta = "exec svc_cle_obt_exp_ctz " + Convert.ToString(plNumCot);
short suceso = 0;
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable prec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (prec.Rows.Count == 0)
{
suceso = 3;
}
else
{
NumCotizacion = Convert.ToInt32(prec.Rows[0]["nro_ctzcn"]);
AprobadoPor = Convert.ToInt32(prec.Rows[0]["cod_ent_apr"]);
NumAprobacion = Convert.ToInt32(prec.Rows[0]["exp_num_apr"]);
FechaAprob = (DateTime)prec.Rows[0]["exp_fec_otr"];
Comment = Convert.ToString(prec.Rows[0]["exp_gls"]) + "";
suceso = 0;
}
}
else
{
// ManejoError:
//modLCEData.GenericError("ExepcionCLE.Obtener", Information.Err().Number, Information.Err().Description);
suceso = 4;
}
return(suceso);
}
}
public DataTable GetListGrupo(ref short suceso, int piCodigoGrupo)
{
// Descripción : Obtiene la lista de tipos de productos dado un grupo
// Parámetros : Ninguno
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
ltConsulta = "exec sp_lce_cna_lst_tpo_ctzcn_grp " + Convert.ToString(piCodigoGrupo);
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
return(rec);
}
else
{
suceso = 4;
errlist.AddRange(db.errlist);
//modLCEData.GenericError("TipoProducto.GetListGrupo", Information.Err().Number, Information.Err().Description);
}
}
return(null);
}
public DataTable GetListTiposCredito(ref short suceso)
{
// Descripción : Obtiene la lista de tipos de creito para control de plazo
// Parámetros : Ninguno
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
ltConsulta = "exec svc_lce_tip_crd_ctl_plz";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
return(rec);
}
else
{
suceso = 4;
errlist.AddRange(db.errlist);
//modLCEData.GenericError("ControlPlazo.GetListTiposCredito", Information.Err().Number, Information.Err().Description);
}
}
return(null);
}
public DataTable GetList(ref short success)
{
// Descripción : Obtiene la lista de monedas
// Parámetros : Ninguno
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta; DataTable rec;
ltConsulta = "exec svc_cle_lst_mon";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
errlist.Add("No hay Monedas en la BBDD");
success = 3;
}
else
{
success = 0;
}
}
else
{
//modLCEData.GenericError("Moneda.Getlist", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
success = 4;
}
}
return(rec);
}
public DataTable GetList(ref short suceso)
{
// Descripción : Obtiene la lista de limites capitulo 3.b5
// Parámetros : Ninguno
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
DataTable rec = new DataTable();
ltConsulta = "exec sp_lce_cna_lst_lmtcn_captl_b5 ";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
}
else
{
suceso = 4;
//Global.GenericError("Capitulo3b5.Getlist", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
}
}
return(rec);
}
public short Existe(string piCodigo)
{
// Descripción : Verifica la existencia de un tipo de producto por codigo
// Parámetros : piCodigo
// Retorno : 0 OK
// 3 No existe
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success;
string ltConsulta;
ltConsulta = "exec sp_lce_cna_tipo_ctzcn '" + piCodigo + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable precCotizacion = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (precCotizacion.Rows.Count == 0)
{
success = 3;
}
else
{
success = 0;
}
}
else
{
//modLCEData.GenericError("TipoProducto.Existe", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
success = 4;
}
}
return(success);
}
public DataTable GetList(ref short suceso, int plCodigoLimite, DateTime pxFecha)
{
// Descripción : Obtiene la lista de limites vigentes según estructura
// Parámetros : plCodigoLimite, pxFecha
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
DataTable rec = new DataTable();
ltConsulta = "exec sp_lce_cna_lst_limte_indvd " + Convert.ToString(plCodigoLimite) + ",'" + pxFecha.ToString("yyyy/mm/dd") + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
}
}
else
{
suceso = 4;
//Global.GenericError("Limite.GetList", Information.Err().Number, Information.Err().Description);
}
}
return(rec);
}
public DataTable GetListRiesgo(ref short success, int piPais)
{
// Descripción : Obtiene la lista de personas de un Pais Determinado
// Parámetros : piPais
// Retorno : 0 OK
// 3 No existe
// 4 Error en la base de datos
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta; DataTable rec;
ltConsulta = "exec svc_cle_lst_cla_rie_por_pai " + Convert.ToString(piPais);
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
success = 0;
}
}
else
{
//modLCEData.GenericError("Persona.GetListxPais", Information.Err().Number, Information.Err().Description);
success = 4;
}
}
return(rec);
}
// VBto upgrade warning: piCodigo As short --> As int OnWrite(int, VBtoField)
public short Obtener(int piCodigo)
{
// Descripción : Obtiene un país por codigo
// Parámetros : piCodigo
// Retorno : 0 OK
// 3 No existe
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success = 0;
string ltConsulta; DataTable rec;
ltConsulta = "exec svc_cle_obt_pai_por_cod " + Convert.ToString(piCodigo);
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
Codigo = Convert.ToInt32(rec.Rows[0]["cod_pais"]);
Nombre = Convert.ToString(rec.Rows[0]["gls_pais"]) + "";
if (VBtoConverter.IsNull(rec.Rows[0]["gls_gntlc_pais"]))
{
Gentilicio = string.Empty;
}
else
{
Gentilicio = Convert.ToString(rec.Rows[0]["gls_gntlc_pais"]) + "";
}
Aladi = Convert.ToInt16(rec.Rows[0]["cod_aladi"]);
if (VBtoConverter.IsNull(rec.Rows[0]["cod_cntnt"]))
{
Continente = -1;
}
else
{
Continente = Convert.ToInt32(rec.Rows[0]["cod_cntnt"]);
}
if (VBtoConverter.IsNull(rec.Rows[0]["cod_rgion_geogr"]))
{
Region = -1;
}
else
{
Region = Convert.ToInt32(rec.Rows[0]["cod_rgion_geogr"]);
}
if (VBtoConverter.IsNull(rec.Rows[0]["cod_nivel_desrr"]))
{
Desarrollo = -1;
}
else
{
Desarrollo = Convert.ToInt32(rec.Rows[0]["cod_nivel_desrr"]);
}
if (VBtoConverter.IsNull(rec.Rows[0]["Pai_mnt_flj_exp"]))
{
FlujoExportaciones = 0;
}
else
{
FlujoExportaciones = Convert.ToDecimal(rec.Rows[0]["Pai_mnt_flj_exp"]);
}
if (VBtoConverter.IsNull(rec.Rows[0]["Pai_por_lim_grp"]))
{
PercAdmitido = 0;
}
else
{
PercAdmitido = Convert.ToSingle(rec.Rows[0]["Pai_por_lim_grp"]);
}
if (VBtoConverter.IsNull(rec.Rows[0]["Pai_mnt_max_pnc"]))
{
MaxPotencial = 0;
}
else
{
MaxPotencial = Convert.ToDecimal(rec.Rows[0]["Pai_mnt_max_pnc"]);
}
TotBancos = Convert.ToInt32(rec.Rows[0]["TotBancos"]);
mfEsNuevo = false;
success = 0;
}
}
else
{
//modLCEData.GenericError("Pais.Obtener", Information.Err().Number, Information.Err().Description);
success = 4;
}
}
return(success);
}
public bool IsTipInGrupo(string sTipoProd, string sFlag)
{
// Descripción : Verifica la xistencia de un Tipo dentro del Grupo
// si sFlag no es vacio usa ese grupo de busqueda
// tipos de productos por codigo
// Parámetros : sTipoProd,sFlag
// Retorno : True si existe
// False si no existe
// =============================================
// Declaración de constantes/variables locales
// =============================================
bool success = false;
string ltComando; DataTable rec;
if (Strings.UCase(sFlag) == "TOTPRI")
{
ltComando = "exec sva_cle_exi_tip_rel_grp 0, '" + sTipoProd + "', 4, 0";
}
else if (Strings.UCase(sFlag) == "70MAIN")
{
ltComando = "exec sva_cle_exi_tip_rel_grp 0, '" + sTipoProd + "', 1, 1";
}
else if (Strings.UCase(sFlag) == "70ADIC")
{
ltComando = "exec sva_cle_exi_tip_rel_grp 0, '" + sTipoProd + "', 1, 2";
}
else if (Strings.UCase(sFlag) == "30PERC")
{
ltComando = "exec sva_cle_exi_tip_rel_grp 0, '" + sTipoProd + "', 1, 3";
}
else if (Strings.UCase(sFlag) == "15PERC")
{
ltComando = "exec sva_cle_exi_tip_rel_grp 0, '" + sTipoProd + "', 1, 4";
}
else if (Strings.UCase(sFlag) == "810RAN")
{
ltComando = "exec sva_cle_exi_tip_rel_grp 0, '" + sTipoProd + "', 1, 5";
}
else
{
ltComando = "exec sva_cle_exi_tip_rel_grp " + Convert.ToString(Codigo) + ", '" + sTipoProd + "'";
}
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltComando);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count > 0)
{
if (int.Parse(rec.Rows[0][0].ToString()) > 0)
{
success = true;
}
}
}
else
{
//modLCEData.GenericError("GrupoProducto.IsTipInGrupo", Information.Err().Number, Information.Err().Description);
//success = 4;
}
}
return(success);
}
public short Obtener(string ptNumero)
{
// Descripción : Obtiene una persona por número
// Parámetros : ptNumero
// Retorno : 0 OK
// 3 No existe Persona
// 4 Error en la BD
// 5 No existe Direccion
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success = 0;
string ltConsulta; DataTable rec;
ptNumero = Global.ConvertirRutNro(ptNumero);
ltConsulta = "exec sp_pnj_cnsta_datos_prsna '" + Strings.Trim(ptNumero) + "',''";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
success = 3;
}
else
{
Numero = Global.ConvertirNroRut(ptNumero) + "";
if (VBtoConverter.IsNull(rec.Rows[0]["cod_tipo_prsna"]))
{
CodigoTipo = 1;
}
else
{
CodigoTipo = Convert.ToInt32(rec.Rows[0]["cod_tipo_prsna"]);
}
NumeroDocumento = Convert.ToString(rec.Rows[0]["nro_idtfr_prsna"]) + "";
NombreEstructurado = Strings.Trim(Convert.ToString(rec.Rows[0]["nom_prsna_etcdo"]) + "");
NombreCompactado = Strings.Trim(Convert.ToString(rec.Rows[0]["nom_prsna_cmpdo"]) + "");
CodigoPais = Convert.ToInt32(rec.Rows[0]["cod_pais"]);
CodigoIdiomaOperar = Convert.ToString(rec.Rows[0]["cod_idiom"]);
if (rec.Rows[0]["flg_prsna_jrdca"] == "0")
{
EsJuridica = false;
}
else
{
EsJuridica = true;
}
if (rec.Rows[0]["flg_rut_fictc"] == "0")
{
EsRutFicticio = false;
}
else
{
EsRutFicticio = true;
}
success = 0;
}
}
else
{
// GenericError "Persona.Obtener", Err.Number, Err.Description
success = 4;
}
}
return(success);
}
//
public short Obtener(DateTime pxFecha)
{
short suceso = 0;
// Descripción : Obtiene el limite capítulo 3.b.5
// Parámetros : pxFecha
// Retorno : 0 OK
// 3 No existe
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
string ltConsulta;
DataTable rec = new DataTable();
ltConsulta = "exec svc_cle_obt_lim_cit_3b5 '" + pxFecha.ToString("yyyyMMdd") + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
suceso = 3;
}
else
{
suceso = 0;
CodigoLimite = Convert.ToInt32(rec.Rows[0]["cod_limte"]);
FechaOtorgamiento = (DateTime)rec.Rows[0]["fch_otgmt"];
FechaVencimiento = (DateTime)rec.Rows[0]["fch_vncto"];
Vigencia = "VIG";
if (FechaVencimiento.ToOADate() < DateTime.Today.ToOADate())
{
Vigencia = "vnc";
}
MontoOtorgado15 = Convert.ToDouble(rec.Rows[0]["mnt_total_15_prcnt"]);
MontoReservado15 = Convert.ToDouble(rec.Rows[0]["mnt_rsrvd_15_prcnt"]);
MontoUtilizado15 = Convert.ToDouble(rec.Rows[0]["mnt_utlzd_15_prcnt"]);
MontoDisponible15 = MontoOtorgado15 - (MontoReservado15 + MontoUtilizado15); // 0 + lrecLimite("mnt_dispo_15_prcnt")
// TotalInteres15 = 0 + lrecLimite("mnt_total_intrs_15_prcnt")
MontoOtorgado30 = Convert.ToDouble(rec.Rows[0]["mnt_total_30_prcnt"]);
MontoReservado30 = Convert.ToDouble(rec.Rows[0]["mnt_rsrvd_30_prcnt"]);
MontoUtilizado30 = Convert.ToDouble(rec.Rows[0]["mnt_utlzd_30_prcnt"]);
MontoDisponible30 = MontoOtorgado30 - (MontoReservado30 + MontoUtilizado30); // 0 + lrecLimite("mnt_dispo_30_prcnt")
// TotalInteres30 = 0 + lrecLimite("mnt_total_intrs_30_prcnt")
MontoOtorgado70 = Convert.ToDouble(rec.Rows[0]["mnt_total_70_prcnt"]);
MontoDisponible70 = Convert.ToDouble(rec.Rows[0]["mnt_dispo_70_prcnt"]);
MontoUtilizado70 = Convert.ToDouble(rec.Rows[0]["mnt_utlzd_70_prcnt"]);
MontoReservado70 = Convert.ToDouble(rec.Rows[0]["mnt_rsrvd_70_prcnt"]);
// TotalInteres70 = Convert.ToDouble(lrecLimite("mnt_total_intrs_70_prcnt")
MontoOtorgado70Adi = Convert.ToDouble(rec.Rows[0]["mnt_tot_set_adi"]);
MontoUtilizado70Adi = Convert.ToDouble(rec.Rows[0]["mnt_uso_set_adi"]);
MontoDisponible70Adi = Convert.ToDouble(rec.Rows[0]["mnt_dis_set_adi"]);
MontoReservado70Adi = Convert.ToDouble(rec.Rows[0]["mnt_rsv_set_adi"]);
MontoReserva70Pri = Convert.ToDouble(rec.Rows[0]["mnt_rsv_set_adi_pri"]);
MontoReserva70Sec = Convert.ToDouble(rec.Rows[0]["mnt_rsv_set_adi_sec"]);
MontoUtiliza70Pri = Convert.ToDouble(rec.Rows[0]["mnt_uso_set_adi_pri"]);
MontoUtiliza70Sec = Convert.ToDouble(rec.Rows[0]["mnt_uso_set_adi_sec"]);
CodSobBas = Convert.ToByte((VBtoConverter.IsNull(rec.Rows[0]["cod_sob_bas"]) ? 0 : rec.Rows[0]["cod_sob_bas"]));
MontoOtorgadoCap8 = Convert.ToDouble((VBtoConverter.IsNull(rec.Rows[0]["ltn_mnt_tot_cit_och"]) ? 0 : rec.Rows[0]["ltn_mnt_tot_cit_och"]));
MontoReservadoCap8 = Convert.ToDouble((VBtoConverter.IsNull(rec.Rows[0]["ltn_mnt_rsv_cit_och"]) ? 0 : rec.Rows[0]["ltn_mnt_rsv_cit_och"]));
MontoUtilizadoCap8 = Convert.ToDouble((VBtoConverter.IsNull(rec.Rows[0]["ltn_mnt_uso_cit_och"]) ? 0 : rec.Rows[0]["ltn_mnt_uso_cit_och"]));
MontoDisponibleCap8 = MontoOtorgadoCap8 - (MontoReservadoCap8 + MontoUtilizadoCap8);
}
}
else
{
suceso = 4;
errlist.AddRange(db.errlist);
// Global.GenericError("Capitulo3b5.Obtener", Information.Err().Number, Information.Err().Description);
}
}
return(suceso);
}
// VBto upgrade warning: piCodigo As short --> As int OnWrite(int, VBtoField)
public short Obtener(int piCodigo)
{
// Descripción : Obtiene una moneda por codigo
// Parámetros : piCodigo
// Retorno : 0 OK
// 3 No existe la moneda
// 4 Error en la BD
// E. laterales: Ninguno
//
// =============================================
// Declaración de constantes/variables locales
// =============================================
short success;
string ltConsulta;
String codigo = piCodigo.ToString();
int largo = codigo.Trim().Length;
StringBuilder sbXML;
sbXML = new StringBuilder();
for (int i = 1; i <= 5 - largo; i++)
{
sbXML.Append(" ");
} // i
String espacios = sbXML.ToString(); // ltEspacios & " "
sbXML = null;
codigo = espacios + codigo;
// Inicialización de @datos2
String ltResultado = string.Empty;
ltConsulta = "exec sp_lce_cna_monda '" + codigo + "','" + ltResultado + "'";
using (DataFinder db = new DataFinder(dataConnectionString))
{
DataTable rec = db.GetRecordset(ltConsulta);
if (db.errlist.Count == 0)
{
if (rec.Rows.Count == 0)
{
errlist.Add("No existe la Moneda con el Codigo Buscado");
success = 3;
}
else
{
Codigo = piCodigo;
Simbolo = Convert.ToString(rec.Rows[0]["cod_smblo_monda"]) + "";
Nombre = Convert.ToString(rec.Rows[0]["gls_monda"]) + "";
MarcaNacional = Convert.ToString(rec.Rows[0]["mrc_ncnal_extrj"]) + "";
CodigoBcoCentral = Convert.ToInt32(rec.Rows[0]["cod_monda_bcoct"]);
success = 0;
mfEsNuevo = false;
}
}
else
{
//modLCEData.GenericError("Moneda.Obtener", Information.Err().Number, Information.Err().Description);
errlist.AddRange(db.errlist);
success = 4;
}
}
return(success);
}
