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>";