| APERTURA DE CUENTAS |
>
| > |
|
>
|
|
>
|
|
>
> |
|
>
> |
|
| |
|
|
|
|
message(" Seleccione el intervalo de Cuentas de Ingreso ..... ");
$valido = false;
}
$datos['spi_cuenta_desde'] = $_POST['txtcuentades'];
$datos['spi_cuenta_hasta'] = $_POST['txtcuentahas'];
if($li_estmodest==2)
{
$ls_codestpro1=$fun->uf_cerosizquierda($ls_codestpro1,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro2=$fun->uf_cerosizquierda($ls_codestpro2,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro3=$fun->uf_cerosizquierda($ls_codestpro3,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro4=$fun->uf_cerosizquierda($ls_codestpro4,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro5=$fun->uf_cerosizquierda($ls_codestpro5,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$estprog[0] = $ls_codestpro1;
$estprog[1] = $ls_codestpro2;
$estprog[2] = $ls_codestpro3;
$estprog[3] = $ls_codestpro4;
$estprog[4] = $ls_codestpro5;
$estprog[5] = $ls_estcla;
}
else
{
$ls_codestpro1=$fun->uf_cerosizquierda($ls_codestpro1,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro2=$fun->uf_cerosizquierda($ls_codestpro2,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro3=$fun->uf_cerosizquierda($ls_codestpro3,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro4=$fun->uf_cerosizquierda(0,25);
$ls_codestpro5=$fun->uf_cerosizquierda(0,25);
$estprog[0] = $fun->uf_cerosizquierda($ls_codestpro1,25);
$estprog[1] = $fun->uf_cerosizquierda($ls_codestpro2,25);
$estprog[2] = $fun->uf_cerosizquierda($ls_codestpro3,25);
$estprog[3] = $fun->uf_cerosizquierda(0,25);
$estprog[4] = $fun->uf_cerosizquierda(0,25);
$estprog[5] = $ls_estcla;
}
if($ls_estmodape==0 and $valido)
{
$lb_valido=$class_aper->uf_spi_procesar_apertura($la_seguridad);
if($lb_valido)
{
$rs_data=0;
if($li_estpreing=='0')
{
$lb_valido=$class_aper->uf_spi_load_cuentas_apertura($rs_data,$datos);
}
else
{
$lb_valido=$class_aper->uf_spi_load_cuentas_apertura_con_estructuras($ls_codestpro1,$ls_codestpro2,
$ls_codestpro3,$ls_codestpro4,
$ls_codestpro5,$ls_estcla,$rs_data,$datos);
}
if($lb_valido)
{
if($row=$SQL->fetch_row($rs_data))
{
$data=$SQL->obtener_datos($rs_data);
$ds_aper->data=$data;
$li_num=$ds_aper->getRowCount("spi_cuenta");
$li_totnum=$li_num;
for($i=1;$i<=$li_num;$i++)
{
$ls_cuenta =$data["spi_cuenta"][$i];
$ls_denominacion=$data["denominacion"][$i];
$ls_distribuir =$data["distribuir"][$i];
$ls_status =$data["status"][$i];
$ld_previsto =number_format($data["previsto"][$i],2,",",".");
$ld_enero =number_format($data["enero"][$i],2,",",".");
$ld_febrero =number_format($data["febrero"][$i],2,",",".");
$ld_marzo =number_format($data["marzo"][$i],2,",",".");
$ld_abril =number_format($data["abril"][$i],2,",",".");
$ld_mayo =number_format($data["mayo"][$i],2,",",".");
$ld_junio =number_format($data["junio"][$i],2,",",".");
$ld_julio =number_format($data["julio"][$i],2,",",".");
$ld_agosto =number_format($data["agosto"][$i],2,",",".");
$ld_septiembre =number_format($data["septiembre"][$i],2,",",".");
$ld_octubre =number_format($data["octubre"][$i],2,",",".");
$ld_noviembre =number_format($data["noviembre"][$i],2,",",".");
$ld_diciembre =number_format($data["diciembre"][$i],2,",",".");
$disabled='';
$color='FFFFFF';
if($ls_status=='S'){$disabled=' disabled readonly '; $color='CCCCCC';}
$object[$i][1]="
";
$object[$i][2]="";
$object[$i][3]="
";
}//for
$class_grid->makegrid($li_totnum,$title,$object,800,'APERTURA',$ls_nombre);
}//if
}
}
}
elseif($ls_estmodape==1)
{
?>
message(" Seleccione el intervalo de Cuentas de Ingreso ..... ");
$valido = false;
}
$datos['spi_cuenta_desde'] = $_POST['txtcuentades'];
$datos['spi_cuenta_hasta'] = $_POST['txtcuentahas'];
if($li_estmodest==2)
{
$ls_codestpro1=$fun->uf_cerosizquierda($ls_codestpro1,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro2=$fun->uf_cerosizquierda($ls_codestpro2,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro3=$fun->uf_cerosizquierda($ls_codestpro3,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro4=$fun->uf_cerosizquierda($ls_codestpro4,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro5=$fun->uf_cerosizquierda($ls_codestpro5,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
}
else
{
$ls_codestpro1=$fun->uf_cerosizquierda($ls_codestpro1,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro2=$fun->uf_cerosizquierda($ls_codestpro2,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro3=$fun->uf_cerosizquierda($ls_codestpro3,25); // CAMBIO DE TAMAÑO DE LA ESTRUCTURA PROGRAMATICA
$ls_codestpro4=$fun->uf_cerosizquierda(0,25);
$ls_codestpro5=$fun->uf_cerosizquierda(0,25);
}
if($ls_estmodape==1 and $valido)
{
$lb_valido=$class_aper->uf_spi_procesar_apertura($la_seguridad);
if($lb_valido)
{
$rs_data=0;
$lb_valido=$class_aper->uf_spi_load_cuentas_apertura($rs_data);
if($lb_valido)
{
if($row=$SQL->fetch_row($rs_data))
{
$data=$SQL->obtener_datos($rs_data);
$ds_aper->data=$data;
$li_num=$ds_aper->getRowCount("spi_cuenta");
$li_totnum=$li_num;
for($i=1;$i<=$li_num;$i++)
{
$ls_cuenta=$data["spi_cuenta"][$i];
$ls_denominacion=$data["denominacion"][$i];
$ls_distribuir=$data["distribuir"][$i];
$ld_previsto=number_format($data["previsto"][$i],2,",",".");
$ld_marzo=number_format($data["marzo"][$i],2,",",".");
$ld_junio=number_format($data["junio"][$i],2,",",".");
$ld_septiembre=number_format($data["septiembre"][$i],2,",",".");
$ld_diciembre=number_format($data["diciembre"][$i],2,",",".");
$ls_status =$data["status"][$i];
$disabled='';
$color='FFFFFF';
if($ls_status=='S'){$disabled=' disabled readonly '; $color='CCCCCC';}
$object[$i][1]="";
$object[$i][2]="";
$object[$i][3]="
";
}//for
$class_grid->makegrid($li_totnum,$title,$object,800,'APERTURA',$ls_nombre);
}//if
}
}
}
elseif($ls_estmodape==0)
{
?>
uf_cerosizquierda($ls_codestpro1,25);
$ls_codestpro2=$fun->uf_cerosizquierda($ls_codestpro2,25);
$ls_codestpro3=$fun->uf_cerosizquierda($ls_codestpro3,25);
$ls_codestpro4=$fun->uf_cerosizquierda($ls_codestpro4,25);
$ls_codestpro5=$fun->uf_cerosizquierda($ls_codestpro5,25);
$estprog[0] = $ls_codestpro1;
$estprog[1] = $ls_codestpro2;
$estprog[2] = $ls_codestpro3;
$estprog[3] = $ls_codestpro4;
$estprog[4] = $ls_codestpro5;
$estprog[5] = $ls_estcla;
}
else
{
$estprog[0] = $fun->uf_cerosizquierda($ls_codestpro1,25);
$estprog[1] = $fun->uf_cerosizquierda($ls_codestpro2,25);
$estprog[2] = $fun->uf_cerosizquierda($ls_codestpro3,25);
$estprog[3] = $fun->uf_cerosizquierda(0,25);
$estprog[4] = $fun->uf_cerosizquierda(0,25);
$estprog[5] = $ls_estcla;
}
$class_aper->codestpro1 = $estprog[0];
$class_aper->codestpro2 = $estprog[1];
$class_aper->codestpro3 = $estprog[2];
$class_aper->codestpro4 = $estprog[3];
$class_aper->codestpro5 = $estprog[4];
$class_aper->estcla = $estprog[5];
$la_empresa = $_SESSION["la_empresa"];
$class_aper->is_codemp = $la_empresa["codemp"];
$class_aper->is_procedencia = "SPIAPR";
$class_aper->is_comprobante = "0000000APERTURA";
$class_aper->ii_tipo_comp = 2;
$class_aper->is_ced_ben = "----------";
$class_aper->is_cod_prov = "----------";
$class_aper->is_tipo = "-";
$class_aper->is_descripcion = "APERTURA DE CUENTAS";
$class_aper->id_fecha = $la_empresa["periodo"];
$class_aper->as_codban = $ls_codban;
$class_aper->as_ctaban = $ls_ctaban;
$ld_previsto=str_replace('.','',$ld_previsto);
$ld_previsto=str_replace(',','.',$ld_previsto);
$ld_enero=str_replace('.','',$ld_enero);
$ld_enero=str_replace(',','.',$ld_enero);
$ld_febrero=str_replace('.','',$ld_febrero);
$ld_febrero=str_replace(',','.',$ld_febrero);
$ld_marzo=str_replace('.','',$ld_marzo);
$ld_marzo=str_replace(',','.',$ld_marzo);
$ld_abril=str_replace('.','',$ld_abril);
$ld_abril=str_replace(',','.',$ld_abril);
$ld_mayo=str_replace('.','',$ld_mayo);
$ld_mayo=str_replace(',','.',$ld_mayo);
$ld_junio=str_replace('.','',$ld_junio);
$ld_junio=str_replace(',','.',$ld_junio);
$ld_julio=str_replace('.','',$ld_julio);
$ld_julio=str_replace(',','.',$ld_julio);
$ld_agosto=str_replace('.','',$ld_agosto);
$ld_agosto=str_replace(',','.',$ld_agosto);
$ld_septiembre=str_replace('.','',$ld_septiembre);
$ld_septiembre=str_replace(',','.',$ld_septiembre);
$ld_octubre=str_replace('.','',$ld_octubre);
$ld_octubre=str_replace(',','.',$ld_octubre);
$ld_noviembre=str_replace('.','',$ld_noviembre);
$ld_noviembre=str_replace(',','.',$ld_noviembre);
$ld_diciembre=str_replace('.','',$ld_diciembre);
$ld_diciembre=str_replace(',','.',$ld_diciembre);
$lr_datos["spi_cuenta"][$i]=$ls_cuenta;
$lr_datos["denominacion"][$i]=$ls_denominacion;
$lr_datos["previsto"][$i]=$ld_previsto;
$lr_datos["distribuir"][$i]=$ls_distribuir;
$lr_datos["enero"][$i]=$ld_enero;
$lr_datos["febrero"][$i]=$ld_febrero;
$lr_datos["marzo"][$i]=$ld_marzo;
$lr_datos["abril"][$i]=$ld_abril;
$lr_datos["mayo"][$i]=$ld_mayo;
$lr_datos["junio"][$i]=$ld_junio;
$lr_datos["julio"][$i]=$ld_julio;
$lr_datos["agosto"][$i]=$ld_agosto;
$lr_datos["septiembre"][$i]=$ld_septiembre;
$lr_datos["octubre"][$i]=$ld_octubre;
$lr_datos["noviembre"][$i]=$ld_noviembre;
$lr_datos["diciembre"][$i]=$ld_diciembre;
$ld_previsto=number_format($ld_previsto,2,",",".");
$ld_enero=number_format($ld_enero,2,",",".");
$ld_febrero=number_format($ld_febrero,2,",",".");
$ld_marzo=number_format($ld_marzo,2,",",".");
$ld_abril=number_format($ld_abril,2,",",".");
$ld_mayo=number_format($ld_mayo,2,",",".");
$ld_junio=number_format($ld_junio,2,",",".");
$ld_julio=number_format($ld_julio,2,",",".");
$ld_agosto=number_format($ld_agosto,2,",",".");
$ld_septiembre=number_format($ld_septiembre,2,",",".");
$ld_octubre=number_format($ld_octubre,2,",",".");
$ld_noviembre=number_format($ld_noviembre,2,",",".");
$ld_diciembre=number_format($ld_diciembre,2,",",".");
$object[$i][1]="";
$object[$i][2]="";
$object[$i][3]="
";
}//for
if($lb_valido)
{
$lb_valido=$class_aper->procesar_guardar_apertura($lr_datos,$estprog,$la_seguridad,$li_num);
}
if ($lb_valido)
{
$msg->message(" La Apertura fue registrada con exito..... ");
}
$class_grid->makegrid($li_num,$title,$object,800,'APERTURA',$ls_nombre);
}//GUARDAR
?>
|
|
