$ready = $xTabla->query()->update()->save($clave);
        //actualizar BD
    }
    $clave = null;
    if ($ready != false) {
        $xFRM->addAvisoRegistroOK();
    }
    // else { $xFRM->addAvisoRegistroError();	}
}
if ($clave == null) {
    $clave = $xTabla->query()->getLastID() + 1;
    $xTabla->idaml_riesgo_perfiles($clave);
    $xFRM->setAction("perfiles-de-riesgo.frm.php?action=" . MQL_ADD);
}
$xFRM->OHidden("idaml_riesgo_perfiles", $xTabla->idaml_riesgo_perfiles()->v(), "TR.idaml riesgo perfiles");
$xFRM->addHElem($xSel->getListaDeObjetosOrigenRiesgo("objeto_de_origen", $xTabla->objeto_de_origen()->v())->get("TR.origen", true));
$xFRM->addHElem($xTxt->getDeValoresPorTabla("valor_de_origen", $xTabla->valor_de_origen()->v(), "TR.valor de origen", "objeto_de_origen"));
$xFRM->addHElem($xSel->getListaDeNivelDeRiesgo("nivel_de_riesgo", $xTabla->nivel_de_riesgo()->v())->get(true));
/* ===========		GRID JS		============*/
$xT = new cTabla("SELECT * FROM aml_riesgo_perfiles LIMIT 0,100");
$xT->addTool($xT->T_ELIMINAR);
$xFRM->addHTML($xT->Show());
/*
$xHG	= new cHGrid("aml_riesgo_perfiles");
$sqlaml_riesgo_perfiles	= base64_encode("SELECT * FROM aml_riesgo_perfiles LIMIT 0,100");
$xHG->setListAction("../svc/datos.svc.php?out=jtable&q=$sqlaml_riesgo_perfiles");$xHG->addKey("idaml_riesgo_perfiles");
$xHG->addElement("objeto_de_origen", "TR.Origen", "10%");
$xHG->addElement("campo_de_origen", "TR.Tipo", "10%");
$xHG->addElement("valor_de_origen", "TR.valor", "10%");
$xHG->addElement("nivel_de_riesgo", "TR.nivel de riesgo", "10%");