<!--- 
application: Cuentas a Pagar
version: 1.0.0 
filename: g_listados.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>Listado de facturas</TITLE>
<SCRIPT SRC="global.js">
</SCRIPT>
<SCRIPT SRC="ctasapagar.js">
</SCRIPT>
</HEAD>
<SERVER>
var NF9=""
var NF10=""
var HOY=new Date();
// Algunos formatos para fechas.
var NLDF="";  // para columnas en las queries INFORMIX
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();GoField()"');
   else
     writeln(' <BODY OnLoad="GoField()"');
}
writeln(' BACKGROUND="images/backgrnd.gif">');   
writeln('<SCRIPT SRC="global.js">');
writeln('</SCRIPT>');
writeln('<SCRIPT SRC="ctasapagar.js">');
writeln('</SCRIPT>');
writeln('<SCRIPT SRC="factura.js">');
writeln('</SCRIPT>');
writeln("<SCRIPT LANGUAGE='JavaScript'>");
writeln(' function GoField() {');
writeln('   var f=document.l_factura; ');
writeln('//           alert("\\r¡¡¡ !!!"); ');
if (!request.f_orden) 
//   writeln('    f.f_formato.focus();');
writeln(' }');
writeln(' function chkYearNroReg(obj) {');
writeln('    var nro=parseInt(obj.value); ');
writeln('    if (nro+1 > 0 ) { ');
writeln('        obj.value=nro; ');
writeln('        if ( HOY.getFullYear() != nro )  ');
writeln('           alert("¡¡ El Año del Nro. de Registro no es el actual !! ");');      
writeln('    }');
writeln(' }');
if (request.gofunc) {
	writeln('function RunFunction(obj,valor) {');
	writeln('  var mainFrame=find_frame(top,"main");');
	writeln('  var f_frame=mainFrame.document.g_factura;');
   writeln('  if ( obj == "Alta" ) {'); 
   writeln('		f_frame.action="o_factura.html?nvo=1&'+baseHtml+'";');
   writeln('		f_frame.submit(); ');
	writeln('  }');
	writeln('  if ( obj == "Ayuda" )'); 
	writeln('       NetHelp(valor);');
	writeln('  history.back();');
	writeln('}');
}
writeln('</SCRIPT>');
criterio="";
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("Listados",criterio,"rpt");
   }  
   writeln('}');
   writeln("</SCRIPT>");
}
if (!request.waux) {
 if (request.gofunc) {
   writeln('</BODY>');
	writeln('</HTML>');
	writeln(' <!--');
 }	
 else {
   if ( request.FrameType == "L" ) {
     	writeln('<FORM  METHOD="post" ACTION="l_factura.html?'+baseHtml+'">');
      QueryHeadBar("Listados",criterio,"rpt")
      writeln('</FORM>');
   }
   writeln('<FORM NAME="l_factura" method="Post" action="l_factura.html?'+baseHtml+'">');
 }  
}
else {
   writeln('<FORM NAME="l_factura" method="Post" action="l_factura.html?waux='+request.waux+'&'+baseHtml+'">');
   writeln('<CENTER><FONT SIZE=+2>'+criterio+'	</FONT></FONT></H1></CENTER>');	
}
writeln('<P><BASE target="main"></P>');
writeln('<DT><B>&nbsp;<A HREF="l_factura.html?'+baseHtml+'"><IMG SRC="images/bullet_p.gif" BORDER=0 HEIGHT=14 WIDTH=31 ALIGN=BOTTOM></A><A HREF="l_factura.html?'+baseHtml+'">Facturas</A>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;<A HREF="l_albaran.html?'+baseHtml+'"><IMG SRC="images/bullet_p.gif" BORDER=0 HEIGHT=14 WIDTH=31 ALIGN=BOTTOM></A><A HREF="l_albaran.html?'+baseHtml+'">Albaranes Internos</A>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;<A HREF="l_proveedor.html?'+baseHtml+'"><IMG SRC="images/bullet_p.gif" BORDER=0 HEIGHT=14 WIDTH=31 ALIGN=BOTTOM></A><A HREF="l_proveedor.html?'+baseHtml+'">Proveedores</A>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;<A HREF="l_pedido.html?'+baseHtml+'"><IMG SRC="images/bullet_p.gif" BORDER=0 HEIGHT=14 WIDTH=31 ALIGN=BOTTOM></A><A HREF="l_pedido.html?'+baseHtml+'">Pedidos</A>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;<A HREF="l_prevision.html?'+baseHtml+'"><IMG SRC="images/bullet_p.gif" BORDER=0 HEIGHT=14 WIDTH=31 ALIGN=BOTTOM></A><A HREF="l_prevision.html?'+baseHtml+'">Previsiones</A>&nbsp;</B></DT>');
writeln('<DT><B>&nbsp;</B></DT>');
writeln('<HR>');
//writeln('<DT><B>&nbsp;<A HREF="l_docpago.html?'+baseHtml+'"><IMG SRC="images/bullet_p.gif" BORDER=0 HEIGHT=14 WIDTH=31 ALIGN=BOTTOM></A><A HREF="l_docpago.html?'+baseHtml+'">Documentos de Pago</A>&nbsp;</B></DT>');
//writeln('<DT><B>&nbsp;</B></DT>');
writeln("<CENTER>");
if (!request.waux) {
   refHtml="g_listados.html?"+baseHtml;
}
else {
   refHtml="g_listados.html?waux="+request.waux+"&"+baseHtml;
} 
LoadHidden(refHtml);
if (!request.waux) 
   writeSignature(true);
if (request.gofunc) {
	writeln('-->');
}
else {
	writeln('</BODY>');
	writeln('</HTML>');
}
</SERVER>