function jsaGuardarPerfil($persona, $tipo, $pais, $monto, $numero, $observaciones)
{
    $xAP = new cAMLPersonas($persona);
    $xAP->init();
    $xAP->setGuardarPerfilTransaccional($tipo, $pais, $monto, $numero, $observaciones);
    $QL = new cSQLListas();
    $xT = new cTabla($QL->getListadoDePerfil($persona));
    $xT->addTool(SYS_DOS);
    return $xT->Show() . $xAP->getMessages(OUT_HTML);
}
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }
        $xCred->setAbonoCapital(4200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-25");
        $idrec = $xCred->setAbonoCapital(4200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-28");
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }
        $xRec->init();
        $xRec->setFinalizarRecibo(true);
        $xRec->setMoneda("USD");
        $xRec->setUnidadesOriginales(100);
        $x2Rec = new cReciboDeOperacion(RECIBOS_TIPO_PAGO_APORTACIONES, true);
        $x2Rec->setNuevoRecibo($xCred->getClaveDePersona(), DEFAULT_CREDITO, "2013-01-01", 1);
        $x2Rec->setNuevoMvto("2013-01-01", 15000, OPERACION_CLAVE_APORT_CORRIENTE, 1, "Prueba de AML");
        $x2Rec->setNuevoMvto("2013-01-02", 1500, OPERACION_CLAVE_APORT_FONDO, 1, "Prueba de AML 2");
        $x2Rec->setNuevoMvto("2013-01-03", 45000, OPERACION_CLAVE_APORT_VOLUNTARIA, 1, "Prueba de AML 3");
        $x2Rec->setFinalizarRecibo(true);
        $xHFrm->addHElem("<p class='aviso'>" . $x2Rec->getMessages(OUT_HTML) . "</p>");
        $xAML->setGuardarPerfilTransaccional(101, "MX", 10000, 10, "");
        $xAML->setGuardarPerfilTransaccional(201, "MX", 20000, 2, "");
        $xAML->setGuardarPerfilTransaccional(301, "MX", 30000, 3, "");
        $xAML->setGuardarPerfilTransaccional(401, "MX", 40000, 4, "");
    }
    $xHFrm->addHElem("<p class='aviso'>" . $xCred->getMessages(OUT_HTML) . "</p>");
}
//$xHFrm->addHElem( $txt );
//$xHFrm->addHElem( $xF->show(true) );
//$xHFrm->addHElem( "<p class='aviso'>La $miFecha, Dias del Mes==". $xF->getDiasDelMes() ."</p>");
//$xAML->getSimilaresPorNombre("jose leonides", "cocom");
//$xAML->getSimilaresPorNombre("alberto", "chi");
$miFecha = "2014-03-01";
//$xAML->getSimilaresPorNombre();
//$acum	= $xAML->getOAcumuladoDeOperaciones("2013-12-30", $miFecha, SYS_TODAS);
$xAML->setVerificarPerfilTransaccional($miFecha);