private function cerrar_ejercicio()
{
$this->new_message('Cerrando ejercicio...');
$asiento = new asiento();
$continuar = TRUE;
if (isset($this->ejercicio->idasientopyg)) {
$aspyg = $asiento->get($this->ejercicio->idasientopyg);
if ($aspyg) {
if (!$aspyg->delete()) {
$this->new_error_msg('Imposible eliminar el asiento de pérdidas y ganancias.');
$continuar = FALSE;
}
} else {
$this->ejercicio->save();
}
/// al guardar ya comprueba los asientos especiales
}
if (isset($this->ejercicio->idasientocierre)) {
$asc = $asiento->get($this->ejercicio->idasientocierre);
if ($asc) {
if (!$asc->delete()) {
$this->new_error_msg('Imposible eliminar el asiento de cierre.');
$continuar = FALSE;
}
} else {
$this->ejercicio->save();
}
/// al guardar ya comprueba los asientos especiales
}
$siguiente_ejercicio = $this->ejercicio->get_by_fecha(Date('d-m-Y', strtotime($this->ejercicio->fechafin) + 24 * 3600));
if (isset($siguiente_ejercicio->idasientoapertura)) {
$asap = $asiento->get($siguiente_ejercicio->idasientoapertura);
if ($asap) {
if (!$asap->delete()) {
$this->new_error_msg('Imposible eliminar el asiento de apertura.');
$continuar = FALSE;
}
} else {
$this->ejercicio->save();
}
/// al guardar ya comprueba los asientos especiales
}
if ($continuar) {
$asiento_pyg = new asiento();
$asiento_pyg->codejercicio = $this->ejercicio->codejercicio;
$asiento_pyg->concepto = 'Regularización ejercicio ' . $this->ejercicio->nombre;
$asiento_pyg->editable = FALSE;
$asiento_pyg->fecha = $this->ejercicio->fechafin;
if (!$asiento_pyg->save()) {
$continuar = FALSE;
}
}
if ($continuar) {
$asiento_cierre = new asiento();
$asiento_cierre->codejercicio = $this->ejercicio->codejercicio;
$asiento_cierre->concepto = 'Asiento de cierre del ejercicio ' . $this->ejercicio->nombre;
$asiento_cierre->editable = FALSE;
$asiento_cierre->fecha = $this->ejercicio->fechafin;
if (!$asiento_cierre->save()) {
$continuar = FALSE;
}
}
if ($continuar) {
$asiento_apertura = new asiento();
$asiento_apertura->codejercicio = $siguiente_ejercicio->codejercicio;
$asiento_apertura->concepto = 'Asiento de apertura del ejercicio ' . $siguiente_ejercicio->nombre;
$asiento_apertura->editable = FALSE;
$asiento_apertura->fecha = $siguiente_ejercicio->fechainicio;
if (!$asiento_apertura->save()) {
$continuar = FALSE;
}
}
if ($continuar) {
/// actualizamos los saldos de las subcuentas:
$subcuenta = new subcuenta();
foreach ($subcuenta->all_from_ejercicio($this->ejercicio->codejercicio) as $sc) {
$sc->save();
}
/*
* Abonamos y cargamos los saldos de las cuentas de los grupos 6 y 7,
* la diferencia la enviamos a la cuenta 129.
*/
$diferencia = 0;
foreach ($subcuenta->all_from_ejercicio($this->ejercicio->codejercicio) as $sc) {
if (in_array(substr($sc->codcuenta, 0, 1), array('6', '7')) and $sc->tiene_saldo()) {
$ppyg = new partida();
$ppyg->idasiento = $asiento_pyg->idasiento;
$ppyg->concepto = $asiento_pyg->concepto;
$ppyg->idsubcuenta = $sc->idsubcuenta;
$ppyg->codsubcuenta = $sc->codsubcuenta;
if ($sc->saldo < 0) {
$ppyg->debe = abs($sc->saldo);
} else {
$ppyg->haber = $sc->saldo;
}
$diferencia += $ppyg->debe - $ppyg->haber;
$ppyg->coddivisa = $sc->coddivisa;
if (!$ppyg->save()) {
$continuar = FALSE;
}
}
}
$cuenta = new cuenta();
$cuenta_pyg = $cuenta->get_by_codigo('129', $this->ejercicio->codejercicio);
if ($cuenta_pyg) {
$subcuenta_pyg = FALSE;
foreach ($cuenta_pyg->get_subcuentas() as $sc) {
$subcuenta_pyg = $sc;
break;
}
if ($subcuenta_pyg) {
$ppyg = new partida();
$ppyg->idasiento = $asiento_pyg->idasiento;
$ppyg->concepto = $asiento_pyg->concepto;
$ppyg->idsubcuenta = $subcuenta_pyg->idsubcuenta;
$ppyg->codsubcuenta = $subcuenta_pyg->codsubcuenta;
$ppyg->haber = $diferencia;
$ppyg->coddivisa = $sc->coddivisa;
if (!$ppyg->save()) {
$continuar = FALSE;
}
} else {
$this->new_error_msg('No se encuentra una subcuenta para la cuenta 129.');
$continuar = FALSE;
}
} else {
$this->new_error_msg('No se encuentra la cuenta 129.');
$continuar = FALSE;
}
/*
* Generamos los asientos de cierre y apertura
*/
foreach ($subcuenta->all_from_ejercicio($this->ejercicio->codejercicio) as $sc) {
if ($sc->tiene_saldo()) {
$pac = new partida();
$pac->idasiento = $asiento_cierre->idasiento;
$pac->concepto = $asiento_cierre->concepto;
$pac->idsubcuenta = $sc->idsubcuenta;
$pac->codsubcuenta = $sc->codsubcuenta;
if ($sc->saldo < 0) {
$pac->debe = abs($sc->saldo);
} else {
$pac->haber = $sc->saldo;
}
$pac->coddivisa = $sc->coddivisa;
if (!$pac->save()) {
$continuar = FALSE;
}
if ($sc->codcuenta == '129') {
$nsc = $subcuenta->get_by_codigo('1200000000', $siguiente_ejercicio->codejercicio, TRUE);
} else {
$nsc = $subcuenta->get_by_codigo($sc->codsubcuenta, $siguiente_ejercicio->codejercicio, TRUE);
}
if ($nsc) {
$paa = new partida();
$paa->idasiento = $asiento_apertura->idasiento;
$paa->concepto = $asiento_apertura->concepto;
$paa->idsubcuenta = $nsc->idsubcuenta;
$paa->codsubcuenta = $nsc->codsubcuenta;
if ($sc->saldo > 0) {
$paa->debe = round($sc->saldo, FS_NF0);
} else {
$paa->haber = round(abs($sc->saldo), FS_NF0);
}
$paa->coddivisa = $nsc->coddivisa;
if (!$paa->save()) {
$continuar = FALSE;
}
} else {
$continuar = FALSE;
}
}
}
/// comprobamos los nuevos asientos
$total = 0;
foreach ($asiento_pyg->get_partidas() as $part) {
$total += $part->debe - $part->haber;
}
if (abs($total) >= 0.01) {
$continuar = FALSE;
$this->new_error_msg('Asiento de pérdidas y ganancias descuadrado.');
}
$total = 0;
foreach ($asiento_cierre->get_partidas() as $part) {
$total += $part->debe - $part->haber;
}
if (abs($total) >= 0.01) {
$continuar = FALSE;
$this->new_error_msg('Asiento de cierre descuadrado.');
}
$total = 0;
foreach ($asiento_apertura->get_partidas() as $part) {
$total += $part->debe - $part->haber;
}
if (abs($total) >= 0.01) {
$subcuenta_redondeo = $subcuenta->get_by_codigo('6780000000', $asiento_apertura->codejercicio);
if ($subcuenta) {
$npaa = new partida();
$npaa->idasiento = $asiento_apertura->idasiento;
$npaa->concepto = $asiento_apertura->concepto;
$npaa->idsubcuenta = $subcuenta_redondeo->idsubcuenta;
$npaa->codsubcuenta = $subcuenta_redondeo->codsubcuenta;
$npaa->coddivisa = $subcuenta_redondeo->coddivisa;
if ($total > 0) {
$npaa->haber = $total;
} else {
$npaa->debe = $total;
}
$npaa->save();
} else {
$continuar = FALSE;
$this->new_error_msg('Asiento de apertura descuadrado.');
}
}
/// cerramos el ejercicio
if ($continuar) {
$this->ejercicio->estado = 'CERRADO';
$this->ejercicio->idasientopyg = $asiento_pyg->idasiento;
$this->ejercicio->idasientocierre = $asiento_cierre->idasiento;
if ($this->ejercicio->save()) {
$this->new_message('Ejercicio cerrado correctamente.');
} else {
$this->new_error_msg('Error al cerrar el ejercicio.');
}
$siguiente_ejercicio->idasientoapertura = $asiento_apertura->idasiento;
if (!$siguiente_ejercicio->save()) {
$this->new_error_msg('Error al modificar el siguiente ejercicio.');
}
} else {
$this->new_error_msg('Error al generar los asientos.');
if ($asiento_pyg->delete()) {
$this->new_message('Asiento de pérdidas y ganancias eliminado.');
} else {
$this->new_error_msg('Imposible eliminar el asiento de pérdidas y ganancias.');
}
if ($asiento_cierre->delete()) {
$this->new_message('Asiento de cierre eliminado.');
} else {
$this->new_error_msg('Imposible eliminar el asiento de cierre.');
}
if ($asiento_apertura->delete()) {
$this->new_message('Asiento de apertura eliminado.');
} else {
$this->new_error_msg('Imposible eliminar el asiento de apertura.');
}
}
}
}
private function guardar_regiva()
{
$asiento = new asiento();
$ejercicio = new ejercicio();
$subcuenta = new subcuenta();
$eje0 = $ejercicio->get_by_fecha($_POST['desde'], TRUE);
if ($eje0) {
$continuar = TRUE;
$saldo = 0;
/// guardamos el asiento
$asiento->codejercicio = $eje0->codejercicio;
$asiento->concepto = 'REGULARIZACIÓN IVA ' . $_POST['periodo'];
$asiento->fecha = $_POST['hasta'];
$asiento->editable = FALSE;
if (!$asiento->save()) {
$this->new_error_msg('Imposible guardar el asiento.');
$continuar = FALSE;
}
/// obtenemos el IVA soportado
$scta_ivasop = $subcuenta->get_cuentaesp('IVASOP', $eje0->codejercicio);
if ($scta_ivasop) {
$par0 = new partida();
$par0->idasiento = $asiento->idasiento;
$par0->concepto = $asiento->concepto;
$par0->coddivisa = $scta_ivasop->coddivisa;
$par0->tasaconv = $scta_ivasop->tasaconv();
$par0->codsubcuenta = $scta_ivasop->codsubcuenta;
$par0->idsubcuenta = $scta_ivasop->idsubcuenta;
$tot_sop = $par0->totales_from_subcuenta_fechas($scta_ivasop->idsubcuenta, $_POST['desde'], $_POST['hasta']);
/// invertimos el debe y el haber
$par0->debe = $tot_sop['haber'];
$par0->haber = $tot_sop['debe'];
$saldo += $tot_sop['haber'] - $tot_sop['debe'];
if (!$par0->save()) {
$this->new_error_msg('Error al guardar la partida de la subcuenta de IVA soportado.');
$continuar = FALSE;
}
} else {
$this->new_error_msg('Subcuenta de IVA soportado no encontrada.');
$continuar = FALSE;
}
/// obtenemos el IVA repercutido
$scta_ivarep = $subcuenta->get_cuentaesp('IVAREP', $eje0->codejercicio);
if ($scta_ivarep) {
$par1 = new partida();
$par1->idasiento = $asiento->idasiento;
$par1->concepto = $asiento->concepto;
$par1->coddivisa = $scta_ivarep->coddivisa;
$par1->tasaconv = $scta_ivarep->tasaconv();
$par1->codsubcuenta = $scta_ivarep->codsubcuenta;
$par1->idsubcuenta = $scta_ivarep->idsubcuenta;
$tot_rep = $par1->totales_from_subcuenta_fechas($scta_ivarep->idsubcuenta, $_POST['desde'], $_POST['hasta']);
/// invertimos el debe y el haber
$par1->debe = $tot_rep['haber'];
$par1->haber = $tot_rep['debe'];
$saldo += $tot_rep['haber'] - $tot_rep['debe'];
if (!$par1->save()) {
$this->new_error_msg('Error al guardar la partida de la subcuenta de IVA repercutido.');
$continuar = FALSE;
}
} else {
$this->new_error_msg('Subcuenta de IVA repercutido no encontrada.');
$continuar = FALSE;
}
if ($continuar) {
if ($saldo > 0) {
$scta_ivaacr = $subcuenta->get_cuentaesp('IVAACR', $eje0->codejercicio);
if ($scta_ivaacr) {
$par2 = new partida();
$par2->idasiento = $asiento->idasiento;
$par2->concepto = $asiento->concepto;
$par2->coddivisa = $scta_ivaacr->coddivisa;
$par2->tasaconv = $scta_ivaacr->tasaconv();
$par2->codsubcuenta = $scta_ivaacr->codsubcuenta;
$par2->idsubcuenta = $scta_ivaacr->idsubcuenta;
$par2->debe = 0;
$par2->haber = $saldo;
if (!$par2->save()) {
$this->new_error_msg('Error al guardar la partida de la subcuenta de acreedor por IVA.');
$continuar = FALSE;
}
} else {
$this->new_error_msg('No se encuentra la subcuenta acreedora por IVA.');
}
} else {
if ($saldo < 0) {
$scta_ivadeu = $subcuenta->get_cuentaesp('IVADEU', $eje0->codejercicio);
if ($scta_ivadeu) {
$par2 = new partida();
$par2->idasiento = $asiento->idasiento;
$par2->concepto = $asiento->concepto;
$par2->coddivisa = $scta_ivadeu->coddivisa;
$par2->tasaconv = $scta_ivadeu->tasaconv();
$par2->codsubcuenta = $scta_ivadeu->codsubcuenta;
$par2->idsubcuenta = $scta_ivadeu->idsubcuenta;
$par2->debe = abs($saldo);
$par2->haber = 0;
if (!$par2->save()) {
$this->new_error_msg('Error al guardar la partida de la subcuenta deudora por IVA.');
$continuar = FALSE;
}
} else {
$this->new_error_msg('No se encuentra la subcuenta deudora por IVA.');
}
}
}
} else {
$this->new_error_msg('Error al leer las subcuentas.');
}
if ($continuar) {
$this->regiva = new regularizacion_iva();
$this->regiva->codejercicio = $eje0->codejercicio;
$this->regiva->fechaasiento = $asiento->fecha;
$this->regiva->fechafin = $_POST['hasta'];
$this->regiva->fechainicio = $_POST['desde'];
$this->regiva->idasiento = $asiento->idasiento;
$this->regiva->periodo = $_POST['periodo'];
if ($this->regiva->save()) {
$this->new_message('<a href="#" onclick="full_regiva(\'' . $this->regiva->idregiva . '\')">Regularización</a>
guardada correctamente.');
} else {
if ($asiento->delete()) {
$this->new_error_msg('Error al guardar la regularización. Se ha eliminado el asiento.');
} else {
$this->new_error_msg('Error al guardar la regularización. No se ha podido eliminar el asiento.');
}
}
}
} else {
$this->new_error_msg('El ejercicio está cerrado.');
}
}
/**
* Genera el asiento contable para una factura de venta.
* Devuelve TRUE si el asiento se ha generado correctamente, False en caso contrario.
* Si genera el asiento, este es accesible desde $this->asiento.
* @param type $factura
*/
public function generar_asiento_venta(&$factura)
{
$ok = FALSE;
$this->asiento = FALSE;
$cliente0 = new cliente();
$subcuenta_cli = FALSE;
$cliente = $cliente0->get($factura->codcliente);
if ($cliente) {
$subcuenta_cli = $cliente->get_subcuenta($factura->codejercicio);
}
if ($factura->totalirpf != 0 or $factura->totalrecargo != 0) {
$this->new_error_msg('Todavía no se pueden generar asientos de facturas con IRPF o recargo.');
} else {
if (!$subcuenta_cli) {
$eje0 = $this->ejercicio->get($factura->codejercicio);
$this->new_message("No se ha podido generar una subcuenta para el cliente\n <a href='" . $eje0->url() . "'>¿Has importado los datos del ejercicio?</a>\n Aun así la <a href='" . $factura->url() . "'>factura</a> se ha generado correctamente,\n pero sin asiento contable.");
} else {
$asiento = new asiento();
$asiento->codejercicio = $factura->codejercicio;
$asiento->concepto = "Factura de venta " . $factura->codigo . " - " . $factura->nombrecliente;
$asiento->documento = $factura->codigo;
$asiento->editable = FALSE;
$asiento->fecha = $factura->fecha;
$asiento->importe = $factura->total;
$asiento->tipodocumento = 'Factura de cliente';
if ($asiento->save()) {
$asiento_correcto = TRUE;
$subcuenta = new subcuenta();
$partida0 = new partida();
$partida0->idasiento = $asiento->idasiento;
$partida0->concepto = $asiento->concepto;
$partida0->idsubcuenta = $subcuenta_cli->idsubcuenta;
$partida0->codsubcuenta = $subcuenta_cli->codsubcuenta;
$partida0->debe = $factura->total;
$partida0->coddivisa = $factura->coddivisa;
$partida0->tasaconv = $factura->tasaconv;
if (!$partida0->save()) {
$asiento_correcto = FALSE;
$this->new_error_msg("¡Imposible generar la partida para la subcuenta " . $partida0->codsubcuenta . "!");
}
/// generamos una partida por cada impuesto
$subcuenta_iva = $subcuenta->get_cuentaesp('IVAREP', $asiento->codejercicio);
foreach ($factura->get_lineas_iva() as $li) {
if ($subcuenta_iva and $asiento_correcto) {
$partida1 = new partida();
$partida1->idasiento = $asiento->idasiento;
$partida1->concepto = $asiento->concepto;
$partida1->idsubcuenta = $subcuenta_iva->idsubcuenta;
$partida1->codsubcuenta = $subcuenta_iva->codsubcuenta;
$partida1->haber = $li->totaliva;
$partida1->idcontrapartida = $subcuenta_cli->idsubcuenta;
$partida1->codcontrapartida = $subcuenta_cli->codsubcuenta;
$partida1->cifnif = $cliente->cifnif;
$partida1->documento = $asiento->documento;
$partida1->tipodocumento = $asiento->tipodocumento;
$partida1->codserie = $factura->codserie;
$partida1->factura = $factura->numero;
$partida1->baseimponible = $li->neto;
$partida1->iva = $li->iva;
$partida1->coddivisa = $factura->coddivisa;
$partida1->tasaconv = $factura->tasaconv;
if (!$partida1->save()) {
$asiento_correcto = FALSE;
$this->new_error_msg("¡Imposible generar la partida para la subcuenta " . $partida1->codsubcuenta . "!");
}
}
}
$subcuenta_ventas = $subcuenta->get_cuentaesp('VENTAS', $asiento->codejercicio);
if ($subcuenta_ventas and $asiento_correcto) {
$partida2 = new partida();
$partida2->idasiento = $asiento->idasiento;
$partida2->concepto = $asiento->concepto;
$partida2->idsubcuenta = $subcuenta_ventas->idsubcuenta;
$partida2->codsubcuenta = $subcuenta_ventas->codsubcuenta;
$partida2->haber = $factura->neto;
$partida2->coddivisa = $factura->coddivisa;
$partida2->tasaconv = $factura->tasaconv;
if (!$partida2->save()) {
$asiento_correcto = FALSE;
$this->new_error_msg("¡Imposible generar la partida para la subcuenta " . $partida2->codsubcuenta . "!");
}
}
if ($asiento_correcto) {
$factura->idasiento = $asiento->idasiento;
if ($factura->save()) {
$ok = TRUE;
$this->asiento = $asiento;
} else {
$this->new_error_msg("¡Imposible añadir el asiento a la factura!");
}
} else {
if ($asiento->delete()) {
$this->new_message("El asiento se ha borrado.");
} else {
$this->new_error_msg("¡Imposible borrar el asiento!");
}
}
} else {
$this->new_error_msg("¡Imposible guardar el asiento!");
}
}
}
return $ok;
}
public function generar_asiento_faltante(&$faltante, $ejercicio)
{
$ok = FALSE;
$this->asiento = FALSE;
$tipo = $faltante->estado;
$conductor0 = new distribucion_conductores();
$subcuenta_conductor = FALSE;
$concepto = $tipo == 'pendiente' ? "Faltante " : "Pago Faltante ";
$conductor = $conductor0->get($faltante->idempresa, $faltante->conductor);
if ($conductor) {
$subcuenta_conductor = $this->get_subcuenta($ejercicio);
}
if (!$subcuenta_conductor) {
$eje0 = $this->ejercicio->get($ejercicio);
return "No se ha podido generar una subcuenta para el conductor <a href='" . $eje0->url() . "'>¿Has importado los datos del ejercicio?</a>";
if (!$this->soloasiento) {
return "Aun así el <a href='" . $faltante->url() . "'>faltante</a> se ha generado correctamente, pero sin asiento contable.";
}
} else {
$asiento = new asiento();
$asiento->codejercicio = $ejercicio;
$asiento->concepto = $concepto . $faltante->idrecibo . " - " . $faltante->nombreconductor;
$asiento->documento = $faltante->idrecibo;
$asiento->editable = FALSE;
$asiento->fecha = $faltante->fecha;
$asiento->importe = $faltante->importe;
$asiento->tipodocumento = $concepto . ' Liquidacion';
if ($asiento->save()) {
$asiento_correcto = TRUE;
$subcuenta = new subcuenta();
$partida0 = new partida();
$partida0->idasiento = $asiento->idasiento;
$partida0->concepto = $asiento->concepto;
$partida0->idsubcuenta = $subcuenta_conductor->idsubcuenta;
$partida0->codsubcuenta = $subcuenta_conductor->codsubcuenta;
if ($tipo == 'pendiente') {
$partida0->debe = $faltante->importe;
} elseif ($tipo == 'pagado') {
$partida0->haber = $faltante->importe;
}
$partida0->coddivisa = $faltante->coddivisa;
$partida0->tasaconv = 1;
$partida0->codserie = NULL;
if (!$partida0->save()) {
$asiento_correcto = FALSE;
}
if ($asiento_correcto) {
$faltante->idasiento = $asiento->idasiento;
$faltante->idsubcuenta = $partida0->idsubcuenta;
$faltante->codcuenta = $partida0->codsubcuenta;
if ($faltante->save()) {
$ok = TRUE;
$this->asiento = $asiento;
} else {
return "¡Imposible añadir el asiento al faltante!";
}
} else {
if ($asiento->delete()) {
return "El asiento se ha borrado.";
} else {
return "¡Imposible borrar el asiento!";
}
}
} else {
return "¡Imposible guardar el asiento!";
}
}
return $ok;
}
/**
* Generamos un asiento de pago del asiento seleccionado.
* @param asiento $asiento
*/
public function generar_asiento_pago(&$asiento, $codpago = FALSE, $fecha = FALSE, $subclipro = FALSE)
{
$nasientop = new asiento();
$nasientop->editable = FALSE;
$nasientop->importe = $asiento->importe;
$nasientop->tipodocumento = $asiento->tipodocumento;
$nasientop->documento = $asiento->documento;
if ($asiento->tipodocumento == 'Factura de cliente') {
$nasientop->concepto = 'Cobro ' . $asiento->concepto;
} else {
$nasientop->concepto = 'Pago ' . $asiento->concepto;
}
if ($fecha) {
$nasientop->fecha = $fecha;
}
/// asignamos la mejor fecha
$eje = $this->ejercicio->get_by_fecha($nasientop->fecha);
if ($eje) {
$nasientop->codejercicio = $eje->codejercicio;
$nasientop->fecha = $eje->get_best_fecha($nasientop->fecha);
}
/// necesitamos la subcuenta de caja
$subcaja = $this->subcuenta->get_cuentaesp('CAJA', $nasientop->codejercicio);
if ($codpago) {
/**
* Si nos han pasado una forma de pago, intentamos buscar la subcuenta
* asociada a la cuenta bancaria.
*/
$formap = $this->forma_pago->get($codpago);
if ($formap) {
if ($formap->codcuenta) {
$cuentab = $this->cuenta_banco->get($formap->codcuenta);
if ($cuentab) {
$subc = $this->subcuenta->get_by_codigo($cuentab->codsubcuenta, $nasientop->codejercicio);
if ($subc) {
$subcaja = $subc;
}
}
}
}
}
if (!$eje) {
$this->new_error_msg('Ningún ejercico encontrado.');
} else {
if (!$eje->abierto()) {
$this->new_error_msg('El ejercicio ' . $eje->codejercicio . ' está cerrado.');
} else {
if (!$subcaja) {
$this->new_error_msg('No se ha encontrado ninguna subcuenta de caja para el ejercicio ' . $eje->codejercicio . '. <a href="' . $eje->url() . '">¿Has importado los datos del ejercicio?</a>');
} else {
if ($nasientop->save()) {
/// buscamos la partida que coincida con el importe
$encontrada = FALSE;
foreach ($asiento->get_partidas() as $par) {
if ($nasientop->floatcmp(abs($par->debe), $nasientop->importe, FS_NF0)) {
if (!$subclipro) {
$subclipro = $this->subcuenta->get_by_codigo($par->codsubcuenta, $nasientop->codejercicio);
}
if ($subclipro) {
$partida1 = new partida();
$partida1->idasiento = $nasientop->idasiento;
$partida1->concepto = $nasientop->concepto;
$partida1->idsubcuenta = $subclipro->idsubcuenta;
$partida1->codsubcuenta = $subclipro->codsubcuenta;
$partida1->haber = $par->debe;
$partida1->coddivisa = $par->coddivisa;
$partida1->tasaconv = $par->tasaconv;
$partida1->codserie = $par->codserie;
$partida1->save();
$partida2 = new partida();
$partida2->idasiento = $nasientop->idasiento;
$partida2->concepto = $nasientop->concepto;
$partida2->idsubcuenta = $subcaja->idsubcuenta;
$partida2->codsubcuenta = $subcaja->codsubcuenta;
$partida2->debe = $par->debe;
$partida2->coddivisa = $par->coddivisa;
$partida2->tasaconv = $par->tasaconv;
$partida2->codserie = $par->codserie;
$partida2->save();
$encontrada = TRUE;
} else {
$this->new_error_msg('No se ha encontrado la subcuenta ' . $par->codsubcuenta . ' en el ejercicio ' . $nasientop->codejercicio);
$nasientop->delete();
}
break;
} else {
if ($nasientop->floatcmp(abs($par->haber), $nasientop->importe, FS_NF0)) {
if (!$subclipro) {
$subclipro = $this->subcuenta->get_by_codigo($par->codsubcuenta, $nasientop->codejercicio);
}
if ($subclipro) {
$partida1 = new partida();
$partida1->idasiento = $nasientop->idasiento;
$partida1->concepto = $nasientop->concepto;
$partida1->idsubcuenta = $subclipro->idsubcuenta;
$partida1->codsubcuenta = $subclipro->codsubcuenta;
$partida1->debe = $par->haber;
$partida1->coddivisa = $par->coddivisa;
$partida1->tasaconv = $par->tasaconv;
$partida1->codserie = $par->codserie;
$partida1->save();
$partida2 = new partida();
$partida2->idasiento = $nasientop->idasiento;
$partida2->concepto = $nasientop->concepto;
$partida2->idsubcuenta = $subcaja->idsubcuenta;
$partida2->codsubcuenta = $subcaja->codsubcuenta;
$partida2->haber = $par->haber;
$partida2->coddivisa = $par->coddivisa;
$partida2->tasaconv = $par->tasaconv;
$partida2->codserie = $par->codserie;
$partida2->save();
$encontrada = TRUE;
} else {
$this->new_error_msg('No se ha encontrado la subcuenta ' . $par->codsubcuenta . ' en el ejercicio ' . $nasientop->codejercicio);
$nasientop->delete();
}
break;
}
}
}
if (!$encontrada) {
$this->new_error_msg('No se ha encontrado la partida necesaria para generar el asiento ' . $nasientop->concepto);
$nasientop->delete();
$nasientop->idasiento = NULL;
}
} else {
$this->new_error_msg('Error al guardar el asiento de pago.');
}
}
}
}
return $nasientop->idasiento;
}
private function nuevo_asiento_modelo130()
{
$continuar = TRUE;
$eje0 = $this->ejercicio->get_by_fecha($_POST['fecha']);
if (!$eje0) {
$this->new_error_msg('Ejercicio no encontrado.');
$continuar = FALSE;
}
$div0 = $this->divisa->get($_POST['divisa']);
if (!$div0) {
$this->new_error_msg('Divisa no encontrada.');
$continuar = FALSE;
}
if ($this->duplicated_petition($_POST['petition_id'])) {
$this->new_error_msg('Petición duplicada. Has hecho doble clic sobre el botón Guardar
y se han enviado dos peticiones. Mira en <a href="' . $this->ppage->url() . '">asientos</a>
para ver si el asiento se ha guardado correctamente.');
$continuar = FALSE;
}
if ($continuar) {
$meses = array('', 'Enero', 'Febrero', 'Marzo', 'Abril', 'Mayo', 'Junio', 'Julio', 'Agosto', 'Septiembre', 'Octubre', 'Noviembre', 'Diciembre');
$codcaja = '5700000000';
if (isset($_POST['banco130'])) {
if ($_POST['banco130'] != '') {
$codcaja = $_POST['banco130'];
}
}
/// asiento de cuota
$asiento = new asiento();
$asiento->codejercicio = $eje0->codejercicio;
$asiento->concepto = 'Pago modelo 130 ' . $meses[intval(date('m', strtotime($_POST['fecha'])))];
$asiento->fecha = $_POST['fecha'];
$asiento->importe = floatval($_POST['modelo130']);
if ($asiento->save()) {
$subc = $this->subcuenta->get_by_codigo('4730000000', $eje0->codejercicio);
if ($subc) {
$partida = new partida();
$partida->idasiento = $asiento->idasiento;
$partida->concepto = $asiento->concepto;
$partida->idsubcuenta = $subc->idsubcuenta;
$partida->codsubcuenta = $subc->codsubcuenta;
$partida->debe = $asiento->importe;
$partida->save();
} else {
$this->new_error_msg('Subcuenta 4730000000 no encontrada.');
$continuar = FALSE;
}
$subc = $this->subcuenta->get_by_codigo($codcaja, $eje0->codejercicio);
if ($subc) {
$partida = new partida();
$partida->idasiento = $asiento->idasiento;
$partida->concepto = $asiento->concepto;
$partida->idsubcuenta = $subc->idsubcuenta;
$partida->codsubcuenta = $subc->codsubcuenta;
$partida->haber = $asiento->importe;
$partida->save();
} else {
$this->new_error_msg('Subcuenta ' . $codcaja . ' no encontrada.');
$continuar = FALSE;
}
if ($continuar) {
$this->new_message("<a href='" . $asiento->url() . "'>Asiento de pago</a> guardado correctamente!");
} else {
if ($asiento->delete()) {
$this->new_error_msg("¡Error en alguna de las partidas! Se ha borrado el asiento.");
} else {
$this->new_error_msg("¡Error en alguna de las partidas! Además ha sido imposible borrar el asiento.");
}
}
} else {
$this->new_error_msg("¡Imposible guardar el asiento!");
}
}
}
