-- editar direcciones de envío/entrega
This commit is contained in:
@@ -163,6 +163,7 @@
|
||||
<td>Dirección Envío:</td>
|
||||
<td>
|
||||
<asp:Label Text="" ID="LblDirEnvio" runat="server" />
|
||||
<asp:LinkButton ID="LnkEditarDir" runat="server" OnClick="LnkEditarDir_Click" AlternateText="Editar Dirección" ToolTip="Editar Dirección" CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
@@ -279,6 +280,44 @@
|
||||
|
||||
</div>
|
||||
|
||||
|
||||
<div id="DivEditarEntrega" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
<asp:UpdatePanel ID="UpModalEditarentrega" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="modal-header">
|
||||
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
|
||||
<span aria-hidden="true">×</span>
|
||||
</button>
|
||||
<h4 class="modal-title" id="H1" runat="server">Editar Dirección</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
|
||||
<div class="row">
|
||||
<div class="form-group col-md-6 form-md-line-input input-iconright">
|
||||
<asp:HiddenField ID="HdnCveVenta" runat="server" />
|
||||
<asp:DropDownList ID="DdlModalDireccionEnvio" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="DireccionEnvio" DataValueField="CveDireccionEnvio" Class="table-group-action-input form-control input-inline input-small input-sm select2me"></asp:DropDownList>
|
||||
<label for="<%= DdlModalDireccionEnvio.ClientID.ToString()%>">Dirección Origen:</label>
|
||||
</div>
|
||||
<asp:RequiredFieldValidator ID="RfvDdlModalDireccionEnvio" runat="server" ControlToValidate="DdlModalDireccionEnvio" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Dirección Origen''</b> es necesario." InitialValue="-1" ValidationGroup="GrpModalEditarentrega"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VceDdlModalDireccionEnvio" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalDireccionEnvio" Width="250px" PopupPosition="BottomLeft"></ajax:ValidatorCalloutExtender>
|
||||
</div>
|
||||
|
||||
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<asp:Button ID="BtnModalEditarentrega" runat="server" OnClick="BtnModalEditarentrega_Click" CssClass="btn btn-success" Text="Actualizar" ValidationGroup="GrpModalEditarentrega" />
|
||||
<button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<asp:UpdatePanel ID="UpPendientes" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
@@ -221,6 +221,14 @@ Partial Class Inventarios_EntregaAlmacen
|
||||
ViewState("CveCliente") = value
|
||||
End Set
|
||||
End Property
|
||||
Private Property CveDireccionEnvio As Integer
|
||||
Get
|
||||
Return CType(ViewState("CveDireccionEnvio"), Integer)
|
||||
End Get
|
||||
Set(value As Integer)
|
||||
ViewState("CveDireccionEnvio") = value
|
||||
End Set
|
||||
End Property
|
||||
Private Property CveMovimiento As Integer
|
||||
Get
|
||||
Return CType(ViewState("CveMovimiento"), Integer)
|
||||
@@ -598,20 +606,21 @@ Partial Class Inventarios_EntregaAlmacen
|
||||
trObsAlmacen.Visible = drE("ObservacionesAlmacen").ToString() <> ""
|
||||
LbObservacionesAlmacen.Text = drE("ObservacionesAlmacen").ToString()
|
||||
CveVentaSurtir = CveVenta
|
||||
CveAlmacenTraspasoDestino = DtDatos.Rows(0)(If(EsDevolucionVenta = 1 And TipoDocto <> "Rem", "CveAlmacenTraspasoOrigen", "CveAlmacenTraspasoDestino")).ToString().ToEntero()
|
||||
CveAlmacenTraspasoOrigen = DtDatos.Rows(0)(If(EsDevolucionVenta = 1 And TipoDocto <> "Rem", "CveAlmacenTraspasoDestino", "CveAlmacenTraspasoOrigen")).ToString().ToEntero()
|
||||
CveContrato = DtDatos.Rows(0)("CveContrato").ToString().ToEntero()
|
||||
CveVendedor = DtDatos.Rows(0)("CveVendedor").ToString().ToEntero()
|
||||
CveCliente = DtDatos.Rows(0)("CveCliente").ToString().ToEntero()
|
||||
CveAlmacenTraspasoDestino = drE(If(EsDevolucionVenta = 1 And TipoDocto <> "Rem", "CveAlmacenTraspasoOrigen", "CveAlmacenTraspasoDestino")).ToString().ToEntero()
|
||||
CveAlmacenTraspasoOrigen = drE(If(EsDevolucionVenta = 1 And TipoDocto <> "Rem", "CveAlmacenTraspasoDestino", "CveAlmacenTraspasoOrigen")).ToString().ToEntero()
|
||||
CveContrato = drE("CveContrato").ToString().ToEntero()
|
||||
CveVendedor = drE("CveVendedor").ToString().ToEntero()
|
||||
CveCliente = drE("CveCliente").ToString().ToEntero()
|
||||
ClienteEntregaPersonal(CveCliente)
|
||||
CveSubProyecto = DtDatos.Rows(0)("CveSubProyecto").ToString().ToEntero()
|
||||
CveSubProyecto = drE("CveSubProyecto").ToString().ToEntero()
|
||||
EsInterno = CBool(DtDatos.Rows(0)("EsInterno").ToString())
|
||||
CveDireccionEnvio = drE("CveDireccionEnvio").ToString.ToEntero
|
||||
|
||||
If drE("CveDireccionEnvio").ToString.ToEntero > 0 Then
|
||||
If CveDireccionEnvio > 0 Then
|
||||
trDireccionEnvio.Visible = True
|
||||
'carga la dirección de envío
|
||||
Dim ObjClientes As New ClsClientes
|
||||
If ObjClientes.DireccionEnvioGet(drE("CveDireccionEnvio").ToString.ToEntero, CveCliente, -1) Then
|
||||
If ObjClientes.DireccionEnvioGet(CveDireccionEnvio, CveCliente, -1) Then
|
||||
Dim drenvio As DataRow = ObjClientes.DtResultados.FiltroPrimero("")
|
||||
LblDirEnvio.Text = drenvio("SucursalClienteVentaDireccion").ToString
|
||||
End If
|
||||
@@ -3988,4 +3997,69 @@ Partial Class Inventarios_EntregaAlmacen
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
'Protected void LnkEditarDir_Click(Object sender, EventArgs e)
|
||||
'{
|
||||
|
||||
|
||||
' int CveCliente = GvRow.DataKey("CveCliente").ToEntero();
|
||||
' int CveDireccion = GvRow.DataKey("CveDireccionEnvio").ToEntero();
|
||||
|
||||
' HdnCveVenta.Value = GvRow.DataKey("CveVenta");
|
||||
' CargaModalCombosDirecciones(CveCliente, CveDireccion);
|
||||
|
||||
' UpModalEditarentrega.Update();
|
||||
' this.RegistraScript("$('#DivEditarEntrega').modal('show');");
|
||||
'}
|
||||
|
||||
|
||||
|
||||
Protected Sub LnkEditarDir_Click(sender As Object, e As EventArgs)
|
||||
|
||||
HdnCveVenta.Value = CveVentaSurtir.ToString
|
||||
CargaModalCombosDirecciones(CveCliente, CveDireccionEnvio)
|
||||
|
||||
RegistraScript("$('#DivEditarEntrega').modal('show');")
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub CargaModalCombosDirecciones(CveCliente As Integer, CveDireccionEnvio As Integer)
|
||||
|
||||
DdlModalDireccionEnvio.Items.Clear()
|
||||
|
||||
Dim dtt As New DataTable()
|
||||
Dim ObjClientes As New ClsClientes()
|
||||
If (ObjClientes.DireccionEnvioGet(-1, CveCliente, -1)) Then
|
||||
dtt = ObjClientes.DtResultados
|
||||
End If
|
||||
ObjClientes.Dispose()
|
||||
|
||||
DdlModalDireccionEnvio.DataSource = dtt
|
||||
DdlModalDireccionEnvio.DataBind()
|
||||
DdlModalDireccionEnvio.SelectedValueExist(CveDireccionEnvio)
|
||||
UpModalEditarentrega.Update()
|
||||
dtt.Dispose()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub BtnModalEditarentrega_Click(sender As Object, e As EventArgs)
|
||||
Dim ProcesoOK As Boolean = True
|
||||
|
||||
Dim ObjVentas As New ClsVentas()
|
||||
If Not ObjVentas.UpdateDireccionEnvioVenta(HdnCveVenta.Value.ToEntero(), DdlModalDireccionEnvio.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa) Then
|
||||
ProcesoOK = False
|
||||
End If
|
||||
ObjVentas.Dispose()
|
||||
|
||||
If ProcesoOK Then
|
||||
RegistraScript("$('#DivEditarEntrega').modal('hide');")
|
||||
Alert("Dirección Actualizada correctamente.", ModExtensiones.TipoMensaje.ToastInformacion)
|
||||
'CargaDatos()
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user