135 lines
5.2 KiB
HTML
135 lines
5.2 KiB
HTML
<!---
|
|
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> <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> </B></DT>');
|
|
writeln('<DT><B> </B></DT>');
|
|
writeln('<DT><B> <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> </B></DT>');
|
|
writeln('<DT><B> </B></DT>');
|
|
writeln('<DT><B> <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> </B></DT>');
|
|
writeln('<DT><B> </B></DT>');
|
|
writeln('<DT><B> <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> </B></DT>');
|
|
writeln('<DT><B> </B></DT>');
|
|
writeln('<DT><B> <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> </B></DT>');
|
|
writeln('<DT><B> </B></DT>');
|
|
writeln('<HR>');
|
|
//writeln('<DT><B> <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> </B></DT>');
|
|
//writeln('<DT><B> </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>
|