<%@language=vbscript%>
<%
Response.Buffer=True

If Session("ID")=0 then
	Response.Redirect("http://www.grupo-mim.com")
	Response.End
Else
%><!--#include file="Clientesax.asp"-->
<%Session.LCID=2058%> 
<!--#include file="fpdf.asp"-->
<%
Dim colorFila, Color
Dim Pedido, Remision, Factura, Certi

E1= Empresa
Nomdoc = numord

B1=rs1("Nombre")
B2=rs1("Direccion")
B3=rs1("Colonia")
B4=rs1("Poblacion")
B5=rs1("Telefono")
B6=rs1("Fax")
B7=rs1("website")

Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF "P", "mm", "Letter"
pdf.SetPath("fpdf/")
pdf.SetFont "Arial","",9
pdf.SetFillColor 216,216,216

pdf.Open()
pdf.LoadModels("Cliente")
pdf.AddPage()
pdf.SetFont "Arial","",9
Fe1=rs2("Clacli")
Fe2=rs2("Nomcli")
Fe3=rs2("calcli")
IF ISNULL(rs2("numcli")) THEN
FE45 = ""
ELSE
Fe45=Cstr(rs2("numcli"))
END IF

IF ISNULL(rs2("numicli")) THEN
FE46 = ""
ELSE
Fe46=Cstr(rs2("numicli"))
END IF

Fe4=rs2("colcli")
Fe5=rs2("Pobcli")
Fe6=rs2("Edocli")
Fe7=rs2("Cpcli")
Fe8=rs2("rfccli")
Fe9=rs2("stacli")
Fe10=rs2("nomvend")
Fe11=rs2("nomcot")
Fe12=rs2("clscli")
Fe13=FormatNumber(rs2("diacli"))
Fe14=Formatcurrency(rs2("limcli"))
Fe15=FormatNumber(rs2("descli"))
Fe16=FormatNumber(rs2("uticli"))
Fe17=Formatnumber(rs2("cvecli"))
Fe18=FormatNumber(rs2("ccocli"))
Fe19=rs2("tpecli")
Fe21=rs2("coicli")



IF ISNULL(RS2("UCOCLI")) THEN
FE22 = "-"
ELSE
Fe22=Cstr(rs2("UCOcli"))
END IF


Fe23=Formatcurrency(rs2("salcli"))
Fe24=rs2("revcli")
Fe25=rs2("cobcli")
Fe26=rs2("rencli")

Fe27=rs2("rcocli")

IF ISNULL(RS2("falCLI")) THEN
FE28 = "-"
ELSE
Fe28=Cstr(rs2("falcli"))
END IF




Fe29=rs2("concli")
Fe30=rs2("tcocli")
Fe31=rs2("fcocli")
Fe32=rs2("ecocli")
Fe33=rs2("cpacli")
Fe34=rs2("tpacli")
Fe35=rs2("fpacli")
Fe36=rs2("epacli")
Fe37=rs2("rescli")
Fe38=rs2("reccli")
Fe43=rs2("oBScli")
Fe44=rs2("usucli")
Fe50=rs2("ctapago")


pdf.Cell 30,4,"CLAVE:",0,0,"L",1
pdf.Cell 167,4,"( "& Fe1 & " ) ",0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"NOMBRE:",0,0,"L",0
pdf.Cell 167,4,Fe2,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"DIRECCION:",0,0,"L",1
pdf.Cell 167,4,Fe3,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"NÚMERO:",0,0,"L",0
pdf.Cell 167,4,Fe45,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"NÚMERO INT:",0,0,"L",1
pdf.Cell 167,4,Fe46,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"COLONIA:",0,0,"L",0
pdf.Cell 167,4,Fe4,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"POBLACION:",0,0,"L",1
pdf.Cell 167,4,Fe5,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"ESTADO:",0,0,"L",0
pdf.Cell 167,4,Fe6,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"CODIGO POSTAL:",0,0,"L",1
pdf.Cell 167,4,Fe7,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"RFC:",0,0,"L",0
pdf.Cell 167,4,Fe8,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"STATUS:",0,0,"L",1
pdf.Cell 167,4,Fe9,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"CUENTA PAGO:",0,0,"L",1
pdf.Cell 167,4,Fe50,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"VENDEDOR:",0,0,"L",0
pdf.Cell 167,4,Fe10,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"COTIZADOR:",0,0,"L",1
pdf.Cell 167,4,Fe11,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"CLASIFICACION:",0,0,"L",0
pdf.Cell 167,4,Fe12,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"DIAS CREDITO:",0,0,"L",1
pdf.Cell 167,4,Fe13,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"LIMITE CREDITO:",0,0,"L",0
pdf.Cell 167,4,Fe14,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"DESCUENTO:",0,0,"L",1
pdf.Cell 167,4,Fe15 & " % ",0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"UTILIDAD:",0,0,"L",0
pdf.Cell 167,4,Fe16 & " % ",0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"COM. VENDEDOR:",0,0,"L",1
pdf.Cell 167,4,Fe17 & " % ",0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"COM.COTIZADOR:",0,0,"L",0
pdf.Cell 167,4,Fe18 & " % ",0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"LISTA PRECIOS:",0,0,"L",1
pdf.Cell 167,4,Fe19,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"CUENTA COI:",0,0,"L",1
pdf.Cell 167,4,Fe21,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"ULTIMA COMPRA:",0,0,"L",0
pdf.Cell 167,4,Fe22,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"SALDO:",0,0,"L",1
pdf.Cell 167,4,Fe23,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"DIAS REVISION:",0,0,"L",0
pdf.Cell 167,4,Fe24,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"DIAS COBROS:",0,0,"L",1
pdf.Cell 167,4,Fe25,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"RUTA ENTREGA:",0,0,"L",0
pdf.Cell 167,4,Fe26,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"RUTA COBRO:",0,0,"L",1
pdf.Cell 167,4,Fe27,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"FECHA ALTA:",0,0,"L",0
pdf.Cell 167,4,Fe28,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"COMPRADOR:",0,0,"L",1
pdf.Cell 167,4,Fe29,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"TELEFONO:",0,0,"L",0
pdf.Cell 167,4,Fe30,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"FAX:",0,0,"L",1
pdf.Cell 167,4,Fe31,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"E-MAIL:",0,0,"L",0
pdf.Cell 167,4,Fe32,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"PAGOS:",0,0,"L",1
pdf.Cell 167,4,Fe33,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"TELEFONO:",0,0,"L",0
pdf.Cell 167,4,Fe34,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"FAX:",0,0,"L",1
pdf.Cell 167,4,Fe35,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"E-MAIL:",0,0,"L",0
pdf.Cell 167,4,Fe36,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"RESTRICCIONES:",0,0,"L",1
pdf.Cell 167,4,Fe37,0,0,"L",1
PDF.Ln(4)
pdf.Cell 30,4,"HORARIO RECIBO:",0,0,"L",0
pdf.Cell 167,4,Fe38,0,0,"L",0
PDF.Ln(4)
pdf.Cell 30,4,"OBSERVACIONES:",0,0,"L",1
pdf.MultiCell 167,4,FE43,0,"J",1
pdf.Cell 30,4,"CAPTURADO POR:",0,0,"L",0
pdf.Cell 167,4,FE44,0,0,"L",0
PDF.Ln(4)

pdf.Output()

End If
%> 

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

namespace MimPortal.Pages.Clientes
{
    public class ClidetaModel : PageModel
    {
        private readonly MimDbContext _context;

        public ClidetaModel(MimDbContext context)
        {
            _context = context;
        }

        [BindProperty(SupportsGet = true)]
        public Guid Registro { get; set; }

        public CLIENTES? Cliente { get; set; }
        public VENDEDORES? Vendedor { get; set; }
        public COTIZADORES? Cotizador { get; set; }

        public async Task OnGetAsync()
        {
            var sucursal = HttpContext.Session.GetString("Sucursal") ?? "MERIDA";
            if (Registro == Guid.Empty) return;

            Cliente = await _context.CLIENTES.Where(x => x.Sucursal == sucursal).FirstOrDefaultAsync(c => c.Id == Registro);
            if (Cliente == null) return;

            if (Cliente.VENCLI.HasValue)
            {
                Vendedor = await _context.VENDEDORES.Where(x => x.Sucursal == sucursal).FirstOrDefaultAsync(v => v.CVEVEND == Cliente.VENCLI.Value);
            }

            if (!string.IsNullOrEmpty(Cliente.COTCLI) && int.TryParse(Cliente.COTCLI, out int cotId))
            {
                Cotizador = await _context.COTIZADORES.FirstOrDefaultAsync(c => c.CVECOT == cotId);
            }
        }
    }
}

@page
@model MimPortal.Pages.Clientes.ClidetaModel
@{
    ViewData["Title"] = "Detalle del Cliente";
}
<div id="page-content">

<div class="card">
    <div class="card-header d-flex justify-content-between align-items-center">
        <h5><i class="bi bi-person-vcard"></i> Detalle del Cliente</h5>
        <div>
            <a href="/Clientes/Clidetg?Registro=@Model.Registro" class="btn btn-sm btn-outline-danger" target="_blank">
                <i class="bi bi-file-pdf"></i> PDF
            </a>
            <a href="javascript:history.back()" class="btn btn-sm btn-secondary">
                <i class="bi bi-arrow-left"></i> Volver
            </a>
        </div>
    </div>
    <div class="card-body">
        @if (Model.Cliente != null)
        {
            <div class="row">
                <div class="col-md-6">
                    <h6 class="border-bottom pb-2 mb-3">Información General</h6>
                    <table class="table table-sm">
                        <tr><th width="150">Clave:</th><td><strong>@Model.Cliente.CLACLI</strong></td></tr>
                        <tr><th>Nombre:</th><td>@Model.Cliente.NOMCLI</td></tr>
                        <tr><th>Dirección:</th><td>@Model.Cliente.CALCLI</td></tr>
                        <tr><th>Número:</th><td>@Model.Cliente.NUMCLI</td></tr>
                        <tr><th>Número Int:</th><td>@Model.Cliente.NUMICLI</td></tr>
                        <tr><th>Colonia:</th><td>@Model.Cliente.COLCLI</td></tr>
                        <tr><th>Población:</th><td>@Model.Cliente.POBCLI</td></tr>
                        <tr><th>Estado:</th><td>@Model.Cliente.EDOCLI</td></tr>
                        <tr><th>Código Postal:</th><td>@Model.Cliente.CPCLI</td></tr>
                        <tr><th>RFC:</th><td>@Model.Cliente.RFCCLI</td></tr>
                        <tr><th>Status:</th><td>
                            @if (Model.Cliente.STACLI == "A")
                            {
                                <span class="badge bg-success">Activo</span>
                            }
                            else
                            {
                                <span class="badge bg-secondary">@Model.Cliente.STACLI</span>
                            }
                        </td></tr>
                    </table>
                </div>
                <div class="col-md-6">
                    <h6 class="border-bottom pb-2 mb-3">Información Comercial</h6>
                    <table class="table table-sm">
                        <tr><th width="150">Vendedor:</th><td>@Model.Vendedor?.NOMVEND</td></tr>
                        <tr><th>Cotizador:</th><td>@Model.Cotizador?.NOMCOT</td></tr>
                        <tr><th>Clasificación:</th><td>@Model.Cliente.CLSCLI</td></tr>
                        <tr><th>Días Crédito:</th><td>@Model.Cliente.DIACLI</td></tr>
                        <tr><th>Límite Crédito:</th><td>@Model.Cliente.LIMCLI?.ToString("C2")</td></tr>
                        <tr><th>Descuento:</th><td>@Model.Cliente.DESCLI %</td></tr>
                        <tr><th>Utilidad:</th><td>@Model.Cliente.UTICLI %</td></tr>
                        <tr><th>Saldo:</th><td>@Model.Cliente.SALCLI?.ToString("C2")</td></tr>
                        <tr><th>Cuenta Pago:</th><td>@Model.Cliente.CTAPAGO</td></tr>
                        <tr><th>Usuario:</th><td>@Model.Cliente.USUCLI</td></tr>
                    </table>
                </div>
            </div>

            <div class="row mt-3">
                <div class="col-md-6">
                    <h6 class="border-bottom pb-2 mb-3">Contacto Comercial</h6>
                    <table class="table table-sm">
                        <tr><th width="150">Contacto:</th><td>@Model.Cliente.CONCLI</td></tr>
                        <tr><th>Teléfono:</th><td>@Model.Cliente.TCOCLI</td></tr>
                        <tr><th>Fax:</th><td>@Model.Cliente.FCOCLI</td></tr>
                        <tr><th>Email:</th><td>@Model.Cliente.ECOCLI</td></tr>
                    </table>
                </div>
                <div class="col-md-6">
                    <h6 class="border-bottom pb-2 mb-3">Contacto Pagos</h6>
                    <table class="table table-sm">
                        <tr><th width="150">Contacto:</th><td>@Model.Cliente.CPACLI</td></tr>
                        <tr><th>Teléfono:</th><td>@Model.Cliente.TPACLI</td></tr>
                        <tr><th>Fax:</th><td>@Model.Cliente.FPACLI</td></tr>
                        <tr><th>Email:</th><td>@Model.Cliente.EPACLI</td></tr>
                    </table>
                </div>
            </div>

            @if (!string.IsNullOrEmpty(Model.Cliente.OBSCLI))
            {
                <div class="row mt-3">
                    <div class="col-12">
                        <h6 class="border-bottom pb-2 mb-3">Observaciones</h6>
                        <p>@Model.Cliente.OBSCLI</p>
                    </div>
                </div>
            }
        }
        else
        {
            <div class="alert alert-warning">No se encontró el cliente.</div>
        }
    </div>
</div>
</div>