function UpdateEditMvto($keyMvto, $cuenta, $cargo, $abono, $referencia, $concepto, $diario)
{
    $dMvto = explode("@", $keyMvto);
    $ejercicio = $dMvto[1];
    $periodo = $dMvto[2];
    $poliza = $dMvto[3];
    $tipopoliza = $dMvto[4];
    $mvto = $dMvto[5];
    $cuenta = getCuentaCompleta($cuenta);
    //purgar Mvto
    if ($cargo > 0) {
        $abono = 0;
    }
    if ($cargo > 0) {
        $tmvto = 1;
        $monto = $cargo;
    } else {
        $tmvto = -1;
        $monto = $abono;
    }
    $sqlDatosMvtoAnterior = "SELECT\n\t`contable_movimientos`.*\nFROM\n\t`contable_movimientos` `contable_movimientos`\nWHERE\n\t`contable_movimientos`.`ejercicio` = {$ejercicio}\n\tAND `contable_movimientos`.`periodo` = {$periodo}\n\tAND `contable_movimientos`.`tipopoliza` = {$tipopoliza}\n\tAND `contable_movimientos`.`numeropoliza` = {$poliza}\n\tAND `contable_movimientos`.`numeromovimiento` ={$mvto}";
    $DMAnterior = getFilas($sqlDatosMvtoAnterior);
    $AntCuenta = $DMAnterior["numerocuenta"];
    $AntTMvto = $DMAnterior["tipomovimiento"];
    $AntMonto = $DMAnterior["importe"];
    $AntFecha = $DMAnterior["fecha"];
    //----------------------- Revertir Afectacion ------------------
    $sqldcta = "SELECT\n\t`contable_catalogo`.`numero`,\n\t(`contable_catalogotipos`.`naturaleza` * `contable_catalogotipos`.`naturaleza_del_sector`) AS 'factor'\nFROM\n\t`contable_catalogotipos` `contable_catalogotipos`\n\t\tINNER JOIN `contable_catalogo` `contable_catalogo`\n\t\tON `contable_catalogotipos`.\n\t\t`idcontable_catalogotipos` = `contable_catalogo`.\n\t\t`tipo`\nWHERE `contable_catalogo`.`numero`={$AntCuenta}";
    $dcuenta = getFilas($sqldcta);
    $AntNaturaleza = $dcuenta["factor"];
    setRevertirMvto($AntCuenta, $periodo, $ejercicio, $AntNaturaleza, $AntTMvto, $AntMonto);
    //----------------------- Eliminar Cuenta ----------------------
    $sqlDelMvtoAnterior = "DELETE\n\t\tFROM\n\t\t\t`contable_movimientos`\n\t\tWHERE\n\t\t\t`contable_movimientos`.`ejercicio` = {$ejercicio}\n\t\t\tAND `contable_movimientos`.`periodo` = {$periodo}\n\t\t\tAND `contable_movimientos`.`tipopoliza` = {$tipopoliza}\n\t\t\tAND `contable_movimientos`.`numeropoliza` = {$poliza}\n\t\t\tAND `contable_movimientos`.`numeromovimiento` ={$mvto}";
    my_query($sqlDelMvtoAnterior);
    //----------------------- Insertar Cuenta ----------------------
    $NSqlcta = "SELECT\n\t`contable_catalogo`.`numero`,\n\t(`contable_catalogotipos`.`naturaleza` * `contable_catalogotipos`.`naturaleza_del_sector`) AS 'factor'\nFROM\n\t`contable_catalogotipos` `contable_catalogotipos`\n\t\tINNER JOIN `contable_catalogo` `contable_catalogo`\n\t\tON `contable_catalogotipos`.\n\t\t`idcontable_catalogotipos` = `contable_catalogo`.\n\t\t`tipo`\nWHERE `contable_catalogo`.`numero`={$cuenta}";
    $dNcuenta = getFilas($NSqlcta);
    $naturaleza = $dNcuenta["factor"];
    $sqli_mvto = "INSERT INTO contable_movimientos(ejercicio, periodo, tipopoliza, numeropoliza, numeromovimiento,\nnumerocuenta, tipomovimiento, referencia, importe, diario, moneda, concepto, fecha, cargo, abono)\n    VALUES({$ejercicio}, {$periodo},\n    {$tipopoliza}, {$poliza},\n    {$mvto}, {$cuenta},\n    '{$tmvto}', '{$referencia}',\n    {$monto}, {$diario}, 1,\n    '{$concepto}', '{$AntFecha}',\n    {$cargo}, {$abono})";
    my_query($sqli_mvto);
    setAfectarSaldo($cuenta, $periodo, $ejercicio, $naturaleza, $tmvto, $monto);
}
function jsaDeletePoliza($idejercicio, $idperiodo, $idtipopol, $idpoliza)
{
    //Eliminar Poliza
    $SQLDP = "DELETE FROM contable_polizas WHERE  ejercicio={$idejercicio}\n\t\t\t\tAND periodo={$idperiodo}\n\t\t\t\tAND tipopoliza={$idtipopol}\n\t\t\t\tAND numeropoliza={$idpoliza} ";
    my_query($SQLDP);
    //Eliminar Movimientos
    $sqlSM = "SELECT * FROM contable_movimientos\n\tWHERE ejercicio={$idejercicio} AND periodo={$idperiodo}\n\t AND numeropoliza={$idpoliza} AND tipopoliza={$idtipopol}";
    $rs = mysql_query($sqlSM, cnnGeneral());
    while ($rw = mysql_fetch_array($rs)) {
        $MTipoMvto = $rw["tipomovimiento"];
        $MCuenta = $rw["numerocuenta"];
        $MMonto = $rw["importe"];
        $DCta = getInfCatalogoTipo($MCuenta);
        $DTipo = getInfCatalogoTipo($DCta["tipo"]);
        $MNaturaleza = $DTipo["naturaleza"] * $DTipo["naturaleza_del_sector"];
        setRevertirMvto($MCuenta, $idperiodo, $idejercicio, $MNaturaleza, $MTipoMvto, $MMonto);
    }
    @mysql_free_result($rs);
    $sqlDMM = "DELETE FROM contable_movimientos\n\tWHERE ejercicio={$idejercicio} AND periodo={$idperiodo} AND numeropoliza={$idpoliza} AND tipopoliza={$idtipopol}";
    my_query($sqlDMM);
}