$xSoc = new cSocio($persona);
if ($xSoc->init() == true) {
$xFRM->OHidden("persona", $persona);
//checar si existen razones
$fecha = parametro("fecha", false, MQL_DATE);
$idrazon = parametro("idrazondebaja", false, MQL_INT);
$notas = parametro("notas");
$fechavenc = parametro("idfechavencimiento", false, MQL_DATE);
$documento = parametro("documento", 0, MQL_INT);
// $fechadocto
if (setNoMenorQueCero($idrazon) > 0) {
$ok = $xSoc->setBaja($idrazon, $fecha, $fechavenc, $documento);
if ($ok == true) {
$xFRM->addAvisoRegistroOK();
} else {
$xFRM->addAvisoRegistroError();
}
} else {
$xFRM->ODate("fecha", false, "TR.Fecha");
$xFRM->ODate("idfechavencimiento", $xF->getFechaMaximaOperativa(), "TR.Fecha de Vencimiento");
$xFRM->addHElem($xSel->getListaDeRazonesDeBaja()->get(true));
$xFRM->OText("documento", 0, "TR.Documento de Prueba");
$xFRM->OTextArea("notas", "", "TR.Notas");
}
}
}
//razones de baja
$xFRM->addSubmit();
echo $xFRM->get();
//$jxc ->drawJavaScript(false, true);
$xHP->fin();