<!--- 
application: Cuentas a Pagar
version: 1.0.0 
filename: g_localidad.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>localidades</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_localidad;');
   writeln('  if ( obj == "Alta" ) {'); 
   writeln('		f_frame.action="o_localidad.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_localidades = database.cursor("SELECT * FROM localidades WHERE "+ client.criteria +" MATCHES '" + request.search1 + "'  ORDER BY " + client.criteria);
      if (!c_localidades) 
            DbsError(false,-1);  
		client.search1 = request.search1;
	}
	if(request.search2 && !request.gofunc) {
		if(request.search2 == "all") {
			//Selecciono todos los localidades, sin criterio 
			c_localidades = database.cursor("SELECT * FROM localidades ORDER BY "+client.criteria+" ");
         if (!c_localidades) 
            DbsError(false,-1);  
		}
		else {
			//Selecciona todas las filas en las que el descripcion empieza con la letra elejida.
			var lowcaps = request.search2.toLowerCase();
			c_localidades = database.cursor("SELECT * FROM localidades WHERE "+ client.criteria + " MATCHES '" + request.search2 + "*' OR " + client.criteria +" MATCHES '" + lowcaps + "*'  ORDER BY " + client.criteria);
			if (!c_localidades) 
            DbsError(false,-1);  
		}
		client.search2 = request.search2;
	}
}	
else {	
	if (!request.cod_localidad && !request.descripcion ) {
	  request.descripcion ="descripcion ";
   }
}   
if (request.cod_localidad) {
    client.criteria="cod_localidad";
    client.des_criteria="cuyo código";
}
if (request.descripcion ) {
    client.criteria="descripcion ";
    client.des_criteria="cuya descripción"; 
}
if ( client.criteria == "descripcion " )
	       criterio=" por descripcion ";
if ( client.criteria == "cod_localidad" ) 
			 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("localidades",criterio,"lo_");
   }  
   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_localidad.html?'+baseHtml+'&nvo=1">');
      QueryHeadBar("localidades",criterio,"lo_");
      writeln('</FORM>');
   }
   writeln('<FORM method="Post" NAME="g_localidad" action="g_localidad.html?'+baseHtml+'">');
 }  
}
else {
   writeln('<FORM method="Post" NAME="g_localidad" action="g_localidad.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='cod_localidad' value='Código'>");
	  writeln("<HR>");
     writeln("<b>Descripción contiene:</b>");
}
if ( client.criteria == "cod_localidad" ) {
     writeln("<B> Buscar por: </B>");
	  writeln("<INPUT TYPE='submit' NAME='descripcion ' value='Descripción'>");
	  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="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 == "cod_localidad" ) {
     client.des_criteria="cuyo Código";
     writeln("Código empieza por:<BR>")
}     
  
writeln("<CENTER>");
if (!request.waux) {
   refHtml="g_localidad.html?"+baseHtml+"&search2=";
}
else {
   refHtml="g_localidad.html?waux="+request.waux+"&"+baseHtml+"&search2=";
} 
LoadHidden(refHtml);
buttonsLetrasNros(refHtml,true); 
writeln("</CENTER><HR>");
if (request.search1) {
	writeln("localidades "+ client.des_criteria +" contiene <FONT SIZE=+2>" + request.search1 + "</FONT><BR>")
}
if (request.search2) {
	if(request.search2 == "all") {
		writeln("Lista de todos los localidades<BR>");
	}
	else {
		writeln("localidades " + client.des_criteria + " empieza por <FONT SIZE=+2>" + request.search2 + "</FONT><BR>");
	}
}
writeln("<HR>");
if (request.search1 || request.search2) {
   if ( client.criteria == "cod_localidad" ) 
       writeln('<TABLE ALIGN="CENTER" BORDER=0>');
   while (c_localidades.next()) {
	//lista de todos los localidades devueltos por el cursor.
     if ( client.criteria == "descripcion " ) {
       if (!request.waux) 
   		writeln("<IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_localidad.html?lo_cod_localidad=" + escape(StringClip(false,c_localidades.cod_localidad))+"&"+baseHtml + "'>" + c_localidades.descripcion  + "</A><BR>");
       else	
      	writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_localidad.html?waux="+request.waux+"&lo_cod_localidad="+ escape(StringClip(false,c_localidades.cod_localidad))+"&"+baseHtml + "'>" + c_localidades.cod_localidad + "</TD><TD>"+ c_localidades.descripcion  + "</A><BR></TD></TR>");
     }
     if ( client.criteria == "cod_localidad" ) {
       if (!request.waux) 
   		writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_localidad.html?lo_cod_localidad=" + escape(StringClip(false,c_localidades.cod_localidad))+"&"+baseHtml + "'>" + c_localidades.cod_localidad + "</TD><TD>" +c_localidades.descripcion  + "</A></TD></TR>");
       else	
      	writeln("<TR><TD><IMG SRC='images/sphere.gif' ALT='Bullet'> <A HREF='o_localidad.html?waux="+request.waux+"&lo_cod_localidad="+ escape(StringClip(false,c_localidades.cod_localidad))+"&"+baseHtml + "'>" + c_localidades.cod_localidad + "</TD><TD>"+ c_localidades.descripcion  + "</A><BR></TD></TR>");
     }
   }
   c_localidades.close();
   if ( client.criteria == "cod_localidad" ) 
       writeln("</TABLE>");
}   

if (!request.waux) {
    writeSisgnature(true);
}
if (request.gofunc) {
	writeln('-->');
}
else {
	writeln('</BODY>');
	writeln('</HTML>');
}
</SERVER>