echo $xHP->getHeader();
$xFRM = new cHForm("depositoahorro", "frmdepositoinversion.php?action=next");
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
$xFRM->setTitle($xHP->getTitle());
?>
<body <?php 
echo $actload;
?>
 >
<?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) {
    //$tab -> add(TabSetValue::getBehavior("imsg", $xCta->getMessages("txt") ));
    return $tab->getString();
}
$jxc->exportFunction('jssetUltimoCheque', array('idcuenta_cheques', 'idtipo_pago'), "#idcheque");
$jxc->exportFunction('jsaGetDatosCuenta', array("idcuenta", "idsocio"));
$jxc->process();
echo $xHP->getHeader(true);
$xFRM = new cHForm("frmretirovista", "frmretiroahorro.php?action=next");
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
$xFRM->setTitle($xHP->getTitle());
$xHP->setBodyinit();
if ($com == SYS_NINGUNO) {
    $xFRM->addCuentaCaptacionBasico();
    $xFRM->addPagoBasico();
    $xFRM->addHElem($xDate->get("TR.Fecha"));
    $xFRM->addObservaciones();
    $xFRM->addHElem($xTxt->getDeMoneda("idmonto", "TR.Monto de Retiro", 0, true));
    $xFRM->addFootElement("<input type='hidden' name='cMaxRet' id='idMaxRet' value='0'  />");
    $xFRM->addFootElement("<input type='hidden' name='sdoanterior' id='idSaldoAnterior' value='0' />");
    $xFRM->addSubmit();
    $xFRM->addJsBasico(iDE_CAPTACION, iDE_CVISTA);
    $jxc->drawJavaScript(false, true);
} else {
    $sucess = true;
    if ($monto <= 0) {
        $msg .= "ERROR\tAGREGUE LOS DATOS COMPLETOS Y ENVIE EL FORMULARIO\r\n";
        $sucess = false;
    } else {
$cuenta = parametro("idcuenta", $cuenta, MQL_INT);
$jscallback = parametro("callback");
$tiny = parametro("tiny");
$form = parametro("form");
$action = parametro("action", SYS_NINGUNO);
$xHP->init();
$xJs = new jsBasicForm("frm");
$xJs->setIncludeJQuery();
$xFRM = new cHForm("frm", "cuentas.panel.frm.php");
$xBtn = new cHButton();
$xTxt = new cHText();
$xDate = new cHDate();
$xSel = new cHSelect();
if ($cuenta <= 0) {
    $xFRM->addJsBasico(iDE_CAPTACION);
    $xFRM->addCuentaCaptacionBasico(true);
    $xFRM->addSubmit();
} else {
    $xCta = new cCuentaDeCaptacion($cuenta);
    $xCta->init();
    $xFRM->addHTML($xCta->getFicha(true, "", true));
    $xFRM->addSubmit();
    //$xFRM->addToolbar( $xBtn->getBasic("TR.refrescar", "jsRecargar()", "refrescar", "refrescar", false ) );
    //$xFRM->addToolbar( $xBtn->getBasic("TR.imprimir contrato", "jsRecargar()", "refrescar", "refrescar", false ) );
    $xFRM->addCaptacionComandos($cuenta);
    $xHTabs = new cHTabs();
    $cTblx = new cTabla($mSQL->getListadoDeRecibos("", $xCta->getClaveDePersona(), $xCta->getNumeroDeCuenta()));
    $cTblx->setKeyField("idoperaciones_recibos");
    $cTblx->setTdClassByType();
    $cTblx->setEventKey("jsGoPanelRecibos");
    $xHTabs->addTab("TR.RECIBOS", $cTblx->Show());
$xFRM->ODate("idFechaDeSolicitud", false, "TR.Fecha de Solicitud");
$selPdto = $xSel->getListaDeProductosDeCredito();
$selPdto->addEvent("onchange", "jsaGetPerfilDeProducto()");
$selPdto->addEvent("onfocus", "jsaGetPerfilDeProducto()");
$xFRM->addHElem($selPdto->get("TR.producto de credito", true));
//$xFRM->addHElem($xTxt->getDeMoneda("idnuevocredito", "TR.clave_de_credito"));
$selFreq = $xSel->getListaDePeriocidadDePago();
$selFreq->addEvent("onblur", "jsSetFrecuenciaDePagos(this)");
$xFRM->addHElem($selFreq->get(true));
$xFRM->addHElem($xSel->getListaDeTipoDePago()->get(true));
$xFRM->OMoneda("idnumerodepagos", 1, "TR.Numero de pagos");
$xFRM->ODate("idFechaVencimiento", false, "TR.Fecha de Vencimiento");
$xFRM->ODate("idFechaMinistracion", false, "TR.Fecha de Ministracion");
$xFRM->addHElem($xTxt->getDeMoneda("idmonto", "TR.Monto Solicitado", 0, true));
if (MODULO_CAPTACION_ACTIVADO == true) {
    $xFRM->addCuentaCaptacionBasico(false);
} else {
    $xFRM->addHTML("<input type='hidden' value='" . DEFAULT_CUENTA_CORRIENTE . "' id='idcuenta' name='idcuenta' />");
}
$txt2 = new cHText();
$txt2->setDivClass("");
$xFRM->addDivSolo($xSel->getListaDeDestinosDeCredito()->get(false), $txt2->get("iddescripciondestino", false, "TR.Descripcion del Destino de los_recursos"), "tx14", "tx34");
$xFRM->addObservaciones();
//si es credito renovado
$xFRM->OCheck("TR.Es Credito Renovado", "idrenovado");
if (MODULO_AML_ACTIVADO == true) {
    $xFRM->OCheck("TR.PREGUNTA_AML_CREDITO_2", "idpropietario");
    $xFRM->OCheck("TR.PREGUNTA_AML_CREDITO_1", "idproveedor");
}
$xFRM->addCerrar();
$xFRM->OButton("TR.Validar Credito", "jsValidarCredito()", "checar", "idcheck");