474 lines
28 KiB
HTML
474 lines
28 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
|
|
<HTML>
|
|
<HEAD>
|
|
<TITLE>id</TITLE>
|
|
<META NAME="GENERATOR" CONTENT="AdmiSys Sistemas informáticos">
|
|
<META NAME="Author" CONTENT="WebTeam">
|
|
<META NAME="Organization" CONTENT="AdmiSys S.L.">
|
|
<META NAME="Document description" CONTENT="Alta y Modificación de Parámetors">
|
|
<META NAME="Last modified date" CONTENT="Thursday, February 06, 1997 07:33:31">
|
|
</HEAD>
|
|
<SCRIPT SRC="global.js">
|
|
</SCRIPT>
|
|
<SCRIPT SRC="ctasapagar.js">
|
|
</SCRIPT>
|
|
<SCRIPT LANGUAGE="JavaScript">
|
|
function FormPaint(obj) {
|
|
document.f_parametros.action=top.main.document.location.href+"&cookie=1&lock=true";
|
|
document.f_parametros.submit();
|
|
}
|
|
function Chek_fields(obj) {
|
|
if ( emptyField(obj.pa_id) == true ) {
|
|
alert("!!! Es necesario rellenar el Código de parametros a Contables !!!->"+obj.pa_id.value+"<-");
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
function Check_dia_1(obj) {
|
|
var mainFrame=find_frame(top,"main");
|
|
var f_frame=mainFrame.document.f_parametros;
|
|
nro=parseInt(obj.value);
|
|
if (nro <1 || nro > 31 ) {
|
|
alert("¡¡¡ Nro. de día debe estar entre 1 y 31 !!!")
|
|
obj.focus();
|
|
}
|
|
if (nro > parseInt(f_frame.pa_dia_pago_2.value)) {
|
|
alert("¡¡¡ Nro. de día pago 1 no puede ser mayor que el día pago 2 !!!")
|
|
obj.focus();
|
|
}
|
|
}
|
|
function Check_dia_2(obj) {
|
|
var mainFrame=find_frame(top,"main");
|
|
var f_frame=mainFrame.document.f_parametros;
|
|
nro=parseInt(obj.value);
|
|
if (nro <1 || nro > 31 ) {
|
|
alert("¡¡¡ Nro. de día debe estar entre 1 y 31 !!!")
|
|
obj.focus();
|
|
}
|
|
if (nro < parseInt(f_frame.pa_dia_pago_1.value)) {
|
|
alert("¡¡¡ Nro. de día pago 2 no puede ser menor que el día pago 1 !!!")
|
|
obj.focus();
|
|
}
|
|
}
|
|
|
|
</SCRIPT>
|
|
<SERVER>
|
|
// Variables para el Server
|
|
var HOY=new Date();
|
|
var entorno = new entObj(0);
|
|
// Algunos formatos para fechas.
|
|
var NLDF=""; // para columnas en las queries INFORMIX
|
|
var IFDF=""; // para columnas en SQL según DBDATE
|
|
var baseHtml="";
|
|
dbAcl();
|
|
if ((!request.waux && request.lock) || request.nvo )
|
|
LoadParametros();
|
|
writeln("<SCRIPT LANGUAGE='JavaScript'>");
|
|
if ((!request.waux && request.lock) || request.nvo )
|
|
SetParametros();
|
|
if ( request.FrameType == "F" || request.FrameType == "T" ) {
|
|
writeln('function RunFunction(obj,valor,parametros,f_nro) {');
|
|
writeln(' var mainFrame=find_frame(top,"main");');
|
|
writeln(' var f_frame=mainFrame.document.f_parametros;');
|
|
writeln(' if ( obj == "Ayuda" ) {');
|
|
writeln(' NetHelp(valor);');
|
|
writeln(' }');
|
|
writeln(' history.back();');
|
|
writeln('}');
|
|
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;');
|
|
ObjButtons(request.pa_id,"parametros","pa_");
|
|
}
|
|
writeln('}');
|
|
}
|
|
if ( request.ViewFkey == "S" ) {
|
|
writeln('function RePaint(obj) {');
|
|
writeln(' var mainFrame=find_frame(top,"main");');
|
|
writeln(' for ( var i=0; i < document.f_parametros.length; i++ ) { ');
|
|
writeln(' if ( document.f_parametros.elements[i].name == obj.name ) ');
|
|
writeln(' break; ');
|
|
writeln(' } ');
|
|
writeln(' document.f_parametros.action=mainFrame.document.location.href+"&cookie=1&nro="+i+"&lock=true"');
|
|
writeln(' document.f_parametros.submit();');
|
|
writeln('} ');
|
|
}
|
|
else {
|
|
writeln('function RePaint(obj) {');
|
|
writeln('} ');
|
|
}
|
|
writeln('function Enfoca(obj) {')
|
|
if ( request.nro ) {
|
|
writeln('document.f_parametros.elements['+request.nro+'].focus();');
|
|
}
|
|
writeln('}');
|
|
writeln("</SCRIPT>");
|
|
if (request.gofunc)
|
|
writeln(' <BODY OnLoad="RunFunction(\''+request.gofunc+'\',\''+request.valor+'\',\''+request.nvo+'\','+request.nro+')"');
|
|
else {
|
|
if ( request.FrameType == "F" || request.FrameType == "T" )
|
|
writeln(' <BODY OnLoad="WriteFrameButtons()"');
|
|
else
|
|
writeln(' <BODY');
|
|
}
|
|
writeln(' BACKGROUND="images/backgrnd.gif">');
|
|
if (request.gofunc) {
|
|
writeln(' </BODY>');
|
|
writeln(' </HTML>');
|
|
writeln(' <!--');
|
|
}
|
|
if (!request.cookie && !request.gofunc) {
|
|
dbConnect();
|
|
// Vemos que tarea hay que ejecutar:
|
|
if (request.add) {
|
|
if ( entriesExist(" from parametros where id=\'"+StringClip(true,request.pa_id)+"\'") == true ){
|
|
redirect("alertpage.html?alert=2");
|
|
}
|
|
else {
|
|
status=database.execute("INSERT INTO parametros (" +
|
|
" nro_reg," +
|
|
" ultimo_actual," +
|
|
" nro_remesa," +
|
|
" iva_1," +
|
|
" iva_2," +
|
|
" iva_3," +
|
|
" reten_1," +
|
|
" cta_reten_1," +
|
|
" clave_reten_1," +
|
|
" reten_2," +
|
|
" cta_reten_2," +
|
|
" clave_reten_2," +
|
|
" dia_pago_1," +
|
|
" dia_pago_2," +
|
|
" ex_dia_pago," +
|
|
" longcta," +
|
|
" cta_iva," +
|
|
" clave_iva," +
|
|
" cta_cont," +
|
|
" clave_cont," +
|
|
" cta_comp," +
|
|
" clave_comp," +
|
|
" cta_coniva," +
|
|
" clave_coniva," +
|
|
" cta_siniva," +
|
|
" clave_siniva," +
|
|
" cta_dev," +
|
|
" clave_dev,"+
|
|
" cp_lock ) VALUES ('" +
|
|
StringClip(true,request.pa_nro_reg) + "','" +
|
|
DateFormat(request.pa_ultimo_actual,NLDF) + "','"+
|
|
StringClip(true,request.pa_nro_remesa) + "','" +
|
|
request.pa_iva_1 + "','" +
|
|
request.pa_iva_2 + "','" +
|
|
request.pa_iva_3 + "','" +
|
|
request.pa_reten_1 + "','" +
|
|
StringClip(true,request.pa_cta_reten_1) + "','" +
|
|
StringClip(true,request.pa_clave_reten_1) + "','" +
|
|
request.pa_reten_2 + "','" +
|
|
StringClip(true,request.pa_cta_reten_2) + "','" +
|
|
StringClip(true,request.pa_clave_reten_2) + "','" +
|
|
request.pa_dia_pago_1 + "','" +
|
|
request.pa_dia_pago_2 + "','" +
|
|
StringClip(true,request.pa_ex_dia_pago) + "','" +
|
|
request.pa_longcta + "','" +
|
|
StringClip(true,request.pa_cta_iva) + "','" +
|
|
StringClip(true,request.pa_clave_iva) + "','" +
|
|
StringClip(true,request.pa_cta_cont) + "','" +
|
|
StringClip(true,request.pa_clave_cont) + "','" +
|
|
StringClip(true,request.pa_cta_comp) + "','" +
|
|
StringClip(true,request.pa_clave_comp) + "','" +
|
|
StringClip(true,request.pa_cta_coniva) + "','" +
|
|
StringClip(true,request.pa_clave_coniva) + "','" +
|
|
StringClip(true,request.pa_cta_siniva) + "','" +
|
|
StringClip(true,request.pa_clave_siniva) + "','" +
|
|
StringClip(true,request.pa_cta_dev) + "','" +
|
|
StringClip(true,request.pa_clave_dev) + "','" +
|
|
StringClip(true,request.pa_cp_lock) + "')");
|
|
if ( status != 0 )
|
|
redirect(addClient('error.html?alert=5'));
|
|
DbsError(true,status);
|
|
}
|
|
redirect(addClient("o_parame.html?pa_id=1&"+baseHtml));
|
|
}
|
|
//Ejecuta una actualización de la fila sobre la fila actual ...
|
|
if (request.upd && request.pa_id) {
|
|
// if (request.lock)
|
|
// c_parametros.close();
|
|
status=database.execute("UPDATE parametros SET "+
|
|
" nro_reg='" + StringClip(true,request.pa_nro_reg) + "',"+
|
|
" ultimo_actual='" + DateFormat(request.pa_ultimo_actual,NLDF) + "',"+
|
|
" nro_remesa='" + StringClip(true,request.pa_nro_remesa) + "',"+
|
|
" iva_1='" + request.pa_iva_1 + "',"+
|
|
" iva_2='" + request.pa_iva_2 + "',"+
|
|
" iva_3='" + request.pa_iva_3 + "',"+
|
|
" reten_1='" + request.pa_reten_1 + "',"+
|
|
" cta_reten_1='" + StringClip(true,request.pa_cta_reten_1) + "',"+
|
|
" clave_reten_1='" + StringClip(true,request.pa_clave_reten_1) + "',"+
|
|
" reten_2='" + request.pa_reten_2 + "',"+
|
|
" cta_reten_2='" + StringClip(true,request.pa_cta_reten_2) + "',"+
|
|
" clave_reten_2='" + StringClip(true,request.pa_clave_reten_2) + "',"+
|
|
" dia_pago_1='" + request.pa_dia_pago_1 + "',"+
|
|
" dia_pago_2='" + request.pa_dia_pago_2 + "',"+
|
|
" ex_dia_pago='" + StringClip(true,request.pa_ex_dia_pago) + "',"+
|
|
" longcta='" + request.pa_longcta + "',"+
|
|
" cta_iva='" + StringClip(true,request.pa_cta_iva) + "',"+
|
|
" clave_iva='" + StringClip(true,request.pa_clave_iva) + "',"+
|
|
" cta_cont='" + StringClip(true,request.pa_cta_cont) + "',"+
|
|
" clave_cont='" + StringClip(true,request.pa_clave_cont) + "',"+
|
|
" cta_comp='" + StringClip(true,request.pa_cta_comp) + "',"+
|
|
" clave_comp='" + StringClip(true,request.pa_clave_comp) + "',"+
|
|
" cta_coniva='" + StringClip(true,request.pa_cta_coniva) + "',"+
|
|
" clave_coniva='" + StringClip(true,request.pa_clave_coniva) + "',"+
|
|
" cta_siniva='" + StringClip(true,request.pa_cta_siniva) + "',"+
|
|
" clave_siniva='" + request.pa_clave_siniva + "',"+
|
|
" cta_dev='" + request.pa_cta_dev + "',"+
|
|
" clave_dev='" + request.pa_clave_dev + "',"+
|
|
" cp_lock='" + request.pa_cp_lock + "'"+
|
|
" WHERE id = '" + request.pa_id + "'" );
|
|
if ( status != 0 )
|
|
redirect(addClient('error.html?alert=6'));
|
|
DbsError(true,status);
|
|
redirect(addClient("o_parame.html?pa_id=1&"+baseHtml));
|
|
}
|
|
//Ejecuta un borrado de la fila actual ...
|
|
if (request.del) {
|
|
// status=database.execute("DELETE FROM parametros WHERE id = \'" + request.pa_id + "\'");
|
|
// if ( status != 0 )
|
|
// redirect(addClient('error.html?alert=7'));
|
|
//
|
|
// DbsError(true,status);
|
|
redirect(addClient("o_parame.html?pa_id=1&"+baseHtml));
|
|
}
|
|
if (request.pa_id && !request.upd && !request.add ) {
|
|
// Si hay parametros de la tabla seleccionamos los datos ....
|
|
//Si se busca la fila ... usando la parametros primaria de la relación
|
|
if (request.lock)
|
|
CursorTabla("pa","id","=\'"+request.pa_id+"\'",true,true);
|
|
else
|
|
CursorTabla("pa","id","=\'"+request.pa_id+"\'",true,"");
|
|
// Asignamos a request todas las columnas necesarias para el form.
|
|
request.pa_ultimo_actual=datetoString(c_parametros.ultimo_actual);
|
|
request.pa_nro_reg = StringClip(false,c_parametros.nro_reg);
|
|
request.pa_nro_remesa = StringClip(false,c_parametros.nro_remesa);
|
|
request.pa_longcta = c_parametros.longcta;
|
|
request.pa_dia_pago_1 = c_parametros.dia_pago_1;
|
|
request.pa_dia_pago_2 = c_parametros.dia_pago_2;
|
|
request.pa_ex_dia_pago = c_parametros.ex_dia_pago;
|
|
request.pa_iva_1 = c_parametros.iva_1;
|
|
request.pa_iva_2 = c_parametros.iva_2;
|
|
request.pa_iva_3 = c_parametros.iva_3;
|
|
request.pa_reten_1 = c_parametros.reten_1;
|
|
request.pa_cta_reten_1 = StringClip(false,c_parametros.cta_reten_1);
|
|
request.pa_clave_reten_1 = StringClip(false,c_parametros.clave_reten_1);
|
|
request.pa_reten_2 = c_parametros.reten_2;
|
|
request.pa_cta_reten_2 = StringClip(false,c_parametros.cta_reten_2);
|
|
request.pa_clave_reten_2 = StringClip(false,c_parametros.clave_reten_2);
|
|
request.pa_cta_iva = StringClip(false,c_parametros.cta_iva);
|
|
request.pa_clave_iva = StringClip(false,c_parametros.clave_iva);
|
|
request.pa_cta_cont = StringClip(false,c_parametros.cta_cont);
|
|
request.pa_clave_cont = StringClip(false,c_parametros.clave_cont);
|
|
request.pa_cta_comp = StringClip(false,c_parametros.cta_comp);
|
|
request.pa_clave_comp = StringClip(false,c_parametros.clave_comp);
|
|
request.pa_cta_coniva = StringClip(false,c_parametros.cta_coniva);
|
|
request.pa_clave_coniva = StringClip(false,c_parametros.clave_coniva);
|
|
request.pa_cta_siniva = StringClip(false,c_parametros.cta_siniva);
|
|
request.pa_clave_siniva = StringClip(false,c_parametros.clave_siniva);
|
|
request.pa_cta_dev = StringClip(false,c_parametros.cta_dev);
|
|
request.pa_clave_dev = StringClip(false,c_parametros.clave_dev);
|
|
request.pa_cp_lock = StringClip(false,c_parametros.cp_lock);
|
|
if (!request.lock)
|
|
c_parametros.close();
|
|
}
|
|
else {
|
|
// Estos son los Defaults Reales del Form ... Aquí pueden cambiarse ...
|
|
IniciaRequest("pa_");
|
|
request.lock=true;
|
|
}
|
|
}
|
|
else if (!request.gofunc) {
|
|
// Se entiende que request contiene todas las columnas necesarias para el form.
|
|
// y que esta llamada es para leer y cargar las parametros foráneas de la tabla.
|
|
if (request.nvo && request.pa_id && request.pa_id != null ) {
|
|
if ( entriesExist(" from parametros where id=\'"+StringClip(true,request.pa_id)+"\'") == true ) {
|
|
redirect("alertpage.html?alert=2");
|
|
}
|
|
}
|
|
}
|
|
writeln('<FORM NAME="f_parametros" METHOD="post"');
|
|
if (request.pa_id && !request.nvo )
|
|
htmlpath="o_parame.html?pa_id="+request.pa_id+"&"+baseHtml;
|
|
else
|
|
htmlpath="o_parame.html?nvo=1"+baseHtml;
|
|
writeln('action="'+htmlpath+'"');
|
|
writeln(' onSubmit="return Chek_fields(this)">');
|
|
LoadHidden(htmlpath);
|
|
if (!request.waux && request.FrameType == "L" )
|
|
ObjHeadBar(request.pa_id,"parametros","pa_");
|
|
writeln('<CENTER>');
|
|
writeln('<TABLE BORDER=1 ALIGN=CENTER><TR>');
|
|
//if (request.waux == 2)
|
|
// writeln('<TD></TD><TD align="right" valign="top"><A HREF="javascript:top.close()"><IMG SRC="images/exit1.gif" BORDER=0 HEIGHT=37 WIDTH=44></A></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGHT><B> Código parametros: </B></TD>');
|
|
//}
|
|
|
|
if (request.pa_id && !request.nvo)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_id+'</B></FONT><INPUT type="hidden" name="pa_id" VALUE="'+request.pa_id+'"></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_id" VALUE="'+request.pa_id+'" SIZE=3 OnChange="RePaint(this)"></TD></TR>');
|
|
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Nro.Registro Facturas: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_nro_reg+'</FONT></B><INPUT type="hidden" NAME="pa_nro_reg" VALUE="'+request.pa_nro_reg+'" SIZE=10 maxlength=10 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_nro_reg" VALUE="'+request.pa_nro_reg+'" SIZE=10 maxlength=10 ></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Fecha Ult.Modificación: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_ultimo_actual+'</FONT></B><INPUT type="hidden" NAME="pa_ultimo_actual" VALUE="'+request.pa_ultimo_actual+'" SIZE=10 maxlength=10 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_ultimo_actual" VALUE="'+request.pa_ultimo_actual+'" onBlur="ToStringDate(this,IFDF)" onFocus="UnfrmtStrDate(this,IFDF)" SIZE=10 maxlength=10 ></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Nro.Remesa Vtos.: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_nro_remesa+'</FONT></B><INPUT type="hidden" NAME="pa_nro_remesa" VALUE="'+request.pa_nro_remesa+'" SIZE=10 maxlength=10 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_nro_remesa" VALUE="'+request.pa_nro_remesa+'" SIZE=10 maxlength=10 ></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> % I.V.A. Tipo Uno: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_iva_1+'</FONT></B><INPUT type="hidden" NAME="pa_iva_1" VALUE="'+request.pa_iva_1+'" SIZE=2 maxlength=2 >%</FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_iva_1" VALUE="'+request.pa_iva_1+'" OnChange="isNroThis(this)" SIZE=2 maxlength=2 >%</TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> % I.V.A. Tipo Dos: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_iva_2+'</FONT></B><INPUT type="hidden" NAME="pa_iva_2" VALUE="'+request.pa_iva_2+'" SIZE=2 maxlength=2 >%</FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_iva_2" VALUE="'+request.pa_iva_2+'" OnChange="isNroThis(this)" SIZE=2 maxlength=2 >%</TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> % I.V.A. Tipo Tres: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_iva_3+'</FONT></B><INPUT type="hidden" NAME="pa_iva_3" VALUE="'+request.pa_iva_3+'" SIZE=2 maxlength=2 >%</FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_iva_3" VALUE="'+request.pa_iva_3+'" OnChange="isNroThis(this)" SIZE=2 maxlength=2 >%</TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> % I.R.P.F.: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_reten_1+'</FONT></B><INPUT type="hidden" NAME="pa_reten_1" VALUE="'+request.pa_reten_1+'" SIZE=2 maxlength=2 >%</FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_reten_1" VALUE="'+request.pa_reten_1+'" OnChange="isNroThis(this)" SIZE=2 maxlength=2 >%</TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. para Retenciones I.R.P.F.: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_reten_1+'</FONT></B><INPUT type="hidden" NAME="pa_cta_reten_1" VALUE="'+request.pa_cta_reten_1+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_reten_1+'</FONT></B><INPUT type="hidden" NAME="pa_clave_reten_1" VALUE="'+request.pa_clave_reten_1+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_reten_1" VALUE="'+request.pa_cta_reten_1+'" OnChange="CtaNroPad(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_reten_1" VALUE="'+request.pa_clave_reten_1+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> % Garantía: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_reten_2+'</FONT></B><INPUT type="hidden" NAME="pa_reten_2" VALUE="'+request.pa_por_reten+'" SIZE=2 maxlength=2 >%</FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_reten_2" VALUE="'+request.pa_reten_2+'" OnChange="isNroThis(this)" SIZE=2 maxlength=2 >%</TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. para Garantía: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_reten_2+'</FONT></B><INPUT type="hidden" NAME="pa_cta_reten_2" VALUE="'+request.pa_cta_reten_2+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_reten_2+'</FONT></B><INPUT type="hidden" NAME="pa_clave_reten_2" VALUE="'+request.pa_clave_reten_2+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_reten_2" VALUE="'+request.pa_cta_reten_2+'" OnChange="CtaNroPad(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_reten_2" VALUE="'+request.pa_clave_reten_2+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Nro. Día de Pago Uno del Mes: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_dia_pago_1+'</FONT></B><INPUT type="hidden" NAME="pa_dia_pago_1" VALUE="'+request.pa_dia_pago_1+'" SIZE=2 maxlength=2 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_dia_pago_1" VALUE="'+request.pa_dia_pago_1+'" OnChange="Check_dia_1(this)" SIZE=2 maxlength=2 ></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Nro. Día de Pago Dos del Mes: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_dia_pago_2+'</FONT></B><INPUT type="hidden" NAME="pa_dia_pago_2" VALUE="'+request.pa_dia_pago_2+'" SIZE=2 maxlength=2 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_dia_pago_2" VALUE="'+request.pa_dia_pago_2+'" OnChange="Check_dia_2(this)" SIZE=2 maxlength=2 ></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Días a excluir de Pago: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_ex_dia_pago+'</FONT></B><INPUT type="hidden" NAME="pa_ex_dia_pago" VALUE="'+request.pa_ex_dia_pago+'" SIZE=12 maxlength=12 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_ex_dia_pago" VALUE="'+request.pa_ex_dia_pago+'" SIZE=12 maxlength=12 ></TD></TR>');
|
|
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Longitud de Cuentas Plan Contable: </B></TD>');
|
|
if (request.waux || !request.lock)
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_longcta+'</FONT></B><INPUT type="hidden" NAME="pa_longcta" VALUE="'+request.pa_longcta+'" SIZE=2 maxlength=2 ></FONT></TD></TR>');
|
|
else
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_longcta" VALUE="'+request.pa_longcta+'" SIZE=2 maxlength=2 ></TD></TR>');
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. Contable Empieza por: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_cont+'</FONT></B><INPUT type="hidden" NAME="pa_cta_cont" VALUE="'+request.pa_cta_cont+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_cont+'</FONT></B><INPUT type="hidden" NAME="pa_clave_cont" VALUE="'+request.pa_clave_cont+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_cont" VALUE="'+request.pa_cta_cont+'" OnChange="isNroThis(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_cont" VALUE="'+request.pa_clave_cont+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cuenta de I.V.A. : </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_iva+'</FONT></B><INPUT type="hidden" NAME="pa_cta_iva" VALUE="'+request.pa_cta_iva+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_iva+'</FONT></B><INPUT type="hidden" NAME="pa_clave_iva" VALUE="'+request.pa_clave_iva+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_iva" VALUE="'+request.pa_cta_iva+'" OnChange="CtaNroPad(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_iva" VALUE="'+request.pa_clave_iva+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. para Gastos de Compensación: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_comp+'</FONT></B><INPUT type="hidden" NAME="pa_cta_comp" VALUE="'+request.pa_cta_comp+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_comp+'</FONT></B><INPUT type="hidden" NAME="pa_clave_comp" VALUE="'+request.pa_clave_comp+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_comp" VALUE="'+request.pa_cta_comp+'" OnChange="CtaNroPad(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_comp" VALUE="'+request.pa_clave_comp+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. para Gastos con I.V.A.: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_coniva+'</FONT></B><INPUT type="hidden" NAME="pa_cta_coniva" VALUE="'+request.pa_cta_coniva+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_coniva+'</FONT></B><INPUT type="hidden" NAME="pa_clave_coniva" VALUE="'+request.pa_clave_coniva+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_coniva" VALUE="'+request.pa_cta_coniva+'" OnChange="CtaNroPad(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_coniva" VALUE="'+request.pa_clave_coniva+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. para Gastos sin I.V.A.: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_siniva+'</FONT></B><INPUT type="hidden" NAME="pa_cta_siniva" VALUE="'+request.pa_cta_siniva+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_siniva+'</FONT></B><INPUT type="hidden" NAME="pa_clave_siniva" VALUE="'+request.pa_clave_siniva+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_siniva" VALUE="'+request.pa_cta_siniva+'" OnChange="CtaNroPad(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_siniva" VALUE="'+request.pa_clave_siniva+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Cta. Para Gastos Devolucion: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cta_dev+'</FONT></B><INPUT type="hidden" NAME="pa_cta_dev" VALUE="'+request.pa_cta_dev+'" SIZE=12 maxlength=12 ></FONT></TD>');
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_clave_dev+'</FONT></B><INPUT type="hidden" NAME="pa_clave_dev" VALUE="'+request.pa_clave_dev+'" SIZE=3 maxlength=3 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cta_dev" VALUE="'+request.pa_cta_dev+'" OnChange="isNroThis(this);//RePaint(this)" SIZE=12 maxlength=12 ></TD>');
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_clave_dev" VALUE="'+request.pa_clave_dev+'" SIZE=3 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('<TR><TD ALIGN=RIGTH><B> Condición de Pago Bloqueado: </B></TD>');
|
|
if (request.waux || !request.lock) {
|
|
writeln('<TD ALIGN=RIGTH><FONT COLOR="#800040"><B>'+request.pa_cp_lock+'</FONT></B><INPUT type="hidden" NAME="pa_cp_lock" VALUE="'+request.pa_cp_lock+'" SIZE=4 maxlength=4 ></FONT></TD></TR>');
|
|
}
|
|
else {
|
|
writeln('<TD ALIGN=RIGTH><INPUT TYPE="text" NAME="pa_cp_lock" VALUE="'+request.pa_cp_lock+'" SIZE=4 maxlength=3 ></TD></TR>');
|
|
}
|
|
writeln('</TABLE></FORM>');
|
|
if (!request.waux) {
|
|
writeSignature(true);
|
|
}
|
|
if (request.gofunc) {
|
|
writeln('-->');
|
|
}
|
|
else {
|
|
writeln('</BODY>');
|
|
writeln('</HTML>');
|
|
}
|
|
</SERVER>
|