function jsaSetGenerarPolizaPorRecibo($numero)
{
if (setNoMenorQueCero($numero) > 0) {
//return $tab -> getString();
$Recibo = $numero;
$msg = "";
$Regenerar = true;
//( strtoupper($id2) == "SI") ? true : false;
$xUCont = new cUtileriasParaContabilidad();
$xBtn = new cHButton();
if ($Regenerar == true) {
$msg .= $xUCont->setRegenerarPrepolizaContable(false, $Recibo);
}
$xUCont->setPolizaPorRecibo($Recibo);
$idPol = trim($xUCont->getIDPoliza());
$xPolCW = new cPolizaCompacW(0);
$xPolCW->initByID($idPol);
$xPolCW->setRun();
$strDown = $xPolCW->setExport();
if (MODO_DEBUG == true) {
$xLog = new cFileLog();
$xLog->setWrite($xUCont->getMessages());
$xLog->setClose();
$strDown .= $xLog->getLinkDownload("TR.Log");
}
//return $xBtn->getBasic("TR.Modificar Poliza","jsModificarPoliza('$idPol')", $xBtn->ic()->EDITAR, "cmdeditpoliza") . $strDown ;
} else {
return "NO HAY REGISTRO QUE GENERAR [{$numero}]";
}
}
$xLog = new cFileLog($aliasFil);
$idrecibo = DEFAULT_RECIBO;
//$xRec = new cReciboDeOperacion(12);
//$xRec->setGenerarPoliza();
//$xRec->setForceUpdateSaldos();
//$idrecibo = $xRec->setNuevoRecibo(1,1,$fechaop, 1, 12, "CIERRE_DE_SEGUIMIENTO", "NA", "ninguno", "NA", DEFAULT_GRUPO);
//$xRec->setNumeroDeRecibo($idrecibo);
$messages .= "=======================================================================================\r\n";
$messages .= "=========================\t\t" . EACP_NAME . " \r\n";
$messages .= "=========================\t\t" . getSucursal() . " \r\n";
$messages .= "=======================================================================================\r\n";
$messages .= "=========================\t\tINICIANDO EL CIERRE DE CONTABILIDAD ===================\r\n";
$messages .= "=========================\t\tRECIBO: {$idrecibo}\t\t\t\t ====================\r\n";
if (MODULO_CONTABILIDAD_ACTIVADO == true) {
$xCUtils = new cUtileriasParaContabilidad();
$xCUtils->setGenerarPolizasAlCierre($fechaop);
$messages .= $xCUtils->getMessages();
} else {
$messages .= "=========================\tNO ACTIVADO\t====================\r\n";
}
//TODO: Si es Anual generar Saldos al Cierre
$xLog->setWrite($messages);
$xLog->setClose();
if (ENVIAR_MAIL_LOGS == true) {
$xLog->setSendToMail("TR.Eventos del Cierre de Contabilidad");
}
if ($parser != false) {
//TODO: Agregar cierre de riesgos
header("Location: ./cierre_de_riesgos.frm.php?s=true&k=" . $key . "&f={$fechaop}");
}
//}
function jsaRegenerarPrepoliza($recibo)
{
$xUtilCont = new cUtileriasParaContabilidad();
$xUtilCont->setRegenerarPrepolizaContable(false, $recibo);
return $xUtilCont->getMessages(OUT_HTML);
}
