223 lines
8.1 KiB
HTML
223 lines
8.1 KiB
HTML
<!---
|
|
application: Cuentas a Pagar
|
|
version: 1.0.0
|
|
filename: g_pedido.html
|
|
description: Esta página busca las filas de la tabla de acuerdo con el
|
|
criterio de búsqueda establecido. Las filas tinen un hiper-enlace para
|
|
poder ver los detalles completos, modificarla o Borrala.
|
|
El botón de Alta permite acceder al form para crear una nueva fila
|
|
--->
|
|
<HTML>
|
|
<HEAD>
|
|
<TITLE>Pedidos</TITLE>
|
|
</HEAD>
|
|
<SERVER>
|
|
var baseHtml="";
|
|
dbAcl();
|
|
if (request.gofunc)
|
|
writeln(' <BODY OnLoad="RunFunction(\''+request.gofunc+'\',\''+request.valor+'\')"');
|
|
else {
|
|
if ( request.FrameType == "F" || request.FrameType == "T" )
|
|
writeln(' <BODY OnLoad="WriteFrameButtons()"');
|
|
else
|
|
writeln(' <BODY');
|
|
}
|
|
writeln(' BACKGROUND="images/backgrnd.gif">');
|
|
writeln('<SCRIPT SRC="global.js">');
|
|
writeln('</SCRIPT>');
|
|
writeln('<SCRIPT SRC="ctasapagar.js">');
|
|
writeln('</SCRIPT>');
|
|
if (request.gofunc) {
|
|
writeln("<SCRIPT LANGUAGE='JavaScript'>");
|
|
writeln('function RunFunction(obj,valor) {');
|
|
writeln(' var mainFrame=find_frame(top,"main");');
|
|
writeln(' var f_frame=mainFrame.document.g_pedido;');
|
|
writeln(' if ( obj == "Alta" ) {');
|
|
writeln(' f_frame.action="o_pedido.html?nvo=1&'+baseHtml+'";');
|
|
writeln(' f_frame.submit(); ');
|
|
writeln(' }');
|
|
writeln(' if ( obj == "Ayuda" )');
|
|
writeln(' NetHelp(valor);');
|
|
writeln(' history.back();');
|
|
writeln('}');
|
|
writeln('</SCRIPT>');
|
|
}
|
|
if(request.search1 || request.search2) {
|
|
dbConnect();
|
|
if(request.search1 && !request.gofunc) {
|
|
//Si se busca usando el texto de entrada
|
|
c_pedidos = database.cursor("SELECT * FROM pedidos WHERE "+ client.criteria +" MATCHES '" + request.search1 + "' ORDER BY " + client.criteria);
|
|
if (!c_pedidos)
|
|
DbsError(false,-1);
|
|
client.search1 = request.search1;
|
|
}
|
|
if(request.search2 && !request.gofunc) {
|
|
if(request.search2 == "all") {
|
|
//Selecciono todos los pedidos, sin criterio
|
|
c_pedidos = database.cursor("SELECT * FROM pedidos ORDER BY descripcion ");
|
|
if (!c_pedidos)
|
|
DbsError(false,-1);
|
|
}
|
|
else {
|
|
//Selecciona todas las filas en las que el descripcion empieza con la letra elejida.
|
|
var lowcaps = request.search2.toLowerCase();
|
|
c_pedidos = database.cursor("SELECT * FROM pedidos WHERE "+ client.criteria + " MATCHES '" + request.search2 + "*' OR " + client.criteria +" MATCHES '" + lowcaps + "*' ORDER BY " + client.criteria);
|
|
if (!c_pedidos)
|
|
DbsError(false,-1);
|
|
}
|
|
client.search2 = request.search2;
|
|
}
|
|
}
|
|
else {
|
|
if (!request.nro_pedido && !request.descripcion ) {
|
|
request.descripcion ="descripcion";
|
|
}
|
|
}
|
|
if (request.nro_pedido) {
|
|
client.criteria="nro_pedido";
|
|
client.des_criteria="cuyo número";
|
|
}
|
|
if (request.descripcion ) {
|
|
client.criteria="descripcion ";
|
|
client.des_criteria="cuya descripción";
|
|
}
|
|
if ( client.criteria == "descripcion " )
|
|
criterio=" por descripción ";
|
|
if ( client.criteria == "nro_pedido" )
|
|
criterio=" por número ";
|
|
if ( request.FrameType == "F" || request.FrameType == "T" ) {
|
|
writeln("<SCRIPT LANGUAGE='JavaScript'>");
|
|
writeln('function WriteFrameButtons() {')
|
|
if (!request.waux) {
|
|
writeln(' var topFrame=find_frame(top,"top");');
|
|
writeln(' var ndoc=topFrame.document; ');
|
|
writeln(' var mainFrame=find_frame(top,"main");');
|
|
writeln(' var formAction=mainFrame.document.location.href;');
|
|
QueryButtons("Pedidos",criterio,"pe_");
|
|
}
|
|
writeln('}');
|
|
writeln("</SCRIPT>");
|
|
}
|
|
if (!request.waux) {
|
|
if (request.gofunc) {
|
|
writeln('</BODY>');
|
|
writeln('</HTML>');
|
|
writeln(' <!--');
|
|
}
|
|
else {
|
|
if ( request.FrameType == "L" ) {
|
|
writeln('<FORM METHOD="post" ACTION="o_pedido.html?'+baseHtml+'&nvo=1">');
|
|
QueryHeadBar("Pedidos",criterio,"pe_")
|
|
writeln('</FORM>');
|
|
}
|
|
writeln('<FORM method="Post" NAME="g_pedido" action="g_pedido.html?'+baseHtml+'">');
|
|
}
|
|
}
|
|
else {
|
|
writeln('<FORM method="Post" NAME="g_pedido" action="g_pedido.html?waux='+request.waux+'&'+baseHtml+'">');
|
|
writeln('<CENTER><FONT SIZE=+2>'+criterio+' </FONT></FONT></H1></CENTER>');
|
|
}
|
|
if ( client.criteria == "descripcion " ) {
|
|
writeln("<B>Cambiar Seleccion Datos por: </B>");
|
|
writeln("<INPUT TYPE='submit' NAME='nro_pedido' value='número'>");
|
|
writeln("<HR>");
|
|
writeln("<b>Descripción contiene:</b>");
|
|
}
|
|
if ( client.criteria == "nro_pedido" ) {
|
|
writeln("<B> Buscar por: </B>");
|
|
writeln("<INPUT TYPE='submit' NAME='descripcion' value='Descripción'>");
|
|
writeln("<HR>");
|
|
writeln("<b>Número contiene:</b>");
|
|
}
|
|
if(request.search1 == null) {
|
|
writeln("<INPUT type='text' name='search1'>");
|
|
}
|
|
else {
|
|
writeln("<INPUT type='text' name='search1' VALUE='" + request.search1 + "'>");
|
|
}
|
|
writeln('<INPUT TYPE="submit" value="Buscar">');
|
|
writeln('</FORM>');
|
|
if (!client.criteria) {
|
|
client.criteria="descripcion ";
|
|
client.des_criteria="cuya descripción";
|
|
}
|
|
if ( client.criteria == "descripcion " ) {
|
|
client.des_criteria="cuya descripción";
|
|
writeln("Descripcion empieza por:</BR>")
|
|
}
|
|
if ( client.criteria == "nro_pedido" ) {
|
|
client.des_criteria="cuyo número";
|
|
writeln("Número empieza por:<BR>")
|
|
}
|
|
|
|
writeln("<CENTER>");
|
|
if (!request.waux) {
|
|
refHtml="g_pedido.html?"+baseHtml+"&search2=";
|
|
}
|
|
else {
|
|
refHtml="g_pedido.html?waux="+request.waux+"&"+baseHtml+"&search2=";
|
|
}
|
|
LoadHidden(refHtml);
|
|
buttonsLetrasNros(refHtml,false);
|
|
writeln("</CENTER><HR>");
|
|
if (request.search1) {
|
|
writeln("pedidos "+ client.des_criteria +" contiene <FONT SIZE=+2>" + request.search1 + "</FONT><BR>")
|
|
}
|
|
if (request.search2) {
|
|
if(request.search2 == "all") {
|
|
writeln("Lista de todos los pedidos<BR>");
|
|
}
|
|
else {
|
|
writeln("pedidos " + client.des_criteria + " empieza por <FONT SIZE=+2>" + request.search2 + "</FONT><BR>");
|
|
}
|
|
}
|
|
writeln("<HR>");
|
|
if (request.search1 || request.search2) {
|
|
if ( client.criteria == "nro_pedido" )
|
|
writeln('<TABLE ALIGN="CENTER" BORDER=0>');
|
|
var nrows=0;
|
|
while (c_pedidos.next()) {
|
|
nrows++;
|
|
LastRow=c_pedidos.nro_pedido;
|
|
//lista de todos los pedidos devueltos por el cursor.
|
|
if (request.pe_nif_proveedor && request.pe_nif_proveedor != null ) {
|
|
CursorTabla("pr","nif","=\'"+StringClip(true,request.pe_nif_proveedor)+"\'",false,false);
|
|
request.pe_t_razon_social=c_proveedores.razon_social;
|
|
c_proveedores.close();
|
|
}
|
|
else
|
|
request.pe_t_razon_social="";
|
|
if ( client.criteria == "descripcion " ) {
|
|
if (!request.waux)
|
|
writeln("<IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_pedido.html?pe_nro_pedido=" + escape(StringClip(false,c_pedidos.nro_pedido))+"&"+baseHtml + "'>" + c_pedidos.descripcion+" "+request.pe_t_razon_social+"</A><BR>");
|
|
else
|
|
writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_pedido.html?waux="+request.waux+"&pe_nro_pedido="+ escape(StringClip(false,c_pedidos.nro_pedido))+"&"+baseHtml + "'>" + c_pedidos.nro_pedido + "</TD><TD>"+ c_pedidos.descripcion +" "+request.pe_t_razon_social+ "</A><BR></TD></TR>");
|
|
}
|
|
if ( client.criteria == "nro_pedido" ) {
|
|
if (!request.waux)
|
|
writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_pedido.html?pe_nro_pedido=" + escape(StringClip(false,c_pedidos.nro_pedido))+"&"+baseHtml + "'>" + c_pedidos.nro_pedido + "</TD><TD>" +c_pedidos.descripcion +" "+request.pe_t_razon_social+ "</A></TD></TR>");
|
|
else
|
|
writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_pedido.html?waux="+request.waux+"&pe_nro_pedido="+ escape(StringClip(false,c_pedidos.nro_pedido))+"&"+baseHtml + "'>" + c_pedidos.nro_pedido + "</TD><TD>"+ c_pedidos.descripcion +" "+request.pe_t_razon_social+ "</A><BR></TD></TR>");
|
|
}
|
|
}
|
|
c_pedidos.close();
|
|
if ( client.criteria == "nro_pedido" )
|
|
writeln("</TABLE>");
|
|
if ( nrows == 1 )
|
|
redirect("o_pedido.html?pe_nro_pedido=" + escape(StringClip(false,LastRow))+"&"+baseHtml)
|
|
|
|
}
|
|
|
|
if (!request.waux) {
|
|
writeSignature(true);
|
|
}
|
|
if (request.gofunc) {
|
|
writeln('-->');
|
|
}
|
|
else {
|
|
writeln('</BODY>');
|
|
writeln('</HTML>');
|
|
}
|
|
</SERVER>
|
|
|