-- activar para seleccionar AF
This commit is contained in:
@@ -436,7 +436,7 @@
|
||||
<div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
|
||||
|
||||
<asp:GridView ID="GvPrePoliza" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover mysmallbtn GvPrePoliza" GridLines="None"
|
||||
DataKeyNames="CvePrePolizaDetalle,CvePrePoliza,IdMov, CveConceptoContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,EsMonedaExtranjera,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC,ImporteME,ImporteMN,Cargo,Abono,CveIE,Modificado" Width="100%" >
|
||||
DataKeyNames="CvePrePolizaDetalle,CvePrePoliza,IdMov, CveConceptoContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,EsMonedaExtranjera,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC,ImporteME,ImporteMN,Cargo,Abono,CveIE,CveActivoFijo,Modificado" Width="100%" >
|
||||
<Columns>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Movimiento</HeaderTemplate>
|
||||
@@ -744,6 +744,15 @@
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row" runat="server" id="DvModalConceptoActivoFijo" visible="false">
|
||||
<div class="col-xs-2" style="text-align: left">Activo Fijo:</div>
|
||||
<div class="col-xs-4" style="text-align: left">
|
||||
<asp:Dropdownlist ID="DdlAF" CssStyle="width: 100%;" CssClass ="select2me" runat="server" AppendDataBoundItems="true" DataTextField="Descripcion" DataValueField="CveActivoFijo" Width="405px" ></asp:Dropdownlist>
|
||||
|
||||
<i></i>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row" runat="server" id="DvModalconceptoVenta" visible="false">
|
||||
<div class="col-xs-2" style="text-align: left">Venta:</div>
|
||||
|
||||
@@ -392,6 +392,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
.Add("CveCompra", Type.GetType("System.Int32"))
|
||||
.Add("CveCliente", Type.GetType("System.Int32"))
|
||||
.Add("CveVenta", Type.GetType("System.Int32"))
|
||||
.Add("CveActivoFijo", Type.GetType("System.Int32"))
|
||||
.Add("CveIE", Type.GetType("System.Int32"))
|
||||
.Add("CveClasificacion", Type.GetType("System.Int32"))
|
||||
.Add("MultipleSubProyecto", Type.GetType("System.Boolean"))
|
||||
@@ -1097,7 +1098,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
CvePersonal:=gvr.DataKey("CvePersonal").ToEntero, CveClasificacion:=gvr.DataKey("CveClasificacion").ToEntero,
|
||||
ImporteME:=ImporteME, TipoCambio:=TipoCambio,
|
||||
CveTipoGasto:=tCveTipoGasto,
|
||||
CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, CveCuenta:=tCveCuenta, PorcentajeImpuesto:=gvr.DataKey("PorcentajeImpuesto").ToDecimal) Then
|
||||
CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, CveActivoFijo:=gvr.DataKey("CveActivoFijo").ToEntero, CveCuenta:=tCveCuenta, PorcentajeImpuesto:=gvr.DataKey("PorcentajeImpuesto").ToDecimal) Then
|
||||
ContRegInsertados = ContRegInsertados + 1
|
||||
|
||||
Else
|
||||
@@ -1502,6 +1503,13 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
DvModalconceptoCliente.Visible = False
|
||||
End If
|
||||
|
||||
If AplicaActivoFijo Then
|
||||
CargaActivosFijos()
|
||||
DvModalConceptoActivoFijo.Visible = True
|
||||
Else
|
||||
DvModalConceptoActivoFijo.Visible = False
|
||||
End If
|
||||
|
||||
If AplicaBancos AndAlso Not AplicaComplementaria Then
|
||||
TxtCargoE.AutoPostBack = True
|
||||
TxtAbonoE.AutoPostBack = True
|
||||
@@ -1530,6 +1538,8 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
Else
|
||||
DivMonedaExtranjera.Visible = False
|
||||
End If
|
||||
|
||||
|
||||
CargaCuentaConcepto(CveConceptoContableInsertar)
|
||||
|
||||
End If
|
||||
@@ -1626,6 +1636,15 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
DdlClasificacionesE.DataBind()
|
||||
DdlClasificacionesE.Items.Insert(0, New ListItem(" - ", "-1"))
|
||||
End Sub
|
||||
|
||||
Private Sub CargaActivosFijos()
|
||||
DdlAF.Items.Clear()
|
||||
DdlAF.DataSource = GlobalDTActivoFijos(UsuarioActual.CveEmpresa)
|
||||
DdlAF.DataBind()
|
||||
'DdlAF.setEsWebService(True)
|
||||
'DdlAF.Attributes.Add("data-metodo", "getcliente")
|
||||
|
||||
End Sub
|
||||
Private Sub DdlProveedoresE_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlProveedoresE.SelectedIndexChanged
|
||||
CargaComprasE(DdlProveedoresE.SelectedValue.ToEntero, HdnCveCompra.Value.ToEntero)
|
||||
End Sub
|
||||
@@ -1743,6 +1762,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
dr("CvePersonal") = DdlPersonalE.SelectedValue.ToEntero
|
||||
dr("CveCliente") = DdlClientesE.SelectedValue.ToEntero
|
||||
dr("CveVenta") = DdlVentasE.SelectedValue.ToEntero
|
||||
dr("CveActivoFijo") = DdlAF.SelectedValue.ToEntero
|
||||
dr("FolioFactura") = If(DdlComprasE.Visible = True AndAlso DdlComprasE.SelectedItem IsNot Nothing, DdlComprasE.SelectedItem.ToString, If(DdlVentasE.Visible = True AndAlso DdlVentasE.SelectedItem IsNot Nothing, DdlVentasE.SelectedItem.ToString, ""))
|
||||
dr("Modificado") = True
|
||||
dr("TC") = TxtTipoCambio.Text.ToDecimal
|
||||
@@ -1861,6 +1881,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
dr("CveClasificacion") = -1
|
||||
dr("CveCliente") = DdlClientes.SelectedValue.ToEntero
|
||||
dr("CveVenta") = DdlVentas.SelectedValue.ToEntero
|
||||
dr("CveActivoFijo") = DdlAF.SelectedValue.ToEntero
|
||||
End If
|
||||
GvMov.DataSource = DtMovimientos
|
||||
GvMov.DataBind()
|
||||
@@ -1888,6 +1909,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
dr("CvePersonal") = DdlPersonal.SelectedValue.ToEntero
|
||||
dr("CveCliente") = DdlClientes.SelectedValue.ToEntero
|
||||
dr("CveVenta") = DdlVentas.SelectedValue.ToEntero
|
||||
dr("CveActivoFijo") = DdlAF.SelectedValue.ToEntero
|
||||
|
||||
TxtTotalAbonos.Text = (TxtTotalAbonos.Text.ToDecimal + TxtAbono.Text.ToDecimal).ToString.FormatoNumero
|
||||
TxtTotalCargos.Text = (TxtTotalCargos.Text.ToDecimal + TxtCargo.Text.ToDecimal).ToString.FormatoNumero
|
||||
@@ -1932,6 +1954,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
dr("CveClasificacion") = -1
|
||||
dr("CveCliente") = DdlClientes.SelectedValue.ToEntero
|
||||
dr("CveVenta") = DdlVentas.SelectedValue.ToEntero
|
||||
dr("CveActivoFijo") = DdlAF.SelectedValue.ToEntero
|
||||
|
||||
TxtTotalAbonos.Text = (TxtTotalAbonos.Text.ToDecimal + TxtAbono.Text.ToDecimal).ToString.FormatoNumero
|
||||
TxtTotalCargos.Text = (TxtTotalCargos.Text.ToDecimal + TxtCargo.Text.ToDecimal).ToString.FormatoNumero
|
||||
@@ -1942,9 +1965,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
GvMov.DataBind()
|
||||
UPMovs.Update()
|
||||
Actualizar = False
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
TxtCargo.Text = ""
|
||||
@@ -2125,6 +2146,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
'DdlClientes.txtText.Value = DrM("CveCliente").ToString
|
||||
|
||||
DdlVentas.SelectedValueExist(DrM("CveVenta").ToString)
|
||||
DdlAF.SelectedValueExist(DrM("CveActivoFijo").ToString)
|
||||
LbCancelarEdicion.Visible = True
|
||||
LbAgregar.Text = "Actualizar"
|
||||
|
||||
@@ -2566,7 +2588,6 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
DtMovimientos.Clear()
|
||||
Exit For
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
If CveConceptoContable = 69 Then
|
||||
@@ -2596,6 +2617,7 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
dr("CveClasificacion") = CveClasificacion
|
||||
dr("CveCliente") = -1
|
||||
dr("CveVenta") = -1
|
||||
dr("CveActivoFijo") = -1
|
||||
dr("CveCuenta") = CveCuentaExcel
|
||||
dr("CveTipoGasto") = -1
|
||||
dr("CvePrePolizaDetalle") = -1
|
||||
|
||||
Reference in New Issue
Block a user