Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
@@ -106,6 +106,15 @@
|
||||
<asp:LinkButton ID="LnkModalAddMaquinariaFlotilla" Visible="false" runat="server" OnClick="LnkModalAddMaquinariaFlotilla_Click"> <i class="fa fa-file-excel-o" style="font-weight:bold;"></i>Agregar Maquinaria-Flotilla-Herramienta</asp:LinkButton>
|
||||
</li>
|
||||
|
||||
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkAbrirContrato" Visible="false" runat="server" OnClick="LnkAbrirContrato_Click" data-toggle="confirmation" data-popout="true" data-original-title="¿Abrir Contrato?" data-btn-ok-label="si"> <i class="fa-folder-open-o" style="font-weight:bold;"></i>Abrir Contrato</asp:LinkButton>
|
||||
</li>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkCerrarContrato" Visible="false" runat="server" OnClick="LnkCerrarContrato_Click" data-toggle="confirmation" data-popout="true" data-original-title="¿Cerrar Contrato?" data-btn-ok-label="si" > <i class="fa fa-times-circle" style="font-weight:bold;"></i>Cerrar Contrato</asp:LinkButton>
|
||||
</li>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
@@ -163,11 +172,8 @@
|
||||
<div class="icon">
|
||||
<i class="fa fa-list-ol"></i>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
|
||||
@@ -735,7 +741,7 @@
|
||||
<asp:LinkButton runat="server" ID="BtnDescargar" class="btn btn-warning" Visible="false"><i class='fa fa-download' aria-hidden='true'></i> Descargar</asp:LinkButton>
|
||||
<asp:TextBox Style="display: none" ID="TxtArchivo" ClientIDMode="Static" runat="server" Width="200px"></asp:TextBox>
|
||||
|
||||
<button type="button" class="btn btn-primary" runat="server" clientidmode="Static" id="A1" data-toggle="modal" data-target="#ModalUpload" visible="true"><i class="fa fa-upload" aria-hidden="true"></i>Subir Archivo</button>
|
||||
<button type="button" class="btn btn-primary" runat="server" clientidmode="Static" id="A1" data-toggle="modal" data-target="#ModalUpload" visible="true"><i class="fa fa-upload" aria-hidden="true"></i>Subir Archivo</button>
|
||||
|
||||
|
||||
</ContentTemplate>
|
||||
@@ -803,7 +809,7 @@
|
||||
<div class="row">
|
||||
<div class="col-md-12">
|
||||
<asp:GridView ID="Gv" ClientIDMode="Static" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron Conceptos"
|
||||
DataKeyNames="CveContratoDetalle,CveUM, CvePS, Cantidad, PU,CveTipoPresupuesto,CodigoPS,LimitarCantidad,PS,NoIdentificacion,PermitirAvance,CantidadContratada"
|
||||
DataKeyNames="CveContratoDetalle,CveUM, CvePS, Cantidad, PU,CveTipoPresupuesto,CodigoPS,LimitarCantidad,PS,NoIdentificacion,PermitirAvance,CantidadContratada,CveClasificacion"
|
||||
ShowHeader="true" SelectedRowStyle-BackColor="#66CCFF" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
|
||||
<Columns>
|
||||
|
||||
@@ -1085,6 +1091,7 @@
|
||||
<td>
|
||||
<asp:TextBox ID="TxtCantidadInt" runat="server" Width="70px"></asp:TextBox><ajax:FilteredTextBoxExtender ID="FLTCantidadInt" runat="server" TargetControlID="TxtCantidadInt" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<asp:RequiredFieldValidator ID="RFVCantidadInt" runat="server" ControlToValidate="TxtCantidadInt" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarInt"></asp:RequiredFieldValidator><ajax:ValidatorCalloutExtender ID="VCOCantidadInt" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidadInt" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
|
||||
</td>
|
||||
|
||||
<td>
|
||||
@@ -1181,7 +1188,8 @@
|
||||
<EditItemTemplate>
|
||||
<div style="width: 65px;">
|
||||
<asp:LinkButton ID="LinkButton1" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update"
|
||||
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpGV" /><asp:LinkButton ID="LinkButton2" runat="server" AlternateText="Cancelar" CausesValidation="False" CommandName="Cancel"
|
||||
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpGV" />
|
||||
<asp:LinkButton ID="LinkButton2" runat="server" AlternateText="Cancelar" CausesValidation="False" CommandName="Cancel"
|
||||
CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-times'></i>" />
|
||||
</div>
|
||||
</EditItemTemplate>
|
||||
@@ -1287,35 +1295,35 @@
|
||||
<Columns>
|
||||
<asp:BoundField HeaderText="Producto/Servicio" DataField="CodigoPS" ItemStyle-Width="30%" />
|
||||
|
||||
<asp:BoundField HeaderText="Cantidad" DataField="ContratoCantidad" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00##}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Importe $" DataField="ContratoImporte" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00##}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Cantidad" DataField="ContratoCantidad" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Importe $" DataField="ContratoImporte" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00}" ItemStyle-Width="7.5%" />
|
||||
|
||||
<asp:TemplateField HeaderText="Cantidad" ItemStyle-Width="7.5%" ItemStyle-CssClass="Derecha">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LBAvanceCantidad" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceCantidad", "{0:###,###,##0.00##}") %>' runat="server" />
|
||||
<asp:LinkButton ID="LBAvanceCantidad" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceCantidad", "{0:###,###,##0.00}") %>' runat="server" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Importe $" ItemStyle-Width="7.5%" ItemStyle-CssClass="Derecha">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LBAvanceImporte" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceImporte", "{0:###,###,##0.00##}") %>' runat="server" />
|
||||
<asp:LinkButton ID="LBAvanceImporte" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceImporte", "{0:###,###,##0.00}") %>' runat="server" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:BoundField HeaderText="%" DataField="AvancePorcentaje" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
|
||||
<asp:BoundField HeaderText="Cantidad" DataField="FaltanteCantidad" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00##}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Importe $" DataField="FaltanteImporte" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00##}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Cantidad" DataField="FaltanteCantidad" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Importe $" DataField="FaltanteImporte" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00}" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="%" DataField="FaltantePorcentaje" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="Cantidad" ItemStyle-Width="7.5%" ItemStyle-CssClass="Derecha">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LBAvanceXFacturarCantidad" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceXFacturarCantidad", "{0:###,###,##0.00##}") %>' runat="server" />
|
||||
<asp:LinkButton ID="LBAvanceXFacturarCantidad" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceXFacturarCantidad", "{0:###,###,##0.00}") %>' runat="server" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Importe $" ItemStyle-Width="7.5%" ItemStyle-CssClass="Derecha">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LBAvanceXFacturarImporte" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceXFacturarImporte", "{0:###,###,##0.00##}") %>' runat="server" />
|
||||
<asp:LinkButton ID="LBAvanceXFacturarImporte" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceXFacturarImporte", "{0:###,###,##0.00}") %>' runat="server" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
@@ -2220,7 +2228,9 @@
|
||||
<asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" Visible="false" CssClass="btn btn-danger" data-toggle="confirmation" data-popout="true" data-original-title="Esta seguro de eliminar el Contrato?" data-btn-ok-label="si" />
|
||||
<asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
|
||||
|
||||
<asp:Button ID="BtnCancelar" CssClass="btn btn-default" runat="server" Text="Cancelar" OnClientClick="javascript:window.location.href='/Contratos/Contratos.aspx';return false" />
|
||||
<asp:Button ID="BtnCancelar" CssClass="btn btn-default" runat="server" Text="Cancelar" OnClientClick="javascript:window.location.href='/Contratos/Contratos.aspx';return false" />
|
||||
|
||||
|
||||
|
||||
|
||||
</ContentTemplate>
|
||||
@@ -2773,7 +2783,9 @@
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtCantidad" runat="server" CssClass="form-control" ></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FilteredTextBoxExtender1" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAddPSVentas"> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAddPSVentas"> </asp:RequiredFieldValidator>
|
||||
<asp:RangeValidator runat="server" id="RGVControlCantidadVentas" ControlToValidate="TxtCantidad" CssClass="help-block errorimput" Type="Double" MinimumValue="1" MaximumValue="9999999999" ErrorMessage="No se pueden tener valores inferiores a lo ya avanzado" ValidationGroup="GrpAddPSVentas" />
|
||||
|
||||
<label for="<%= TxtCantidad.ClientID.ToString()%>">Cantidad:</label>
|
||||
</div>
|
||||
|
||||
|
||||
@@ -389,6 +389,19 @@ Partial Class Contratos_ContratoObra
|
||||
End Property
|
||||
|
||||
|
||||
Property BloquearTodo As Boolean
|
||||
Get
|
||||
If ViewState("BloquearTodo") Is Nothing Then
|
||||
Return False
|
||||
Else
|
||||
Return Boolean.Parse(ViewState("BloquearTodo").ToString)
|
||||
End If
|
||||
End Get
|
||||
Set(value As Boolean)
|
||||
ViewState("BloquearTodo") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
|
||||
#End Region
|
||||
@@ -483,6 +496,9 @@ Partial Class Contratos_ContratoObra
|
||||
CargaDLLCargaGVCentrosConsto()
|
||||
tabalCentrosdecotso()
|
||||
|
||||
|
||||
BloquearControles()
|
||||
|
||||
End If
|
||||
|
||||
|
||||
@@ -626,12 +642,38 @@ Partial Class Contratos_ContratoObra
|
||||
'DdlProyecto.SelectedValue = "-1"
|
||||
|
||||
TxtCantidad.Text = ""
|
||||
RGVControlCantidadVentas.Visible = False
|
||||
TxtPU.Text = ""
|
||||
TmpDT.Clear()
|
||||
CargaGVPresupuestos(TmpDT)
|
||||
CargaGVPresupuestosInsumos(TmpDT)
|
||||
LbTotalGeneral.Text = "0.00"
|
||||
End Sub
|
||||
|
||||
Private Sub BloquearControles()
|
||||
|
||||
If BloquearTodo Then
|
||||
|
||||
|
||||
LnkModalAddPSVentas.Visible = False
|
||||
LnkModalAddPSControl.Visible = False
|
||||
LnkModalAddPresupuestoVentas.Visible = False
|
||||
LnkModalAddPresupuestoControl.Visible = False
|
||||
LnkModalAddGastos.Visible = False
|
||||
LnkModalAddMaquinariaFlotilla.Visible = False
|
||||
|
||||
BtnDescargar.Enabled = False
|
||||
A1.Visible = False
|
||||
|
||||
BtnGuardar.Enabled = False
|
||||
BtnEliminar.Enabled = False
|
||||
BtnCancelar.Enabled = False
|
||||
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
#Region " CONFIGURA TIPOS CONTRATO "
|
||||
@@ -739,6 +781,24 @@ Partial Class Contratos_ContratoObra
|
||||
DdlCliente.SelectedValue = ObjContratos.CveCliente.ToString
|
||||
DdlCliente.SelectedText = ObjContratos.NombreComercial.ToString
|
||||
|
||||
|
||||
|
||||
LnkAbrirContrato.Visible = False
|
||||
LnkCerrarContrato.Visible = False
|
||||
|
||||
If UsuarioActual.TienePermisoProceso(330) Then
|
||||
|
||||
If ObjContratos.TipoEstatus = 1 Then
|
||||
LnkCerrarContrato.Visible = True
|
||||
Else
|
||||
LnkAbrirContrato.Visible = True
|
||||
BloquearTodo = True
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
If ObjContratos.CveProveedor > 0 Then
|
||||
' TrProveedor.Visible = True
|
||||
TrCliente.Visible = False
|
||||
@@ -873,6 +933,11 @@ Partial Class Contratos_ContratoObra
|
||||
Alert("El Contrato Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)
|
||||
BtnGuardar.Enabled = False
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Else
|
||||
CveContrato = -1
|
||||
Alert("Ocurrió un error al cargar el Contrato. Por favor vuelva a intentar.", TipoMensaje.MsgError)
|
||||
@@ -1000,10 +1065,14 @@ Partial Class Contratos_ContratoObra
|
||||
TipoContrato = DdlTipoContratoObra.SelectedValue.ToEntero
|
||||
|
||||
'Crear Contrato
|
||||
Dim ImporteSubTotal As Decimal = TmpDT.SUM("Total", " CveContratoDetalle > 0 AND CveTipoPresupuesto=2 ").ToDecimal
|
||||
If Not CveContrato > 0 Then
|
||||
|
||||
Dim EstatusContrato As Integer = 1
|
||||
|
||||
|
||||
|
||||
|
||||
CveContrato = ObjContratos.AddContratosObra(TxtNumeroContrato.Text, TxtDescripcionContrato.Text, TxtNumeroLicitacion.Text.Trim, DdlContratista.SelectedValue.ToEntero, DdlCliente.SelectedValue.ToEntero, -1, TxtFechaInicial.Text.ToDate, TxtFechaFinal.Text.ToDate,
|
||||
TxtUbicacion.Text, TxtResponsable.Text, DdlProyecto.SelectedValue.ToEntero, TxtPorIVA.Text.ToDouble, TxtPorAnticipo.Text.ToDouble, TxtPorAmortizacionAnticipo.Text.ToDouble,
|
||||
TxtPorGarantia.Text.ToDouble, "." & Session("FileExtension").ToString, "", -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, Minimo, Maximo, Total,
|
||||
@@ -1011,7 +1080,7 @@ Partial Class Contratos_ContratoObra
|
||||
TxtTipoCambio.Text.ToDouble, CveSucursalCliente:=DdlSucursalCliente.SelectedValue.ToEntero, CveAlmacenOrigen:=-1, CveAlmacenDestino:=-1,
|
||||
PorcentajeComision:=0, TipoGarantia:=-1, Folio:=0, FechaVenc:=Nothing, EstatusFianza:=1,
|
||||
CvePeriodo:=-1, CveCuentaEquipo:=-1, CveContratoPlantilla:=-1, CveVendedor:=-1,
|
||||
Observaciones:=TxtObservaciones.Text, CveDireccionEnvio:=-1, AplicaImpuestosLocales:=False, CorreoNotificacionPedDev:=TxtCorreoNotificacion.Text.Trim(), Lugar:=TxtLugar.Text.Trim, LimiteDeGasto:=TxtLimiteGastos.Text.ToDouble)
|
||||
Observaciones:=TxtObservaciones.Text, CveDireccionEnvio:=-1, AplicaImpuestosLocales:=False, CorreoNotificacionPedDev:=TxtCorreoNotificacion.Text.Trim(), Lugar:=TxtLugar.Text.Trim, LimiteDeGasto:=TxtLimiteGastos.Text.ToDouble, ImporteSubTotal:=ImporteSubTotal)
|
||||
|
||||
|
||||
TieneError = Not GuardaFianzas(ObjContratos)
|
||||
@@ -1074,7 +1143,7 @@ Partial Class Contratos_ContratoObra
|
||||
CveAlmacenOrigen:=-1, CveAlmacenDestino:=-1, PorcentajeComision:=0,
|
||||
TipoGarantia:=-1, Folio:=-1, FechaVenc:=Nothing, EstatusFianza:=-1, CveContratoPlantilla:=-1,
|
||||
CveCuentaEquipo:=-1, CveVendedor:=-1, Observaciones:=TxtObservaciones.Text, CveDireccionEnvio:=-1, AplicaImpuestosLocales:=False,
|
||||
CorreoNotificacionPedDev:=TxtCorreoNotificacion.Text.Trim(), Lugar:=TxtLugar.Text.Trim, LimiteDeGasto:=TxtLimiteGastos.Text.ToDouble) Then
|
||||
CorreoNotificacionPedDev:=TxtCorreoNotificacion.Text.Trim(), Lugar:=TxtLugar.Text.Trim, LimiteDeGasto:=TxtLimiteGastos.Text.ToDouble, ImporteSubTotal:=ImporteSubTotal) Then
|
||||
|
||||
|
||||
TieneError = Not GuardaFianzas(ObjContratos)
|
||||
@@ -1698,6 +1767,21 @@ Partial Class Contratos_ContratoObra
|
||||
|
||||
|
||||
End If
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
|
||||
If BloquearTodo Then
|
||||
e.Row.FCLinkButton("LnkEditarPresupuestoVentaDetalle").Visible = False
|
||||
e.Row.FCLinkButton("imgD").Visible = False
|
||||
End If
|
||||
|
||||
If e.Row.DataKey("CveContratoDetalle").ToEntero <= 0 Then
|
||||
e.Row.FCLinkButton("LnkEditarPresupuestoVentaDetalle").Visible = False
|
||||
e.Row.FCLinkButton("imgD").Visible = False
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
If e.Row.RowState = DataControlRowState.Edit OrElse e.Row.RowState = 5 Then
|
||||
e.Row.FCDropDownList("DdlUMEdit").DataSource = GlobalDTProductosServiciosEquivalencias(e.Row.DataKey("CvePS").ToString.ToEntero, -1, UsuarioActual.CveEmpresa)
|
||||
e.Row.FCDropDownList("DdlUMEdit").DataBind()
|
||||
@@ -2078,6 +2162,23 @@ Partial Class Contratos_ContratoObra
|
||||
e.Row.FCDropDownList("DdlUMEdit").SelectedValue = e.Row.DataKey("CveUM")
|
||||
End If
|
||||
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If BloquearTodo Then
|
||||
e.Row.FCLinkButton("LnkEditarPresupuestoControlDetalle").Visible = False
|
||||
e.Row.FCLinkButton("imgD").Visible = False
|
||||
End If
|
||||
|
||||
|
||||
If e.Row.DataKey("CveContratoDetalle").ToEntero <= 0 Then
|
||||
|
||||
e.Row.FCLinkButton("LnkEditarPresupuestoControlDetalle").Visible = False
|
||||
e.Row.FCLinkButton("imgD").Visible = False
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Protected Sub GVInsumos_RowEditing(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewEditEventArgs) Handles GvInsumos.RowEditing
|
||||
GvInsumos.EditIndex = e.NewEditIndex
|
||||
@@ -2726,8 +2827,8 @@ Partial Class Contratos_ContratoObra
|
||||
End Sub
|
||||
|
||||
Protected Sub GvContratoGastos_RowDataBound(ByVal sender As Object, ByVal e As GridViewRowEventArgs) Handles GvContratosGastos.RowDataBound
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If e.Row.DBCampo("CveContrato").ToString.ToEntero = 0 Or e.Row.DBCampo("CveVenta").ToString.ToEntero > 0 Then
|
||||
If e.Row.DBCampo("CveContrato").ToString.ToEntero = 0 Then e.Row.CssClass = "SubTotales" : e.Row.Cells(0).Text = e.Row.DBCampo("Cantidad").FormatoNumero(0)
|
||||
e.Row.FCLinkButton("imgE").Visible = False
|
||||
@@ -2738,6 +2839,16 @@ Partial Class Contratos_ContratoObra
|
||||
ScriptManager.GetCurrent(Me).RegisterAsyncPostBackControl(lb)
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If BloquearTodo Then
|
||||
e.Row.FCLinkButton("imgU").Visible = False
|
||||
e.Row.FCLinkButton("imgE").Visible = False
|
||||
e.Row.FCLinkButton("imgD").Visible = False
|
||||
End If
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub GvContratoGastos_RowDeleting(ByVal sender As Object, ByVal e As GridViewDeleteEventArgs) Handles GvContratosGastos.RowDeleting
|
||||
@@ -3185,6 +3296,15 @@ Partial Class Contratos_ContratoObra
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If BloquearTodo Then
|
||||
e.Row.FCLinkButton("LinkEliminarBitacora").Visible = False
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub BtnGuardarEventoBitacora_Click(sender As Object, e As EventArgs) Handles BtnGuardarEventoBitacora.Click
|
||||
@@ -4181,12 +4301,38 @@ Partial Class Contratos_ContratoObra
|
||||
|
||||
|
||||
|
||||
Dim CantidadMinimo As Integer = 0
|
||||
Dim ObjContrtato As New ClsContratos
|
||||
|
||||
If ObjContrtato.GetContratosDetalleAvance(CveContratoDetalleEditar) Then
|
||||
CantidadMinimo = ObjContrtato.DtResultados.Rows(0)(0).ToString.ToEntero
|
||||
|
||||
|
||||
If CantidadMinimo = 0 Then
|
||||
RGVControlCantidadVentas.Visible = False
|
||||
Else
|
||||
RGVControlCantidadVentas.Visible = True
|
||||
RGVControlCantidadVentas.MinimumValue = CantidadMinimo.ToString
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
|
||||
|
||||
ObjContrtato.Dispose()
|
||||
|
||||
|
||||
|
||||
ModalVentasPSAdd = False
|
||||
ChkContinualAgregandoVentas.Visible = False
|
||||
ChkContinualAgregandoVentas.Checked = False
|
||||
|
||||
UpModalVentasAddPS.Update()
|
||||
|
||||
RegistraScript("$('#ModalVentasAddPS').modal('show')")
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
Protected Sub LnkEditarPresupuestoControlDetalle_Click(sender As Object, e As EventArgs)
|
||||
|
||||
@@ -4276,6 +4422,7 @@ Partial Class Contratos_ContratoObra
|
||||
|
||||
'TxtOCInterna.Text = ""
|
||||
TxtCantidad.Text = ""
|
||||
RGVControlCantidadVentas.Visible = False
|
||||
'ChkLimitarVenta.Checked = False
|
||||
'TxtNoIdentificacionv.Text = ""
|
||||
DdlClasificacionAdd.SelectedValueExist(-1)
|
||||
@@ -5088,7 +5235,6 @@ Partial Class Contratos_ContratoObra
|
||||
Private Sub GvGastosVeiculos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvGastosVeiculos.RowDataBound
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
|
||||
If e.Row.DataKey("ORDEN").ToEntero = 1 Then
|
||||
e.Row.CssClass = "Totales"
|
||||
e.Row.Cells(1).Text = "Total"
|
||||
@@ -5097,8 +5243,16 @@ Partial Class Contratos_ContratoObra
|
||||
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If BloquearTodo Then
|
||||
e.Row.FCLinkButton("LnkEliminarGasto").Visible = False
|
||||
End If
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
@@ -5433,6 +5587,39 @@ Partial Class Contratos_ContratoObra
|
||||
AddtabalCentrosdecotso(DdlCentroCostos.SelectedValue.ToEntero, DdlCentroCostos.SelectedItem.Text, TxtCentroCostosPorcentaje.Text.ToDecimal)
|
||||
|
||||
End Sub
|
||||
Protected Sub LnkAbrirContrato_Click(sender As Object, e As EventArgs)
|
||||
AbrirCerrarContrto(False)
|
||||
End Sub
|
||||
Protected Sub LnkCerrarContrato_Click(sender As Object, e As EventArgs)
|
||||
AbrirCerrarContrto(True)
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub AbrirCerrarContrto(Cerrar As Boolean)
|
||||
|
||||
|
||||
Dim ObjConrtato As New ClsContratos
|
||||
|
||||
If ObjConrtato.AbrirCerrarContrato(CveContrato, UsuarioActual.CveEmpresa, Cerrar, UsuarioActual.CveUsuario) Then
|
||||
Alert($"Contrato { If(Cerrar, "Cerrado", "Abierto")} Correctamente", TipoMensaje.MsgInformacion, $"window.location.href=""./ContratoObra.aspx?CveContrato={CveContrato}"";")
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GvInt_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvInt.RowDataBound
|
||||
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If BloquearTodo Then
|
||||
|
||||
'e.Row.FCLinkButton("LinkButton1").Enabled = False
|
||||
'e.Row.FCLinkButton("LinkButton2").Enabled = False
|
||||
e.Row.FCLinkButton("LinkButton3").Visible = False
|
||||
e.Row.FCLinkButton("LinkButton4").Visible = False
|
||||
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
|
||||
@@ -106,7 +106,7 @@
|
||||
<div class="number" style="display: none!important">
|
||||
<small>Contratos</small>
|
||||
<h3 class="font-purple-soft">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlGrafNumeroContratos" runat="server" /></span>
|
||||
</h3>
|
||||
|
||||
@@ -115,7 +115,7 @@
|
||||
<div class="number">
|
||||
<small>Total</small>
|
||||
<h3 class="font-purple-soft">
|
||||
<span>$<asp:Literal Text="0" ID="LtlGrafTotal" runat="server" /></span>
|
||||
<span style="font-size: large" >$<asp:Literal Text="0" ID="LtlGrafTotal" runat="server" /></span>
|
||||
</h3>
|
||||
</div>
|
||||
|
||||
@@ -140,7 +140,7 @@
|
||||
<td>
|
||||
<small>Avance</small>
|
||||
<h3 class="font-green-sharp">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlAvanceImporte" runat="server" />
|
||||
</span>
|
||||
<small class="font-green-sharp"></small>
|
||||
@@ -150,7 +150,7 @@
|
||||
<td>
|
||||
<small>Porcentaje</small>
|
||||
<h3 class="font-green-sharp">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlAvanceImporteProcentaje1" runat="server" />
|
||||
</span>
|
||||
<small class="font-green-sharp"></small>
|
||||
@@ -192,7 +192,7 @@
|
||||
<td>
|
||||
<small>Faltante</small>
|
||||
<h3 class="font-red-haze">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlFaltanteImporte" runat="server" />
|
||||
</span>
|
||||
<small class="font-red-haze"></small>
|
||||
@@ -202,7 +202,7 @@
|
||||
<td>
|
||||
<small>Porcentaje</small>
|
||||
<h3 class="font-red-haze">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlFaltanteImportePorcentaje1" runat="server" />
|
||||
</span>
|
||||
<small class="font-red-haze"></small>
|
||||
@@ -309,7 +309,7 @@
|
||||
|
||||
<asp:TemplateField HeaderText="Importe">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="LblImporte" CssClass="Texto" runat="server" Text='<%# Eval("Importe", "{0:N2}")%>'></asp:Label>
|
||||
<asp:Label ID="LblImporteSubTotal" CssClass="Texto" runat="server" Text='<%# Eval("ImporteSubTotal", "{0:N2}")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
<ItemStyle HorizontalAlign="Right"></ItemStyle>
|
||||
</asp:TemplateField>
|
||||
|
||||
@@ -48,7 +48,10 @@ Partial Class RepContratosObraAvances
|
||||
|
||||
Dim NumeroContratos As Integer = DTDatos.Rows.Count
|
||||
|
||||
Dim TotalContratos As Decimal = DTDatos.SUM("Importe")
|
||||
'Dim TotalContratos As Decimal = DTDatos.SUM("Importe")
|
||||
Dim TotalContratos As Decimal = DTDatos.SUM("ImporteSubTotal")
|
||||
|
||||
|
||||
Dim TotalAvance As Decimal = DTDatos.SUM("AvanceImporte")
|
||||
Dim TotalFaltante As Decimal = TotalContratos - TotalAvance
|
||||
|
||||
|
||||
@@ -29,7 +29,7 @@
|
||||
<div class="number" style="display: none!important">
|
||||
<small>Numero Estimaciones</small>
|
||||
<h3 class="font-purple-soft">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlGrafNumeroEstimaciones2" runat="server" /></span>
|
||||
</h3>
|
||||
|
||||
@@ -38,7 +38,7 @@
|
||||
<div class="number">
|
||||
<small>Numero Estimaciones</small>
|
||||
<h3 class="font-purple-soft">
|
||||
<span><asp:Literal Text="0" ID="LtlGrafNumeroEstimaciones" runat="server" /></span>
|
||||
<span style="font-size: large" ><asp:Literal Text="0" ID="LtlGrafNumeroEstimaciones" runat="server" /></span>
|
||||
</h3>
|
||||
</div>
|
||||
|
||||
@@ -63,7 +63,7 @@
|
||||
<td>
|
||||
<small>Avance</small>
|
||||
<h3 class="font-green-sharp">
|
||||
<span>
|
||||
<span style="font-size: large">
|
||||
<asp:Literal Text="0" ID="LtlAvanceImporte" runat="server" />
|
||||
</span>
|
||||
<small class="font-green-sharp"></small>
|
||||
@@ -73,7 +73,7 @@
|
||||
<td>
|
||||
<small>Porcentaje</small>
|
||||
<h3 class="font-green-sharp">
|
||||
<span>
|
||||
<span style="font-size: large" >
|
||||
<asp:Literal Text="0" ID="LtlAvanceImporteProcentaje1" runat="server" />
|
||||
</span>
|
||||
<small class="font-green-sharp"></small>
|
||||
@@ -115,7 +115,7 @@
|
||||
<td>
|
||||
<small>Fecha Fin</small>
|
||||
<h3 class="font-red-haze">
|
||||
<span>
|
||||
<span style="font-size: large">
|
||||
<asp:Literal Text="0" ID="LtlFechaFin" runat="server" />
|
||||
</span>
|
||||
<small class="font-red-haze"></small>
|
||||
@@ -125,7 +125,7 @@
|
||||
<td>
|
||||
<small>Dias Restantes</small>
|
||||
<h3 class="font-red-haze">
|
||||
<span>
|
||||
<span style="font-size: large">
|
||||
<asp:Literal Text="0" ID="LtlDiasRestantes" runat="server" />
|
||||
</span>
|
||||
<small class="font-red-haze"></small>
|
||||
|
||||
@@ -87,7 +87,7 @@ Partial Class RepContratosObraAvancesDetalle
|
||||
|
||||
|
||||
Dim AvanceImporte As Decimal = DTDatos(0)("AvanceImporte").ToString.ToDecimal
|
||||
Dim TotalContratos As Decimal = DTDatos(0)("Importe").ToString.ToDecimal
|
||||
Dim TotalContratos As Decimal = DTDatos(0)("ImporteSubTotal").ToString.ToDecimal
|
||||
|
||||
Dim TotalAvancePorcentaje As Decimal = 0
|
||||
If TotalContratos > 0 Then
|
||||
@@ -100,6 +100,8 @@ Partial Class RepContratosObraAvancesDetalle
|
||||
Dim FechaFinal As Date = DTDatos(0)("FechaFinal").ToString.ToDate
|
||||
Dim Dias As Integer = (FechaFinal - Now).Days
|
||||
|
||||
|
||||
|
||||
Dias = If(Dias < 0, 0, Dias)
|
||||
|
||||
LtlAvanceImporte.Text = $"$ {AvanceImporte.ToString("###,###,###.00")}"
|
||||
@@ -109,7 +111,7 @@ Partial Class RepContratosObraAvancesDetalle
|
||||
SPAvance1.Attributes.Add("style", $"width:{TotalAvancePorcentaje.ToString.ToEntero}%")
|
||||
|
||||
LtlFechaFin.Text = FechaFinal.ToString("dd/MM/yyyy")
|
||||
LtlDiasRestantes.Text = Dias.ToString("###,###")
|
||||
LtlDiasRestantes.Text = If(Dias <= 0, "0", Dias.ToString("###,###"))
|
||||
|
||||
UpGrafica.Update()
|
||||
|
||||
|
||||
Reference in New Issue
Block a user