$jsEvent = $out != OUT_EXCEL ? "initComponents()" : "";
$senders = getEmails($_REQUEST);
$titulo = "";
$archivo = "";
$xRPT = new cReportes($titulo);
$xRPT->setFile($archivo);
$xRPT->setOut($out);
//$xRPT->setSQL($sql);
$xRPT->setTitle($xHP->getTitle());
//============ Reporte
$xSoc = new cSocio($persona);
$xSoc->init();
$body = $xRPT->getEncabezado($xHP->getTitle(), $FechaInicial, $FechaFinal);
$xRPT->setBodyMail($body);
$xRPT->addContent($body);
$xRPT->addContent($xSoc->getFicha(true));
//Bajo revision
$xAl = new cAml_alerts();
$xlistas = new cSQLListas();
$sql = $xlistas->getListadoDeAlertas(false, false, false, $persona, " AND `estado_en_sistema` =" . SYS_UNO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show("TR.Alertas pendientes de verificar"));
//Descartados
$sql = $xlistas->getListadoDeAlertas(false, false, false, $persona, " AND `estado_en_sistema` =" . SYS_CERO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show("TR.Alertas ignoradas"));
//Riesgos para reportar
$sql = $xlistas->getListadoDeRiesgosConfirmados(false, false, false, false, $persona, " AND `estado_de_envio`= " . SYS_CERO);
$xT = new cTabla($sql);
$xRPT->addContent($xT->Show("TR.Alertas pendientes de reportar"));
$sql = $xlistas->getListadoDeRiesgosConfirmados(false, false, false, false, $persona, " AND `estado_de_envio`= " . SYS_UNO);
$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%'>&nbsp;</td>\n    <td width='15%'>&nbsp;</td>\n\n    <th>Fecha de Apertura:</th>\n    <td>{$dcuentas['5']}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Fecha de Vencimiento:</th>\n    <td>{$vencimiento}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <td></td>\n    <td></td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Dias Invertidos:</th>\n    <td class='mny'>{$dcuentas['15']}</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Tasa Otorgada</th>\n    <td class='mny'>{$tasa} %</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <td></td>\n    <td></td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n\n   <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>Capital Invertido:</th>\n    <td class='mny'>" . getFMoney($capital) . "</td>\n    <td>&nbsp;</td>\n\n  </tr>\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</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>&nbsp;</td>\n    <td>&nbsp;</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>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>IDE Retenido:</th>\n    <th class='mny'>(" . getFMoney($ide) . ")</th>\n    <td></td>\n  </tr>  -->\n\n  <tr>\n    <td>&nbsp;</td>\n    <td>&nbsp;</td>\n\n    <th>A Liquidar</th>\n    <td class='mny'>" . getFMoney($aliquidar) . "</td>\n    <td>&nbsp;</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();
?>
</body>
</html>
 function getFichaSocio()
 {
     $xS = new cSocio($this->mSocio, true);
     return $xS->getFicha();
 }
 /**
  * Muestra en Formato HTML una ficha de descripción del Socio
  * @param boolean $marco
  * @param string $extraTool
  * @param boolean $domicilio_extendido
  */
 function getFichaDeSocio($marco = true, $extraTool = "", $domicilio_extendido = false)
 {
     $Soc = new cSocio($this->mNumeroSocio, true);
     return $Soc->getFicha($domicilio_extendido, $marco, $extraTool);
 }
if (setNoMenorQueCero($idsocio) <= DEFAULT_SOCIO) {
    $xFRM = new cHForm("extrasocios", "socios.panel.frm.php");
    $xBtn = new cHButton();
    $xTxt = new cHText();
    $xFRM->setTitle($xHP->getTitle());
    $xFRM->addPersonaBasico();
    $xFRM->addSubmit();
    echo $xFRM->get();
} else {
    $xSoc = new cSocio($idsocio, true);
    $xHTabs = new cHTabs();
    $xBtn = new cHButton("");
    $oFrm = new cHForm("extrasocios", "");
    $xHSel = new cHSelect();
    $oFrm->OButton("TR.Recargar", "jsRecargar()", $oFrm->ic()->RECARGAR);
    $oFrm->addHTML($xSoc->getFicha(true));
    $oFrm->addPersonaComandos($idsocio);
    if (getEsModuloMostrado(USUARIO_TIPO_OFICIAL_CAPT) == true or getEsModuloMostrado(USUARIO_TIPO_OFICIAL_CRED) == true) {
        //Agregar otra opciones
        $oFrm->addToolbar($xBtn->getBasic("TR.Actualizar Datos", "updateDat()", "editar", "edit-socio", false));
        $oFrm->addToolbar($xBtn->getBasic("TR.Agregar Descuento Solicitado", "jsAddDescuento()", "dinero", "edit-descuento", false));
        $oFrm->OButton("TR.Reporte SIC", "jsGetCirculoDeCredito()", $xBtn->ic()->REPORTE);
        $oFrm->addToolbar($xBtn->getBasic("TR.Enviar a Empresa Asociada", "jsaSetEnviarParaAsociada()", $xBtn->ic()->EXPORTAR, "edit-aasoc", false));
    }
    //===============================================================================
    $setSql4 = $xql->getListadoDeNotas($idsocio);
    $c4Tbl = new cTabla($setSql4);
    $c4Tbl->setKeyField("idsocios_memo");
    $c4Tbl->addTool(2);
    $xHTabs->addTab($oFrm->lang("NOTAS"), $c4Tbl->Show());
    //1
$sql = $xL->getListadoDeCobranza($idnomina);
$base_contrato = contrato(401, "texto_del_contrato");
$Dep = new cEmpresas($empresa);
$Dep->init();
$nempresa = $Dep->getNombre();
$TCobros = 0;
$rs = getRecordset($sql);
$ppn = 1;
$contar = 1;
while ($rw = mysql_fetch_array($rs)) {
    //cargar datos de la parcialidad
    $numero_de_socio = $rw["persona"];
    $cSoc = new cSocio($numero_de_socio);
    $cSoc->init();
    $DSoc = $cSoc->getDatosInArray();
    $ficha_socio = $cSoc->getFicha();
    $numero_credito = $rw["credito"];
    $xCred = new cCredito($numero_credito, $numero_de_socio);
    $xCred->init();
    $DCred = $xCred->getDatosInArray();
    $svar_info_cred = $xCred->getShortDescription();
    $variable_lugar = "";
    $monto_inicial = 0;
    $monto_inicial_letras = 0;
    $numero_dias = 0;
    $variable_fecha_vencimiento = "";
    $nombre_mancomunados = "";
    $variable_tasa_otorgada = "";
    $monto_parcialidad = $rw["monto"];
    $TCobros += $monto_parcialidad;
    $numero_parcialidad = setNoMenorQueCero($rw["letra"]) == 0 ? 1 : $rw["letra"];
            //prevee que no se invierta mas de el saldo
            $IDeCien = $IDeCien > $saldo ? $saldo : $IDeCien;
            $RInversion = $xC->setReinversion($fecha_actual, true, $tasa2, $dias, true, $IDeCien);
            $msg .= "MAS_CIEN\tLa Inversion a tasa de {$tasa2} es de {$IDeCien}\r\n";
            //inversiones < 100
            $IMenorDeCien = $saldo - $IDeCien;
            if ($IMenorDeCien > 0) {
                $RInversion2 = $xC->setReinversion($fecha_actual, true, $tasa, $dias, true, $IMenorDeCien);
                $msg .= "REM_CIEN\tEl remanente a invertir a tasa de {$tasa} es de {$IMenorDeCien}\r\n";
            }
            $xC->setUpdateInversion(true);
        } else {
            //
            $RInversion = $xC->setReinversion($fecha_actual, true, $tasa, $dias);
        }
        echo $cSoc->getFicha(true);
        //$xC->init();
        echo $xC->getFicha(true);
        if (MODO_DEBUG == true) {
            echo $xC->getMessages("html");
            echo $msg;
        }
        echo "<input type='button' name='btsend' value='IMPRIMIR RECIBO DE DEPOSITO' onClick='jsPrintDeposito()' /> ";
        echo "<input type='button' name='btsend' value='IMPRIMIR/VER CONSTANCIA DE INVERSION' onClick='jsPrintReporto();' />";
        if ($ReciboIDE != false) {
            echo "<input type='button' name='btsend' value='IMPRIMIR/VER RECIBO DE RETENCION IDE' onClick='jsPrintIDE();'>";
        }
    }
}
?>
</body>
         $integrantes[] = parametro("idsocio7", false, MQL_INT);
         $integrantes[] = parametro("idsocio8", false, MQL_INT);
         $integrantes[] = parametro("idsocio9", false, MQL_INT);
         foreach ($integrantes as $key => $idpersona) {
             if (setNoMenorQueCero($idpersona) > DEFAULT_SOCIO) {
                 $xGrupo->addIntegrante($idpersona);
             }
         }
         if (MODO_DEBUG == true) {
             $msg .= $xGrupo->getMessages();
         }
     }
 }
 //Agregar Domicilio si existe
 $persona = $xSoc->getCodigo();
 $xFRM->addHTML($xSoc->getFicha());
 $lastpersona = $xCL->getUltimoSocioRegistrado(true);
 $xFRM->addPersonaComandos($persona);
 $xFRM->addAvisoRegistroOK();
 //==================================== Nuevas Relaciones
 if ($origen_relacion == false) {
     $xTbl = new cHTabla("idtblrels");
     $xHSel = new cHSelect();
     $xChk = new cHCheckBox();
     $xText = new cHText();
     $xText->setDivClass("");
     $xChk->setDivClass("");
     $xBtn = new cHButton();
     $xUl = new cHUl();
     $li = $xUl->getO();
     $li->setT("ul");
}
//if ($f16=="yes"){ $solo_con_saldos 	= " AND saldo_actual > 0 "; }
$sqlcred = "SELECT numero_socio, numero_solicitud,\tsaldo_actual, monto_autorizado\tFROM creditos_solicitud\tWHERE\tnumero_solicitud={$credito} {$solo_con_saldos}\tORDER BY fecha_vencimiento DESC";
if (isset($credito)) {
    $persona = mifila($sqlcred, "numero_socio");
}
$NCreditos = 0;
//
if ($persona) {
    $sqlcred = "SELECT numero_socio, numero_solicitud, saldo_actual, monto_autorizado FROM creditos_solicitud\t\tWHERE numero_socio={$persona} {$solo_con_saldos} ORDER BY fecha_ministracion, fecha_vencimiento DESC";
    $persona = $persona;
    $porSocio = true;
}
$xSoc = new cSocio($persona);
$xSoc->init();
echo $xSoc->getFicha(true);
echo "<hr />";
$mycred = getRecordset($sqlcred);
while ($rwc = mysql_fetch_array($mycred)) {
    $solicitud = $rwc["numero_solicitud"];
    $NCreditos++;
    $cFC = new cCredito($solicitud);
    $cFC->initCredito();
    $cFC->setForceVista($ExtInf);
    $sdoTemp = $cFC->getSaldoActual();
    echo $cFC->getFicha(true, "", true);
    $MontoAutorizado = $rwc["monto_autorizado"];
    echo "<hr />";
    $where = "";
    if ($f15 == "yes") {
        $where = " AND (operaciones_mvtos.docto_afectado={$solicitud}) {$SinEstadisticos} {$solo_este_mvto} {$varByFechas}";
//Boolean por fechas
$fecha_inicial = parametro("on", EACP_FECHA_DE_CONSTITUCION);
$fecha_final = parametro("off", $xF->getFechaMaximaOperativa());
$output = parametro("out", SYS_DEFAULT);
$es_por_fechas = "";
$xCuenta = new cCuentaALaVista($idcuenta);
$xCuenta->init();
//Datos de la Cuenta
$rwc = $xCuenta->getDatosInArray();
// datos generales del socio
$idsocio = $rwc["numero_socio"];
// Numero de Socio
$CSocio = new cSocio($idsocio);
$CSocio->init();
$mynom = $CSocio->getNombreCompleto();
$xRPT->addContent($CSocio->getFicha());
//Verifica el FORZADO de el Cuadre de Saldos
// datos de la cuenta
$tipocuenta = eltipo("captacion_cuentastipos", $rwc[4]);
$tasa = $rwc[14] * 100;
$saldo = $rwc["saldo_cuenta"];
$sdoact = number_format($rwc[9], 2, '.', ',');
$depositos = 0;
$retiros = 0;
$sdo_i = 0;
$sdo_f = 0;
/*	echo "<hr />
	<table width='100%'>
		<tr>
		<td class='ths'>Numero de cuenta</td><td>$idcuenta</td>
		<td class='ths'>Modalidad de la Cuenta</td><td>$tipocuenta</td>
 function setPersona($clave_de_persona)
 {
     $this->mPersona = $clave_de_persona;
     $cSoc = new cSocio($clave_de_persona);
     $fichas_de_respsolidarios = "";
     $firmas_de_respsolidarios = "";
     if ($cSoc->init() == true) {
         $domicilio_del_socio = $cSoc->getDomicilio();
         $ficha_socio = $cSoc->getFicha(true, true);
         $xODom = $cSoc->getODomicilio();
         $xOAE = $cSoc->getOActividadEconomica();
         //Caja local por SQL
         $SQLCL = "SELECT idsocios_cajalocal, descripcion_cajalocal, ultimosocio, region, sucursal FROM socios_cajalocal WHERE idsocios_cajalocal=" . $cSoc->getNumeroDeCajaLocal();
         $caja_local = mifila($SQLCL, "descripcion_cajalocal");
         $xFecha = new cFecha();
         $this->mArr["variable_domicilio_del_socio"] = $domicilio_del_socio;
         $this->mArr["variable_rfc_del_socio"] = $cSoc->getRFC();
         $this->mArr["variable_curp_del_socio"] = $cSoc->getCURP();
         $this->mArr["variable_numero_de_socio"] = $cSoc->getCodigo();
         $this->mArr["variable_nombre_caja_local"] = $caja_local;
         $this->mArr["variable_informacion_del_socio"] = $ficha_socio;
         $this->mArr["variable_fecha_de_nacimiento_del_socio"] = $xFecha->getFechaMediana($cSoc->getFechaDeNacimiento());
         $this->mArr["variable_ciudad_de_nacimiento_del_socio"] = $cSoc->getLugarDeNacimiento();
         if ($xODom != null) {
             $this->mArr["variable_sin_ciudad_domicilio_del_socio"] = $xODom->getDireccionBasica();
             $this->mArr["variable_ciudad_del_socio"] = $xODom->getCiudad();
             $this->mArr["variable_persona_domicilio_municipio"] = $xODom->getMunicipio();
         }
         if ($xOAE != null) {
             $this->mArr["variable_actividad_economica_del_socio"] = $xOAE->getPuesto();
             $this->mArr["variable_estado_de_actividad_economica"] = $xOAE->getNombreEstado();
             $this->mArr["variable_municipio_de_actividad_economica"] = $xOAE->getNombreMunicipio();
             $this->mArr["variable_nombre_de_la_empresa"] = $xOAE->getNombreEmpresa();
             $this->mArr["variable_socio_actividad_ciudad"] = $xOAE->getLocalidad();
             $this->mArr["variable_socio_actividad_telefono"] = $xOAE->getTelefono();
         }
         $this->mArr["variable_nombre_del_socio"] = $cSoc->getNombreCompleto();
         $this->mArr["variable_persona_nombre_completo"] = $cSoc->getNombreCompleto();
         $idestadocivil = $cSoc->getEstadoCivil();
         $DEstadoCivil = new cSocios_estadocivil();
         $DEstadoCivil->setData($DEstadoCivil->query()->initByID($idestadocivil));
         $nombre_estadocivil = $DEstadoCivil->descripcion_estadocivil()->v();
         $this->mArr["variable_estado_civil_del_socio"] = $nombre_estadocivil;
         $firmas_de_respsolidarios = $cSoc->getCoResponsables("firmas");
     } else {
         if (MODO_DEBUG == true) {
             setLog($cSoc->getMessages());
         }
     }
     $this->mArr["variable_responsable_solidario_en_fichas"] = $fichas_de_respsolidarios;
     $this->mArr["variable_firmas_de_obligados_solidarios"] = $firmas_de_respsolidarios;
 }
 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&oacute;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 = "|&nbsp;&nbsp;&nbsp;" . $this->mTitle . "&nbsp;&nbsp;&nbsp;|";
     }
     $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;
     }
 }
        $compFecha = "\n\t\tAND\n\t\t(`seguimiento_llamadas`.`fecha_llamada` = '{$fecha_final}')";
        $compFecha2 = "\n\t\tAND\n\t\t(`socios_memo`.`fecha_memo` = '{$fecha_final}')";
        $compFecha3 = "\n\t\tAND\n\t\t(`seguimiento_notificaciones`.`fecha_notificacion` = '{$fecha_final}')";
        $compFecha4 = "\n\t\tAND\n\t\t(`seguimiento_compromisos`.`fecha_vencimiento` = '{$fecha_final}')";
    }
}
$input = $_GET["out"];
if (!$input) {
    $input = "default";
}
$setSql = "\n\nSELECT\n\t`seguimiento_llamadas`.`idseguimiento_llamadas` AS `clave`,\n\t/*`oficiales`.`id`\t\t\t\t\t\t\t\tAS `oficial`,*/\n\t`oficiales`.`nombre_completo`\t\t\t\t\tAS 'nombre_del_oficial',\n\t/*`oficiales`.`puesto`,\n\t`oficiales`.`sucursal`,\n\t`socios`.`codigo`,\n\t`socios`.`nombre`,*/\n\t`seguimiento_llamadas`.`numero_solicitud`       AS `credito`,\n\t\n\t`seguimiento_llamadas`.`fecha_llamada`          AS `fecha`,\n\t`seguimiento_llamadas`.`hora_llamada`           AS `hora`,\n\t`seguimiento_llamadas`.`estatus_llamada`        AS `estatus`,\n\t`seguimiento_llamadas`.`observaciones`          AS `resultados`\nFROM\n\t`seguimiento_llamadas` `seguimiento_llamadas`\n\t\tINNER JOIN `socios` `socios`\n\t\tON `seguimiento_llamadas`.`numero_socio` = `socios`.`codigo`\n\t\t\tINNER JOIN `oficiales` `oficiales`\n\t\t\tON `seguimiento_llamadas`.`oficial_a_cargo` = `oficiales`.`id`\nWHERE\n\t(`socios`.`codigo` =\t{$socio})\n\t{$compCredito}\n\t{$compFecha}\nORDER BY\n\t`oficiales`.`id`,\n\t`seguimiento_llamadas`.`fecha_llamada`,\n\t`seguimiento_llamadas`.`hora_llamada`,\n\t`seguimiento_llamadas`.`estatus_llamada`";
$setSql2 = "\nSELECT\n\t`socios_memo`.`idsocios_memo`\t\t\tAS 'clave',\n\t/*`socios`.`codigo`,\n\t`socios`.`nombre`,*/\n\t`oficiales`.`nombre_completo`         AS `oficial`,\n\t\n\t`socios_memo`.`numero_solicitud`      AS `documento`,\n\t`socios_memo`.`fecha_memo`            AS `fecha`,\n\t`socios_memotipos`.`descripcion_memo` AS `tipo`,\n\t\n\t`socios_memo`.`texto_memo`            AS `texto` \nFROM\n\t`socios_memo` `socios_memo` \n\t\tINNER JOIN `socios_memotipos` `socios_memotipos` \n\t\tON `socios_memo`.`tipo_memo` = `socios_memotipos`.`tipo_memo` \n\t\t\tINNER JOIN `oficiales` `oficiales` \n\t\t\tON `socios_memo`.`idusuario` = `oficiales`.`id` \n\t\t\t\tINNER JOIN `socios` `socios` \n\t\t\t\tON `socios_memo`.`numero_socio` = `socios`.`codigo` \n\nWHERE\n\t(`socios`.`codigo` = {$socio})\n\t{$compCredito2}\n\t{$compFecha2}\n\tORDER BY\n\t\t`socios`.`codigo`,\n\t\t`socios_memo`.`fecha_memo`";
$setSql3 = "\nSELECT\n\t`seguimiento_notificaciones`.`numero_notificacion`  AS `clave`,\n\t/*`oficiales`.`id`                                    AS `oficial`,*/\n\t`oficiales`.`nombre_completo`\t\t\t\t\t\tAS 'nombre_del_oficial',\n\t/*`oficiales`.`puesto`,\n\t`oficiales`.`sucursal`,*/\n\t/*`socios`.`codigo`,\n\t`socios`.`nombre`,*/\n\t`seguimiento_notificaciones`.`numero_solicitud`     AS `solicitud`,\n\t\n\t`seguimiento_notificaciones`.`fecha_notificacion`   AS `fecha`,\n\t`seguimiento_notificaciones`.`fecha_vencimiento`    AS `vencimiento`,\n\t`seguimiento_notificaciones`.`estatus_notificacion` AS `estatus`,\n\t`seguimiento_notificaciones`.`observaciones`        AS `observaciones` \nFROM\n\t`seguimiento_notificaciones` `seguimiento_notificaciones` \n\t\tINNER JOIN `oficiales` `oficiales` \n\t\tON `seguimiento_notificaciones`.`oficial_de_seguimiento` = `oficiales`.\n\t\t`id` \n\t\t\tINNER JOIN `socios` `socios` \n\t\t\tON `seguimiento_notificaciones`.`socio_notificado` = `socios`.\n\t\t\t`codigo` \nWHERE\n\t(`socios`.`codigo` =\t{$socio})\n\t{$compCredito3}\n\t{$compFecha3}\n\t\n\tORDER BY\n\t\t`oficiales`.`id`,\n\t\t`socios`.`codigo`";
$setSql4 = " SELECT\n\t`seguimiento_compromisos`.`idseguimiento_compromisos` AS 'clave',\n\t/*`oficiales`.`id` AS 'oficial',*/\n\t`oficiales`.`nombre_completo`\tAS 'nombre_del_oficial',\n\t/*`oficiales`.`puesto`,\n\t`oficiales`.`sucursal`,*/\n\n\t/*`seguimiento_compromisos`.`socio_comprometido`,\n\t`socios`.`nombre`,*/\n\n\t`seguimiento_compromisos`.`credito_comprometido`,\n\t\n\t`seguimiento_compromisos`.`fecha_vencimiento`,\n\t`seguimiento_compromisos`.`hora_vencimiento`,\n\t`seguimiento_compromisos`.`tipo_compromiso`,\n\t`seguimiento_compromisos`.`estatus_compromiso` AS 'estatus',\n\t`seguimiento_compromisos`.`anotacion`\n\nFROM\n\t`seguimiento_compromisos` `seguimiento_compromisos`\n\t\tINNER JOIN `socios` `socios`\n\t\tON `seguimiento_compromisos`.`socio_comprometido` = `socios`.`codigo`\n\t\t\tINNER JOIN `oficiales` `oficiales`\n\t\t\tON `seguimiento_compromisos`.`oficial_de_seguimiento` = `oficiales`.\n\t\t\t`id`\nWHERE\n\t(`seguimiento_compromisos`.`socio_comprometido` ={$socio})\n\t{$compCredito4}\n\t{$compFecha4}\nORDER BY\n\t`oficiales`.`id`,\n\t`seguimiento_compromisos`.`fecha_vencimiento`,\n\t`seguimiento_compromisos`.`hora_vencimiento`,\n\t`seguimiento_compromisos`.`tipo_compromiso`";
$cSocio = new cSocio($socio, true);
echo $cSocio->getFicha(true);
$c4Tbl = new cTabla($setSql4, 5);
$c4Tbl->setWidth();
$c4Tbl->Show("COMPROMISOS DE LA PERSONA", false);
$cTbl = new cTabla($setSql, 3);
$cTbl->setWidth();
$cTbl->Show("LLAMADAS DE LA PERSONA", false);
$c3Tbl = new cTabla($setSql3, 3);
$c3Tbl->setWidth();
$c3Tbl->Show("NOTIFICACIONES DE LA PERSONA", false);
$c2Tbl = new cTabla($setSql2, 0);
$c2Tbl->setWidth();
$c2Tbl->Show("MEMOS DE LA PERSONA", false);
echo getRawFooter();
?>
</body>