";
}
function uf_agregarlineablancascg(&$aa_objectscg,$ai_totrowsscg)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_agregarlineablancascg
// Access: private
// Argumento: $aa_objectscg // arreglo de titulos
// $ai_totrowsscg // ultima fila pintada en el grid
// Returns:
// Description: Funcion que agrega una linea en blanco al final del grid de cuenta contable
// Creado Por: Ing. Luis Anibal Lang
// Fecha Creación: 23/03/2006 Fecha Última Modificación : 23/03/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$aa_objectscg[$ai_totrowsscg][1] = "";
$aa_objectscg[$ai_totrowsscg][2] = "";
$aa_objectscg[$ai_totrowsscg][3] = "";
$aa_objectscg[$ai_totrowsscg][4] = "";
$aa_objectscg[$ai_totrowsscg][5] = "";
$aa_objectscg[$ai_totrowsscg][6] = "";
}
function uf_pintardetalle(&$lo_object,&$ai_totrows,&$ai_montot)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_pintardetalle
// Access: private
// Argumento: $aa_object // arreglo de objetos
// $ai_totrows // ultima fila pintada en el grid
// $ai_montot // monto total del grid
// Returns:
// Description: Funcion que se encarga de repintar el detalle existente en el grid.
// Creado Por: Ing. Luis Anibal Lang
// Fecha Creación: 11/04/2006 Fecha Última Modificación : 11/04/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$lb_valido=false;
$ls_codact= $_POST["txtcodact1"];
if($ls_codact!="")
{
for($li_i=1;$li_i<$ai_totrows;$li_i++)
{
$lb_valido=true;
$ls_codact= $_POST["txtcodact".$li_i];
$ls_idact= $_POST["txtidact".$li_i];
$ls_desmov= $_POST["txtdesmov".$li_i];
$li_monact= $_POST["txtmonact".$li_i];
$li_monactaux= str_replace(".","",$li_monact);
$li_monactaux= str_replace(",",".",$li_monactaux);
$ai_montot=$ai_montot + $li_monactaux;
if($ls_codact=="")
{
$ai_totrows=$ai_totrows - 1;
// $lb_valido=false;
break;
}
$lo_object[$li_i][1]="";
$lo_object[$li_i][2]="";
$lo_object[$li_i][3]="";
$lo_object[$li_i][4]="";
$lo_object[$li_i][5]="";
}
uf_agregarlineablanca($lo_object,$ai_totrows);
}
if(!$lb_valido)
{
$ai_totrows=1;
uf_agregarlineablanca($lo_object,$ai_totrows);
}
}
function uf_pintardetallescg(&$ao_objectscg,$ai_totrowsscg,&$ai_totdeb,&$ai_tothab)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_pintardetallescg
// Access: private
// Argumento: $ao_objectscg // arreglo de objetos
// $ai_totrowsscg // ultima fila pintada en el grid de cuentas contables
// $ai_totdeb // monto total del grid por el debe
// $ai_tothab // monto total del grid por el haber
// Returns:
// Description: Funcion que se encarga de repintar el detalle existente en el grid de cuentas contables.
// Creado Por: Ing. Luis Anibal Lang
// Fecha Creación: 11/04/2006 Fecha Última Modificación : 11/04/2006
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
for($li_i=1;$li_i<$ai_totrowsscg;$li_i++)
{
$ls_sccuenta= $_POST["txtcontable".$li_i];
$ls_cuentaact= $_POST["txtcuentaact".$li_i];
$ls_cuentaide= $_POST["txtcuentaide".$li_i];
$ls_docscg= $_POST["txtdocscg".$li_i];
$ls_debhab= $_POST["txtdebhab".$li_i];
$li_montocont= $_POST["txtmontocont".$li_i];
$ls_descripcion= $_POST["txtdescripcion".$li_i];
$li_montocontaux= str_replace(".","",$li_montocont);
$li_montocontaux= str_replace(",",".",$li_montocontaux);
if($ls_debhab=="D")
{
$ai_totdeb=$ai_totdeb+$li_montocontaux;
}
else
{
$ai_tothab=$ai_tothab+$li_montocontaux;
}
$ao_objectscg[$li_i][1] = "";
$ao_objectscg[$li_i][2] = "";
$ao_objectscg[$li_i][3] = "";
$ao_objectscg[$li_i][4] = " ";
$ao_objectscg[$li_i][5] = "";
$ao_objectscg[$li_i][6] = "";
}
uf_agregarlineablancascg($lo_objectscg,$ai_totrowsscg);
}
?>
 |
||||||||||||||
|
||||||||||||||
 |
 |
 |
 |
 |
 |
 |
||||||||
";
}
else
{
$li_rowdelete= 0;
}
}
uf_pintardetallescg($lo_objectscg,$li_totrowsscg,$li_totdeb,$li_tothab);
$li_diferencia=abs($li_totdeb-$li_tothab);
uf_agregarlineablancascg($lo_objectscg,$li_totrowsscg);
if ($li_temp==0)
{
$li_totrows=1;
//uf_agregarlineablanca($lo_object,$li_totrows);
}
uf_agregarlineablanca($lo_object,$li_totrows);
break;
case "ELIMINARDETALLESCG":
uf_limpiarvariables();
$li_totrows = uf_obtenervalor("totalfilas",1);
$li_totrowsscg = uf_obtenervalor("totalfilasscg",1);
$ls_cmpmov=$_POST["txtcmpmov"];
$ls_codcau=$_POST["txtcodcau"];
$ls_dencau=$_POST["txtdencau"];
$ld_feccmp=$_POST["txtfeccmp"];
$ls_descmp=$_POST["txtdescmp"];
$li_totrowsscg=$li_totrowsscg-1;
$li_rowdelete=$_POST["filadelete"];
$li_temp=0;
uf_pintardetalle($lo_object,$li_totrows,$li_montot);
for($li_i=1;$li_i<=$li_totrowsscg;$li_i++)
{
if($li_i!=$li_rowdelete)
{
$li_temp=$li_temp+1;
$ls_sccuenta= $_POST["txtcontable".$li_i];
$ls_cuentaact= $_POST["txtcuentaact".$li_i];
$ls_cuentaide= $_POST["txtcuentaide".$li_i];
$ls_docscg= $_POST["txtdocscg".$li_i];
$ls_debhab= $_POST["txtdebhab".$li_i];
$li_montocont= $_POST["txtmontocont".$li_i];
$ls_descripcion= $_POST["txtdescripcion".$li_i];
$li_montocontaux= str_replace(".","",$li_montocont);
$li_montocontaux= str_replace(",",".",$li_montocontaux);
if($ls_debhab=="D")
{
$li_totdeb=$li_totdeb+$li_montocontaux;
}
else
{
$li_tothab=$li_tothab+$li_montocontaux;
}
$lo_objectscg[$li_temp][1] = "";
$lo_objectscg[$li_temp][2] = "";
$lo_objectscg[$li_temp][3] = "";
$lo_objectscg[$li_temp][4] = " ";
$lo_objectscg[$li_temp][5] = "";
$lo_objectscg[$li_temp][6] = "";
}
else
{
$li_rowdelete= 0;
}
}
$li_diferencia=abs($li_totdeb-$li_tothab);
uf_agregarlineablancascg($lo_objectscg,$li_totrowsscg);
if ($li_temp==0)
{
$li_totrowsscg=1;
}
uf_agregarlineablancascg($lo_objectscg,$li_totrowsscg);
break;
case "BUSCARDETALLE":
uf_limpiarvariables();
$ls_cmpmov=$_POST["txtcmpmov"];
$ls_codcau=$_POST["txtcodcau"];
$ld_feccmp=$_POST["txtfeccmp"];
$ls_estpromov=$_POST["hidestpromov"];
$ld_feccmpbd=$io_fun->uf_convertirdatetobd($ld_feccmp);
$lb_valido=$io_saf->uf_siv_load_dt_movimiento($ls_codemp,$ls_cmpmov,$ld_feccmpbd,$li_totrows,$lo_object,$li_montot);
if ($lb_valido)
{
$lb_valido=$io_saf->uf_siv_load_dt_movimientocontable($ls_codemp,$ls_cmpmov,$ld_feccmpbd,$ls_codcau,$li_totrowsscg,
$lo_objectscg,$li_totdeb,$li_tothab);
}
break;
}
?>