function cuentas_guardarsubCuenta()
{
    liberar_bd();
    $selectCuenta = "CALL sp_sistema_select_cuenta_nombre('" . utf8_decode($_POST["nombreCta"]) . "');";
    $cuenta = consulta($selectCuenta);
    $ctaCuenta = cuenta_registros($cuenta);
    if ($ctaCuenta == 0) {
        if ($_POST["factorCta"] == "") {
            $factorCta = 0.0;
        } else {
            $factorCta = $_POST["factorCta"];
        }
        //DATOS DE LA SUBCUENTA
        liberar_bd();
        $selectDatosCuenta = 'CALL sp_sistema_select_datos_subcuenta(' . $_POST["idCuenta"] . ');';
        $datosCuenta = consulta($selectDatosCuenta);
        $cuen = siguiente_registro($datosCuenta);
        $nivel = $cuen["nivel"] + 1;
        //INSERTAMOS LA SUBCUENTA
        liberar_bd();
        $insertCuenta = " CALL sp_sistema_insert_subcuenta(\t'" . utf8_decode($_POST["nombreCta"]) . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t'" . utf8_decode($_POST["descCta"]) . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t'" . $_POST["periCta"] . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $factorCta . ",\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $_POST["idCuenta"] . ", \r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $nivel . ",\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $_SESSION[$varIdUser] . ");";
        $insert = consulta($insertCuenta);
        if ($insert) {
            //ULTIMO CONCEPTO INSERTADO
            liberar_bd();
            $selectUltimoConcepto = 'CALL sp_sistema_select_ultimo_concepto(' . $_SESSION[$varIdUser] . ');';
            $ultimoConcepto = consulta($selectUltimoConcepto);
            $ultConcep = siguiente_registro($ultimoConcepto);
            //NUMERO DE HIJOS DE LA CUENTA PADRE
            liberar_bd();
            $selectNumeroHijos = 'CALL sp_sistema_select_numHijos_cuenta(' . $_POST["idCuenta"] . ');';
            $numeroHijos = consulta($selectNumeroHijos);
            $hijos = siguiente_registro($numeroHijos);
            $ctaNumeroHijos = $hijos["hijos"] + 1;
            //ACTUALIZAMOS NUMERO DE HIJOS DE LA CUENTA PADRE
            liberar_bd();
            $updateNumeroHijos = 'CALL sp_sistema_update_numeroHijos_cuenta(' . $_POST["idCuenta"] . ', ' . $ctaNumeroHijos . ');';
            $upNumHijos = consulta($updateNumeroHijos);
            //DATOS DEL ARBOL DEL PADRE
            liberar_bd();
            $selectDatosArbol = 'CALL sp_sistema_select_datos_arbol_cuentaId(' . $_POST["idCuenta"] . ');';
            $datosArbol = consulta($selectDatosArbol);
            $datAr = siguiente_registro($datosArbol);
            if ($cuen["nivel"] == 0) {
                $n1 = $_POST["idCuenta"];
            } else {
                $n1 = $datAr["n1"];
            }
            if ($cuen["nivel"] == 1) {
                $n2 = $_POST["idCuenta"];
            } else {
                $n2 = $datAr["n2"];
            }
            if ($cuen["nivel"] == 2) {
                $n3 = $_POST["idCuenta"];
            } else {
                $n3 = $datAr["n3"];
            }
            if ($cuen["nivel"] == 3) {
                $n4 = $_POST["idCuenta"];
            } else {
                $n4 = $datAr["n4"];
            }
            if ($cuen["nivel"] == 4) {
                $n5 = $_POST["idCuenta"];
            } else {
                $n5 = $datAr["n5"];
            }
            if ($cuen["nivel"] == 5) {
                $n6 = $_POST["idCuenta"];
            } else {
                $n6 = $datAr["n6"];
            }
            if ($cuen["nivel"] == 6) {
                $n7 = $_POST["idCuenta"];
            } else {
                $n7 = $datAr["n7"];
            }
            if ($cuen["nivel"] == 7) {
                $n8 = $_POST["idCuenta"];
            } else {
                $n8 = $datAr["n8"];
            }
            if ($cuen["nivel"] == 8) {
                $n9 = $_POST["idCuenta"];
            } else {
                $n9 = $datAr["n9"];
            }
            //INSERTAMOS HIJO ARBOL CTAS
            liberar_bd();
            $insertHijoArbol = 'CALL sp_sistema_insert_hijo_reg_arbol(	' . $ultConcep["id"] . ', 
																			"' . $n1 . '",
																			"' . $n2 . '",
																			"' . $n3 . '",
																			"' . $n4 . '",
																			"' . $n5 . '",
																			"' . $n6 . '",
																			"' . $n7 . '",
																			"' . $n8 . '",
																			"' . $n9 . '",
																			' . $_SESSION[$varIdUser] . ');';
            $insertHijo = consulta($insertHijoArbol);
            $res = $msj . cuentas_menuInicio();
        } else {
            $error = 'No se ha podido guardar el concepto.';
            $msj = sistema_mensaje("error", $error);
            $pagina = cuentas_error_nuevoSub();
            $res = $msj . $pagina;
        }
    } else {
        $error = 'Ya existe un concepto de egreso con este nombre.';
        $msj = sistema_mensaje("error", $error);
        $pagina = cuentas_error_nuevoSub();
        $res = $msj . $pagina;
    }
    return $res;
}
function cuentas_guardarsubCuenta()
{
    liberar_bd();
    $selectCuenta = "CALL sp_sistema_select_cuenta_nombre('" . utf8_decode($_POST["nombreCta"]) . "');";
    $cuenta = consulta($selectCuenta);
    $ctaCuenta = cuenta_registros($cuenta);
    if ($ctaCuenta == 0) {
        if ($_POST["factorCta"] == "") {
            $factorCta = 0.0;
        } else {
            $factorCta = $_POST["factorCta"];
        }
        //DATOS DE LA SUBCUENTA
        liberar_bd();
        $selectDatosCuenta = 'CALL sp_sistema_select_datos_subcuenta(' . $_POST["idCuenta"] . ');';
        $datosCuenta = consulta($selectDatosCuenta);
        $cuen = siguiente_registro($datosCuenta);
        $nivel = $cuen["nivel"] + 1;
        //INSERTAMOS LA SUBCUENTA
        liberar_bd();
        $insertCuenta = " CALL sp_sistema_insert_subcuenta(\t'" . utf8_decode($_POST["nombreCta"]) . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t'" . utf8_decode($_POST["descCta"]) . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t'" . utf8_decode($_POST["ctaContable"]) . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t'" . $_POST["periCta"] . "',\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $factorCta . ",\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $_POST["idCuenta"] . ", \r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $nivel . ",\r\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t" . $_SESSION[$varIdUser] . ");";
        $insert = consulta($insertCuenta);
        if ($insert) {
            //NUMERO DE HIJOS DE LA CUENTA PADRE
            liberar_bd();
            $selectNumeroHijos = 'CALL sp_sistema_select_numHijos_cuenta(' . $_POST["idCuenta"] . ');';
            $numeroHijos = consulta($selectNumeroHijos);
            $hijos = siguiente_registro($numeroHijos);
            $ctaNumeroHijos = $hijos["hijos"] + 1;
            //ACTUALIZAMOS NUMERO DE HIJOS DE LA CUENTA PADRE
            liberar_bd();
            $updateNumeroHijos = 'CALL sp_sistema_update_numeroHijos_cuenta(' . $_POST["idCuenta"] . ', ' . $ctaNumeroHijos . ');';
            $upNumHijos = consulta($updateNumeroHijos);
            $res = $msj . cuentas_menuInicio();
        } else {
            $error = 'No se ha podido guardar el concepto.';
            $msj = sistema_mensaje("error", $error);
            $pagina = cuentas_error_nuevoSub();
            $res = $msj . $pagina;
        }
    } else {
        $error = 'Ya existe un concepto de egreso con este nombre.';
        $msj = sistema_mensaje("error", $error);
        $pagina = cuentas_error_nuevoSub();
        $res = $msj . $pagina;
    }
    return $res;
}