This commit is contained in:
2022-06-18 11:20:13 -07:00
parent 8a5eae3654
commit b925b5b408
9 changed files with 113 additions and 125 deletions

View File

@@ -3,9 +3,6 @@ Option Explicit On
Imports System.Data Imports System.Data
Imports Extensiones Imports Extensiones
Imports System.Xml
Imports Microsoft.Reporting.WebForms
Imports GemBox.Spreadsheet
Partial Class Bancos_CargarConciliacionesBancarias Partial Class Bancos_CargarConciliacionesBancarias
Inherits ClsPaginas Inherits ClsPaginas

View File

@@ -1,8 +1,8 @@
Option Explicit On Option Explicit On
Option Strict On Option Strict On
Imports Extensiones
Imports System.Data Imports System.Data
Imports Extensiones
Partial Class Bancos_DepositosCaja Partial Class Bancos_DepositosCaja
Inherits ClsPaginas Inherits ClsPaginas

View File

@@ -1,13 +1,10 @@
using System; using Extensiones;
using System;
using System.Collections.Generic; using System.Collections.Generic;
using System.Data; using System.Data;
using System.Drawing;
using System.Linq;
using System.Text; using System.Text;
using System.Web; using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls; using System.Web.UI.WebControls;
using Extensiones;
using static Extensiones.ModExtensiones; using static Extensiones.ModExtensiones;
public partial class Bancos_Devoluciones : ClsPaginas public partial class Bancos_Devoluciones : ClsPaginas
@@ -163,7 +160,7 @@ public partial class Bancos_Devoluciones : ClsPaginas
} }
protected void CargaSubProyectos() protected void CargaSubProyectos()
{ {
DdlSubProyecto.DataSource = get_GlobalDTSubProyectos(-1, CveEmpresa:UsuarioActual.CveEmpresa); DdlSubProyecto.DataSource = get_GlobalDTSubProyectos(-1, CveEmpresa: UsuarioActual.CveEmpresa);
DdlSubProyecto.DataBind(); DdlSubProyecto.DataBind();
DdlSubProyecto.Items.Insert(0, new ListItem("Seleccione SubProyecto", "-1")); DdlSubProyecto.Items.Insert(0, new ListItem("Seleccione SubProyecto", "-1"));
} }
@@ -358,14 +355,14 @@ public partial class Bancos_Devoluciones : ClsPaginas
#region"GUARDAR" #region"GUARDAR"
protected void BtnGuardar_Click(object sender, EventArgs e) protected void BtnGuardar_Click(object sender, EventArgs e)
{ {
//inician validaciones //inician validaciones
if (OpcionDevolucion.SelectedValue.ToEntero() != 3 && TipoDevolucion.SelectedValue.ToString().ToEntero() != 2 && TxtImporte.Text == "") if (OpcionDevolucion.SelectedValue.ToEntero() != 3 && TipoDevolucion.SelectedValue.ToString().ToEntero() != 2 && TxtImporte.Text == "")
{ {
Alert("Debe ingresar un importe", TipoMensaje.MsgAdvertencia); Alert("Debe ingresar un importe", TipoMensaje.MsgAdvertencia);
return; return;
} }
if (OpcionDevolucion.SelectedValue == "3" && TipoDevolucion.SelectedValue == "2") if (OpcionDevolucion.SelectedValue == "3" && TipoDevolucion.SelectedValue == "2")
{ {
if (TxtValor.Text == "") if (TxtValor.Text == "")
{ {
@@ -383,7 +380,7 @@ public partial class Bancos_Devoluciones : ClsPaginas
} }
else else
{ {
if (valor ==0) if (valor == 0)
{ {
Alert("No se han seleccionado opciones", TipoMensaje.MsgAdvertencia); Alert("No se han seleccionado opciones", TipoMensaje.MsgAdvertencia);
return; return;
@@ -400,7 +397,8 @@ public partial class Bancos_Devoluciones : ClsPaginas
List<Archivo> filesgral = Anexo.getfiles().Archivos; List<Archivo> filesgral = Anexo.getfiles().Archivos;
string filemove = ""; string filemove = "";
string Comprobante = ""; string Comprobante = "";
foreach(Archivo fileItem in filesgral){ foreach (Archivo fileItem in filesgral)
{
Comprobante = System.IO.Path.GetExtension(String.Format("{0}Temp\\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", ""); Comprobante = System.IO.Path.GetExtension(String.Format("{0}Temp\\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "");
filemove = fileItem.filename; filemove = fileItem.filename;
} }
@@ -465,7 +463,7 @@ public partial class Bancos_Devoluciones : ClsPaginas
} }
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ( DdlTipoTransanccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero(); if (DdlTipoTransanccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE Devoluciones", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), 1, TxtFechaDocumento.Text.ToDate(), TxtObservaciones.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransanccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: CveTipoPoliza); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE Devoluciones", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), 1, TxtFechaDocumento.Text.ToDate(), TxtObservaciones.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransanccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: CveTipoPoliza);
if (CvePrePoliza > 0) if (CvePrePoliza > 0)
@@ -477,22 +475,22 @@ public partial class Bancos_Devoluciones : ClsPaginas
{ {
int cveConcepto = DdlConcepto.SelectedValue.ToEntero(); int cveConcepto = DdlConcepto.SelectedValue.ToEntero();
string descripcion = TxtDescripcion.Text; string descripcion = TxtDescripcion.Text;
int tipoDescuento = 1; int tipoDescuento = 1;
double valor = TxtValor.Text.ToDouble(); double valor = TxtValor.Text.ToDouble();
int vecesAplicar = TxtVecesAplicar.Text.ToEntero(); int vecesAplicar = TxtVecesAplicar.Text.ToEntero();
decimal montoLimite = 0; decimal montoLimite = 0;
string fechaInicioAplicacion = DateTime.Now.ToString("yyyy/MM/dd"); string fechaInicioAplicacion = DateTime.Now.ToString("yyyy/MM/dd");
bool estatus = true; bool estatus = true;
int CveCuenta = -1; int CveCuenta = -1;
int CveMovtoPermanente = ObjNom.AddMovtoPermanente(cveConcepto, cvePersonal, descripcion, tipoDescuento, valor, vecesAplicar, montoLimite, fechaInicioAplicacion, estatus, CveCuenta); int CveMovtoPermanente = ObjNom.AddMovtoPermanente(cveConcepto, cvePersonal, descripcion, tipoDescuento, valor, vecesAplicar, montoLimite, fechaInicioAplicacion, estatus, CveCuenta);
if (CveMovtoPermanente < 0) if (CveMovtoPermanente < 0)
{ {
MsgError = "No se pudo insertar movimiento permanente"; MsgError = "No se pudo insertar movimiento permanente";
} }
foreach (GridViewRow gvr in GvDevoluciones.Rows) foreach (GridViewRow gvr in GvDevoluciones.Rows)
@@ -718,7 +716,7 @@ public partial class Bancos_Devoluciones : ClsPaginas
DataTable dt = onom.DtResultados.FiltraParametros(" FormulaTotal = 'FNC.[MovimientosPermanentes]'"); DataTable dt = onom.DtResultados.FiltraParametros(" FormulaTotal = 'FNC.[MovimientosPermanentes]'");
DdlConcepto.Items.Clear(); DdlConcepto.Items.Clear();
DdlConcepto.DataSource = dt.FiltraParametros("Tipo ='D'"); DdlConcepto.DataSource = dt.FiltraParametros("Tipo ='D'");
DataRow drow = dt.NewRow(); DataRow drow = dt.NewRow();
drow["CveConcepto"] = "-1"; drow["CveConcepto"] = "-1";

View File

@@ -1,13 +1,10 @@
using System; using Extensiones;
using System;
using System.Collections.Generic; using System.Collections.Generic;
using System.Data; using System.Data;
using System.Drawing;
using System.Linq;
using System.Text; using System.Text;
using System.Web; using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls; using System.Web.UI.WebControls;
using Extensiones;
using static Extensiones.ModExtensiones; using static Extensiones.ModExtensiones;
public partial class Bancos_PagoAcreedor : ClsPaginas public partial class Bancos_PagoAcreedor : ClsPaginas
@@ -303,7 +300,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
AsignaCuentaProveedor(DdlProveedores.SelectedValue.ToEntero()); AsignaCuentaProveedor(DdlProveedores.SelectedValue.ToEntero());
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ( DdlTipoTransaccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero(); if (DdlTipoTransaccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMonedaPago, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa)); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMonedaPago, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
@@ -326,7 +323,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
//GUARDA COMPROBANTE //GUARDA COMPROBANTE
if (!filemove.Equals("")) if (!filemove.Equals(""))
{ {
filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase:false); filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase: false);
} }
decimal Importe; decimal Importe;
decimal ImporteMN; decimal ImporteMN;
@@ -419,7 +416,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
if (tCveMoneda != 1) if (tCveMoneda != 1)
{ {
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, Ref, CveConceptoContablePago, Conc, DateTime.Now, IDCtaContableAcreedorExtranjera, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMN, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto:DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, Ref, CveConceptoContablePago, Conc, DateTime.Now, IDCtaContableAcreedorExtranjera, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMN, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de pago acreedor"; MsgError = "No se pudo insertar concepto de pago acreedor";
break; break;
@@ -508,7 +505,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
{ {
MsgError = "No se pudo insertar concepto de bancos complementaria"; MsgError = "No se pudo insertar concepto de bancos complementaria";
} }
if (AcumImporteMN!=(ImporteBanco + ImporteComplementaria)) { if (AcumImporteMN != (ImporteBanco + ImporteComplementaria))
{
int tCveConceptoOtIngresos = 0; int tCveConceptoOtIngresos = 0;
bool TipoMovtoOt = false; bool TipoMovtoOt = false;
decimal Dif = AcumImporteMN - (ImporteBanco + ImporteComplementaria); decimal Dif = AcumImporteMN - (ImporteBanco + ImporteComplementaria);
@@ -769,7 +767,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
//GUARDA COMPROBANTE //GUARDA COMPROBANTE
if (!filemove.Equals("")) if (!filemove.Equals(""))
{ {
filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase: false); filemove.FilesMove(CveIE.ToString(), string.Format(@"{0}IE", UsuarioActual.Empresa.Ruta), ConcatenarDirectorioBase: false);
} }
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, Ref, CveConceptoContableBanco, Conc, DateTime.Now, IDCtaContableBancos, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: ImporteMN, TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, Ref, CveConceptoContableBanco, Conc, DateTime.Now, IDCtaContableBancos, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: ImporteMN, TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
@@ -825,7 +823,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
} }
//CONTABILIZA //CONTABILIZA
if (UsuarioActual.Empresa.Funcionalidad(200).Equals("1") && MsgError.Equals("") ) if (UsuarioActual.Empresa.Funcionalidad(200).Equals("1") && MsgError.Equals(""))
{ {
if (IDCtaContableAcreedor > 0 && IDCtaContableBancos > 0) if (IDCtaContableAcreedor > 0 && IDCtaContableBancos > 0)
{ {
@@ -959,12 +957,12 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
DateTime FInicio = MinFecha; DateTime FInicio = MinFecha;
DateTime FFin = MaxFecha; DateTime FFin = MaxFecha;
if(TxtFechaInicio.Text.Length == 10) if (TxtFechaInicio.Text.Length == 10)
{ {
FInicio = TxtFechaInicio.Text.ToDate(); FInicio = TxtFechaInicio.Text.ToDate();
} }
if(TxtFechaFin.Text.Length == 10) if (TxtFechaFin.Text.Length == 10)
{ {
FFin = TxtFechaFin.Text.ToDate(); FFin = TxtFechaFin.Text.ToDate();
} }

View File

@@ -1,13 +1,9 @@
using System; using Extensiones;
using System;
using System.Collections.Generic; using System.Collections.Generic;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text; using System.Text;
using System.Web; using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls; using System.Web.UI.WebControls;
using Extensiones;
using static Extensiones.ModExtensiones; using static Extensiones.ModExtensiones;
public partial class Bancos_PagoDeudor : ClsPaginas public partial class Bancos_PagoDeudor : ClsPaginas
@@ -359,19 +355,19 @@ public partial class Bancos_PagoDeudor : ClsPaginas
} }
// SI ES DOLARES // SI ES DOLARES
if(CveMonedaPrestamo == 2) if (CveMonedaPrestamo == 2)
{ {
// BANCOS - BANCOS COMPLEMENTARIA // BANCOS - BANCOS COMPLEMENTARIA
if (UsaComplementaria) if (UsaComplementaria)
{ {
// BANCOS - COMPLEMENTARIA // BANCOS - COMPLEMENTARIA
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true,0, Ref, 204, Conc, DateTime.Now, IDCtaContableBancosComplementariaPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: (TxtImportePrestamo.Text.ToDecimal() * tipoCambio) - TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio:tipoCambio, CveSubProyecto:DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, 0, Ref, 204, Conc, IDCtaContableBancosComplementariaPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: (TxtImportePrestamo.Text.ToDecimal() * tipoCambio) - TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de bancos complementaria"; MsgError = "No se pudo insertar concepto de bancos complementaria";
} }
s
// BANCOS // BANCOS
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContableBanco, Conc, DateTime.Now, IDCtaContableBancosPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContableBanco, Conc, IDCtaContableBancosPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de bancos"; MsgError = "No se pudo insertar concepto de bancos";
} }
@@ -379,7 +375,7 @@ public partial class Bancos_PagoDeudor : ClsPaginas
else else
{ {
// BANCOS // BANCOS
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContableBanco, Conc, DateTime.Now, IDCtaContableBancosPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal() * tipoCambio, ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContableBanco, Conc, IDCtaContableBancosPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal() * tipoCambio, ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de bancos"; MsgError = "No se pudo insertar concepto de bancos";
} }
@@ -389,13 +385,13 @@ public partial class Bancos_PagoDeudor : ClsPaginas
if (UsaComplementaria) //(IDCtaContableDeudorCompPrestamo > 0) if (UsaComplementaria) //(IDCtaContableDeudorCompPrestamo > 0)
{ {
// DEUDOR COMPLEMENTARIA // DEUDOR COMPLEMENTARIA
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false,0, Ref, 256, Conc, DateTime.Now, IDCtaContableDeudorCompPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: (TxtImportePrestamo.Text.ToDecimal() * tipoCambio) - TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(),TipoCambio:tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, 0, Ref, 256, Conc, IDCtaContableDeudorCompPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: (TxtImportePrestamo.Text.ToDecimal() * tipoCambio) - TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de deudor complementaria"; MsgError = "No se pudo insertar concepto de deudor complementaria";
} }
// DEUDOR // DEUDOR
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContablePrestamo, Conc, DateTime.Now, IDCtaContableDeudorPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContablePrestamo, Conc, IDCtaContableDeudorPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de deudor"; MsgError = "No se pudo insertar concepto de deudor";
} }
@@ -403,7 +399,7 @@ public partial class Bancos_PagoDeudor : ClsPaginas
else else
{ {
// DEUDOR // DEUDOR
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContablePrestamo, Conc, DateTime.Now, , -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal() * tipoCambio, ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContablePrestamo, Conc, IDCtaContableDeudorPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal() * tipoCambio, ImporteME: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de deudor"; MsgError = "No se pudo insertar concepto de deudor";
} }
@@ -413,13 +409,13 @@ public partial class Bancos_PagoDeudor : ClsPaginas
else else
{ {
// BANCOS // BANCOS
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContableBanco, Conc, DateTime.Now, IDCtaContableBancosPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContableBanco, Conc, IDCtaContableBancosPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de bancos"; MsgError = "No se pudo insertar concepto de bancos";
} }
// DEUDOR // DEUDOR
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContablePrestamo, Conc, DateTime.Now, IDCtaContableDeudorPrestamo, -1, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, TxtImportePrestamo.Text.ToDecimal(), Ref, CveConceptoContablePrestamo, Conc, IDCtaContableDeudorPrestamo, CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), ImporteMX: TxtImportePrestamo.Text.ToDecimal(), TipoCambio: tipoCambio, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de deudor"; MsgError = "No se pudo insertar concepto de deudor";
} }
@@ -439,12 +435,12 @@ public partial class Bancos_PagoDeudor : ClsPaginas
{ {
if (ObjMov.ValorPolizaDescuadre > 0) if (ObjMov.ValorPolizaDescuadre > 0)
{ {
$"Bancos/IE PAGO Deudor | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}".GuardaLogAD( "LogPrePolizas"); $"Bancos/IE PAGO Deudor | Error:{ObjMov.MensajePolizaDescuadre} Diferencia:{ObjMov.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}".GuardaLogAD("LogPrePolizas");
} }
} }
bool AutoConta = UsuarioActual.Empresa.Funcionalidad(200).Equals("1"); bool AutoConta = UsuarioActual.Empresa.Funcionalidad(200).Equals("1");
// if (UsuarioActual.CveEmpresa == 119) AutoConta = false; // if (UsuarioActual.CveEmpresa == 119) AutoConta = false;
if (AutoConta && MsgError.Equals("")) if (AutoConta && MsgError.Equals(""))
{ {
@@ -453,7 +449,7 @@ public partial class Bancos_PagoDeudor : ClsPaginas
//Y se valida la moneda con el siguiente IF //Y se valida la moneda con el siguiente IF
bool ValidoComplementaria = false; bool ValidoComplementaria = false;
if ((CveMonedaPrestamo == 2 && IDCtaContableBancosComplementariaPrestamo > 0 && IDCtaContableDeudorCompPrestamo > 0) || CveMonedaPrestamo == 1) if ((CveMonedaPrestamo == 2 && IDCtaContableBancosComplementariaPrestamo > 0 && IDCtaContableDeudorCompPrestamo > 0) || CveMonedaPrestamo == 1)
{ ValidoComplementaria = true; } { ValidoComplementaria = true; }
if (IDCtaContableDeudorPrestamo > 0 && IDCtaContableBancosPrestamo > 0 && ValidoComplementaria) if (IDCtaContableDeudorPrestamo > 0 && IDCtaContableBancosPrestamo > 0 && ValidoComplementaria)
@@ -747,7 +743,7 @@ public partial class Bancos_PagoDeudor : ClsPaginas
if (UsaComplementaria) if (UsaComplementaria)
{ {
ImporteMN = Importe; ImporteMN = Importe;
ImporteComplementaria = Importe * TCDoc - Importe; ImporteComplementaria = Importe * TCDoc - Importe;
} }
else else
{ {
@@ -756,13 +752,13 @@ public partial class Bancos_PagoDeudor : ClsPaginas
} }
} }
ImporteMN = ImporteMN.RoundSQL(); ImporteMN = ImporteMN.RoundSQL();
ImporteComplementaria = ImporteComplementaria.RoundSQL(); ImporteComplementaria = ImporteComplementaria.RoundSQL();
if (tCveMoneda != 1) if (tCveMoneda != 1)
{ {
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, Ref, CveConceptoContablePago, Conc, DateTime.Now, IDCtaContableDeudor, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMN, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TCDoc, TipoCambioPago: TC,CveSubProyecto:DdlSubProyectoPago.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, Ref, CveConceptoContablePago, Conc, DateTime.Now, IDCtaContableDeudor, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMN, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TCDoc, TipoCambioPago: TC, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero()))
{ {
MsgError = "No se pudo insertar concepto de pago deudor"; MsgError = "No se pudo insertar concepto de pago deudor";
break; break;
@@ -803,7 +799,8 @@ public partial class Bancos_PagoDeudor : ClsPaginas
} }
} }
}else }
else
{ {
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, Ref, CveConceptoContablePago, Conc, DateTime.Now, IDCtaContableDeudor, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMN, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: gvr.DataKey("TipoCambio").ToDecimal(), TipoCambioPago: TC, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero())) if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, Ref, CveConceptoContablePago, Conc, DateTime.Now, IDCtaContableDeudor, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMN, CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: gvr.DataKey("TipoCambio").ToDecimal(), TipoCambioPago: TC, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero()))
{ {

View File

@@ -719,7 +719,7 @@ Partial Class Bancos_ProveedoresAbonar
Exit Sub Exit Sub
End If End If
Dim ImporteSeleccionado As Decimal = 0 Dim ImporteSeleccionado As Decimal = 0
If Not UsuarioActual.Empresa.Funcionalidad(529) = "1" Then If Not UsuarioActual.Empresa.Funcionalidad(529) = "1" Then
Dim Validada As Boolean = False Dim Validada As Boolean = False
Dim MsgValidadas As New StringBuilder Dim MsgValidadas As New StringBuilder

View File

@@ -2,9 +2,7 @@
Option Strict On Option Strict On
Imports System.Data Imports System.Data
Imports Microsoft.Reporting.WebForms
Imports Extensiones Imports Extensiones
Imports System.Collections.Generic
Partial Class Bancos_RepCortes Partial Class Bancos_RepCortes
Inherits ClsPaginas Inherits ClsPaginas