选择商品 窗体增加排序 47.1、选择商品前执行的脚本(ads)_pre(事件执行前客户化)

ads.setsort("")
ads.setsort("purstatus A,warecode A,wareqty_store D")
ads.sort()

数据库创建高权限用户

-- 使用 DBA 用户登录数据库
--CONNECT DB_ADMIN/your_password;

-- 创建 ZKZX 用户
CREATE USER ZKZX IDENTIFIED BY your_password
DEFAULT TABLESPACE users
TEMPORARY TABLESPACE temp;

-- 授予创建会话的权限
GRANT CREATE SESSION TO ZKZX;

-- 授予无限表空间的权限
GRANT UNLIMITED TABLESPACE TO ZKZX;

-- 授予系统权限
GRANT CREATE TABLE TO ZKZX;
GRANT INSERT ANY TABLE TO ZKZX;
GRANT UPDATE ANY TABLE TO ZKZX;
GRANT DELETE ANY TABLE TO ZKZX;
GRANT SELECT ANY TABLE TO ZKZX;
GRANT ALTER ANY TABLE TO ZKZX;
GRANT DROP ANY TABLE TO ZKZX;
GRANT CREATE VIEW TO ZKZX;
GRANT CREATE PROCEDURE TO ZKZX;
GRANT CREATE SEQUENCE TO ZKZX;
GRANT CREATE DATABASE LINK TO ZKZX;
GRANT CREATE TRIGGER TO ZKZX;

-- 使用 H2 用户或具有足够权限的用户登录
CONNECT H2/your_password;

-- 批量授予 H2 用户下所有表的权限
DECLARE
    v_table_name VARCHAR2(255);
    CURSOR table_cur IS SELECT table_name FROM user_tables;
BEGIN
    OPEN table_cur;
    LOOP
        FETCH table_cur INTO v_table_name;
        EXIT WHEN table_cur%NOTFOUND;

        -- 授予 SELECT 权限
        EXECUTE IMMEDIATE 'GRANT SELECT ON ' || v_table_name || ' TO ZKZX';

        -- 授予 INSERT 权限
        EXECUTE IMMEDIATE 'GRANT INSERT ON ' || v_table_name || ' TO ZKZX';

        -- 授予 UPDATE 权限
        EXECUTE IMMEDIATE 'GRANT UPDATE ON ' || v_table_name || ' TO ZKZX';

        -- 授予 DELETE 权限
        EXECUTE IMMEDIATE 'GRANT DELETE ON ' || v_table_name || ' TO ZKZX';
    END LOOP;
    CLOSE table_cur;
END;

-- 使用 ZKZX 用户登录数据库
CONNECT ZKZX/your_password;

-- 尝试选择数据
SELECT * FROM H2.T_MEMCARD_REG WHERE ROWNUM <= 10;

-- 如果有插入权限，可以尝试插入数据
INSERT INTO H2.T_MEMCARD_REG (column1, column2, ...) VALUES (value1, value2, ...);

-- 如果有更新权限，可以尝试更新数据
UPDATE H2.T_MEMCARD_REG SET column1 = new_value WHERE condition;

-- 如果有删除权限，可以尝试删除数据
DELETE FROM H2.T_MEMCARD_REG WHERE condition;

--批量授予 H2 用户下所有函数的 EXECUTE 权限
DECLARE
    v_function_name VARCHAR2(255);
    CURSOR function_cur IS SELECT object_name FROM user_objects WHERE object_type = 'FUNCTION';
BEGIN
    OPEN function_cur;
    LOOP
        FETCH function_cur INTO v_function_name;
        EXIT WHEN function_cur%NOTFOUND;

        -- 授予 EXECUTE 权限
        EXECUTE IMMEDIATE 'GRANT EXECUTE ON ' || v_function_name || ' TO ZKZX';
    END LOOP;
    CLOSE function_cur;
END;
-- 批量授予 H2 用户下所有存储过程的 EXECUTE 权限
DECLARE
    v_procedure_name VARCHAR2(255);
    CURSOR procedure_cur IS SELECT object_name FROM user_objects WHERE object_type = 'PROCEDURE';
BEGIN
    OPEN procedure_cur;
    LOOP
        FETCH procedure_cur INTO v_procedure_name;
        EXIT WHEN procedure_cur%NOTFOUND;

        -- 授予 EXECUTE 权限
        EXECUTE IMMEDIATE 'GRANT EXECUTE ON ' || v_procedure_name || ' TO ZKZX';
    END LOOP;
    CLOSE procedure_cur;
END;