$aliasFil = getSucursal() . "-eventos-al-cierre-de-captacion-del-dia-{$fechaop}"; $xLog = new cFileLog($aliasFil, true); $idrecibo = DEFAULT_RECIBO; $xRec = new cReciboDeOperacion(12, false); //$xRec->setGenerarPoliza(); $xRec->setForceUpdateSaldos(); $idrecibo = $xRec->setNuevoRecibo(DEFAULT_SOCIO, DEFAULT_CUENTA_CORRIENTE, $fechaop, 1, 12, "CIERRE_DE_CAPTACION_{$fechaop}", "", TESORERIA_COBRO_NINGUNO, "", DEFAULT_GRUPO); $xRec->setNumeroDeRecibo($idrecibo); $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\t" . EACP_NAME . " \r\n"; $messages .= "=========================\t\t" . getSucursal() . " \r\n"; $messages .= "=======================================================================================\r\n"; $messages .= "=========================\t\tINICIANDO EL CIERRE DE CAPTACION ====================\r\n"; $messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n"; $messages .= "=======================================================================================\r\n"; $xUCapt = new cUtileriasParaCaptacion(); $messages .= "=========================\t\tPurgando Dias Minimo de Inversion \t====================\r\n"; $messages .= $xUCapt->vencer_intereses_de_inversion($idrecibo, $fechaop); $messages .= $xUCapt->inversiones_automaticas($idrecibo, $fechaop); if ($xF->getDiaFinal() == $xF->get()) { $messages .= $xUCapt->setGenerarInteresSobreSDPM($idrecibo, $fechaop); if (CAPTACION_IMPUESTOS_A_DEPOSITOS_ACTIVO == true) { $messages .= $xUCapt->getGenerarBaseGravadaMensualIDE($fechaop); $messages .= $xUCapt->setGenerarIDE_mensual($idrecibo, $fechaop); } } $xRec->setFinalizarRecibo(true); $xLog->setWrite($messages); $xLog->setClose(); if (ENVIAR_MAIL_LOGS == true) { $xLog->setSendToMail("TR.Eventos del Cierre del Captacion");
$msg .= $xCred->setEliminarInteresesDeCreditosPagados(); break; case 884: $sql = "SELECT\n\t\t\t\t\t`captacion_cuentas`.*,\n\t\t\t\t\t`captacion_cuentastipos`.`descripcion_cuentastipos` AS `tipo`,\n\t\t\t\t\t/* heredado de inversion */\n\t\t\t\t\t`captacion_cuentas`.`numero_cuenta` AS `cuenta`,\n\t\t\t\t\t`captacion_cuentas`.`fecha_afectacion` AS `apertura`,\n\t\t\t\t\t`captacion_cuentas`.`inversion_fecha_vcto` AS `vencimiento`,\n\t\t\t\t\t`captacion_cuentas`.`tasa_otorgada` AS `tasa`,\n\t\t\t\t\t`captacion_cuentas`.`dias_invertidos` AS `dias`,\n\t\t\t\t\t`captacion_cuentas`.`observacion_cuenta` AS `observaciones`,\n\t\t\t\t\t`captacion_cuentas`.`saldo_cuenta` \t\t\t AS `saldo`,\n\t\t\t\t\t/*heredado de captacion a la vista */\n\t\t\t\t\t`captacion_subproductos`.`descripcion_subproductos` AS `subproducto`,\n\t\t\t\t\t`captacion_subproductos`.`algoritmo_de_premio`,\n\t\t\t\t\t`captacion_subproductos`.`algoritmo_de_tasa_incremental`,\n\t\t\t\t\t`captacion_subproductos`.`metodo_de_abono_de_interes`,\n\t\t\t\t\t`captacion_subproductos`.`destino_del_interes`\n\t\t\t\tFROM\n\t\t\t\t\t`captacion_cuentas` `captacion_cuentas`\n\t\t\t\t\t\tINNER JOIN `captacion_cuentastipos` `captacion_cuentastipos`\n\t\t\t\t\t\tON `captacion_cuentas`.`tipo_cuenta` = `captacion_cuentastipos`.\n\t\t\t\t\t\t`idcaptacion_cuentastipos`\n\t\t\t\t\t\t\tINNER JOIN `captacion_subproductos` `captacion_subproductos`\n\t\t\t\t\t\t\tON `captacion_cuentas`.`tipo_subproducto` = `captacion_subproductos`\n\t\t\t\t\t\t\t.`idcaptacion_subproductos`\n\t\t\t\tWHERE\n\t\t\t\t\t`captacion_cuentas`.tipo_cuenta = 20"; $rs = mysql_query($sql, cnnGeneral()); while ($rw = mysql_fetch_array($rs)) { $socio = $rw["numero_socio"]; $cuenta = $rw["numero_cuenta"]; $xInv = new cCuentaInversionPlazoFijo($cuenta, $socio); $xInv->init($rw); $msg .= $xInv->setDelete(); } break; case 885: $fecha = $id; $xUC = new cUtileriasParaCaptacion(); $msg .= $xUC->getGenerarBaseGravadaMensualIDE($fecha); break; case 886: $ForzarCorreccion = strtoupper($id); $Forzar = $ForzarCorreccion == "SI" ? true : false; $xCUtils = new cUtileriasParaCaptacion(); $msg .= $xCUtils->setValidarCuentas($Forzar); break; //TODO: Terminar //TODO: Terminar case 887: $xop = new cUtileriasParaOperaciones(); $msg .= $xop->setPurgarMovimientos(); break; case 888: