Detalle: codigobp.asp

codigobp.asp

Ir a la Página Volver a la Lista

Archivo ASP

codigobp.asp

Página Razor

Inventarios/Codigobp.cshtml

Módulo

Inventarios

Líneas de Código

109

Características

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

Tablas Utilizadas (1)

Cbarra

Consultas SQL (2)

SQL Original (ASP)

Select Idbar, Codebar, Artmul, Desmul, Ctlmul  From Cbarra, Multialmacen  where Artmul = Codebar and Almmul = 1

Tablas: Cbarra

SQL Original (ASP)

Select Idbar, Codebar, Artmul, Desmul, Ctlmul

Comentarios y Notas (0)

No hay comentarios aún

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

Archivo ASP	Tipo	Módulo	Estado	Página Razor
`codigobpg.asp`	form_action	General	Pendiente	-
`empresa.asp`	include	General	Pendiente	-
`general.asp`	include	General	Pendiente	-
`user.asp`	include	General	Pendiente	-
`codigobi.asp`	link	General	Pendiente	-
`codigobpet.asp`	link	General	Pendiente	-

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

Archivo ASP	Tipo	Módulo	Estado	Página Razor
`codigobpg.asp`	link	General	Pendiente	-
`codigobpe.asp`	redirect	General	Pendiente	-
`codigobpet.asp`	redirect	General	Pendiente	-
`codigobpg.asp`	redirect	General	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">

<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>
<center>
<B>
<!--#include file="empresa.asp"-->
<BR><BR>
****** GENERADOR DE CODIGOS DE BARRAS *****
</B>
<BR>
<hr>

<Form action="CodigoBPG.asp" name="CodigoBG" method="Post">
<TABLE border="0" cellspacing="2" cellpadding="0" class="normal">
<tr>
<td Class="Normalb">Producto: &nbsp;</td>
<td><input type=text class=normalb name="Codigo" size="25" MaxLength="40" onChange="javascript:this.value=this.value.toUpperCase();"></td>
<td  Align="Center"><input type="submit" value="Agregar" class="Normalb"></td>
</tr>
</table>
</form>

<%
Dim Rs11
Dim Sql11

Set Rs11 = server.CreateObject("ADODB.Recordset")
Sql11 = "Select Idbar, Codebar, Artmul, Desmul, Ctlmul " &_
"From Cbarra, Multialmacen " &_
"where Artmul = Codebar and Almmul = 1;"
Rs11.Open Sql11,cn1,1,2

If Rs11.Eof Then

Else
%>
<Hr>

<TABLE border=0 cellspacing=2 cellpadding=2 class="normal">

<Tr>
<TD align="Center" class="normalB" bgcolor="#FFFFFF" Colspan="2">
<a href="CodigoBI.asp" onclick="NewWindow(this.href,'CodigoBi','300','600','yes');return false;">
<img src="Icon/imprime.gif" Border="0" Height="40px" Alt="Imprimir Codigo de Barras"> </a></td>
<TD align="Center" class="normalb" bgcolor="#FFFFFF" Colspan="2">
<a href="CodigoBPET.asp">
<img src="Icon/elimina.gif" Border="0" Height="20px"></a></td>
</tr>

<Tr>
<TD align="Left" class="normalw" bgcolor="#006699">Codigo </td>
<TD align="Left" class="normalw" bgcolor="#006699">Descripcion </td>
<TD align="Left" class="normalw" bgcolor="#006699">Ubicacion </td>
<TD align="Left" class="normalw" bgcolor="#006699">Eliminar </td>
</tr>

<%
Do while Not Rs11.EOF
%>
<Tr>
<Td align="Left" class="normalb" bgcolor="#FFFFFF"><%= Rs11("Artmul") %> </td>
<Td align="Left" class="normalb" bgcolor="#FFFFFF"><%= Rs11("Desmul") %> </td>
<Td align="Right" class="normalb" bgcolor="#FFFFFF"><%= Rs11("CTlmul") %> </td>
<Td align="Right" class="normalb" bgcolor="#FFFFFF">
<a href="CodigoBPE.asp?Registro=<%= Rs11("Idbar") %>"><img src="icon/elimina.gif" Border="0" height="20px"></a> </td>
</TR>
<%
Rs11.Movenext
Loop

%>
</Table>

<%
End If
%>

</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.RazorPages;
namespace MimPortal.Pages.Inventarios { public class CodigobpModel : PageModel { public void OnGet() { } } }

@page
@model MimPortal.Pages.Inventarios.CodigobpModel
@{ ViewData["Title"] = "Código de Barras P"; }
<div class="container-fluid">
    <h5><i class="bi bi-upc-scan"></i> Código de Barras - Impresión</h5>
    <div class="card">
        <div class="card-body">
            <form method="get" class="row g-3 mb-4">
                <div class="col-md-3">
                    <label class="form-label">Producto</label>
                    <input type="text" name="producto" class="form-control" placeholder="Código producto" />
                </div>
                <div class="col-md-2">
                    <label class="form-label">Cantidad</label>
                    <input type="number" name="cantidad" class="form-control" value="1" />
                </div>
                <div class="col-md-2 d-flex align-items-end">
                    <button type="submit" class="btn btn-primary"><i class="bi bi-printer"></i> Imprimir</button>
                </div>
            </form>
        </div>
    </div>
</div>

MATERIALES INDUSTRIALES DE MEXICO

codigobp.asp

Archivo ASP

Página Razor

Módulo

Líneas de Código

SELECT Select Idbar, Codebar, Artmul, Desmul, Ctlmul From Cbarra, Multialmacen where ...

SQL Original (ASP)

SELECT Select Idbar, Codebar, Artmul, Desmul, Ctlmul

SQL Original (ASP)