} else {
    if ($action == MQL_MOD) {
        //Modificar
        //iniciar
        $clave = parametro($xTabla->getKey(), null, MQL_INT);
        if ($clave != null) {
            $xTabla->setData($xTabla->query()->initByID($clave));
            $xTabla->setData($_REQUEST);
            $xTabla->query()->update()->save($clave);
            $xFRM->addAvisoRegistroOK();
        }
    }
}
$xSel1 = $xSel->getListaDeTipoDeRiesgoEnAML("tipo_de_riesgo");
$xSel1->setOptionSelect($xTabla->tipo_de_riesgo()->v());
$xSel2 = $xSel->getListaDeUnidadMedidaAML("unidad_de_medida");
$xSel2->setOptionSelect($xTabla->unidad_de_medida()->v(OUT_TXT));
$xSel3 = $xSel->getListaDeFormaReportaRiesgo("forma_de_reportar");
$xSel3->setOptionSelect($xTabla->forma_de_reportar()->v(OUT_TXT));
$xSel4 = $xSel->getListaDeFrecuenciaChequeoRiesgo("frecuencia_de_chequeo");
$xSel4->setOptionSelect($xTabla->frecuencia_de_chequeo()->v(OUT_TXT));
$xFRM->OMoneda("clave_de_control", $xTabla->clave_de_control()->v(), "TR.clave de control");
$xFRM->OText("descripcion", $xTabla->descripcion()->v(), "TR.descripcion");
$xFRM->addHElem($xSel1->get(true));
$xFRM->OMoneda("valor_ponderado", $xTabla->valor_ponderado()->v(), "TR.valor ponderado");
$xFRM->OMoneda("unidades_ponderadas", $xTabla->unidades_ponderadas()->v(), "TR.unidades ponderadas");
$xFRM->addHElem($xSel2->get(true));
$xFRM->addHElem($xSel3->get(true));
$xFRM->addHElem($xSel4->get(true));
$xFRM->OTextArea("fundamento_legal", $xTabla->fundamento_legal()->v(), "TR.fundamento legal");
echo $xFRM->get();