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}]";
    }
}
     $xUCont = new cUtileriasParaContabilidad();
     $msg .= "============ GENERAR PREPOLIZAS CONTABLES AL {$Fecha} \r\n";
     $msg .= $xUCont->setRegenerarPrepolizaContable($Fecha);
     break;
 case 1103:
     //numero de recibo
     $Recibo = $id;
     $Regenerar = strtoupper($id2) == "SI" ? true : false;
     $xUCont = new cUtileriasParaContabilidad();
     if ($Regenerar == true) {
         $msg .= $xUCont->setRegenerarPrepolizaContable(false, $Recibo);
     }
     $msg .= "============\t\r\n";
     $msg .= "============\tGENERAR POLIZA CONTABLE DEL RECIBO {$Recibo} \r\n";
     $msg .= "============\t\r\n";
     $msg .= $xUCont->setPolizaPorRecibo($Recibo);
     //
     break;
 case 1104:
     //
     $cajero = $id;
     $fecha = $id2;
     $numero_de_poliza = $id3 == "NUMERO_DE_POLIZA" ? false : $id3;
     $xUCont = new cUtileriasParaContabilidad();
     //$msg				.= $xUCont->setPolizaPorCajero( $cajero, $fecha, $numero_de_poliza );
     break;
 case 501:
     $xop = new cUtileriasParaOperaciones();
     $msg .= $xop->setGenerarRecibosGlobales();
     break;
 case 13001:
/**
 * @deprecated		v2012.02
 */
function PolizaPorRecibo($recibo, $generador = false)
{
    $msg = "";
    $xCUtil = new cUtileriasParaContabilidad();
    $msg .= $xCUtil->setPolizaPorRecibo($recibo, $generador);
    return $msg;
}
function jsaSetGenerarPolizaPorRecibo($numero)
{
    if (setNoMenorQueCero($numero) > 0) {
        $Recibo = $numero;
        $xPol = new cPoliza(false);
        $idpoliza = "";
        $msg = "";
        if ($xPol->setPorRecibo($numero) == true) {
            $idpoliza = $xPol->getCodigo();
        } else {
            $xUCont = new cUtileriasParaContabilidad();
            $xUCont->setRegenerarPrepolizaContable(false, $Recibo);
            $xUCont->setPolizaPorRecibo($Recibo);
            $idpoliza = $xUCont->getIDPoliza();
            $msg .= $xUCont->getMessages();
        }
        $msg .= $xPol->getMessages();
        //exportar
        $xPolCW = new cPolizaCompacW(0);
        $xPolCW->initByID($idpoliza);
        $xPolCW->setRun();
        $msg .= $xPolCW->getMessages();
        $strDown = $xPolCW->setExport();
        if (MODO_DEBUG == true) {
            $xLog = new cFileLog();
            $xLog->setWrite($msg);
            $strDown .= $xLog->getLinkDownload("TR.Eventos");
        }
        $xBtn = new cHButton();
        return $xBtn->getBasic("TR.Modificar Poliza", "jsModificarPoliza('{$idpoliza}')", $xBtn->ic()->EDITAR, "cmdeditpoliza") . $strDown;
    } else {
        return "NO HAY REGISTRO QUE GENERAR [{$numero}]";
    }
}