$idsocio = $dcuentas["numero_socio"]; $docto = $dcuentas["numero_cuenta"]; $dias = $dcuentas["dias_invertidos"]; $tasa = $dcuentas["tasa_otorgada"]; $capital = $dcuentas["saldo_cuenta"]; // + $ide);( $vencimiento = sumardias($dcuentas["inversion_fecha_vcto"], $dias); $interes = $capital * $dias * $tasa / EACP_DIAS_INTERES; $xSoc = new cSocio($idsocio); $xSoc->init(); $DSoc = $xSoc->getDatosInArray(); $domicilio_del_socio = $xSoc->getDomicilio(); $nombre_del_socio = $xSoc->getNombreCompleto(); $numero_de_socio = $idsocio; $tasa = getFMoney($tasa * 100); $isr = getISRByInversion($capital, $dias); $aliquidar = $capital + $interes - $isr; $nombre = $nombre_del_socio; echo "\n\t<p class='bigtitle'>CONSTANCIA PROVISIONAL DE DEPOSITO A PLAZO</p>\n\t<hr />"; // obtiene datos del socio $direccion = $domicilio_del_socio; $rfc = $DSoc["rfc"]; $curp = $DSoc["curp"]; // echo $xSoc->getFicha(); echo $xInv->getFicha(true); ?> <hr /> <?php echo "\n<table width='75%'>\n <tr>\n <td width='15%'> </td>\n <td width='15%'> </td>\n\n <th>Fecha de Apertura:</th>\n <td>{$dcuentas['5']}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Fecha de Vencimiento:</th>\n <td>{$vencimiento}</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Dias Invertidos:</th>\n <td class='mny'>{$dcuentas['15']}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Tasa Otorgada</th>\n <td class='mny'>{$tasa} %</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Capital Invertido:</th>\n <td class='mny'>" . getFMoney($capital) . "</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Interes Generado:</th>\n <th class='mny'>" . getFMoney($interes) . "</th>\n <td>{$dmvto['0']}</td>\n </tr>\n<!--ISR -->\n <tr>\n <td> </td>\n <td> </td>\n\n <th>ISR a Retener:</th>\n <th class='mny'>(" . getFMoney($isr) . ")</th>\n <td></td>\n </tr>\n<!-- IDE -->\n<!-- <tr>\n <td> </td>\n <td> </td>\n\n <th>IDE Retenido:</th>\n <th class='mny'>(" . getFMoney($ide) . ")</th>\n <td></td>\n </tr> -->\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>A Liquidar</th>\n <td class='mny'>" . getFMoney($aliquidar) . "</td>\n <td> </td>\n </tr>\n <tr>\n \t<td />\n \t<td />\n \t<th colspan='3'>" . convertirletras($aliquidar) . "</th>\n </tr>\n</table>\n<hr /><table border='0' width='100%'>\n\t<tr>\n\t<td><center>Firma de CONFORMIDAD</td>\n\t<td><center>GENERO LA REINVERSION</center></td>\n\t</tr>\n\t<tr>\n\t<td><br /><br ><br /></td>\n\t</tr>\n\t<tr>\n\t<td><center>{$nombre}\n\t</td>\n\t\t<td><center>{$oficial}</center></td>\n\t</tr>\n\t</table>\n\t<p class='legal'>Comprobante Provisional de Reinversion, solo para fines Informativos,\n\tya que la informacion contenida en esta cedula es de caracter\n\tprovisional y suceptible a que el Aceptante modifique los montos y/o plazos durante el lapso del Dia Laboral.</p>\n\t<p class='legal'>El Impuesto a Depositos en Efectivo Cobrado en esta transaccion es de " . getFMoney($ide) . " </p>\n"; echo getRawFooter();
$dmvto = obten_filas($sql_d_mvto); $dInv = obten_filas($sql_d_inv); $dIDE = obten_filas($sql_d_ide); // $iSocio = new cFicha(iDE_SOCIO, $idsocio); $iSocio->setTableWidth(); $iSocio->show(); echo "<hr />"; $cInv = new cFicha(iDE_CINVERSION, $docto); $cInv->setTableWidth(); $cInv->show(); ?> <hr /> <?php $tasa = getFMoney($dcuentas["tasa_otorgada"] * 100); $interes = getFMoney($dmvto["afectacion_real"]); //$capital = getFMoney($dInv["afectacion_real"]); $capital = getFMoney($dcuentas["saldo_cuenta"]); $dias = $dcuentas["dias_invertidos"]; $isr = getISRByInversion($dcuentas["saldo_cuenta"], $dias); $isr = round($isr, 2); $ide = $dIDE["afectacion_real"]; //$ide = 0; $aliquidar = $dInv["afectacion_real"] + $dmvto["afectacion_real"] - ($isr + $ide); $vencimiento = $dcuentas["inversion_fecha_vcto"]; echo "\n<table width='75%'>\n <tr>\n <td width='15%'> </td>\n <td width='15%'> </td>\n\n <th>Fecha de Apertura:</th>\n <td>{$dcuentas['5']}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Fecha de Vencimiento:</th>\n <td>{$vencimiento}</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Dias Invertidos:</th>\n <td class='mny'>{$dias}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Tasa Otorgada</th>\n <td class='mny'>{$tasa} %</td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <td></td>\n <td></td>\n <td> </td>\n\n </tr>\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Capital Invertido:</th>\n <td class='mny'>{$capital}</td>\n <td> </td>\n\n </tr>\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>Interes Generado:</th>\n <th class='mny'>{$interes}</th>\n <td></td>\n </tr>\n<!-- ISR -->\n <tr>\n <td> </td>\n <td> </td>\n\n <th>ISR a Retener:</th>\n <th class='mny'>(" . getFMoney($isr) . ")</th>\n <td></td>\n </tr>\n\n<!-- IDE -->\n<!-- <tr>\n <td> </td>\n <td> </td>\n\n <th>IDE Retenido:</th>\n <th class='mny'>(" . getFMoney($ide) . ")</th>\n <td></td>\n </tr> -->\n\n\n <tr>\n <td> </td>\n <td> </td>\n\n <th>A Liquidar</th>\n <td class='mny'>" . getFMoney($aliquidar) . "</td>\n <td> </td>\n </tr>\n <tr>\n \t<td />\n \t<td />\n \t<th colspan='3'>" . convertirletras($aliquidar) . "</th>\n </tr>\n</table>\n<p class='legal'>El Impuesto a Depositos en Efectivo Cobrado en esta transaccion es de " . getFMoney($ide) . " </p>\n<hr />\n<table border='0' width='100%'>\n\t<tr>\n\t<td><center>Firma de CONFORMIDAD</td>\n\t<td><center>GENERO LA REINVERSION</center></td>\n\t</tr>\n\t<tr>\n\t<td><br /><br ><br /></td>\n\t</tr>\n\t<tr>\n\t<td><center>{$nombre}\n\t</td>\n\t\t<td><center>{$oficial}</center></td>\n\t</tr>\n</table>\n"; echo getRawFooter(); ?> </body> </html>
function vencer_intereses_de_inversion($recibo = false, $fecha = false) { //DATE_ADD(CURDATE(), INTERVAL 1 DAY) //Vencer los Intereses de las Inversiones de Ma�ana $fecha_programada = sumardias($fecha, 1); $sucursal = getSucursal(); $msg = "================= VENCIMIENTO_DE_INTERESES_SOBRE_INVERSION DEL DIA {$fecha_programada} =========\r\n"; $SQL500 = "SELECT\n\t\t\t\t\t `operaciones_mvtos`.*\n\t\t\t\t\tFROM\n\t\t\t\t\t `operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\t\tWHERE\n\t\t\t\t\t (`operaciones_mvtos`.`fecha_afectacion` = '{$fecha_programada}')\n\t\t\t\t\t AND\n\t\t\t\t\t (`operaciones_mvtos`.`tipo_operacion` = 500)\n\t\t\t\t\t AND\n\t\t\t\t\t (`operaciones_mvtos`.`sucursal`='{$sucursal}')"; $rs = mysql_query($SQL500, cnnGeneral()); if (!$rs) { $msg .= "LA CONSULTA NO SE EJECUTO (CODE: " . mysql_errno() . ")"; } while ($rw = mysql_fetch_array($rs)) { $iddocto = $rw["docto_afectado"]; $idsocio = $rw["socio_afectado"]; $interes = $rw["afectacion_real"]; //Informacion de la Cuenta $xCta = new cCuentaInversionPlazoFijo($iddocto, $idsocio); $xCta->init(); $infoCapt = $xCta->getDatosInArray(); $saldo = $infoCapt["saldo_cuenta"]; $periodo = $infoCapt["inversion_periodo"]; $dias = $infoCapt["dias_invertidos"]; $destinoInteres = $infoCapt["destino_del_interes"]; $cuenta_de_int = $infoCapt["cuenta_de_intereses"]; $isr_a_retener = 0; //CUENTA_INTERESES //Suma el Interes mas el Capital switch ($destinoInteres) { case "": $montofinal = $saldo; $xIC = cCuentaALaVista($idsocio, $cuenta_de_int); $xIC->init(); $xIC->setDeposito($interes, "NA", "ninguno", "NA", "DEPOSITO_AUTOMATICO_INVERSION_CTA_{$iddocto}", 99, $fecha, $recibo); setPolizaProforma($recibo, 222, $interes, $idsocio, $cuenta_de_int, TM_ABONO); $msg .= $xIC->getMessages(); break; default: $montofinal = $saldo + $interes; //Agregar el Movimiento, 222 == depositos de Interes setNuevoMvto($idsocio, $iddocto, $recibo, $fecha_programada, $interes, 222, $periodo, "DEPOSITO_AUTOMATICO"); $msg .= date("H:i:s") . "\t{$idsocio}\t{$iddocto}\tAgregando el INTERES POR DEPOSITAR por {$interes}\r\n"; setPolizaProforma($recibo, 222, $interes, $idsocio, $iddocto, TM_ABONO); break; } setPolizaProforma($recibo, 500, $interes, $idsocio, $iddocto, TM_CARGO); /** * Generar el ISR por Inversiones */ $isr_a_retener = getISRByInversion($saldo, $dias); // if ($isr_a_retener > 0) { setNuevoMvto($idsocio, $iddocto, $recibo, $fecha_programada, $isr_a_retener, 234, $periodo, "ISR_AUTOMATICO", -1); $msg .= date("H:i:s") . "\t{$idsocio}\t{$iddocto}\tAgregando el ISR por RETENER por {$isr_a_retener}\r\n"; //Agregar la Prepoliza setPolizaProforma($recibo, 222, $isr_a_retener, $idsocio, $iddocto, TM_CARGO); setPolizaProforma($recibo, 234, $isr_a_retener, $idsocio, $iddocto, TM_ABONO); //Disminuir el ISR del Monto a Pagar $montofinal -= $isr_a_retener; } //Actualizar la Cuenta de Captacion $sqlUCta = "UPDATE captacion_cuentas\n\t SET\n\t fecha_afectacion='{$fecha_programada}',\n\t saldo_cuenta={$montofinal}\n\t WHERE numero_cuenta={$iddocto}\n\t AND\n\t numero_socio={$idsocio}"; $x = my_query($sqlUCta); if ($x["stat"] == false) { $msg .= $x[SYS_MSG] . "\r\n"; } else { $msg .= date("H:i:s") . "\t{$idsocio}\t{$iddocto}\tActualizando la Cuenta a Saldo {$montofinal} y Fecha Afectacion {$fecha_programada} \r\n"; } } //fin de busqueda $SQL_U_500 = "UPDATE operaciones_mvtos SET\n\t\t\t estatus_mvto=30,\n\t\t\t docto_neutralizador = {$recibo}\n\t\t\t WHERE\n\t\t\t (`operaciones_mvtos`.`fecha_afectacion` = '{$fecha_programada}')\n\t\t\t AND\n\t\t\t (`operaciones_mvtos`.`tipo_operacion` = 500)\n\t\t\t AND\n\t\t\t (`operaciones_mvtos`.`sucursal`='{$sucursal}')"; $x = my_query($SQL_U_500); if ($x["stat"] == false) { $msg .= $x[SYS_MSG] . "\r\n"; } else { $msg .= date("H:i:s") . "\t\t\tActualizando el INTERES POR DEPOSITAR a 'PAGADO' (" . $x["info"] . ")\r\n"; } return $msg; }