Detalle: indicadores.asp

indicadores.asp

Ir a la Página Volver a la Lista

Archivo ASP

indicadores.asp

Página Razor

Indicadores/Indicadores.cshtml

Módulo

Indicadores

Líneas de Código

129

Características

En Menú:	Sí
Formularios:	Ninguno
Consultas SQL:	1 consulta(s)
Complejidad:	low
Bases de Datos:	Session DB

Tablas Utilizadas (1)

Empresa

Consultas SQL (1)

SQL Original (ASP)

Select * from Empresa;

Tablas: Empresa

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
`menucat.asp`	include	General	Pendiente	-
`menuh.asp`	include	General	Pendiente	-
`indivendata.asp`	link	?	Pendiente	-
`invdashboard.asp`	link	Inventarios	Pendiente	Inventarios/Invdashboard.cshtml
`default.asp`	redirect	General	Pendiente	-

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

No hay enlaces entrantes

<%  
	Option Explicit
	Session.LCID = 2058
'*****  SI NO HA INICIADO SESION ***
If 	Session("Mybussiness") = "" then
	Response.redirect("default.asp")
	Session("ID")=Cint(0)
Else
Session("ID")= 1000
Session.Timeout = 1200

'******* EN CASO DE ERROR ****
		Err.Clear
		On Error Resume Next	
'*** REMPLAZA
Function Sanea(Texto)
Sanea = Replace(Texto, "'", "''")
End Function
		
%> 
<!DOCTYPE html>
<HTML>
<HEAD>
    <meta charset="ISO-8859-1" />
	<TITLE>SISTEMA MIM <%= Session("Mybussiness")  %> USUARIO: <%= Session("MyName")  %></TITLE>
		<link href="css/Modulo5.css" rel="stylesheet" />
		<link href="css/Buscador.css" rel="stylesheet" />
		
		<SCRIPT LANGUAGE="JavaScript">
		<!-- Begin
		function NewWindow(mypage, myname, w, h, scroll) {
		var winl = (screen.width - w) / 2;
		var wint = (screen.height - h) / 2;
		winprops = 'height='+h+',width='+w+',top='+wint+',left='+winl+',scrollbars='+scroll+',resizable'
		win = window.open(mypage, myname, winprops)
		if (parseInt(navigator.appVersion) >= 4) { win.window.focus(); }
		}
		//  End -->
		</script>
		
</HEAD>

<BODY>
<%
'***** Variables a la base de datos ****
Dim Cn1
Dim Rs11, Rs12, Rs13, Rs14
Dim Sql11, Sql12, Sql13, Sql14


'***** Conexion a la Base de Datos
Set Cn1 = Server.CreateObject( "ADODB.Connection" )
Cn1.Open "DRIVER={SQL Server};SERVER=172.17.0.5;UID="& Session("MyName") &";PWD="& Session("MyPass") &";Database="& Session("Mybussiness") &""

'***** Conexion A la Tabla Empresa ****
Set Rs11 = Server.CreateObject("ADODB.Recordset")
Sql11="Select * from Empresa;"
Rs11.Open Sql11,Cn1,1,2

'***** Conexion A la Tabla Empresa ****
Set Rs11 = Server.CreateObject("ADODB.Recordset")
Sql11="Select * from Empresa;"
Rs11.Open Sql11,Cn1,1,2
%>

	<Header>

			<%= Rs11("Nombre") %><br>
			<%= Rs11("Direccion") %>, <%= Rs11("colonia") %><br>
			<%= Rs11("Poblacion") %>

	</header>

	<nav>
		<!--#INCLUDE FILE="menuh.asp"-->
		<br>
		<!--#INCLUDE FILE="MenuCat.asp"-->

	</nav>
	<SECTION>

	<CENTER>
	
	<Table Id="TablaOpc">
		<Tr>
			<Td>
				<a href="IndiVenData.asp" onclick="NewWindow(this.href,'CRMTopClientes','1024','800','yes');return false;">
				<img src="Image/IndiVen.jpg" Border="0" Height="150px">
				<br><br>
				Ventas
				</a>			
			</Td>	
			
			<Td>
				<a href="InvDashBoard.asp" onclick="NewWindow(this.href,'IndicadorINV','1024','800','yes');return false;">
				<img src="Image/IndiInv.jpg" Border="0" Height="150px">
				<br><br>
				Inventarios
				</a>			
			</Td>

		</Tr>
	</Table>
	</SECTION>
	
<%
		If Err.Number <> 0 Then
%>


<br><br>
NÃºmero de Error: <%= Err.Number %><BR>
DescripciÃ³n:  <%= Err.Description %><BR>		
Origen: <%= Err.Source %><BR>
Linea: <%= Err.Line %><BR>
<br>

<%
		Else
'****** FIN DE LOS ERRORES ***
	End If
%>			
</BODY>
</HTML>
<%
'FIN DE SESION
End If
%>

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

namespace MimPortal.Pages.Indicadores
{
    public class IndicadoresModel : PageModel
    {
        private readonly MimDbContext _context;
        public IndicadoresModel(MimDbContext context) { _context = context; }
        
        public decimal VentasMes { get; set; }
        public int FacturasMes { get; set; }
        public int ProductosStock { get; set; }
        public decimal ValorInventario { get; set; }
        
        public async Task OnGetAsync()
        {
            var sucursal = HttpContext.Session.GetString("Sucursal") ?? "MERIDA";
            var inicioMes = new DateTime(DateTime.Now.Year, DateTime.Now.Month, 1);
            
            VentasMes = await _context.FFACENC
                .Where(f => f.FECFFACE >= inicioMes && f.STAFFACE != "C")
                .SumAsync(f => f.TOTFFACE ?? 0);
            
            FacturasMes = await _context.FFACENC
                .Where(f => f.FECFFACE >= inicioMes && f.STAFFACE != "C")
                .CountAsync();
            
            ProductosStock = await _context.INVENTARIOS
                .Where(i => i.STAINV == "A")
                .CountAsync();
            
            ValorInventario = await _context.INVENTARIOS
                .Where(i => i.STAINV == "A")
                .SumAsync(i => (i.EXIINV ?? 0) * (i.COMINV ?? 0));
        }
    }
}

@page
@model MimPortal.Pages.Indicadores.IndicadoresModel
@{ ViewData["Title"] = "Indicadores"; }
<div class="container-fluid">
    <div class="row mb-4">
        <div class="col-12">
            <h4><i class="bi bi-speedometer2"></i> Indicadores</h4>
            <p class="text-muted">Indicadores de rendimiento del negocio</p>
        </div>
    </div>

    <!-- Indicadores Options Grid -->
    <div class="row justify-content-center">
        <div class="col-md-4 text-center mb-4">
            <a href="/Indicadores/Ventas" class="text-decoration-none">
                <div class="card h-100 border-success shadow-sm">
                    <div class="card-body py-5">
                        <i class="bi bi-graph-up-arrow text-success" style="font-size: 5rem;"></i>
                        <h4 class="mt-4 text-dark">Ventas</h4>
                        <p class="text-muted">Indicadores de ventas y facturación</p>
                    </div>
                </div>
            </a>
        </div>
        <div class="col-md-4 text-center mb-4">
            <a href="/Indicadores/Inventarios" class="text-decoration-none">
                <div class="card h-100 border-primary shadow-sm">
                    <div class="card-body py-5">
                        <i class="bi bi-boxes text-primary" style="font-size: 5rem;"></i>
                        <h4 class="mt-4 text-dark">Inventarios</h4>
                        <p class="text-muted">Indicadores de inventario y existencias</p>
                    </div>
                </div>
            </a>
        </div>
    </div>

    <!-- Quick Stats -->
    <div class="row mt-4">
        <div class="col-12">
            <div class="card">
                <div class="card-header">
                    <h6 class="mb-0"><i class="bi bi-bar-chart"></i> Resumen del Mes</h6>
                </div>
                <div class="card-body">
                    <div class="row">
                        <div class="col-md-3">
                            <div class="text-center">
                                <h5 class="text-muted">Ventas del Mes</h5>
                                <h2 class="text-success">$@Model.VentasMes.ToString("N0")</h2>
                            </div>
                        </div>
                        <div class="col-md-3">
                            <div class="text-center">
                                <h5 class="text-muted">Facturas Emitidas</h5>
                                <h2 class="text-primary">@Model.FacturasMes.ToString("N0")</h2>
                            </div>
                        </div>
                        <div class="col-md-3">
                            <div class="text-center">
                                <h5 class="text-muted">Productos en Stock</h5>
                                <h2 class="text-info">@Model.ProductosStock.ToString("N0")</h2>
                            </div>
                        </div>
                        <div class="col-md-3">
                            <div class="text-center">
                                <h5 class="text-muted">Valor Inventario</h5>
                                <h2 class="text-warning">$@Model.ValorInventario.ToString("N0")</h2>
                            </div>
                        </div>
                    </div>
                </div>
            </div>
        </div>
    </div>
</div>