161 lines
5.9 KiB
HTML
161 lines
5.9 KiB
HTML
<!---
|
|
application: Cuentas a Pagar
|
|
version: 1.0.0
|
|
filename: l_factura.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>
|
|
<SCRIPT SRC="l_prevision.js">
|
|
</SCRIPT>
|
|
</HEAD>
|
|
<SERVER>
|
|
var NF9=""
|
|
var NF10=""
|
|
var NF11=""
|
|
var HOY=new Date();
|
|
var nlin=0;
|
|
// Algunos formatos para fechas.
|
|
var NLDF=""; // para columnas en las queries INFORMIX
|
|
var baseHtml="";
|
|
var pathFile="c:/tmprpts/";
|
|
var urlDoc="file:///C|/tmprpts/prevision.html" // Donde leen los Clients
|
|
var nprinter="";
|
|
var spoolpath="";
|
|
var baseHtml="";
|
|
var textoReqs="";
|
|
var nomFile="c:/tmprpts/prevision.html";
|
|
var PaperVLines=76// Nro. Lins. del Papel A4 Vertical FONT Default
|
|
var PaperHLines=52// Nro. Lins. del Papel A4 Horizontal FONT Default
|
|
criterio="";
|
|
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 LANGUAGE='JavaScript'>");
|
|
writeln(' function GoField() {');
|
|
writeln('// alert("\\r¡¡¡ !!!"); ');
|
|
if (request.f_entrada)
|
|
writeln("displayReport();");
|
|
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(' //;');
|
|
writeln(' }');
|
|
writeln(' if ( obj == "Ayuda" )');
|
|
writeln(' NetHelp(valor);');
|
|
writeln(' history.back();');
|
|
writeln('}');
|
|
}
|
|
writeln('</SCRIPT>');
|
|
if (request.f_entrada) {
|
|
if (!request.gofunc) {
|
|
dbConnect();
|
|
report_prev();
|
|
writeln("<SCRIPT LANGUAGE='JavaScript'>");
|
|
writeln("function displayReport() {");
|
|
writeln('w_prev=window.open("'+urlDoc+'","w_prevision","toolbar=yes,directories=no,menubar=yes,status=no,scrollbars=yes,resizable=yes,width=600,height=500");');
|
|
// if ( textoReqs.length > 0 )
|
|
// writeln(' alert("Listado(s): '+textoReqs+'\\r está(n) en la cola \''+nprinter+'\'"); ');
|
|
writeln("}");
|
|
writeln("</SCRIPT>");
|
|
}
|
|
}
|
|
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("Previsiones",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_prevision.html?'+baseHtml+'&nvo=1">');
|
|
QueryHeadBar("Previsiones",criterio,"rpt")
|
|
writeln('</FORM>');
|
|
}
|
|
writeln('<FORM NAME="l_prevision" method="Post" action="l_prevision.html?'+baseHtml+'">');
|
|
}
|
|
}
|
|
else {
|
|
writeln('<FORM NAME="l_prevision" method="Post" action="l_prevision.html?waux='+request.waux+'&'+baseHtml+'">');
|
|
writeln('<CENTER><FONT SIZE=+2>'+criterio+' </FONT></FONT></H1></CENTER>');
|
|
}
|
|
writeln("<B>Criterios de Seleccion Datos: </B>");
|
|
writeln("<HR>");
|
|
if (!request.f_entrada)
|
|
request.f_entrada="";
|
|
writeln('<TABLE ALIGN="CENTER" BORDER=0><TR>');
|
|
writeln("<INPUT type='hidden' name='f_tipo' size=4 maxlength=4 VALUE='html' >");
|
|
writeln("<INPUT type='hidden' name='maxLins' size=2 maxlength=2 VALUE='76' >");
|
|
writeln('<TD ALIGN=LEFT><B>Borde: </B></TD><TD><SELECT NAME="borde" SIZE=1>');
|
|
writeln('<OPTION VALUE="0" SELECTED>No');
|
|
writeln('<OPTION VALUE="1" >Fino');
|
|
writeln('<OPTION VALUE="2" >Medio');
|
|
writeln('<OPTION VALUE="3" >Grueso');
|
|
writeln('</SELECT>');
|
|
writeln("</TD></TR>");
|
|
writeln('</TABLE>');
|
|
writeln("<HR>");
|
|
writeln('<TABLE ALIGN="CENTER" BORDER=0>');
|
|
writeln("<TR><TD ALIGN=LEFT>Desde: </TD><TD><INPUT type='text' name='f_entrada' size=8 maxlength=10 VALUE='"+request.f_entrada +"' onBlur='ToStringDate(this,IFDF)' onFocus='UnfrmtStrDate(this,IFDF)' >");
|
|
// writeln("Hasta: <INPUT type='text' name='f_hasta' size=8 maxlength=10 VALUE='"+request.f_hasta +"' onBlur='ToStringDate(this,IFDF)' onFocus='HastaDefault(this,\"emision\");UnfrmtStrDate(this,IFDF)' onChange='RangoFecha(this,\"emision\")' ></TD></TR>");
|
|
writeln('</SELECT></TD></TR></TABLE>');
|
|
writeln('<INPUT TYPE="submit" value="Buscar">');
|
|
if (!request.waux) {
|
|
refHtml="l_prevision.html?"+baseHtml+"&search2=";
|
|
}
|
|
else {
|
|
refHtml="l_prevision.html?waux="+request.waux+"&"+baseHtml+"&search2=";
|
|
}
|
|
LoadHidden(refHtml);
|
|
writeln('</FORM>');
|
|
writeln("<CENTER>");
|
|
if (!request.waux)
|
|
writeSignature(true);
|
|
if (request.gofunc) {
|
|
writeln('-->');
|
|
}
|
|
else {
|
|
writeln('</BODY>');
|
|
writeln('</HTML>');
|
|
}
|
|
</SERVER>
|