function jsaSetTotal($recibo)
{
    $xRec = new cReciboDeOperacion(false, true, $recibo);
    $xRec->init();
    $xRec->setGenerarBancos(false);
    $xRec->setGenerarPoliza(false);
    $xRec->setGenerarTesoreria(false);
    $xRec->setForceUpdateSaldos(true);
    $xRec->setFinalizarRecibo(true);
    $msg = "";
    if ($xRec->getOrigen() == TESORERIA_RECIBOS_ORIGEN_MIXTO or $xRec->getOrigen() == TESORERIA_RECIBOS_ORIGEN_CRED) {
        $credito = $xRec->getCodigoDeDocumento();
        $xUtil = new cUtileriasParaCreditos();
        $msg .= $xUtil->setCuadrarCreditosByMvtos($credito);
    }
    $msg .= $xRec->getMessages(OUT_TXT);
    return $msg;
}
$numero_de_socio = $xRec->getCodigoDeSocio();
//$DRec["numero_socio"];
$afectaCaja = $arrQ[$DRec["afectacion_en_flujo_efvo"]];
//datos del socio
$cSoc = new cSocio($numero_de_socio);
$DSoc = $cSoc->getDatosInArray();
$numero_caja_local = $DSoc["cajalocal"];
$cCL = new cCajaLocal($numero_caja_local);
$caja_local = $cCL->getNombre();
$variable_nombre_del_socio = $idsocio == DEFAULT_SOCIO ? $DRec["cadena_distributiva"] : $cSoc->getNombreCompleto();
$tipo_de_pago = $xRec->getTipoDePago();
//$variable_nombre_del_cajero
//
$tipoderecibo = $DRec["tipo_docto"];
$docto = $xRec->getCodigoDeDocumento();
$origen = $xRec->getOrigen();
$variable_tipo_de_recibo = $xRec->getOTipoRecibo()->getNombre();
$totaloperacion = $xRec->getTotal();
//<------------- Verificar Si existe El Pago ----------------
$xCaja = new cCaja();
$TesMontoPagado = $xCaja->getReciboEnCorte($recibo);
$eventOnLoad = "";
$scripts = "";
//TODO: Resolver ajuste y permisos de ajuste
if (MODULO_CAJA_ACTIVADO == true and $xRec->isPagable() == true) {
    if ($TesMontoPagado < $totaloperacion) {
        $arrTPag = $xFRM->getAFormsDeTipoPago();
        $frm = $arrTPag[$tipo_de_pago];
        //si la caja de tesoreria esta abierta, proceder, si no cerrar
        if ($xCaja->getEstatus() == TESORERIA_CAJA_CERRADA) {
            $scripts = "<script>\n\t\t\t\talert('El Recibo {$recibo} no ha sido SALDADO({$TesMontoPagado}) en su totalidad({$totaloperacion}),\\n No se puede efectuar operaciones en Caja Cerrada\\nNecesita Autorizar una Sesion de Caja');\n\t\t\t\tdocument.location = '../404.php?i=7001';\n\t\t\t</script>";