function jsaGetDatosCuenta($cuenta, $socio, $dias)
{
$xInv = new cCuentaInversionPlazoFijo($cuenta, $socio);
$tasa = $xInv->getTasaAplicable($dias) * 100;
$xSoc = new cSocio($socio);
$xSoc->init();
$cuentainteres = $xSoc->getCuentaDeCaptacionPrimaria(CAPTACION_TIPO_VISTA, CAPTACION_PRODUCTO_INTERESES);
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idtasa", $tasa));
$tab->add(TabSetValue::getBehavior("idcuentainteres", $cuentainteres));
return $tab->getString();
}
function jsaGetDatosCuenta($cuenta, $socio)
{
$xCta = new cCuentaInversionPlazoFijo($cuenta, $socio);
$xCta->init();
$DC = $xCta->getDatosInArray();
$MaxRet = $xCta->getMaximoRetirable();
$sdo = $DC["saldo_cuenta"];
$tab = new TinyAjaxBehavior();
$tab->add(TabSetValue::getBehavior("idMaxRet", $MaxRet));
$tab->add(TabSetValue::getBehavior("idSaldoAnterior", $sdo));
//$tab -> add(TabSetValue::getBehavior("idmonto", $sdo ));
//$tab -> add(TabSetValue::getBehavior("imsg", $xCta->getMessages("txt") ));
return $tab->getString();
}
<?php
$xFRM->setTitle($xHP->getTitle());
if ($action == SYS_NINGUNO) {
$xFRM->addCuentaCaptacionBasico(true, CAPTACION_TIPO_PLAZO);
$xFRM->addSubmit();
$xFRM->addHElem($xTxt->getDeMoneda("idmonto", "TR.deposito", 0, true));
$xFRM->addCobroBasico();
$xFRM->addHElem($xDate->get("TR.Fecha"));
$xFRM->addObservaciones();
$xFRM->addJsBasico(iDE_CAPTACION, CAPTACION_TIPO_PLAZO);
$jxc->drawJavaScript(false, true);
} else {
if ($monto <= 0) {
$msg .= "ERROR\tEL MONTO DEBE SER MAYOR A CERO\r\n";
} else {
$xCta = new cCuentaInversionPlazoFijo($iddocto, $idsocio);
$xCta->init();
$ide = $xCta->getMontoIDE($Fecha, $monto, $comopago);
if ($xCta->getEsOperable($Fecha) == true) {
$recibo = $xCta->setDeposito($monto, $cheque, $comopago, $folio_fiscal, $detalles, DEFAULT_GRUPO, $Fecha);
//si el IDE es mayor a cero
if ($ide > 0) {
$saldo = $xCta->getNuevoSaldo();
$ide_observacion = "Retencion Generada por un Deposito de {$monto}, Recibo {$recibo}, saldo de {$saldo}";
//Si el Saldo de la Cuenta es Mayor al IDE
if ($saldo > $ide) {
$reciboIDE = $xCta->setRetenerIDE($Fecha, false, $ide, $ide_observacion);
} else {
//Si no el IDE es igual al Saldo
$ide = $saldo;
$reciboIDE = $xCta->setRetenerIDE($Fecha, false, $ide, $ide_observacion);
$nombre_del_socio = $xSoc->getNombreCompleto();
if ($idsocio != 1) {
$nombre = $nombre_del_socio;
} else {
$nombre = mifila($sqlrec, "cadena_distributiva");
}
$direccion = $domicilio_del_socio;
$rfc = $DSoc["rfc"];
$curp = $DSoc["curp"];
// obtiene datos del documento que ayudaran al detalle en contabilidad
$observaciones = mifila($sqlrec, "observacion_recibo");
//
$sql_d_mvto = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=500 ";
$sql_d_inv = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE recibo_afectado={$idrecibo}\n\t\t\t\t\t\tAND tipo_operacion=223 ";
$sql_d_ide = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\tfecha_operacion = '{$fechaRecibo}'\n\t\t\t\t\t\tAND docto_afectado = {$docto}\n\t\t\t\t\t\tAND tipo_operacion=235 ";
$xInv = new cCuentaInversionPlazoFijo($docto, $idsocio);
$dcuentas = $xInv->getDatosInArray();
$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
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>RECIBO DE REINVERSION</title>
</head>
<link href="../css/reporte.css" rel="stylesheet" type="text/css">
<body onLoad="javascript:window.print();">
<?php
echo getRawHeader();
$docto = $cuenta;
$fechaRecibo = date("Y-m-d");
$sql_d_ide = "SELECT * FROM operaciones_mvtos\n\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\tfecha_operacion = '{$fechaRecibo}'\n\t\t\t\t\t\t\tAND docto_afectado = {$docto}\n\t\t\t\t\t\t\tAND tipo_operacion=235";
$dIDE = obten_filas($sql_d_ide);
$ide = $dIDE["afectacion_real"];
$xInv = new cCuentaInversionPlazoFijo($docto, false, 0);
$dcuentas = $xInv->getDatosInArray();
$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;
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;
}
$bufer = trim($bufer);
$datos = explode(",", $bufer, 6);
$socio = $cT->cInt($datos[0]);
$importe = $cT->cFloat($datos[1]);
$fechaApertura = $cT->cFecha($datos[2]);
$plazo = $cT->cInt($datos[3]);
$tasa = $cT->cFloat($datos[4]);
$observaciones = $cT->cChar($datos[5]);
$ClaveCuenta = false;
//Iniciar el Socio
//$msg .= "$iReg\t$socio\tERROR_SOCIO\t$socio -- $importe -- $fechaApertura -- $plazo -- $tasa -- $observaciones\r\n";
$xCL = new cCajaLocal(99);
if ($xCL->getExistenciaSocio($socio) <= 0) {
$msg .= "{$iReg}\t{$socio}\tERROR_SOCIO\tLa Linea({$iReg}) no se leyo por que no existe el socio({$bufer})\r\n";
} else {
$xInv = new cCuentaInversionPlazoFijo(false, $socio, $plazo, $tasa, $fechaApertura);
//Agrega la Cuenta
$ClaveCuenta = $xInv->setNuevaCuenta(99, 2, $socio, $observaciones, DEFAULT_CREDITO, "", "", DEFAULT_GRUPO, $fechaApertura, CAPTACION_TIPO_PLAZO, 99, $plazo, $tasa);
if ($ClaveCuenta != false) {
$msg .= "{$iReg}\t{$socio}\tCUENTA\tSe Agrego Exitosamente la cuenta {$ClaveCuenta}\r\n";
if ($importe > 0) {
$xInv->init();
$xInv->setFechaDeOperacion($fechaApertura);
$xInv->setDiasInvertidos($plazo);
$RDeposito = $xInv->setDeposito($importe, DEFAULT_CHEQUE, DEFAULT_TIPO_PAGO, DEFAULT_RECIBO_FISCAL, $observaciones, DEFAULT_GRUPO, $fechaApertura);
$msg .= "{$iReg}\t{$socio}\tRECIBO_DEPOSITO\tSe Efectua un Deposito de {$importe} al Recibo {$RDeposito}\r\n";
$xInv->init();
$recibo_de_reinversion = $xInv->setReinversion($fechaApertura, true, $tasa, $plazo);
$msg .= "{$iReg}\t{$socio}\tRECIBO_INVERSION\tSe Efectua una Inversion de {$importe} al Recibo {$recibo_de_reinversion}\r\n";
$msg .= $xInv->getMessages("txt");
}
//Guardar Acciones
$acciones = isset($_POST["cNumeroAcciones"]) ? $_POST["cNumeroAcciones"] : 0;
$cheque = isset($_POST["cheque"]) ? $_POST["cheque"] : "NA";
$observa = isset($_POST["observaciones"]) ? $_POST["observaciones"] : "";
$reciboFisc = isset($_POST["recibofiscal"]) ? $_POST["recibofiscal"] : "NA";
$tipo_de_pago = isset($_POST["ctipo_pago"]) ? $_POST["ctipo_pago"] : "ninguno";
//( isset($_POST[""]) ) ? $_POST[""] : 0;
$invertido = $acciones * COSTE_POR_ACCION;
$dias = 180;
$tasa = 0.08;
$tasa2 = 0.09;
$msg = "";
if ($acciones > 0 and $socio != false and $cuenta != 0) {
$cSoc = new cSocio($socio);
$cSoc->init();
$xC = new cCuentaInversionPlazoFijo($cuenta, $socio, $dias, $tasa);
$xC->init();
//Si la cuenta no tiene 365 dias la cuenta esta bloqueada para operaciones
$FVcto = $xC->getFechaDeVencimiento();
$D = $xC->getDatosInArray();
$mPeriodo = $xC->getNumeroDePeriodo();
$ide = $xC->getMontoIDE($fecha_actual, $invertido);
$RDeposito = $xC->setDeposito($invertido, $cheque, $tipo_de_pago, $reciboFisc, $observaciones);
$xC->init();
$saldo = $xC->getNuevoSaldo();
//si el IDE es mayor a cero
if ($ide > 0) {
$ide_observacion = "Retencion Generada por un Deposito de {$invertido}, Recibo {$RDeposito}, saldo de {$saldo}";
//Si el Saldo de la Cuenta es Mayor al IDE
if ($saldo > $ide) {
$ReciboIDE = $xC->setRetenerIDE($fecha_actual, false, $ide, $ide_observacion);
$cUCredit = new cUtileriasParaCreditos();
$msg .= $cUCredit->setCuadrarCreditosBySaldo($fecha);
break;
//Elimina saldo de interes de creditos pagados
//Elimina saldo de interes de creditos pagados
case 883:
$xCred = new cUtileriasParaCreditos();
$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;
$xHP = new cHPage("TR.Estado de Cuenta de Depositos plazo_fijo", HP_REPORT);
$xQl = new MQL();
$cuenta = parametro("cuenta", DEFAULT_CUENTA_CORRIENTE, MQL_INT);
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$cuenta = parametro("docto", $cuenta, MQL_INT);
$idcuenta = $cuenta;
//parametro("docto", false, MQL_INT);
$AppByFechas = parametro("v73", false, MQL_BOOL);
//Boolean por fechas
$fecha_inicial = $_GET["on"];
$fecha_final = $_GET["off"];
$out = parametro("out", SYS_DEFAULT);
$es_por_fechas = "";
$xHT = new cHTabla();
//ini_set("display_errors", "on");
$xCuenta = new cCuentaInversionPlazoFijo($cuenta);
$xCuenta->init();
$saldo = $xCuenta->getSaldoActual();
$xRPT = new cReportes();
$persona = $xCuenta->getClaveDePersona();
$xSoc = new cSocio($persona);
$xSoc->init();
$xRPT->setTitle($xHP->getTitle(), true);
$xRPT->addContent($xSoc->getFicha());
$xRPT->addContent($xCuenta->getFicha(true, "", true));
//Datos de la Cuenta
$sqlMvtos = "SELECT\n\t\t\t`operaciones_mvtos`.*,\n\t\t\t\t(`operaciones_mvtos`.`afectacion_real` *\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion`) AS 'monto',\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion`\n\t\t\tFROM\n\t\t\t`operaciones_mvtos` `operaciones_mvtos`\n\t\t\t\tINNER JOIN `eacp_config_bases_de_integracion_miembros`\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`\n\t\t\t\tON `operaciones_mvtos`.`tipo_operacion` =\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`miembro`\n\t\t\tWHERE\n\t\t\t(`operaciones_mvtos`.`docto_afectado` =" . $cuenta . ") AND\n\t\t\t(`eacp_config_bases_de_integracion_miembros`.`codigo_de_base` = 3200)\n\n\t\t\tORDER BY\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`codigo_de_base`,\n\t\t\t\t`operaciones_mvtos`.`fecha_afectacion`,\n\t\t\t\t`eacp_config_bases_de_integracion_miembros`.`afectacion` DESC\n\t\t\t";
$xHT->initRow();
$xHT->addTH("TR.Fecha");
$xHT->addTH("TR.Recibo");
$xHT->addTH("TR.Operacion");
function show($return = false)
{
$exoFicha = "";
$iNumTools = sizeof($this->mTool);
$trTool = "";
$wTable = $this->mTableWidth;
if ($iNumTools > 0) {
$iTools = "";
foreach ($this->mTool as $key => $value) {
$TParts = explode("@", $value);
$iImg = $TParts[0];
$iTitle = $TParts[1];
$srcImg = vIMG_PATH . "/common/{$iImg}";
$iTools = $iTools . "<td><img src=\"{$srcImg}\" onclick=\"{$key}(" . $this->mKey . ")\" />{$iTitle}</td>";
}
$trTool = "<tr>\r\n\t\t\t<td colspan=\"4\">\r\n\t\t\t<table width=\"100%\">\r\n\t\t\t\t<tbody>\r\n\t\t\t\t\t<tr>\r\n\t\t\t\t\t{$iTools}\r\n\t\t\t\t\t</tr>\r\n\t\t\t\t</tbody>\r\n\t\t\t</table>\r\n\t\t\t</td>\r\n\t\t\t</tr>";
}
// end iNumTools
$cTyp = new cTipos();
switch ($this->mType) {
case iDE_SOCIO:
//INFO del Socio
$cSoc = new cSocio($this->mKey, true);
$exoFicha = $cSoc->getFicha($this->mSocioWithDomExt, false, $trTool);
unset($cSoc);
break;
case iDE_CREDITO:
// Creditos iDE_CREDITO
$cF = new cCredito($this->mKey);
$cF->initCredito();
$exoFicha = $cF->getFicha(false, $trTool);
unset($cF);
break;
case 101:
//Grupos iDE_GRUPO
$cG = new cGrupo($this->mKey);
$exoFicha = $cG->getFicha(false, $trTool);
unset($cG);
break;
case iDE_GARANTIA:
$sql = "SELECT creditos_garantias.idcreditos_garantias,\r\n\t\t\t\tcreditos_tgarantias.descripcion_tgarantias AS 'Tipo_de_Garantia',\r\n\t\t\t\t creditos_tvaluacion.descripcion_tvaluacion AS 'Tipo_de_Valuacion',\r\n\t\t\t\t creditos_garantias.fecha_recibo AS 'Fecha_de_Recibo',\r\n\t\t\t\t FORMAT(creditos_garantias.monto_valuado, 2) AS 'Monto_valuado',\r\n\t\t\t\t creditos_garantias.fecha_adquisicion AS 'Fecha_de_Adquisicion',\r\n\t\t\t\t creditos_garantias.documento_presentado AS 'Documento_Presentado',\r\n\t\t\t\t creditos_garantias.descripcion AS 'Descripcion',\r\n\t\t\t\t creditos_garantias.propietario AS 'Propietario'\r\n\t\t\t\t FROM creditos_tvaluacion, creditos_garantias, creditos_tgarantias\r\n\t\t\t\t WHERE creditos_tgarantias.idcreditos_tgarantias=creditos_garantias.tipo_garantia\r\n\t\t\t\t AND creditos_tvaluacion.idcreditos_tvaluacion=creditos_garantias.tipo_valuacion\r\n\t\t AND creditos_garantias.idcreditos_garantias=" . $this->mKey;
$tool = $trTool;
$rwt = obten_filas($sql);
$exoFicha = "\r\n\t<table {$wTable} border='0'>\r\n\t<tbody>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Identificador</th><td>{$rwt['0']}</td>\r\n\t\t\t<th class='izq'>Tipo</th><td>{$rwt['1']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Tipo de Valuacion</th><td>{$rwt['2']}</td>\r\n\t\t\t<th class='izq'>Fecha de Resguardo</th><td>{$rwt['3']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Fecha de Adquisicion</th><td>{$rwt['5']}</td>\r\n\t\t\t<th class='izq'>Documento / Factura</th><td>{$rwt['6']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th class='izq'>Monto Valuado</th><td>" . getFMoney($rwt[4]) . "</td>\r\n\t\t\t<th class='izq'>Propietario</th><td>{$rwt['8']}</td>\r\n\t\t</tr>\r\n\t\t<tr>\r\n\t\t\t<th>Descripción</th>\r\n\t\t\t<td>{$rwt['7']}</td>\r\n\t\t</tr>\r\n\t\t{$tool}\r\n\t</tbody>\r\n\t</table>";
break;
case 300:
//TODO: Change this line.- cambiar por la clase global
$sqli = "\r\n\t\t\tSELECT\r\n\t\t\t\t\t`captacion_cuentas`.`numero_cuenta`,\r\n\t\t\t\t\t`captacion_cuentastipos`.`descripcion_cuentastipos` AS `modalidad`,\r\n\t\t\t\t\t`captacion_subproductos`.`descripcion_subproductos` AS `subproducto`,\r\n\t\t\t\t\t`captacion_cuentas`.`fecha_apertura` AS `fecha_de_apertura`,\r\n\t\t\t\t\t`captacion_cuentas`.`saldo_cuenta` AS `saldo_actual`,\r\n\t\t\t\t\t`captacion_cuentas`.`numero_grupo` AS `grupo_asociado`,\r\n\t\t\t\t\t`captacion_cuentas`.`numero_solicitud` AS `credito_asociado`,\r\n\t\t\t\t\t`captacion_cuentas`.`tasa_otorgada` AS `tasa`,\r\n\t\t\t\t\t`captacion_cuentas`.`observacion_cuenta` AS `observaciones`\r\n\t\t\t\tFROM\r\n\t\t\t\t\t`captacion_cuentas` `captacion_cuentas`\r\n\t\t\t\t\t\tINNER JOIN `captacion_cuentastipos` `captacion_cuentastipos`\r\n\t\t\t\t\t\tON `captacion_cuentas`.`tipo_cuenta` = `captacion_cuentastipos`.\r\n\t\t\t\t\t\t`idcaptacion_cuentastipos`\r\n\t\t\t\t\t\t\tINNER JOIN `captacion_subproductos` `captacion_subproductos`\r\n\t\t\t\t\t\t\tON `captacion_cuentas`.`tipo_subproducto` = `captacion_subproductos`\r\n\t\t\t\t\t\t\t.`idcaptacion_subproductos`\r\n\t\t\t\tWHERE\r\n\t\t\t\t\t(`captacion_cuentas`.`numero_cuenta` =" . $this->mKey . ")";
$rw = obten_filas($sqli);
$exoFicha = "\r\n\t\t\t\t<table width='100%' border='0'>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Numero de Cuenta</th class='mny'><td>" . $rw["numero_cuenta"] . "</td>\r\n\t\t\t\t\t<th class='izq' >Fecha de Apertura</th><td>" . getFechaMediana($rw["fecha_de_apertura"]) . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Modalidad</th><td>" . $rw["modalidad"] . "</td>\r\n\t\t\t\t\t<th class='izq'>Producto</th><td>" . $rw["subproducto"] . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Tasa Actual</th><td class='mny'>% " . getFMoney($rw["tasa"] * 100) . "</td>\r\n\t\t\t\t\t<th class='izq'>Saldo Actual</th>\r\n\t\t\t\t\t<td class='mny'>" . getFMoney($rw["saldo_actual"]) . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t<tr>\r\n\t\t\t\t\t<th class='izq'>Observaciones</th><td colspan='2'>" . $rw["observaciones"] . "</td>\r\n\t\t\t\t</tr>\r\n\t\t\t\t</table>";
break;
case 310:
//Depositos a la vista iDE_CVISTA
$cCapt = new cCuentaALaVista($this->mKey);
$cCapt->init();
$exoFicha = $cCapt->getFicha(false, $trTool);
break;
case 320:
//iDE_CINVERSION
$xCI = new cCuentaInversionPlazoFijo($this->mKey);
$xCI->init();
$exoFicha = $xCI->getFicha(false, $trTool);
break;
case 400:
//RECIBO DE OPERACION
$cRec = new cReciboDeOperacion(99, false, $this->mKey);
//$cRec->initRecibo();
$exoFicha = $cRec->getFicha(false, $trTool);
unset($cRec);
break;
default:
break;
}
//retoque fieldset
if ($this->mTitle != "") {
$this->mTitle = "| " . $this->mTitle . " |";
}
$exoFicha = "<fieldset>\r\n\t\t\t\t\t\t<legend>" . $this->mTitle . "</legend>\r\n\t\t\t\t\t\t\t{$exoFicha}\r\n\t\t\t\t\t</fieldset>";
if ($return == true) {
return $exoFicha;
} else {
echo $exoFicha;
}
}
