function genesmov()
{
$mes = $this->uri->segment(4) . $this->uri->segment(5);
$this->db->simple_query("DELETE FROM siva WHERE EXTRACT(YEAR_MONTH FROM fechal) = {$mes} AND fuente='MC' ");
$mSQL = "SELECT a.*,b.rifci, c.numero AS afecta, c.fecha AS fafecta \n\t\t\t\tFROM smov AS a LEFT JOIN scli AS b ON a.cod_cli=b.cliente \n\t\t\t\tLEFT JOIN itccli AS c ON a.numero=c.numccli AND a.tipo_doc=c.tipoccli \n\t\t\t\tLEFT JOIN grcl AS d ON b.grupo=d.grupo \n\t\t\t\tWHERE EXTRACT(YEAR_MONTH FROM a.fecha)={$mes} \n\t\t\t\tAND a.tipo_doc IN ('NC') \n\t\t\t\tAND d.clase!='I' \n\t\t\t\tAND a.observa1 NOT LIKE '%DEVOLUCION%' \n\t\t\t\tAND a.codigo!='NOCON' \n\t\t\t\tAND a.codigo!='' AND a.cod_cli<>'REIVA'";
//Procesando CxC smov "
$query = $this->db->query($mSQL);
$mNUMERO = 'ASDFGHJK';
$mTIPO_DOC = "XX";
foreach ($query->result() as $row) {
if ($row->tipo_doc == 'NC') {
if ($mTIPO_DOC == $row->tipo_doc and $mNUMERO == $row->numero) {
continue;
}
$mNUMERO = $row->numero;
$mTIPO_DOC = $row->tipo_doc;
}
$referen = $row->num_ref;
$registro = '01';
if (!empty($row->afecta)) {
$referen = $row->afecta;
$aaa = $this->datasis->ivaplica($row->fafecta);
$bbb = $this->datasis->ivaplica($row->fecha);
if ($aaa != $bbb) {
$registro = '04';
}
}
$stotal = $row->monto - $row->impuesto;
$mSQL = "INSERT INTO siva SET \n\t\t\t\t\t\tlibro = 'V',\n\t\t\t\t\t\ttipo = '" . $row->tipo_doc . "',\n\t\t\t\t\t\tfuente = 'MC',\n\t\t\t\t\t\tsucursal = '00',\n\t\t\t\t\t\tfecha = '" . $row->fecha . "',\n\t\t\t\t\t\tnumero = '" . $row->numero . "',\n\t\t\t\t\t\tclipro = '" . $row->cod_cli . "',\n\t\t\t\t\t\tnombre =" . $this->db->escape($row->nombre) . ",\n\t\t\t\t\t\tcontribu='CO',\n\t\t\t\t\t\trif = '" . $row->rifci . "', \n\t\t\t\t\t\tregistro = '{$registro}',\n\t\t\t\t\t\tnacional ='S',\n\t\t\t\t\t\treferen = '{$referen}',\n\t\t\t\t\t\tgeneral = {$row->montasa},\n\t\t\t\t\t\tgeneimpu = {$row->tasa}, \n\t\t\t\t\t\treducida = {$row->monredu}, \n\t\t\t\t\t\treduimpu = {$row->reducida},\n\t\t\t\t\t\tadicional = {$row->monadic},\n\t\t\t\t\t\tadicimpu = {$row->sobretasa},\n\t\t\t\t\t\texento = {$row->exento}, \n\t\t\t\t\t\timpuesto = {$row->impuesto}, \n\t\t\t\t\t\tgtotal = {$row->monto}, \n\t\t\t\t\t\tstotal = {$stotal},\n\t\t\t\t\t\treiva = " . $row->reteiva . ",\n\t\t\t\t\t\tfechal = " . $mes . "01,\n\t\t\t\t\t\tfafecta ='" . $row->fafecta . "'";
$this->db->simple_query($mSQL);
}
// RETENCIONES DE IVA DEL MISMO MES
$mSQL = "SELECT b.fecha, a.numero, c.nombre, c.rifci, a.cod_cli,\n\t\t\t\t\t\ta.numero AS afecta, a.fecha AS fafecta, a.reteiva, a.transac, a.nroriva \n\t\t\t\tFROM itccli AS a JOIN smov AS b ON a.transac=b.transac \n\t\t\t\t\t LEFT JOIN scli AS c ON a.cod_cli=c.cliente \n\t\t\t\tWHERE EXTRACT(YEAR_MONTH FROM b.fecha)={$mes} AND b.cod_cli='REIVA' \n\t\t\t\t\tAND a.reteiva>0 AND b.monto>b.abonos \n\t\t\t\t\tAND EXTRACT(YEAR_MONTH FROM a.fecha)=EXTRACT(YEAR_MONTH FROM b.fecha) ";
$query = $this->db->query($mSQL);
foreach ($query->result() as $row) {
$mSQL = "UPDATE siva SET reiva={$row->reteiva}, comprobante={$row->nroriva} WHERE tipo='FC' AND numero='{$row->numero}' AND libro='V' AND EXTRACT(YEAR_MONTH FROM fechal)={$mes} ";
$this->db->simple_query($mSQL);
}
// RETENCIONES DE IVA
$mSQL = "SELECT b.fecha, a.numero, c.nombre, c.rifci, a.cod_cli,\n\t\t\t\t\ta.numero AS afecta, a.fecha AS fafecta, sum(a.reteiva) reteiva, a.transac, a.nroriva, a.emiriva, if(a.recriva IS NULL, a.estampa, a.recriva) recriva \n\t\t\t\tFROM itccli AS a JOIN smov AS b ON a.transac=b.transac \n\t\t\t\t\tLEFT JOIN scli AS c ON a.cod_cli=c.cliente \n\t\t\t\tWHERE b.fecha<=" . $mes . "31 AND b.cod_cli='REIVA' \n\t\t\t\t\tAND a.reteiva>0 AND b.monto>b.abonos \n\t\t\t\t\tAND EXTRACT(YEAR_MONTH FROM a.fecha)<{$mes} \n\t\t\t\tGROUP BY a.nroriva\n\t\t\t\tUNION ALL\n\t\t\t\tSELECT b.fecha, a.numero, 'OJO LLENE DATOS', 'OJO', '',\n\t\t\t\t\t'' AS afecta, 0 AS fafecta, b.monto-b.abonos, a.transac, a.numero, a.fecha, a.fecha \n\t\t\t\tFROM smov AS b JOIN prmo AS a ON a.transac=b.transac \n\t\t\t\tWHERE b.fecha<" . $mes . "01 AND b.cod_cli='REIVA' \n\t\t\t\tAND b.monto>b.abonos";
$query = $this->db->query($mSQL);
foreach ($query->result() as $row) {
$mSQL = "SELECT monto-abonos FROM smov WHERE cod_cli='REIVA' AND transac='{$row->transac}'";
// if ( $this->datasis->dameval($mSQL) <= 0 ) continue;
$mSQL = "INSERT INTO siva SET \n\t\t\t\t\tlibro = 'V',\n\t\t\t\t\ttipo = 'CR',\n\t\t\t\t\tfuente = 'MC',\n\t\t\t\t\tsucursal = '99', \n\t\t\t\t\tfecha = '" . $row->emiriva . "',\n\t\t\t\t\tnumero ='', \n\t\t\t\t\tclipro ='" . $row->cod_cli . "', \n\t\t\t\t\tnombre ='" . $row->nombre . "', \n\t\t\t\t\tcontribu = 'CO', \n\t\t\t\t\trif = '" . $row->rifci . "',\n\t\t\t\t\tregistro = '01',\n\t\t\t\t\tnacional ='S',\n\t\t\t\t\treferen ='',\n\t\t\t\t\tfafecta ='',\n\t\t\t\t\texento = 0, \n\t\t\t\t\tgeneral = 0, \n\t\t\t\t\tgeneimpu = 0, \n\t\t\t\t\treducida = 0, \n\t\t\t\t\treduimpu = 0, \n\t\t\t\t\tadicional = 0, \n\t\t\t\t\tadicimpu = 0, \n\t\t\t\t\timpuesto = 0, \n\t\t\t\t\tgtotal = 0, \n\t\t\t\t\tstotal = 0, \n\t\t\t\t\treiva = '" . $row->reteiva . "', \n\t\t\t\t\tcomprobante = '{$row->nroriva}',\n\t\t\t\t\tfecharece = '{$row->recriva}',\n\t\t\t\t\tfechal = " . $mes . "01 ";
$this->db->simple_query($mSQL);
}
//RETENCIONES ANTERIORES PENDIENTES
$mSQL = "SELECT * FROM smov WHERE fecha<" . $mes . "01 AND cod_cli='REIVA' \n\t\t\t\t AND control IS NULL AND monto>abonos AND (tipo_ref<>'PR' OR tipo_ref IS NULL) ";
$query = $this->db->query($mSQL);
foreach ($query->result() as $row) {
$mSQL = "SELECT COUNT(*) FROM sfpa WHERE tipo_doc='FE' AND tipo='RI' \n\t\t\t\t\tAND fecha='" . $row->fecha . "' AND '{$row->observa1}' LIKE CONCAT('%',numero,'%')";
if ($this->datasis->dameval($mSQL) <= 0) {
continue;
}
$mSQL = "SELECT numero, cod_cli, transac \n\t\t\t\t\tFROM sfpa \n\t\t\t\t\tWHERE tipo_doc='FE' AND tipo='RI' AND fecha='" . $row->fecha . "' AND \n\t\t\t\t\t'" . $row->observa1 . "' LIKE CONCAT('%',numero,'%')";
$query1 = $this->db->query($mSQL);
$mREG = $query1->result();
$transac = $mREG->transac;
$nombre = dameval("select nombre from sfac where transac='{$transac}'");
$rif = dameval("select rifci from sfac where transac='{$transac}'");
$mSQL = "INSERT INTO siva SET \n\t\t\t\t\t\tlibro = 'V', \n\t\t\t\t\t\ttipo = 'RI',\n\t\t\t\t\t\tfuente = 'FA', \n\t\t\t\t\t\tsucursal = '00', \n\t\t\t\t\t\tfecha = '{$row->fecha}', \n\t\t\t\t\t\tnumero = 'mREG->numero', \n\t\t\t\t\t\treferen = 'mREG->numero',\n\t\t\t\t\t\tclipro = 'mREG->cod_cli', \n\t\t\t\t\t\tnombre = '{$nombre}', \n\t\t\t\t\t\tcontribu, 'CO', \n\t\t\t\t\t\trif = '{$rif}', \n\t\t\t\t\t\tregistro = '01',\n\t\t\t\t\t\tnacional = 'S',\n\t\t\t\t\t\texento = 0, \n\t\t\t\t\t\tfafecta = '{$row->fecha}',\n\t\t\t\t\t\tgeneral = 0, \n\t\t\t\t\t\tgeneimpu = 0, \n\t\t\t\t\t\treducida = 0, \n\t\t\t\t\t\treduimpu = 0, \n\t\t\t\t\t\tadicional = 0, \n\t\t\t\t\t\tadicimpu = 0,\n\t\t\t\t\t\timpuesto = 0, \n\t\t\t\t\t\tgtotal = 0, \n\t\t\t\t\t\tstotal = 0, \n\t\t\t\t\t\treiva = " . $row->monto . ",\n\t\t\t\t\t\tfechal = " . $mes . "01 ";
$this->db->simple_query($mSQL);
}
}
<TD ALIGN=CENTER>Ingresos</TD>
<TD ALIGN=CENTER>Egresos</TD>
<TD ALIGN=CENTER>Saldo</TD>
</TR>
<?php
$msql = "SELECT tarjeta, concepto, enlace, saldo, descrip FROM tardet WHERE enlace IS NOT NULL AND enlace!='' GROUP BY enlace";
$menlaces = damecur($msql);
$manterior = 0;
$mingresos = 0;
$megresos = 0;
$msaldos = 0;
for ($count = 1; $row = mysql_fetch_row($menlaces); ++$count) {
$msql = "SELECT sum(a.total) FROM itdine AS a, dine AS b\n WHERE a.tipo='{$row['0']}' AND a.concepto='{$row['1']}' AND a.numero=b.numero\n AND b.fecha={$qfecha} GROUP BY fecha ";
$ingreso = dameval($msql);
$msql = "SELECT sum(a.monto) FROM itbcaj AS a, bcaj AS b\n WHERE a.tipo='{$row['0']}' AND a.concep='{$row['1']}' AND a.numero=b.numero\n AND b.estampa={$qqfecha} GROUP BY fecha ";
$egreso = dameval($msql);
print "<tr><td>{$row['4']}</td>";
print "<td align=right>" . number_format($row[3] - $ingreso + $egreso, 2) . "</td>";
$manterior += $row[3] - $ingreso + $egreso;
print "<td align=right>" . number_format($ingreso, 2) . "</td>";
$mingresos += $ingreso;
print "<td align=right>" . number_format($egreso, 2) . "</td>";
$megresos += $egreso;
print "<td align=right>" . number_format($row[3], 2) . "</td></tr>";
$msaldos += $row[3];
}
print "<tr class=tablatd ><td>Totales...</td>";
print "<td align=right>" . number_format($manterior, 2) . "</td>";
print "<td align=right>" . number_format($mingresos, 2) . "</td>";
print "<td align=right>" . number_format($megresos, 2) . "</td>";
print "<td align=right>" . number_format($msaldos, 2) . "</td></tr>";
