$sucess = false;
}
if ($xCta->getEsOperable() == false) {
$msg .= "ERROR\tLa cuenta No es Operable\r\n";
$sucess = false;
}
$xFRM->addAviso($msg);
if ($sucess == true) {
$recibo = $xCta->setRetiro($monto, $cheque, $comopago, $foliofiscal, $detalles, DEFAULT_GRUPO, $Fecha);
//Imprime la Ficha del socio
$xCta->init();
$xSoc = new cSocio($xCta->getClaveDePersona());
$xSoc->init();
$xFRM->addHTML($xSoc->getFicha());
$xFRM->addHTML($xCta->getFicha(true));
if ($xCta->getORec() == null) {
} else {
$xFRM->addHTML($xCta->getORec()->getFicha(true));
$xFRM->addHTML($xCta->getORec()->getJsPrint(true));
$xFRM->addPrintRecibo();
$xFRM->addAvisoRegistroOK();
}
}
if (MODO_DEBUG == true) {
$msg .= $xCta->getMessages();
}
$xFRM->addAviso($msg);
}
}
echo $xFRM->get();
?>