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 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);
}
// 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 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);
}
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);
}
