Detalle: invdel.asp - MIM Portal

invdel.asp

Ir a la Página Volver a la Lista

Archivo ASP

invdel.asp

Página Razor

Inventarios/Invdel.cshtml

Módulo

Inventarios

Líneas de Código

165

Características

En Menú:	No
Formularios:	1 formulario(s)
Consultas SQL:	Ninguna
Complejidad:	low
Bases de Datos:	Session DB

Tablas Utilizadas (0)

No se detectaron tablas

Comentarios y Notas (0)

No hay comentarios aún

Enlaces Salientes (5) Páginas a las que esta página enlaza

Archivo ASP	Tipo	Módulo	Estado	Página Razor
`barra.asp`	include	General	Pendiente	-
`empresa.asp`	include	General	Pendiente	-
`general.asp`	include	General	Pendiente	-
`mpro.asp`	include	General	Pendiente	-
`user.asp`	include	General	Pendiente	-

Enlaces Entrantes (1) Páginas que enlazan a esta página

Archivo ASP	Tipo	Módulo	Estado	Página Razor
`invdele.asp`	redirect	Inventarios	Pendiente	-

<%  
Option Explicit
%>
<%
Session.LCID = 2058
%>
<!--#include file="User.asp"-->
<!--#include file="general.asp"-->
<html>
<head>
<title>Grupo MIM</title>
<link rel=stylesheet href="vista.css">
</head>
<BODY>
<!--#INCLUDE FILE="BARRA.asp"-->
<div class="normalw" style="position:absolute; top:1px">
<center>
<!--#include file="empresa.asp"--><br>
<hr>
</center>
</div>
<div class="normalw" style="position:absolute; top:1px;">
Bienvenido: <%= nombre %>. <br>
Hora Actual: <%= time %>
</div>
<div class="normalw" style="position:absolute; top:34px; left:1">
<!--#include file="mpro.asp"-->
</div>

<div class="normal" style="position:absolute; top:50px; left:15">
<hr>
<center>
<Form action="Invdel.asp" name="Invdel" method='post'>
<TABLE border=0 cellspacing=0 cellpadding=0 class="normal">
<tr>
<td Class="Normalb">Codigo: &nbsp;	</td>
<td><input type=text class=normalb name="Code" size=40 onChange="javascript:this.value=this.value.toUpperCase();"></td>
</tr>
<tr>
<td Class="Normalb">Producto:</td>
<td><input type=text class=normalb name="Nominv" size=40 onChange="javascript:this.value=this.value.toUpperCase();"></td>
<td>&nbsp <input type="submit" value="Buscar" class=normalb></td>
</tr>
</table>
</form>
</div>

<div class="normal" style="position:absolute; top:130px;">
<center>
<hr>
<%
Dim Rs11, Sql11
Dim num_registros, num_campos, Campo, registros_mostrados
Dim Code, Nominv 
Code = Cstr(request("Code"))
Nominv = Cstr(request("Nominv"))

'Numero de Paginas
If Request.QueryString("pag")<>"" Then
   Session("pagina")=Request.QueryString("pag")
Else
   Session("pagina")=1
End If


set rs11 = server.CreateObject("ADODB.Recordset")
SQL11="SELECT CveInv as Clave, Nominv As Descripcion From Inventarios " &_
"where Cveinv like '%" & UCase(Request("Code")) & "%' " &_
"and Nominv like '%" & UCase(Request("Nominv")) & "%';"
rs11.open sql11,cn1,1,2

If rs11.Eof then
Response.Write("No Exiten Registros bajo esa busqueda")
Else

If Code = "" and Nominv = "" then
Response.Write("Buscar por Clave o Descripcion")
else

'Registros por Pagina
num_registros = 25

'Dimensionamos las paginas y determinamos la pagina actual
RS11.PageSize=num_registros
RS11.AbsolutePage=Session("pagina")
%>

Pagina  <b><%=Session("pagina")%></b> De <b><%=RS11.PageCount%></b>
<br>
Registros Encontrados: <b><%=RS11.RecordCount%></b>
<br><br>
<TABLE border=1 cellspacing=1 cellpadding=2 bordercolor=#c0c0c0 width=800px>

<%
'Contamos el numero de campos
num_campos=RS11.Fields.Count 
For campo=0 to num_campos-1%>
   <td align="center" Class="normal" bgcolor="#d8d8d8"><%=RS11(campo).Name%></td>
<%
Next
%>
<td align="Center" class="normal" bgcolor="#d8d8d8">Accion</td>
<%

registros_mostrados = 0
Dim Color, Colorfila
While (Not RS11.eof And registros_mostrados < num_registros)
   registros_mostrados = registros_mostrados +1
   
if colorfila = 0 then
Color= "#d8d8d8"
Colorfila = 1
else
Color= "#ffffff"
Colorfila = 0
end if   
   
   
%> 
   <tr>
<td class="normal" align="Left" bgcolor=<%=Color%>><%= rs11("Clave") %></td>
<td class="normal" align="Left" bgcolor=<%=Color%>><%= rs11("Descripcion") %></td>
<td class="normal" align="Center" bgcolor=<%=Color%>>
<a href="Invdele.asp?Cveinv=<%=rs11("Clave")%>&Stainv=B" onclick="NewWindow(this.href,'Dproductos','790','470','yes');return false;">
<img src="image/eliminar.gif" border="0" height=14px Alt="Clave <%= rs11("Clave") %>">
</td>
   </tr>
<%
   RS11.MoveNext
Wend

%>
<tr>
<td colspan="<%=num_campos + 1 %>" align="center">
<%
   i=0
While i<RS11.PageCount 
   i=i+1
%>
   <b><a href="Invdel.asp?pag=<%=i%>&Code=<%= Code %>&Nominv=<%= Nominv %>"><%=i%></a></b>
<%
Wend
%>
</td>
</tr>
</table>
<%
End If
End If
RS11.Close
%>


</div>

</body>
</html>
<%  
End Sub 
'Add the chosen course to the cart
 Call AddUsuario() 
'Display contents of electronic shopping cart
 Call DisplayUsuario()
%>

using Microsoft.AspNetCore.Mvc;
using Microsoft.AspNetCore.Mvc.RazorPages;
using Microsoft.EntityFrameworkCore;
using MimPortal.Data;
using MimPortal.Data.Entities;

namespace MimPortal.Pages.Inventarios
{
    public class InvdelModel : PageModel
    {
        private readonly MimDbContext _context;
        public InvdelModel(MimDbContext context) { _context = context; }

        [BindProperty(SupportsGet = true)] public string? Codigo { get; set; }
        [BindProperty(SupportsGet = true)] public string? Descripcion { get; set; }
        public List<INVENTARIOS> Productos { get; set; } = new();

        public async Task OnGetAsync()
        {
            var sucursal = HttpContext.Session.GetString("Sucursal") ?? "MERIDA";
            if (string.IsNullOrEmpty(Codigo) && string.IsNullOrEmpty(Descripcion)) return;
            var query = _context.INVENTARIOS.Where(x => x.Sucursal == sucursal).Where(i => i.STAINV == "A");
            if (!string.IsNullOrEmpty(Codigo)) query = query.Where(i => i.CVEINV != null && i.CVEINV.Contains(Codigo.ToUpper()));
            if (!string.IsNullOrEmpty(Descripcion)) query = query.Where(i => i.NOMINV != null && i.NOMINV.Contains(Descripcion.ToUpper()));
            Productos = await query.OrderBy(i => i.CVEINV).Take(100).ToListAsync();
        }
    }
}

@page
@model MimPortal.Pages.Inventarios.InvdelModel
@{
    ViewData["Title"] = "Baja de Producto";
}
<div id="page-content">
<div class="card">
    <div class="card-header"><h5><i class="bi bi-trash"></i> Baja de Producto</h5></div>
    <div class="card-body">
        <form method="get" class="row g-3 mb-4">
            <div class="col-md-3">
                <label class="form-label">Código</label>
                <input type="text" class="form-control" name="Codigo" value="@Model.Codigo" />
            </div>
            <div class="col-md-4">
                <label class="form-label">Descripción</label>
                <input type="text" class="form-control" name="Descripcion" value="@Model.Descripcion" />
            </div>
            <div class="col-md-2 d-flex align-items-end">
                <button type="submit" class="btn btn-primary"><i class="bi bi-search"></i> Buscar</button>
            </div>
        </form>
        @if (Model.Productos.Any())
        {
            <div class="table-responsive">
                <table class="table table-hover table-sm">
                    <thead class="table-dark">
                        <tr><th>Código</th><th>Descripción</th><th>UDM</th><th>Status</th><th>Acciones</th></tr>
                    </thead>
                    <tbody>
                        @foreach (var p in Model.Productos)
                        {
                            <tr>
                                <td>@p.CVEINV</td>
                                <td>@p.NOMINV</td>
                                <td>@p.UDMINV</td>
                                <td>@p.STAINV</td>
                                <td><a href="/Inventarios/Invdeldet?id=@p.Id" class="btn btn-sm btn-danger"><i class="bi bi-trash"></i> Dar Baja</a></td>
                            </tr>
                        }
                    </tbody>
                </table>
            </div>
        }
    </div>
</div>
</div>

MATERIALES INDUSTRIALES DE MEXICO

invdel.asp

Archivo ASP

Página Razor

Módulo

Líneas de Código