function jsaReActividadE($idsocio)
{
    $ql = new cSQLListas();
    $myCab = new cTabla($ql->getListadoDeActividadesEconomicas($idsocio));
    $myCab->setWidth();
    $myCab->addTool(2);
    $myCab->OButton("TR.Verificar", "jsVerificarAE(_REPLACE_ID_)", $myCab->ODicIcons()->SALUD);
    $myCab->setKeyField("idsocios_aeconomica");
    return $myCab->Show();
}
$xQL = new MQL();
$xLi = new cSQLListas();
$oficial = elusuario($iduser);
$idsocio = parametro("pa", false, MQL_INT);
$idsocio = parametro("socio", $idsocio, MQL_INT);
$idsocio = parametro("persona", $idsocio, MQL_INT);
$todo = parametro("f14", false, MQL_BOOL);
$xHP->init();
echo getRawHeader();
echo "<p class='bigtitle'>ESTADO DE CUENTA GENERAL DE PERSONAS</p><hr />";
$subf = $todo == true ? "" : " AND estatus_mvto=30";
// REPORTES DE SOCIOS
$cSocio = new cSocio($idsocio);
$cSocio->init();
echo $cSocio->getFicha(true);
$cTae = new cTabla($xLi->getListadoDeActividadesEconomicas($idsocio));
$cTae->setTdClassByType();
echo $cTae->Show("TR.ACTIVIDAD_ECONOMICA");
//
$cTpr = new cTabla($xLi->getListadoDeRelaciones($idsocio));
$cTpr->setTdClassByType();
echo $cTpr->Show(PERSONAS_TITULO_PARTES);
//
$sqlcred = $xLi->getListadoDeCreditos($idsocio, true);
$cTcred = new cTabla($sqlcred);
$cTcred->setTdClassByType();
echo $cTcred->Show("TR.Creditos");
//
$cTcta = new cTabla($xLi->getListadoDeCuentasDeCapt($idsocio));
$cTcta->setTdClassByType();
echo $cTcta->Show("TR.CUENTAS DE CAPTACION");