Commit inicial Ventas Productivo

This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2019-08-14 16:40:54 -07:00
commit c35cf91883
13328 changed files with 3711549 additions and 0 deletions

View File

@@ -0,0 +1,350 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Clientes2.aspx.vb" Inherits="PRESENTACIONES_Clientes2" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" Runat="Server">
<img id="ImgAddVenta" runat="server" alt="Registrar Nueva Venta" style="cursor: pointer;" src="/Imagenes/Nota.gif" width="20" height="25" />
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" Runat="Server">
<asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Clientes"></asp:Literal>&nbsp;<asp:Literal ID="LtlCliente" runat="server"></asp:Literal>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" Runat="Server">
<%--<script language="javascript" type="text/javascript">
function SetText(ObjFrom, ObjTo) {
ObjTo.innerText = ObjFrom.value;
}
function SetText2(ObjTo, Value) {
ObjTo.innerText = Value;
}
function getSelectedText(Obj, IfIsNull) {
if (Obj.selectedIndex == -1)
return IfIsNull;
else
return Obj.options[Obj.selectedIndex].text;
}
//this pageLoad will only works if you are using ASP.Net AJAX
//if you're not, you can use the other way.
function pageLoad() {
var grid = document.getElementById('<%=GvCxC.ClientID %>');
var grid2 = document.getElementById('<%=GvCxCHistorial.ClientID %>');
var firstRowHeaderClone = null;
if (grid && grid2 && grid.cells && grid2.cells) {
if (grid && grid.cells.length > 1) {
firstRowHeaderClone = grid.tBodies[0].rows[0].cloneNode(true);
grid.tBodies[0].insertBefore(firstRowHeaderClone, grid.tBodies[0].rows[0]);
var Row1 = grid.tBodies[0].rows[0];
var Row2 = grid.tBodies[0].rows[1];
if (Row1.cells.length > 1 && Row2.cells.length > 1) {
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row1.cells[0].rowSpan = 2;
Row1.cells[1].rowSpan = 2;
Row1.cells[2].rowSpan = 2;
Row1.cells[3].rowSpan = 2;
Row1.cells[4].rowSpan = 2;
Row1.deleteCell(6);
Row1.deleteCell(7);
Row1.cells[5].colSpan = 2;
Row1.cells[6].colSpan = 2;
Row2.deleteCell(4);
Row2.deleteCell(4);
Row1.cells[7].rowSpan = 2;
Row1.cells[8].rowSpan = 2;
}
}
var firstRowHeaderClone2 = null;
if (grid2 && grid2.cells.length > 1) {
firstRowHeaderClone2 = grid2.tBodies[0].rows[0].cloneNode(true);
grid2.tBodies[0].insertBefore(firstRowHeaderClone2, grid2.tBodies[0].rows[0]);
var Row12 = grid2.tBodies[0].rows[0];
var Row22 = grid2.tBodies[0].rows[1];
if (Row12.cells.length > 1 && Row22.cells.length > 1) {
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row12.cells[0].rowSpan = 2;
Row12.cells[1].rowSpan = 2;
Row12.cells[2].rowSpan = 2;
Row12.cells[3].rowSpan = 2;
Row12.cells[4].rowSpan = 2;
Row12.deleteCell(6);
Row12.deleteCell(7);
Row12.cells[5].colSpan = 2;
Row12.cells[6].colSpan = 2;
Row22.deleteCell(4);
Row22.deleteCell(4);
Row12.cells[7].rowSpan = 2;
Row12.cells[8].rowSpan = 2;
}
}
}
}
</script>--%>
<table border="0" cellpadding="0" cellspacing="0" width="100%" style="padding-top:20px;">
<tr>
<td align="left">
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%">
<ajax:TabPanel ID="TabAlta" runat="server" HeaderText="Información del Cliente">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>
<div>
<fieldset>
<legend><b>Datos del Cliente</b></legend>
<table border="0">
<tr>
<td>Nombre:</td>
<td>
<asp:TextBox ID="TxtNombre" runat="server" MaxLength="96" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNombre" runat="server" ControlToValidate="TxtNombre" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre del Cliente''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCENombre" runat="server" HighlightCssClass="vco" TargetControlID="RFVNombre" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Dirección:</td>
<td>
<asp:TextBox ID="TxtDireccion" runat="server" MaxLength="90" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDireccion" runat="server" ControlToValidate="TxtDireccion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Direccion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEDireccion" runat="server" HighlightCssClass="vco" TargetControlID="RFVDireccion" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>No. Ext.</td>
<td>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<asp:TextBox ID="TxtNoExt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
<td>&nbsp;No. Int.</td>
<td>
<asp:TextBox ID="TxtNoInt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>Colonia:</td>
<td>
<asp:TextBox ID="TxtColonia" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVColonia" runat="server" ControlToValidate="TxtColonia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Colonia''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOColonia" runat="server" HighlightCssClass="vco" TargetControlID="RFVColonia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Localidad:</td>
<td>
<asp:TextBox ID="TxtLocalidad" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVLocalidad" runat="server" ControlToValidate="TxtLocalidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Localidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOLocalidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVLocalidad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Ciudad:</td>
<td>
<asp:TextBox ID="TxtCiudad" runat="server" MaxLength="40" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCiudad" runat="server" ControlToValidate="TxtCiudad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Ciudad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCECiudad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCiudad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Estado:</td>
<td>
<asp:TextBox ID="TxtEstado" runat="server" MaxLength="25" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVEstado" runat="server" ControlToValidate="TxtEstado" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Estado''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEEstado" runat="server" HighlightCssClass="vco" TargetControlID="RFVEstado" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>RFC:</td>
<td>
<asp:TextBox ID="TxtRFC" runat="server" MaxLength="13" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVRFC" runat="server" ControlToValidate="TxtRFC" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCERFC" runat="server" HighlightCssClass="vco" TargetControlID="RFVRFC" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Código Postal:</td>
<td>
<asp:TextBox ID="TxtCP" runat="server" MaxLength="5" Width="40px"></asp:TextBox>
<asp:CompareValidator ID="CVCP" runat="server" ControlToValidate="TxtCP" Display="None" ErrorMessage="El campo <b>''Codigo Postal''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Integer" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCP" runat="server" HighlightCssClass="vco" TargetControlID="CVCP" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Teléfono:</td>
<td><asp:TextBox ID="TxtTelefono" runat="server" MaxLength="15" Width="100px" ValidationGroup="GrpGuardar"></asp:TextBox></td>
</tr>
<tr>
<td>Contacto:</td>
<td><asp:TextBox ID="TxtContacto" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td>Email:</td>
<td>
<asp:TextBox ID="TxtEmail" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVEmail" runat="server" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtEmail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Email''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOMail" runat="server" HighlightCssClass="vco" TargetControlID="REVEmail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>ConfirmarnContraseña de Acceso:</td>
<td><asp:TextBox ID="TxtConfirmarContraseñaAcceso" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
<tr>
<td align="center">
<asp:UpdatePanel ID="UpGuardar" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="BtnGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" />
<asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnCancelar" runat="server" Text="Cancelar" OnClientClick="javascript:window.location.href='/Ventas/CatClientes.aspx'; return false;" />
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
<div id ="DivMail" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpSendMail" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnFolioVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnTipoDocto" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Para:</td>
<td width="200">
<asp:TextBox ID="TxtParaMail" runat="server" ClientIDMode="Static" Width="194px" ReadOnly="true"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVParaMail" runat="server" Display="None" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtParaMail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Para (Mail)''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOParaMail" runat="server" HighlightCssClass="vco" TargetControlID="REVParaMail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr align="left">
<td>
Con copia para:<br />
(Separar con: ;)
</td>
<td><asp:TextBox ID="TxtCC" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr align="left">
<td>Texto Adicional:</td>
<td><asp:TextBox ID="TxtBody" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnSendMail" runat="server" OnClientClick="javascript:$get('DivMail').style.display='none';" Text="Enviar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivMail').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div id ="DivAddPago" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVentaAbono" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Cantidad:</td>
<td width="200">
<asp:TextBox ID="TxtCantidad" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" 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="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVCantidadAbonar" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto, por favor corrija." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCantidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCallOutExtender>
<ajax:ValidatorCallOutExtender ID="VCOCantidad2" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidadAbonar" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<td><b>Fecha:</b>&nbsp;</td>
<td>
<asp:TextBox ID="TxtFechaPago" runat="server" BorderStyle="None" CausesValidation="true" MaxLength="10" ValidationGroup="GpoGuardarAbonar"></asp:TextBox>
&nbsp;<asp:ImageButton runat="server" ID="ImgFechaPago" Visible="false" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
<ajax:MaskedEditExtender ID="MEEFechaPago" runat="server" TargetControlID="TxtFechaPago" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFechaPago" TargetControlID="TxtFechaPago" PopupButtonID="ImgFechaPago" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCOFechaPago1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
<ajax:ValidatorCalloutExtender ID="VCOFechaPago2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
</td>
<tr>
<td>Referencia:</td>
<td>
<asp:TextBox ID="TxtReferencia" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVReferencia" runat="server" ControlToValidate="TxtReferencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Referencia''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOReferencia" runat="server" HighlightCssClass="vco" TargetControlID="RFVReferencia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnAbonar" runat="server" Text="Abonar" ValidationGroup="GpoGuardarAbonar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivAddPago').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<br />
<asp:UpdateProgress ID="upProgress" runat="server" DisplayAfter="0">
<ProgressTemplate>
<div id="overlay">
<div id="modalprogress">
<div id="theprogress">
<center>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>La información se está procesando...</td>
</tr>
<tr>
<td><img src="/Imagenes/Cargando.gif" style="border-width: 0px;" alt="" /></td>
</tr>
</table>
</center>
</div>
</div>
</div>
</ProgressTemplate>
</asp:UpdateProgress>
</asp:Content>

View File

@@ -0,0 +1,118 @@
Option Explicit On
Option Strict On
Imports Extensiones
Imports System.Runtime.InteropServices
Imports System.IO
Imports System.Data
Partial Class PRESENTACIONES_Clientes2
Inherits ClsPaginas
'Configuración
Private ReadOnly Property CveCliente As Integer
Get
Return ViewState("CveCliente").ToString.ToEntero
End Get
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
SetValues()
SetPermisos()
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero > 0 Then
ViewState("CveCliente") = Request("CveCliente")
CargaDatos()
'Configuración de Modalidad Update
BtnGuardar.Text = "Guardar Cambios"
LtlTitulo.Text = "Consulta del Cliente:"
'ImgAddVenta
ImgAddVenta.Attributes.Add("OnClick", "window.location = '/Ventas/Ventas.aspx?CveCliente=" & CveCliente & "'")
If Request("Opt") IsNot Nothing AndAlso IsNumeric(Request("Opt")) Then TAB.ActiveTabIndex = Request("Opt").ToEntero
Else
'Configuración de Modalidad Insert
ViewState("CveCliente") = -1
BtnEliminar.Visible = False
End If
End If
End Sub
Private Sub SetValues()
ViewState("Orden") = ""
ViewState("OSucursalCliente") = "SucursalCliente DESC"
ViewState("OEstado") = "Estado DESC"
ViewState("OFecha") = "Fecha DESC"
ViewState("OUsuario") = "Usuario DESC"
TxtFechaPago.Text = Now.ToShortDateString
End Sub
Private Sub SetPermisos()
End Sub
Private Sub CargaDatos()
Dim ObjClientes As New ClsClientes()
If ObjClientes.GetClientes(CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
If ObjClientes.DtResultados.Rows.Count > 0 Then
'Campos para Modificación
LtlCliente.Text = ObjClientes.Nombre
TxtNombre.Text = ObjClientes.Nombre
TxtDireccion.Text = ObjClientes.Direccion
TxtNoExt.Text = ObjClientes.NoExt
TxtNoInt.Text = ObjClientes.NoInt
TxtColonia.Text = ObjClientes.Colonia
TxtLocalidad.Text = ObjClientes.Localidad
TxtCiudad.Text = ObjClientes.Ciudad
TxtEstado.Text = ObjClientes.Estado
TxtRFC.Text = ObjClientes.RFC
TxtCP.Text = ObjClientes.CP.ToString
TxtTelefono.Text = ObjClientes.Telefono
TxtContacto.Text = ObjClientes.Contacto
TxtEmail.Text = ObjClientes.Mail
TxtParaMail.Text = ObjClientes.Mail
Else
Alert("El Cliente Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)
BtnGuardar.Enabled = False
End If
End If
ObjClientes.Dispose()
End Sub
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
SendMail()
End Sub
'Protected Sub BtnEliminar_Click(sender As Object, e As System.EventArgs) Handles BtnEliminar.Click
' Dim ObjClientes As New ClsClientes()
' If ObjClientes.RemoveCliente(CveCliente) Then
' Alert("El Cliente se Eliminó correctamente.", TipoMensaje.MsgInformacion, "document.location.href=""/Ventas/CatClientes.aspx""")
' End If
' ObjClientes.Dispose()
'End Sub
Protected Sub SendMail()
Dim ObjMail As New ClsSisMail()
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, "JULIAN@adsistemas.mx", "Acceso AIMMG", "Acceso a AIMMG <table><tr><td>ADSISTEMAS.NO-IP/PRESENTACIONES/LOGIN2.ASPX</td></tr><tr><td>" & TxtEmail.Text.Trim & ", " & TxtConfirmarContraseñaAcceso.Text.Trim & " </td></tr></table>") Then
End If
End Sub
'Protected Sub BtnAbonar_Click(sender As Object, e As System.EventArgs) Handles BtnAbonar.Click
' Dim ObjMovtos As New ClsMovimientos()
' If ObjMovtos.AddMovimiento(2, "Cli", CveCliente.ToString, HdnCveVentaAbono.Value, 0, TxtCantidad.Text.Trim.ToDouble, TxtFechaPago.Text.ToDate, TxtReferencia.Text.Trim, DdlCtaContableClientes.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
' Alert("El abono se guardó correctamente", TipoMensaje.MsgInformacion, "$get(""DivAddPago"").style.display=""none"";")
' TxtCantidad.Text = ""
' TxtReferencia.Text = ""
' UpDatos.Update()
' End If
' ObjMovtos.Dispose()
'End Sub
End Class

View File

@@ -0,0 +1,618 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Clientes3.aspx.vb" Inherits="PRESENTACIONES_Clientes3" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" Runat="Server">
<img id="ImgAddVenta" runat="server" alt="Registrar Nueva Venta" style="cursor: pointer;" src="/Imagenes/Nota.gif" width="20" height="25" />
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" Runat="Server">
<asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Clientes"></asp:Literal>&nbsp;<asp:Literal ID="LtlCliente" runat="server"></asp:Literal>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" Runat="Server">
<script language="javascript" type="text/javascript">
function SetText(ObjFrom, ObjTo) {
ObjTo.innerText = ObjFrom.value;
}
function SetText2(ObjTo, Value) {
ObjTo.innerText = Value;
}
function getSelectedText(Obj, IfIsNull) {
if (Obj.selectedIndex == -1)
return IfIsNull;
else
return Obj.options[Obj.selectedIndex].text;
}
//this pageLoad will only works if you are using ASP.Net AJAX
//if you're not, you can use the other way.
function pageLoad() {
var grid = document.getElementById('<%=GvCxC.ClientID %>');
var grid2 = document.getElementById('<%=GvCxCHistorial.ClientID %>');
var firstRowHeaderClone = null;
if (grid && grid2 && grid.cells && grid2.cells) {
if (grid && grid.cells.length > 1) {
firstRowHeaderClone = grid.tBodies[0].rows[0].cloneNode(true);
grid.tBodies[0].insertBefore(firstRowHeaderClone, grid.tBodies[0].rows[0]);
var Row1 = grid.tBodies[0].rows[0];
var Row2 = grid.tBodies[0].rows[1];
if (Row1.cells.length > 1 && Row2.cells.length > 1) {
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row1.cells[0].rowSpan = 2;
Row1.cells[1].rowSpan = 2;
Row1.cells[2].rowSpan = 2;
Row1.cells[3].rowSpan = 2;
Row1.cells[4].rowSpan = 2;
Row1.deleteCell(6);
Row1.deleteCell(7);
Row1.cells[5].colSpan = 2;
Row1.cells[6].colSpan = 2;
Row2.deleteCell(4);
Row2.deleteCell(4);
Row1.cells[7].rowSpan = 2;
Row1.cells[8].rowSpan = 2;
}
}
var firstRowHeaderClone2 = null;
if (grid2 && grid2.cells.length > 1) {
firstRowHeaderClone2 = grid2.tBodies[0].rows[0].cloneNode(true);
grid2.tBodies[0].insertBefore(firstRowHeaderClone2, grid2.tBodies[0].rows[0]);
var Row12 = grid2.tBodies[0].rows[0];
var Row22 = grid2.tBodies[0].rows[1];
if (Row12.cells.length > 1 && Row22.cells.length > 1) {
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row12.cells[0].rowSpan = 2;
Row12.cells[1].rowSpan = 2;
Row12.cells[2].rowSpan = 2;
Row12.cells[3].rowSpan = 2;
Row12.cells[4].rowSpan = 2;
Row12.deleteCell(6);
Row12.deleteCell(7);
Row12.cells[5].colSpan = 2;
Row12.cells[6].colSpan = 2;
Row22.deleteCell(4);
Row22.deleteCell(4);
Row12.cells[7].rowSpan = 2;
Row12.cells[8].rowSpan = 2;
}
}
}
}
</script>
<table border="0" cellpadding="0" cellspacing="0" width="100%" style="padding-top:20px;">
<tr>
<td align="left">
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%">
<ajax:TabPanel ID="TabAlta" runat="server" HeaderText="Información del Cliente">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>
<div>
<fieldset>
<legend><b>Datos del Cliente</b></legend>
<table border="0">
<tr>
<td>Nombre:</td>
<td>
<asp:TextBox ID="TxtNombre" runat="server" MaxLength="96" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNombre" runat="server" ControlToValidate="TxtNombre" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre del Cliente''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCENombre" runat="server" HighlightCssClass="vco" TargetControlID="RFVNombre" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Dirección:</td>
<td>
<asp:TextBox ID="TxtDireccion" runat="server" MaxLength="90" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDireccion" runat="server" ControlToValidate="TxtDireccion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Direccion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEDireccion" runat="server" HighlightCssClass="vco" TargetControlID="RFVDireccion" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>No. Ext.</td>
<td>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<asp:TextBox ID="TxtNoExt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
<td>&nbsp;No. Int.</td>
<td>
<asp:TextBox ID="TxtNoInt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>Colonia:</td>
<td>
<asp:TextBox ID="TxtColonia" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVColonia" runat="server" ControlToValidate="TxtColonia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Colonia''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOColonia" runat="server" HighlightCssClass="vco" TargetControlID="RFVColonia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Localidad:</td>
<td>
<asp:TextBox ID="TxtLocalidad" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVLocalidad" runat="server" ControlToValidate="TxtLocalidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Localidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOLocalidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVLocalidad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Ciudad:</td>
<td>
<asp:TextBox ID="TxtCiudad" runat="server" MaxLength="40" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCiudad" runat="server" ControlToValidate="TxtCiudad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Ciudad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCECiudad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCiudad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Estado:</td>
<td>
<asp:TextBox ID="TxtEstado" runat="server" MaxLength="25" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVEstado" runat="server" ControlToValidate="TxtEstado" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Estado''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEEstado" runat="server" HighlightCssClass="vco" TargetControlID="RFVEstado" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>RFC:</td>
<td>
<asp:TextBox ID="TxtRFC" runat="server" MaxLength="13" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVRFC" runat="server" ControlToValidate="TxtRFC" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCERFC" runat="server" HighlightCssClass="vco" TargetControlID="RFVRFC" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Código Postal:</td>
<td>
<asp:TextBox ID="TxtCP" runat="server" MaxLength="5" Width="40px"></asp:TextBox>
<asp:CompareValidator ID="CVCP" runat="server" ControlToValidate="TxtCP" Display="None" ErrorMessage="El campo <b>''Codigo Postal''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Integer" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCP" runat="server" HighlightCssClass="vco" TargetControlID="CVCP" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Teléfono:</td>
<td><asp:TextBox ID="TxtTelefono" runat="server" MaxLength="15" Width="100px" ValidationGroup="GrpGuardar"></asp:TextBox></td>
</tr>
<tr>
<td>Contacto:</td>
<td><asp:TextBox ID="TxtContacto" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td>Email:</td>
<td>
<asp:TextBox ID="TxtEmail" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVEmail" runat="server" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtEmail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Email''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOMail" runat="server" HighlightCssClass="vco" TargetControlID="REVEmail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>ConfirmarnContraseña de Acceso:</td>
<td><asp:TextBox ID="TxtConfirmarContraseñaAcceso" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabHistorial" runat="server" HeaderText="Historial de Ventas">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>
<div>
<fieldset>
<legend><b>Historial de Ventas</b></legend>
<table border="0">
<tr>
<td>
<asp:UpdatePanel ID="UpnHistorial" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GVHistorial" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Ventas en el Cliente" ToolTip="Listado de Historial de Ventas">
<Columns>
<asp:TemplateField>
<HeaderTemplate>Factura</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFactura" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Sub Total</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSubTotal" runat="server" Text='<%# If (CDbl(Eval("SubTotal")) = 0, "", Eval("SubTotal", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Descuento</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDescuento" runat="server" Text='<%# If (CDbl(Eval("Descuento")) = 0, "", Eval("Descuento", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Amortización</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAmort" runat="server" Text='<%# If (CDbl(Eval("Amortizacion")) = 0, "", Eval("Amortizacion", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Total</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# If (CDbl(Eval("Total")) = 0, "", Eval("Total", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Estatus</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("EstatusFactura") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Se Timbró</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlTimbro" runat="server" Text='<%# Eval("SeTimbro") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Envío Mail</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlEnvioMail" runat="server" Text='<%# Eval("EnvioMail") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Reenviar</HeaderTemplate>
<ItemTemplate>
<a id="HLSendMail" runat="server" class="Texto"><img alt="Reenviar Mail" style="border: 0px none white" src="/Imagenes/SendMail.jpg" height="25px" width="30px" /></a>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabCxC" runat="server" HeaderText="Cuentas x Cobrar">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>
<div>
<fieldset>
<legend><b>CxC Activas</b></legend>
<table border="0">
<tr>
<td>
<asp:GridView ID="GvCxC" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas X Cobrar Pendientes" ToolTip="Listado de CxC">
<Columns>
<asp:TemplateField>
<HeaderTemplate>Factura</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFactura" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Venta</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Vencimiento</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFechaVenci" runat="server" Text='<%# Eval("FechaVencimiento", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Días Vencidos</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDiasVencido" runat="server" Text='<%# Eval("DiasVencidos", "{0}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Monto Venta (Saldo Orig)</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% Recuperado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorRecuperado", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Saldo</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% A Recuperar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorXRecuperar" runat="server" Text='<%# Eval("PorXRecuperar", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Auxiliar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAux" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonar</HeaderTemplate>
<ItemTemplate>
<asp:Image ID="ImgAbonar" runat="server" ImageUrl="~/Imagenes/Money_add.png" AlternateText="Registrar Pago/Abono" Style="cursor:pointer;" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>
<div>
<fieldset>
<legend><b>Historial de CxC</b></legend>
<table border="0">
<tr>
<td>
<asp:GridView ID="GvCxCHistorial" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró Historial de Cuentas X Cobrar" ToolTip="Listado de Historia CxC">
<Columns>
<asp:TemplateField>
<HeaderTemplate>Factura</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFactura" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Venta</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Vencimiento</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFechaVenci" runat="server" Text='<%# Eval("FechaVencimiento", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Días Vencidos</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDiasVencido" runat="server" Text='<%# Eval("DiasVencidos", "{0}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Monto Venta (Saldo Orig)</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% Recuperado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorRecuperado", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Saldo</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2};") %>'></asp:Literal>&nbsp
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% A Recuperar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorXRecuperar" runat="server" Text='<%# Eval("PorXRecuperar", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Auxiliar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAux" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonar</HeaderTemplate>
<ItemTemplate>
<asp:Image ID="ImgAbonar" runat="server" ImageUrl="~/Imagenes/Money_add.png" AlternateText="Registrar Pago/Abono" Style="cursor:pointer;" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
<div id ="DivMail" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpSendMail" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnFolioVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnTipoDocto" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Para:</td>
<td width="200">
<asp:TextBox ID="TxtParaMail" runat="server" ClientIDMode="Static" Width="194px" ReadOnly="true"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVParaMail" runat="server" Display="None" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtParaMail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Para (Mail)''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOParaMail" runat="server" HighlightCssClass="vco" TargetControlID="REVParaMail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr align="left">
<td>
Con copia para:<br />
(Separar con: ;)
</td>
<td><asp:TextBox ID="TxtCC" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr align="left">
<td>Texto Adicional:</td>
<td><asp:TextBox ID="TxtBody" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnSendMail" runat="server" OnClientClick="javascript:$get('DivMail').style.display='none';" Text="Enviar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivMail').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div id ="DivAddPago" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVentaAbono" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Cantidad:</td>
<td width="200">
<asp:TextBox ID="TxtCantidad" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" 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="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVCantidadAbonar" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto, por favor corrija." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCantidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCallOutExtender>
<ajax:ValidatorCallOutExtender ID="VCOCantidad2" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidadAbonar" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<td><b>Fecha:</b>&nbsp;</td>
<td>
<asp:TextBox ID="TxtFechaPago" runat="server" BorderStyle="None" CausesValidation="true" MaxLength="10" ValidationGroup="GpoGuardarAbonar"></asp:TextBox>
&nbsp;<asp:ImageButton runat="server" ID="ImgFechaPago" Visible="false" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
<ajax:MaskedEditExtender ID="MEEFechaPago" runat="server" TargetControlID="TxtFechaPago" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFechaPago" TargetControlID="TxtFechaPago" PopupButtonID="ImgFechaPago" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCOFechaPago1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
<ajax:ValidatorCalloutExtender ID="VCOFechaPago2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
</td>
<tr>
<td>Referencia:</td>
<td>
<asp:TextBox ID="TxtReferencia" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVReferencia" runat="server" ControlToValidate="TxtReferencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Referencia''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOReferencia" runat="server" HighlightCssClass="vco" TargetControlID="RFVReferencia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnAbonar" runat="server" Text="Abonar" ValidationGroup="GpoGuardarAbonar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivAddPago').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<br />
<asp:UpdateProgress ID="upProgress" runat="server" DisplayAfter="0">
<ProgressTemplate>
<div id="overlay">
<div id="modalprogress">
<div id="theprogress">
<center>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>La información se está procesando...</td>
</tr>
<tr>
<td><img src="/Imagenes/Cargando.gif" style="border-width: 0px;" alt="" /></td>
</tr>
</table>
</center>
</div>
</div>
</div>
</ProgressTemplate>
</asp:UpdateProgress>
</asp:Content>

View File

@@ -0,0 +1,314 @@
Option Explicit On
Option Strict On
Imports Extensiones
Imports System.Runtime.InteropServices
Imports System.IO
Imports System.Data
Partial Class PRESENTACIONES_Clientes3
Inherits ClsPaginas
'Configuración
Private ReadOnly Property CveCliente As Integer
Get
Return ViewState("CveCliente").ToString.ToEntero
End Get
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
SetValues()
SetPermisos()
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero > 0 Then
ViewState("CveCliente") = Request("CveCliente")
CargaDatos()
CargaHistorial()
CargaCxC()
'Configuración de Modalidad Update
LtlTitulo.Text = "Consulta del Cliente:"
'ImgAddVenta
ImgAddVenta.Attributes.Add("OnClick", "window.location = '/Ventas/Ventas.aspx?CveCliente=" & CveCliente & "'")
If Request("Opt") IsNot Nothing AndAlso IsNumeric(Request("Opt")) Then Tab.ActiveTabIndex = Request("Opt").ToEntero
Else
'Configuración de Modalidad Insert
ViewState("CveCliente") = -1
End If
End If
End Sub
Private Sub SetValues()
ViewState("Orden") = ""
ViewState("OSucursalCliente") = "SucursalCliente DESC"
ViewState("OEstado") = "Estado DESC"
ViewState("OFecha") = "Fecha DESC"
ViewState("OUsuario") = "Usuario DESC"
TxtFechaPago.Text = Now.ToShortDateString
End Sub
Private Sub SetPermisos()
End Sub
Private Sub CargaDatos()
Dim ObjClientes As New ClsClientes()
If ObjClientes.GetClientes(CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
If ObjClientes.DtResultados.Rows.Count > 0 Then
'Campos para Modificación
LtlCliente.Text = ObjClientes.Nombre
TxtNombre.Text = ObjClientes.Nombre
TxtDireccion.Text = ObjClientes.Direccion
TxtNoExt.Text = ObjClientes.NoExt
TxtNoInt.Text = ObjClientes.NoInt
TxtColonia.Text = ObjClientes.Colonia
TxtLocalidad.Text = ObjClientes.Localidad
TxtCiudad.Text = ObjClientes.Ciudad
TxtEstado.Text = ObjClientes.Estado
TxtRFC.Text = ObjClientes.RFC
TxtCP.Text = ObjClientes.CP.ToString
TxtTelefono.Text = ObjClientes.Telefono
TxtContacto.Text = ObjClientes.Contacto
TxtEmail.Text = ObjClientes.Mail
Else
Alert("El Cliente Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)
End If
End If
ObjClientes.Dispose()
End Sub
Private Sub CargaHistorial()
Dim ObjClientes As New ClsClientes()
If ObjClientes.GetHistorialVentas(CveCliente) Then
If ObjClientes.DtResultados.Rows.Count > 0 Then
'Carga Generales
'Carga Grid
GVHistorial.DataSource = ObjClientes.DtResultados
Else
GVHistorial.DataSource = Nothing
End If
Else
GVHistorial.DataSource = Nothing
End If
ObjClientes.Dispose()
GVHistorial.DataBind()
End Sub
Private Sub CargaCxC()
Dim ObjMovtos As New ClsMovimientos()
'CxC Activas
If ObjMovtos.GetCxCCliente(CveCliente) Then
GvCxC.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'")
GvCxCHistorial.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
Else
GvCxC.DataSource = Nothing
GvCxCHistorial.DataSource = Nothing
End If
ObjMovtos.Dispose()
GvCxC.DataBind()
GvCxCHistorial.DataBind()
End Sub
Protected Sub GVHistorial_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GVHistorial.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.RowIndex = 0 Then
e.Row.BackColor = Drawing.Color.LightGray
DirectCast(e.Row.FindControl("HLSendMail"), HtmlAnchor).Visible = False
End If
Dim Liga As String = String.Format("<a class=""Texto"" href=""/Ventas/Ventas.aspx?CveVenta={0}"">", e.Row.DBCampo("CveVenta"))
e.Row.FCLiteral("LtlFactura").Text = Liga & e.Row.DBCampo("Folio") & "</a>"
e.Row.Cells(2).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(3).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right
DirectCast(e.Row.FindControl("HLSendMail"), HtmlAnchor).HRef = "javascript:$get('HdnTipoDocto').value='Fact';$get('HdnCveVenta').value='" & e.Row.DBCampo("CveVenta") & "';$get('HdnFolioVenta').value='" & e.Row.DBCampo("folio") & "';$('#DivMail').show(1000);PosicionaObjeto('" & DirectCast(e.Row.FindControl("HLSendMail"), HtmlAnchor).ClientID & "', 'DivMail');"
End If
End Sub
Protected Sub GvCxC_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvCxC.RowDataBound, GvCxCHistorial.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.RowIndex = 0 Then
e.Row.Cells(0).ColumnSpan = 4
e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Right
e.Row.FCLiteral("LtlFactura").Text = "Total" & "&nbsp;"
e.Row.Cells(1).Visible = False
e.Row.Cells(2).Visible = False
e.Row.Cells(3).Visible = False
e.Row.Cells(9).ColumnSpan = 2
e.Row.Cells(10).Visible = False
e.Row.BackColor = Drawing.Color.LightGray
e.Row.FCImage("ImgAbonar").Visible = False
End If
If e.Row.RowIndex = 1 Then
e.Row.Cells(0).Width = Unit.Pixel(60)
e.Row.Cells(1).Width = Unit.Pixel(70)
e.Row.Cells(2).Width = Unit.Pixel(80)
e.Row.Cells(3).Width = Unit.Pixel(80)
e.Row.Cells(4).Width = Unit.Pixel(90)
e.Row.Cells(5).Width = Unit.Pixel(90)
e.Row.Cells(6).Width = Unit.Pixel(105)
e.Row.Cells(7).Width = Unit.Pixel(90)
e.Row.Cells(8).Width = Unit.Pixel(105)
e.Row.Cells(9).Width = Unit.Pixel(70)
e.Row.Cells(10).Width = Unit.Pixel(70)
End If
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(6).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(7).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(8).HorizontalAlign = HorizontalAlign.Right
If e.Row.DBCampo("Saldo").ToDouble < 0 Then e.Row.Cells(5).ForeColor = Drawing.Color.Red
If e.Row.DBCampo("DiasVencidos").ToDouble > 0 AndAlso CType(sender, GridView).ID = "GvCxC" Then e.Row.Cells(3).ForeColor = Drawing.Color.Red
If e.Row.DBCampo("Original").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlSaldoOriginal"), Literal).Text = ""
If e.Row.DBCampo("Abonado").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlAbonado"), Literal).Text = ""
If e.Row.DBCampo("PorRecuperado").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlPorRecuperado"), Literal).Text = ""
If e.Row.DBCampo("Saldo").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlSaldo"), Literal).Text = ""
If e.Row.DBCampo("PorXRecuperar").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlPorXRecuperar"), Literal).Text = ""
If e.Row.DBCampo("Folio") = "N/D" Then
e.Row.FCLiteral("LtlFactura").Text = e.Row.DBCampo("Folio")
Else
Dim Liga As String = String.Format("<a class=""Texto"" href=""/Ventas/Ventas.aspx?CveVenta={0}"">", e.Row.DBCampo("CveVenta"))
e.Row.FCLiteral("LtlFactura").Text = Liga & e.Row.DBCampo("Folio") & "</a>"
End If
If e.Row.RowIndex > 0 Then e.Row.FCLiteral("LtlAux").Text = "<a class=""Texto thickbox"" href=""/Contabilidad/PopUpAuxiliar.aspx?Tipo=CxCClientes&CveCliente=" & CveCliente & "&CveVenta=" & e.Row.DBCampo("CveVenta") & "&TB_iframe=true&height=370&width=900"" />Ir</a>"
DirectCast(e.Row.FindControl("ImgAbonar"), Image).Attributes.Add("onclick", "$get('HdnCveVenta').value='" & e.Row.DBCampo("CveVenta") & "';$get('HdnCveVentaAbono').value='" & e.Row.DBCampo("CveVenta") & "';$('#DivAddPago').show(1000);PosicionaObjeto('" & DirectCast(e.Row.FindControl("ImgAbonar"), Image).ClientID & "', 'DivAddPago');")
If CType(sender, GridView).ID = "GvCxCHistorial" Then
DirectCast(e.Row.FindControl("ImgAbonar"), Image).Visible = False
DirectCast(e.Row.FindControl("LtlDiasVencido"), Literal).Text = ""
Else
e.Row.Cells(7).Font.Bold = True
e.Row.Cells(8).Font.Bold = True
End If
End If
End Sub
Protected Sub BtnSendMail_Click(sender As Object, e As System.EventArgs) Handles BtnSendMail.Click
Try
If HdnCveVenta.Value <> "-1" AndAlso HdnFolioVenta.Value <> "-1" Then
'Dim ObjEmprea As New ClsEmpresas()
'If ObjEmprea.GetEmpresas(UsuarioActual.CveEmpresa, "-1", "-1", "-1", "-1") Then
Dim ObjMail As New ClsSisMail()
Dim Ruta As String = AppDomain.CurrentDomain.BaseDirectory & "Empresas\" & UsuarioActual.CveEmpresa & "\"
If UsuarioActual.Empresa.TipoFacturacion = "CFDi" AndAlso HdnTipoDocto.Value = "Fact" Then
If File.Exists(Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf") AndAlso File.Exists(Ruta & "XML\" & HdnFolioVenta.Value & ".xml") Then
Dim PDF As String = Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf"
Dim XML As String = Ruta & "XML\" & HdnFolioVenta.Value & ".xml"
Dim ArrayCC() As String = TxtCC.Text.Trim.Split(Convert.ToChar(";"))
Dim ResultadoMail As Integer = 0
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, TxtParaMail.Text.Trim, "Entrega de Factura", PDF, XML, ArrayCC, TxtBody.Text.Trim) Then
ResultadoMail = 1
TxtCC.Text = ""
TxtBody.Text = ""
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
CargaHistorial()
UpnHistorial.Update()
Else
ResultadoMail = 3
End If
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(ResultadoMail, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
Else
Alert("No se pudo adjuntar el correo electrónica.", TipoMensaje.MsgAdvertencia)
End If
ElseIf UsuarioActual.Empresa.TipoFacturacion = "CBB" AndAlso HdnTipoDocto.Value = "Fact" Then
If File.Exists(Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf") Then
Dim PDF As String = Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf"
Dim ArrayCC() As String = TxtCC.Text.Trim.Split(Convert.ToChar(";"))
Dim ResultadoMail As Integer = 0
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, TxtParaMail.Text.Trim, "Entrega de Factura", PDF, "", ArrayCC, TxtBody.Text.Trim) Then
ResultadoMail = 1
TxtCC.Text = ""
TxtBody.Text = ""
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
CargaHistorial()
UpnHistorial.Update()
Else
ResultadoMail = 3
End If
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(ResultadoMail, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
Else
Alert("No se pudo adjuntar el correo electrónica.", TipoMensaje.MsgAdvertencia)
End If
ElseIf HdnTipoDocto.Value = "Cot" Then
If File.Exists(Ruta & "PDF\Cotizacion_" & HdnFolioVenta.Value & ".pdf") Then
Dim PDF As String = Ruta & "PDF\Cotizacion_" & HdnFolioVenta.Value & ".pdf"
Dim ArrayCC() As String = TxtCC.Text.Trim.Split(Convert.ToChar(";"))
Dim ResultadoMail As Integer = 0
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, TxtParaMail.Text.Trim, "Entrega de Cotización", PDF, "", ArrayCC, TxtBody.Text.Trim) Then
ResultadoMail = 1
TxtCC.Text = ""
TxtBody.Text = ""
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
CargaHistorial()
UpnHistorial.Update()
Else
ResultadoMail = 3
End If
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(ResultadoMail, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
Else
Alert("No se pudo adjuntar el correo electrónica.", TipoMensaje.MsgAdvertencia)
End If
End If
'End If
'ObjEmprea.Dispose()
Else
Alert("No se seleccionó ninguna factura para envíar.", TipoMensaje.MsgAdvertencia)
End If
Catch ex As Exception
OnError("Ocurrió error al mandar MAIL", ex)
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(3, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
End Try
End Sub
'Protected Sub BtnAbonar_Click(sender As Object, e As System.EventArgs) Handles BtnAbonar.Click
' Dim ObjMovtos As New ClsMovimientos()
' If ObjMovtos.AddMovimiento(2, "Cli", CveCliente.ToString, HdnCveVentaAbono.Value, 0, TxtCantidad.Text.Trim.ToDouble, TxtFechaPago.Text.ToDate, TxtReferencia.Text.Trim, DdlCtaContableClientes.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
' Alert("El abono se guardó correctamente", TipoMensaje.MsgInformacion, "$get(""DivAddPago"").style.display=""none"";")
' CargaCxC()
' TxtCantidad.Text = ""
' TxtReferencia.Text = ""
' UpDatos.Update()
' End If
' ObjMovtos.Dispose()
'End Sub
End Class

Binary file not shown.

After

Width:  |  Height:  |  Size: 60 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 931 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 175 KiB

View File

@@ -0,0 +1,225 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CapturaIncidencias.aspx.vb" Inherits="PRESENTACIONES_SeguridadPublica_CapturaIncidencias" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" Runat="Server">
Captura de Incidencias
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" Runat="Server">
<table width="100%" align="center" style="text-align: center">
<tr>
<td>Portal: Captura de incidencias</td>
</tr>
<tr>
<td>Seguridad Pública</td>
</tr>
<tr>
<td>Soporte Técnico TECNOLOGÍAS DE LA INFORMACIÓN</td>
</tr>
</table>
<br />
<table width="100%">
<tr>
<td>
<asp:Label ID="Label1" runat="server" Text="0007727/13N" Font-Bold="True"></asp:Label>
</td>
<td>
<asp:Label ID="Label2" runat="server" Text="Zona" Font-Bold="True"></asp:Label><br />
<asp:DropDownList ID="DropDownList1" runat="server"><asp:ListItem>Norte</asp:ListItem></asp:DropDownList>
</td>
<td>
<asp:Label ID="Label3" runat="server" Text="Fecha" Font-Bold="True"></asp:Label>
<asp:Label ID="Label6" runat="server" Text="dd/mm/aaaa" Font-Size="Smaller"></asp:Label><br />
<asp:TextBox ID="TextBox1" runat="server" Width="100px">05/11/2013</asp:TextBox>
</td>
<td>
<asp:Label ID="Label4" runat="server" Text="Hora" Font-Bold="True" Width="52px"></asp:Label>&nbsp;<asp:Label ID="Label7" runat="server" Text="Min" Font-Bold="True"></asp:Label><br />
<asp:DropDownList ID="DropDownList2" runat="server"><asp:ListItem>02</asp:ListItem></asp:DropDownList>
<asp:Label ID="Label5" runat="server" Text=":" ></asp:Label>
<asp:TextBox ID="TextBox2" runat="server" Width="17px">10</asp:TextBox>
</td>
</tr>
</table>
<br />
<table width="90%" >
<tr>
<td style="width: 169px">
<asp:Label ID="Label8" runat="server" Text="Autoridad"></asp:Label>
</td>
<td>
<asp:DropDownList ID="DropDownList3" runat="server" Width="100%">
<asp:ListItem></asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label9" runat="server" Text="Puesto:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label10" runat="server" Text="Dirección:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label11" runat="server" Text="Descripción Breve del Suceso"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox5" runat="server" TextMode="MultiLine" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label12" runat="server" Text="Nombre del Detenido:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox6" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label13" runat="server" Text="Alias:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox7" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
</td>
<td>
<table>
<tr>
<td>&nbsp;
<asp:Label ID="Label14" runat="server" Text="Edad:"></asp:Label>
<asp:TextBox ID="TextBox8" runat="server"></asp:TextBox>
</td>
<td>&nbsp;
<asp:Label ID="Label18" runat="server" Text="Sexo:"></asp:Label>
<asp:DropDownList ID="DropDownList4" runat="server"><asp:ListItem>Femenino</asp:ListItem></asp:DropDownList>
</td>
<td>&nbsp;
<asp:Label ID="Label19" runat="server" Text="Boleta de Entrada:"></asp:Label>
<asp:TextBox ID="TextBox10" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label15" runat="server" Text="Motivo"></asp:Label>
:</td>
<td>
<asp:TextBox ID="TextBox11" runat="server" TextMode="MultiLine" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td align="center" colspan="4">
<asp:Button ID="Button1" runat="server" Text="Agregar Detenido" />
</td>
</tr>
<tr>
<td colspan="4">
<table width="100%" border="1">
<tr bgcolor="#999999" style="text-align: center; font-weight: bold;">
<td>
<asp:Label ID="Label16" runat="server" Text="Nombre del Detenido"></asp:Label>
</td>
<td>
<asp:Label ID="Label17" runat="server" Text="Edad"></asp:Label>
</td>
<td>
<asp:Label ID="Label20" runat="server" Text="Borrar"></asp:Label>
</td>
</tr>
<tr align="center">
<td>
<asp:Label ID="Label21" runat="server" Text="-"></asp:Label>
</td>
<td>
<asp:Label ID="Label22" runat="server" Text="-"></asp:Label>
</td>
<td align="center">
<asp:Image ID="Image1" runat="server" ImageUrl="~/Imagenes/Basura1.png" />
</td>
</tr>
</table>
</td>
</tr>
<br />
<tr><td style="width: 169px">
<asp:Label ID="Label23" runat="server" Text="Nombre del Perjudicado:"></asp:Label></td><td>
<asp:TextBox ID="TextBox12" runat="server" Width="100%"></asp:TextBox>
</td></tr>
<tr><td style="width: 169px"></td>
<td>
<table>
<tr>
<td>&nbsp;
<asp:Label ID="Label24" runat="server" Text="Edad:"></asp:Label>
<asp:TextBox ID="TextBox9" runat="server"></asp:TextBox>
</td>
<td>&nbsp;
<asp:Label ID="Label25" runat="server" Text="Sexo:"></asp:Label>
<asp:DropDownList ID="DropDownList5" runat="server"><asp:ListItem>Femenino</asp:ListItem></asp:DropDownList>
</td>
</tr>
</table>
</td></tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label26" runat="server" Text="Observaciones:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox13" runat="server" TextMode="MultiLine" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td align="center" colspan="4">
<asp:Button ID="Button2" runat="server" Text="Agregar Perjudicado" />
</td>
</tr>
<tr>
<td colspan="4">
<table width="100%" border="1">
<tr bgcolor="#999999" style="text-align: center; font-weight: bold;">
<td>
<asp:Label ID="Label27" runat="server" Text="Nombre del Detenido"></asp:Label>
</td>
<td>
<asp:Label ID="Label28" runat="server" Text="Edad"></asp:Label>
</td>
<td>
<asp:Label ID="Label29" runat="server" Text="Borrar"></asp:Label>
</td>
</tr>
<tr align="center">
<td>
<asp:Label ID="Label30" runat="server" Text="-"></asp:Label>
</td>
<td>
<asp:Label ID="Label31" runat="server" Text="-"></asp:Label>
</td>
<td align="center">
<asp:Image ID="Image2" runat="server" ImageUrl="~/Imagenes/Basura1.png" />
</td>
</tr>
</table>
</td>
</tr>
</table>
</asp:Content>

View File

@@ -0,0 +1,5 @@

Partial Class PRESENTACIONES_SeguridadPublica_CapturaIncidencias
Inherits System.Web.UI.Page
End Class

View File

@@ -0,0 +1,457 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CapturaIncidenciasTransito.aspx.vb" Inherits="PRESENTACIONES_SeguridadPublica_CapturaIncidenciasTransito" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server">
Captura de Incidencias de Tránsito
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<table width="100%" class="Titulos">
<tr>
<td>
<asp:Label ID="Label1" runat="server" Text="JEFATURA DE POLICIA PREVENTIVA Y TRÁNSITO MUNICIPAL"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:DropDownList ID="DropDownList1" runat="server">
<asp:ListItem>Reporte de Choque</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label2" runat="server" Text="H. AYUNTAMIENTO DE HERMOSILLO - Folio = 000270/12N_1"></asp:Label>
</td>
</tr>
</table>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label3" runat="server" Text="1"></asp:Label>
</td>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label13" runat="server" Text="Fecha(dd/mm/aaaa)"></asp:Label><br />
<asp:TextBox ID="TextBox1" runat="server" Width="115px"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label14" runat="server" Text="Hora : Minutos "></asp:Label><br />
<asp:DropDownList ID="DropDownList2" runat="server">
<asp:ListItem>13</asp:ListItem>
</asp:DropDownList>
:
<asp:TextBox ID="TextBox2" runat="server" Width="16px">00</asp:TextBox>
</td>
<td>
<asp:Label ID="Label15" runat="server" Text="ZONA"></asp:Label><br />
<asp:DropDownList ID="DropDownList3" runat="server">
<asp:ListItem>Norte</asp:ListItem>
</asp:DropDownList>
</td>
<td>
<asp:Label ID="Label16" runat="server" Text="Horario"></asp:Label><br />
<asp:DropDownList ID="DropDownList4" runat="server">
<asp:ListItem>A</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label4" runat="server" Text="2"></asp:Label>
</td>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label17" runat="server" Text="Unidades "></asp:Label>
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label18" runat="server" Text="Lesionados "></asp:Label>
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label19" runat="server" Text="Muertos "></asp:Label>
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label20" runat="server" Text="Daños en $ "></asp:Label>
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label5" runat="server" Text="3"></asp:Label>
</td>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td width="10%">
<asp:Label ID="Label21" runat="server" Text="Localización"></asp:Label>
</td>
<td width="20%" align="right">
<table>
<tr>
<td>
<asp:Label ID="Label22" runat="server" Text="Vía"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label23" runat="server" Text="Con"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label24" runat="server" Text="Entre"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label25" runat="server" Text="Colonia"></asp:Label>
</td>
</tr>
</table>
</td>
<td width="70%" align="left">
<table>
<tr>
<td>
<asp:TextBox ID="TextBox7" runat="server" Width="220px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:TextBox ID="TextBox8" runat="server" Width="220px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:TextBox ID="TextBox9" runat="server" Width="220px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:DropDownList ID="DropDownList5" runat="server" Width="220px">
<asp:ListItem>Carmen Serdán</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label6" runat="server" Text="4"></asp:Label>
</td>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:DropDownList ID="DropDownList6" runat="server">
<asp:ListItem>A</asp:ListItem>
</asp:DropDownList><br />
<asp:Label ID="Label26" runat="server" Text="Unidad Móvil"></asp:Label>
</td>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label27" runat="server" Text="Licencia"></asp:Label><br />
<asp:TextBox ID="TextBox11" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label28" runat="server" Text="Razón Social"></asp:Label><br />
<asp:TextBox ID="TextBox10" runat="server"></asp:TextBox><br /><br />
<asp:Label ID="Label29" runat="server" Text="Cinturón"></asp:Label><br />
<asp:CheckBox ID="CheckBox1" runat="server" />
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label30" runat="server" Text="Mismo Cond."></asp:Label><br />
<asp:CheckBox ID="CheckBox2" runat="server" />
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label31" runat="server" Text="Marca"></asp:Label><br />
<asp:DropDownList ID="DropDownList7" runat="server" Width="115px">
<asp:ListItem>Marca</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label32" runat="server" Text="Capacidad"></asp:Label><br />
<asp:DropDownList ID="DropDownList8" runat="server" Width="115px">
<asp:ListItem>Capacidad</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
</table>
</td>
<td><table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<table>
<tr>
<td>
<asp:Label ID="Label33" runat="server" Text="Tipo"></asp:Label><br />
<asp:TextBox ID="TextBox12" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label34" runat="server" Text="Daños"></asp:Label><br />
<asp:TextBox ID="TextBox13" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<asp:RadioButtonList ID="RadioButtonList1" runat="server">
<asp:ListItem>Conductor</asp:ListItem>
<asp:ListItem>Peaton</asp:ListItem>
<asp:ListItem>Ciclista</asp:ListItem>
</asp:RadioButtonList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label35" runat="server" Text="Nombre del Propietario"></asp:Label><br />
<asp:TextBox ID="TextBox14" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label36" runat="server" Text="Modelo"></asp:Label><br />
<asp:DropDownList ID="DropDownList9" runat="server" Width="115">
<asp:ListItem>Modelo</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label37" runat="server" Text="Número ECO"></asp:Label><br />
<asp:TextBox ID="TextBox15" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
<td><table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<table><tr>
<td>
<asp:Label ID="Label38" runat="server" Text="Estado"></asp:Label><br />
<asp:TextBox ID="TextBox16" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label39" runat="server" Text="Vigencia"></asp:Label><br />
<asp:TextBox ID="TextBox17" runat="server"></asp:TextBox>
</td>
</tr></table>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label40" runat="server" Text="Nombre"></asp:Label><br /></br>
<asp:TextBox ID="TextBox18" runat="server"></asp:TextBox></br>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label41" runat="server" Text="Dirección"></asp:Label><br /></br>
<asp:TextBox ID="TextBox19" runat="server"></asp:TextBox></br>
</td>
</tr>
<tr>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label42" runat="server" Text="Placas"></asp:Label><br /></br>
<asp:TextBox ID="TextBox20" runat="server"></asp:TextBox>
</td>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label43" runat="server" Text="Estado"></asp:Label><br /></br>
<asp:TextBox ID="TextBox21" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label44" runat="server" Text="Año"></asp:Label><br /></br>
<asp:TextBox ID="TextBox22" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;"><tr><td><asp:Label ID="Label45" runat="server" Text="Color"></asp:Label><br />
<asp:DropDownList ID="DropDownList10" runat="server">
<asp:ListItem>Color</asp:ListItem>
</asp:DropDownList>
</td>
<td>
<asp:Label ID="Label46" runat="server" Text="Infracción y Artículos"></asp:Label><br />
<asp:TextBox ID="TextBox23" runat="server"></asp:TextBox><br />
<asp:DropDownList ID="DropDownList11" runat="server">
<asp:ListItem>Infracción No.</asp:ListItem>
</asp:DropDownList></td></tr></table>
</td>
</tr>
</table>
</td>
<td><table>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</td>
<td><table>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label7" runat="server" Text="5"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label8" runat="server" Text="6"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label9" runat="server" Text="7"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label10" runat="server" Text="8"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label11" runat="server" Text="9"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label12" runat="server" Text="10"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
</table>
</asp:Content>

View File

@@ -0,0 +1,5 @@

Partial Class PRESENTACIONES_SeguridadPublica_CapturaIncidenciasTransito
Inherits System.Web.UI.Page
End Class

View File

@@ -0,0 +1,172 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegistroEmergencias.aspx.vb" Inherits="PRESENTACIONES_SeguridadPublica_RegistroEmergencias" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server">
Registro de Emergencias
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<table>
<tr><td>
<asp:Label ID="Label15" runat="server" Text="Módulo:"></asp:Label><asp:TextBox ID="TextBox21" runat="server" Enabled="False"></asp:TextBox></td>
<td>
<asp:Label ID="Label16" runat="server" Text="Usuario:"></asp:Label><asp:TextBox ID="TextBox22" runat="server" Enabled="False"></asp:TextBox></td>
<td>
<asp:Label ID="Label17" runat="server" Text="Fecha/Hora:"></asp:Label><asp:TextBox ID="TextBox23" runat="server" Enabled="False"></asp:TextBox></td></tr>
<tr>
<td>
<fieldset>
<table>
<tr>
<td>
<asp:Label ID="Label1" runat="server" Text="Descripción del Evento:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox7" runat="server" TextMode="MultiLine"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label2" runat="server" Text="Lugar de la Detención:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox8" runat="server" TextMode="MultiLine"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label3" runat="server" Text="Colonia:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox9" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label4" runat="server" Text="Ciudad:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox10" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</fieldset>
</td>
<td>
<table>
<tr>
<td>
<fieldset>
<table>
<tr>
<td align="right">
<asp:Label ID="Label11" runat="server" Text="Corporación:"></asp:Label>
</td>
<td colspan="3">
<asp:TextBox ID="TextBox11" runat="server" Width="400px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label12" runat="server" Text="Unidades Involucradas"></asp:Label><br />
<asp:TextBox ID="TextBox12" runat="server"></asp:TextBox><br />
<asp:TextBox ID="TextBox13" runat="server"></asp:TextBox><br />
<asp:TextBox ID="TextBox14" runat="server"></asp:TextBox><br />
</td>
<td>
<asp:Label ID="Label13" runat="server" Text="Clave"></asp:Label><br />
<asp:TextBox ID="TextBox15" runat="server" Width="50px"></asp:TextBox><br />
<asp:TextBox ID="TextBox16" runat="server" Width="50px"></asp:TextBox><br />
<asp:TextBox ID="TextBox17" runat="server" Width="50px"></asp:TextBox><br />
</td>
<td>
<asp:Label ID="Label14" runat="server" Text="Nombre del Responsable"></asp:Label><br />
<asp:TextBox ID="TextBox18" runat="server" Width="345px"></asp:TextBox><br />
<asp:TextBox ID="TextBox19" runat="server" Width="345px"></asp:TextBox><br />
<asp:TextBox ID="TextBox20" runat="server" Width="345px"></asp:TextBox><br />
</td>
</tr>
<tr>
<td colspan="3">
<asp:CheckBox ID="CheckBox1" runat="server" />Catálogo de Responsables de Unidad
<asp:Button ID="Button4" runat="server" Text="Guardar Evento" />
<asp:Button ID="Button7" runat="server" Text="Cancelar Evento" /></td></tr>
</table>
</fieldset>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table border="0" width="100%" >
<tr>
<td width="80%">
<fieldset>
<legend><b>Datos del Detenido</b></legend>
<table>
<tr>
<td>
<table>
<tr>
<td>
<asp:Label ID="Label5" runat="server" Text="Nombre:"></asp:Label><br />
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label8" runat="server" Text="Alias:"></asp:Label><br />
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label6" runat="server" Text="Apellido Paterno:"></asp:Label><br />
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label9" runat="server" Text="Fecha de Nacimiento:"></asp:Label><br />
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label7" runat="server" Text="Apellido Materno:"></asp:Label><br />
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label10" runat="server" Text="Edad:"></asp:Label><br />
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
<td>
<table>
<tr>
<td align="center">
<asp:Button ID="Button3" runat="server" Text="Generales" /><br />
<asp:ImageButton ID="ImageButton1" runat="server" ImageUrl="~/Imagenes/buscar.gif" />
</td>
<td>
<asp:Button ID="Button5" runat="server" Text="Filiación" /><br />
<asp:Button ID="Button6" runat="server" Text="Motivos" />
</td>
</tr>
</table>
</td>
</tr>
</table>
</fieldset>
</td>
<td width="20%">
<fieldset>
<legend><b>¿Registrar?</b></legend><br /><br /><br />
<asp:Button ID="Button1" runat="server" Text="Otro Detenido" /><br />
<asp:Button ID="Button2" runat="server" Text="OtroEvento" /><br /><br /><br />
</fieldset>
</td>
</tr>
</table>
</asp:Content>

View File

@@ -0,0 +1,5 @@

Partial Class PRESENTACIONES_SeguridadPublica_RegistroEmergencias
Inherits System.Web.UI.Page
End Class