ctasapagar/g_banco.html
2021-10-01 20:28:38 +01:00

215 lines
7.5 KiB
HTML

<!---
application: Cuentas a Pagar
version: 1.0.0
filename: g_banco.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>bancos</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_banco;');
writeln(' if ( obj == "Alta" ) {');
writeln(' f_frame.action="o_banco.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_bancos = database.cursor("SELECT * FROM bancos WHERE "+ client.criteria +" MATCHES '" + request.search1 + "' ORDER BY " + client.criteria);
if (!c_bancos)
DbsError(false,-1);
client.search1 = request.search1;
}
if(request.search2 && !request.gofunc) {
if(request.search2 == "all") {
//Selecciono todos los bancos, sin criterio
c_bancos = database.cursor("SELECT * FROM bancos ORDER BY nombre ");
if (!c_bancos)
DbsError(false,-1);
}
else {
//Selecciona todas las filas en las que el nombre empieza con la letra elejida.
var lowcaps = request.search2.toLowerCase();
c_bancos = database.cursor("SELECT * FROM bancos WHERE "+ client.criteria + " MATCHES '" + request.search2 + "*' OR " + client.criteria +" MATCHES '" + lowcaps + "*' ORDER BY " + client.criteria);
if (!c_bancos)
DbsError(false,-1);
}
client.search2 = request.search2;
}
}
else {
if (!request.cod_banco && !request.nombre ) {
request.nombre ="nombre ";
}
}
if (request.cod_banco) {
client.criteria="cod_banco";
client.des_criteria="cuyo código";
}
if (request.nombre ) {
client.criteria="nombre ";
client.des_criteria="cuya nombre";
}
if ( client.criteria == "nombre " ) {
criterio=" por Nombre ";
}
if ( client.criteria == "cod_banco" ) {
criterio=" por Código ";
}
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("Bancos",criterio,"ba_");
}
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_banco.html?'+baseHtml+'&nvo=1">');
QueryHeadBar("Bancos",criterio,"ba_")
writeln('</FORM>');
}
writeln('<FORM method="Post" NAME="g_banco" action="g_banco.html?'+baseHtml+'">');
}
}
else {
writeln('<FORM method="Post" NAME="g_banco" action="g_banco.html?waux='+request.waux+'&'+baseHtml+'">');
writeln('<CENTER><FONT SIZE=+2>'+criterio+' </FONT></FONT></H1></CENTER>');
}
if ( client.criteria == "nombre " ) {
writeln("<B>Cambiar Seleccion Datos por: </B>");
writeln("<INPUT TYPE='submit' NAME='cod_banco' value='Código'>");
writeln("<HR>");
writeln("<b>Nombre contiene:</b>");
}
if ( client.criteria == "cod_banco" ) {
writeln("<B> Buscar por: </B>");
writeln("<INPUT TYPE='submit' NAME='nombre ' value='Nombre'>");
writeln("<HR>");
writeln("<b>Código 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="nombre ";
client.des_criteria="cuya razón social";
}
if ( client.criteria == "nombre " ) {
client.des_criteria="cuya nombre";
writeln("Nombre empieza por:</BR>")
}
if ( client.criteria == "cod_banco" ) {
client.des_criteria="cuyo Código";
writeln("Código empieza por:<BR>")
}
writeln("<CENTER>");
if (!request.waux) {
refHtml="g_banco.html?"+baseHtml+"&search2=";
}
else {
refHtml="g_banco.html?waux="+request.waux+"&"+baseHtml+"&search2=";
}
LoadHidden(refHtml);
buttonsLetrasNros(refHtml,true);
writeln("</CENTER><HR>");
if (request.search1) {
writeln("bancos "+ client.des_criteria +" contiene <FONT SIZE=+2>" + request.search1 + "</FONT><BR>")
}
if (request.search2) {
if(request.search2 == "all") {
writeln("Lista de todos los bancos<BR>");
}
else {
writeln("bancos " + client.des_criteria + " empieza por <FONT SIZE=+2>" + request.search2 + "</FONT><BR>");
}
}
writeln("<HR>");
if (request.search1 || request.search2) {
if ( client.criteria == "cod_banco" )
writeln('<TABLE ALIGN="CENTER" BORDER=0>');
var nrows=0;
while (c_bancos.next()) {
nrows++;
LastRow=c_bancos.cod_banco;
//lista de todos los bancos devueltos por el cursor.
if ( client.criteria == "nombre " ) {
if (!request.waux)
writeln("<IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_banco.html?ba_cod_banco=" + escape(StringClip(false,c_bancos.cod_banco))+"&"+baseHtml+"'>" + c_bancos.nombre + "</A><BR>");
else
writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_banco.html?waux="+request.waux+"&ba_cod_banco="+escape(StringClip(false,c_bancos.cod_banco))+"&"+baseHtml + "'>" + c_bancos.cod_banco + "</TD><TD>"+ c_bancos.nombre + "</A><BR></TD></TR>");
}
if ( client.criteria == "cod_banco" ) {
if (!request.waux)
writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_banco.html?ba_cod_banco=" +escape(StringClip(false,c_bancos.cod_banco))+"&"+baseHtml + "'>" + c_bancos.cod_banco + "</TD><TD>" +c_bancos.nombre + "</A></TD></TR>");
else
writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_banco.html?waux="+request.waux+"&ba_cod_banco="+escape(StringClip(false,c_bancos.cod_banco))+"&"+baseHtml + "'>" + c_bancos.cod_banco + "</TD><TD>"+ c_bancos.nombre + "</A><BR></TD></TR>");
}
}
c_bancos.close();
if ( client.criteria == "cod_banco" )
writeln("</TABLE>");
if ( nrows == 1 )
redirect("o_banco.html?ba_cod_banco=" + escape(StringClip(false,LastRow))+"&"+baseHtml)
}
if (!request.waux) {
writeSignature(true);
}
if (request.gofunc) {
writeln('-->');
}
else {
writeln('</BODY>');
writeln('</HTML>');
}
</SERVER>