" rel="stylesheet" type="text/css">
</head>
<body>
<?php 
//0 Compra
//1 Venta
$action = isset($_GET["o"]) ? $_GET["o"] : false;
$socio = isset($_GET["s"]) ? $_GET["s"] : false;
$cuenta = isset($_GET["c"]) ? $_GET["c"] : false;
$RDeposito = "0";
$ReciboIDE = "0";
$RInversion = "0";
$fecha_actual = fechasys();
if ($socio == false or $cuenta == false) {
    $txt = "No Existen Parametros con los cuales se pueda trabajar, rellene bien los datos y reenvielo";
    exit($html->setJsDestino("acciones.frm.php?msg={$txt}"));
} else {
    $xC = new cCuentaInversionPlazoFijo($cuenta, $socio);
    $xC->init();
    //Si la cuenta no tiene 365 dias la cuenta esta bloqueada para operaciones
    $FVcto = $xC->getFechaDeVencimiento();
    $D = $xC->getDatosInArray();
    $mPeriodo = $xC->getNumeroDePeriodo();
    if ($mPeriodo > 1 and $FVcto != $fecha_actual) {
        //el periodo no ha vencido
        $txt = "La cuenta no {$cuenta} no esta habilitada para Recibir Movimientos, seleccione otra";
        exit($html->setJsDestino("acciones.frm.php?s={$socio}&c={$cuenta}&msg={$txt}"));
    }
}
if ($action == false) {
    //Operar acciones
 if ($xSoc->existeCredito($idcuenta) == true or $xSoc->existeCuenta($idcuenta) == true) {
     $idcuenta = $xSoc->getIDNuevoDocto(iDE_CAPTACION, $subpdto);
     $msg .= "WARN\tNumero de Cuenta Cambiada {$idcuenta}\r\n";
 }
 //if( $xSoc->existeCuenta($idcuenta) )
 $sqlPdto = "SELECT * FROM captacion_subproductos WHERE idcaptacion_subproductos={$subpdto}";
 $dPdto = obten_filas($sqlPdto);
 $tipocuenta = $dPdto["tipo_de_cuenta"];
 $destino_de_intereses = $dPdto["destino_del_interes"];
 //la cuenta debe de ser de intereses
 $eCta = new cCuentaDeCaptacion($cuentaDeIntereses, $idsocio);
 $eCta->init();
 $eTS = $eCta->getTipoDeSubproducto();
 if ($destino_de_intereses == CAPTACION_DESTINO_CTA_INTERES and $eTS != CAPTACION_PRODUCTO_INTERESES) {
     $msg .= "ERROR\tLa Cuenta debe tener una CUENTA VALIDA PARA INTERESES, Si no Existe agrege una NUEVA y Asociela con esta Cuenta\r\n";
     exit($html->setJsDestino("frmcaptacioncuentas.php?s={$idsocio}&x={$idcuenta}&i={$cuentaDeIntereses}&o={$origencuenta}&ti={$tipotitulo}&n={$observacion}&g={$idgrupo}&c={$idsolicitud}&p={$subpdto}&msg={$msg}"));
 }
 //verifica si existe la Cuenta
 $sqlcuenta_hay = "SELECT COUNT(numero_cuenta) AS 'cuentame' FROM captacion_cuentas WHERE numero_cuenta={$idcuenta}";
 $sihayc = the_row($sqlcuenta_hay);
 $cuentas_existentes = $sihayc["cuentame"];
 if ($cuentas_existentes > 0) {
     $sql_ultima_cuenta = "SELECT MAX(numero_cuenta) AS 'ultima_cuenta' FROM captacion_cuentas";
     $ultima_cuenta = the_row($sql_ultima_cuenta);
     $ultima_cuenta = $ultima_cuenta["ultima_cuenta"];
 }
 // Si es Inversion la Cuenta Estara Inactiva
 if (setNoMenorQueCero($man1) > 0) {
     $xMan1 = new cSocio($man1);
     if ($xMan1->init() == true) {
         //agregar relacion