代码记录鸭1
要实现登录有两个重要组成，一个是共享组件的应用程序项，另一个是共享组件的验证方案，先创建应用程序项：
名称有要求
改成新的ApexLogonTestWxx
创建成功
我设置的是启用
确定生成的用于导航到应用程序中其他页的 URL 是否应更易于理解。如果设置为启用，则将使用基于应用程序、页别名和标准 Web 参数语法的目录结构。如果设置为禁用，则将使用 f?p= 旧语法。
注：友好 URL 将在 URL 中包括工作区路径前缀。要修改路径前缀，请转到“工作区管理”>“管理服务”>“设置工作区首选项”。
如果友好 URL 设置为启用，您将能够访问渐进式 Web 应用程序选项。
想要添加的项
APPID
USERID
ROLEID
DEPTID
跟着apex教程
--角色表
CREATE TABLE "SYS_ROLE"
( "P_ID" NUMBER(17,0) NOT NULL ENABLE,
"ROLE_NAME" VARCHAR2(17) NOT NULL ENABLE,
"S_NOTE" VARCHAR2(52),
CONSTRAINT "SYS_ROLE_PK" PRIMARY KEY ("P_ID")
USING INDEX ENABLE,
CONSTRAINT "SYS_ROLE_NAME" UNIQUE ("ROLE_NAME")
USING INDEX ENABLE
)
--角色页面表
CREATE TABLE "SYS_ROLE_PAGE"
( "P_ID" NUMBER(17,0) NOT NULL ENABLE,
"ROLE_NAME" VARCHAR2(17) NOT NULL ENABLE,
"PAGE_ID" NUMBER(17,0) NOT NULL ENABLE,
"S_NOTE" VARCHAR2(52),
CONSTRAINT "SYS_ROLE_PAGE_PK" PRIMARY KEY ("P_ID")
USING INDEX ENABLE,
CONSTRAINT "SYS_ROLE_PAGE_UK1" UNIQUE ("ROLE_NAME", "PAGE_ID")
USING INDEX ENABLE
)
--用户表
CREATE TABLE "SYS_USER"
( "P_ID" NUMBER(13,0) NOT NULL ENABLE,
"USER_NAME" VARCHAR2(17) NOT NULL ENABLE,
"PASS_WORD" VARCHAR2(17) NOT NULL ENABLE,
"S_MOBILE" VARCHAR2(17),
"S_EMAIL" NVARCHAR2(52),
"NICK_NAME" VARCHAR2(17),
CONSTRAINT "SYS_USER_PK" PRIMARY KEY ("P_ID")
USING INDEX ENABLE,
CONSTRAINT "SYS_USER_UK1_USER_NAME" UNIQUE ("USER_NAME")
USING INDEX ENABLE,
CONSTRAINT "SYS_USER_UK2_S_MOBILE" UNIQUE ("S_MOBILE")
USING INDEX ENABLE,
CONSTRAINT "SYS_USER_UK3_S_EMAIL" UNIQUE ("S_EMAIL")
USING INDEX ENABLE
)
--用户角色表
CREATE TABLE "SYS_USER_ROLE"
( "P_ID" NUMBER(17,0) NOT NULL ENABLE,
"USER_NAME" VARCHAR2(17) NOT NULL ENABLE,
"ROLE_NAME" VARCHAR2(17) NOT NULL ENABLE,
"S_NOTE" VARCHAR2(52),
CONSTRAINT "SYS_USER_ROLE_PK" PRIMARY KEY ("P_ID")
USING INDEX ENABLE,
CONSTRAINT "SYS_USER_ROLE_UK1" UNIQUE ("USER_NAME", "ROLE_NAME")
USING INDEX ENABLE
)
根据教程试着自己设计
1.创建中间表
先创建中间表，使用户、部门、角色、权限四个主表之间建立联系
1.1用户角色管理P8
其他同理
1.2用户部门管理p14
1.3角色权限管理p21
2.创建值列表
2.1创建角色值列表
创建值列表：从头开始 → 自定义名称 → 类型：动态Dynamic → 本地数据库 → sql查询 → 编辑sql查询语句 → 验证通过 → 返回列 显示列
sQL查询语句
select name from role_test_wxx2
值列表
名称
USER_GROUP_ASSO_NAME
sql查询
select value, key from apex_user_group_code where link is not null
名称
EVENT_CATEGORY_LOV
sql查询
select name,code from tenant_event_category WHERE TENANT_ID = :USERTENANT
名称
FAB_NAME
sql查询
select name, fab_id from fnd_fab WHERE TENANT_ID = :USERTENANT
名称
MAP_AREA_NAME
sql查询
select name, area_id from fnd_areas
名称
USERNAME_LOV
sql查询
select name,ext_user_id from MPF_SHARE_USER_V WHERE TENANT_ID = :USERTENANT
名称
USERNAME_LOV1
sql查询
select name,ext_user_id from MPF_SHARE_USER_V
名称
USER_GROUP_ASSO_NAME
sql查询
select value, key from apex_user_group_code where link is not null
用户管理
交互式网格p2+表单p12
p12
p2
--在表单中进行sql查询
select USER_ID,
NAME,
GENDER,
MOBILE,
JOB_NUMBER,
rpad('*',length(PASSWORD),'*')as PASSWORD,
EMAIL,
DEVELOPER_ID,
IS_LEAVE,
REMARK,
UPDATE_DATE
from USER_TEST_WXX2结果：密码被隐藏，好耶！
用户角色管理
交互式网格加编辑p8
创建用户值列表
select name from user_test_wxx2用户和角色值列表配置到用户和角色。
系统管理
改写之前
改写之后
因为当初选择方案的时候选择已有方案，所以改写失败了
执行之后直接报错，干脆删了
3 创建授权方案
3.1 创建一个授权控制函数F_CONTROL
示例视图
将项一股脑全加进去（bushi）
CREATE OR REPLACE FORCE EDITIONABLE VIEW "MPF_SHARE_USER_V" ("EXT_USER_ID", "TENANT_ID", "SYNC_USER_ID", "UNION_ID", "TITLE", "NAME", "AVATAR", "STATE_CODE", "MOBILE", "JOB_NUMBER", "EMAIL", "IS_LEAVE", "HIRED_DATE", "LEADER_SYNC_USER_ID", "LEADER_EXT_USER_ID") AS
select USER_ID AS EXT_USER_ID,
TENANT_ID,
EXTRA_USER_ID AS SYNC_USER_ID,
UNION_ID,
TITLE,
NAME,
AVATAR,
STATE_CODE,
MOBILE,
JOB_NUMBER,
EMAIL,
IS_LEAVE,
HIRED_DATE,
LEADER_EXTRA_USER_ID AS LEADER_SYNC_USER_ID,
LEADER_USER_ID as LEADER_EXT_USER_ID
from MPF.SHARE_BASIC_USER_V
/
创建视图包含主键字段 test_wxxa_v
-- 用户部门角色权限视图
create view test_wxxa_v as
select u.USER_ID,
u.NAME,
u.GENDER,
u.REMARK,
u.MOBILE,
u.JOB_NUMBER,
u.PASSWORD,
u.EMAIL,
u.DEVELOPER_ID,
u.IS_LEAVE,
du.DEPT_ID,
ru.ROLE_ID,
rp.PERM_ID
FROM USER_TEST_WXX2 u
LEFT JOIN DEPT_USER_TEST_WXX du ON u.USER_ID = du.USER_ID
LEFT JOIN ROLE_USER_TEST_WXX ru ON u.USER_ID = ru.USER_ID
LEFT JOIN ROLE_PERM_TEST_WXX rp ON ru.ROLE_ID = rp.ROLE_ID;4.登录后验证
试着仿照验证后过程写一个登录后的过程 TEST_WXXA
先创建一个包含所有有效数据的视图test_user_wxx_v
create view test_user_wxx_v as
select u.USER_ID,
u.NAME AS USER_NAME,
u.GENDER,
u.REMARK,
u.MOBILE,
u.JOB_NUMBER,
u.PASSWORD,
u.EMAIL,
u.DEVELOPER_ID,
u.IS_LEAVE,
d.DEPT_ID ,
d.NAME AS DEPT_NAME,
d.PARENT_ID AS DEPT_PARENT_ID,
r.ROLE_ID,
r.NAME AS ROLE_NAME,
r.IS_ENABLE AS ROLE_IS_ENABLE,
p.PERM_ID,
p.NAME AS PERM_NAME,
p.PARENT_ID AS PERM_PARENT_ID,
p.URL,
p.APP_ID,
p.PAGE_ID,
p.PAGE_PARENT_ID,
p.IS_ENABLE AS PERM_IS_ENABLE
FROM USER_TEST_WXX2 u
LEFT JOIN DEPT_USER_TEST_WXX du ON u.USER_ID = du.USER_ID
LEFT JOIN DEPT_TEST_WXX3 d on d.DEPT_ID = du.DEPT_ID
LEFT JOIN ROLE_USER_TEST_WXX ru ON u.USER_ID = ru.USER_ID
LEFT JOIN ROLE_TEST_WXX2 r on r.ROLE_ID = ru.ROLE_ID
LEFT JOIN ROLE_PERM_TEST_WXX rp on r.ROLE_ID =rp.ROLE_ID
LEFT JOIN PERM_TEST_WXX2 p on p.PARENT_ID = rp.PERM_ID ;这样就能将四个主表，三个中间表连接起来了
-- 查询用户表
-- 查询部门表
-- 查询角色表
-- 查询权限表
--改了以后会报错[42000][923] ORA-00923: 未找到要求的 FROM 关键字 Position: 410
create view test_user_wxx_v as
select distinct u.USER_ID,
u.NAME AS USER_NAME,
u.GENDER,
u.REMARK,
u.MOBILE,
u.JOB_NUMBER,
u.PASSWORD,
u.EMAIL,
u.DEVELOPER_ID,
u.IS_LEAVE,
d.DEPT_ID ,
d.NAME AS DEPT_NAME,
d.PARENT_ID AS DEPT_PARENT_ID,
r.ROLE_ID,
r.NAME AS ROLE_NAME,
r.IS_ENABLE AS ROLE_IS_ENABLE default 1 not null,
p.PERM_ID,
p.NAME AS PERM_NAME,
p.PARENT_ID AS PERM_PARENT_ID,
p.URL,
p.APP_ID,
p.PAGE_ID,
p.PAGE_PARENT_ID,
p.IS_ENABLE AS PERM_IS_ENABLE default 1 not null
FROM USER_TEST_WXX2 u
LEFT JOIN DEPT_USER_TEST_WXX du ON u.USER_ID = du.USER_ID and du.IS_ENABLE = 1
LEFT JOIN DEPT_TEST_WXX3 d on d.DEPT_ID = du.DEPT_ID
LEFT JOIN ROLE_USER_TEST_WXX ru ON u.USER_ID = ru.USER_ID
LEFT JOIN ROLE_TEST_WXX2 r on r.ROLE_ID = ru.ROLE_ID
LEFT JOIN ROLE_PERM_TEST_WXX rp on r.ROLE_ID =rp.ROLE_ID
LEFT JOIN PERM_TEST_WXX2 p on p.PARENT_ID = rp.PERM_ID ;用户表数据
部门表数据
角色表数据
权限表数据
明明是修改，但是没有值传递到表单上
授权方案
验证方案测试
| 错误消息 | 用户 | 页 | 日期 |
|---|---|---|---|
| APEX - 插件处理期间引发的 PLSQL 代码中出错。 - 请与您的应用程序管理员联系。 ORA-06512: 在 "APEX_220200.WWV_FLOW_ERROR", line 1472 ORA-06512: 在 "APEX_220200.WWV_FLOW_ERROR", line 1507 |
- 插件处理期间引发的 PLSQL 代码中出错。
只能停止使用验证后过程，去过程中看错在哪里
编译失败, 行 30 (13:58:03)
PL/SQL: ORA-00947: 没有足够的值编译失败, 行 18 (13:58:03)
PL/SQL: SQL Statement ignored
解决方案：是因为源数据表的字段比目标表字段少,不能直接全部插入,将要插入的字段依次写出插入,就不会报错了。
create PROCEDURE TEST_USER_WXX_NOW AS
T_USERID NUMBER(20);
T_DEPTID VARCHAR2(200);
T_ROLEID VARCHAR2(200);
T_PERMID VARCHAR2(200);
-- T_TENANTID VARCHAR2(10);
T_NAME VARCHAR2(48);
T_JOBNUMBER VARCHAR2(10);
-- T_AUTH VARCHAR2(10); --授权
T_MOBILE VARCHAR2(15);
T_EMAIL VARCHAR2(50);
T_COUNT NUMBER(10);
T_ID NUMBER(10);
T_DEPTNAME VARCHAR2(50);
begin
-- 获取用户基础信息
SELECT DEPT_ID,
ROLE_ID,
PERM_ID,
USER_ID,
USER_NAME,
JOB_NUMBER,
MOBILE,
EMAIL,
DEPT_ID
--TENANT_ID
-- --,ATU.BFIRST
INTO T_DEPTID, T_ROLEID,T_PERMID,T_USERID, T_NAME, T_JOBNUMBER, T_MOBILE, T_EMAIL --T_TENANTID --,t_first
FROM TEST_USER_WXX_V
where JOB_NUMBER = upper(V('P9999_USERNAME'));
-- and ROWNUM = 1;
-- 获取用户权限等级
select count(*)
into t_count
from ROLE_USER_TEST_WXX ru
join ROLE_TEST_WXX2 r
on r.ROLE_ID = ru.ROLE_ID
where USER_ID = t_userid;
if t_count > 0 then
select r.ROLE_ID
into T_ROLEID
from ROLE_USER_TEST_WXX ru
join ROLE_TEST_WXX2 r
on r.ROLE_ID = ru.ROLE_ID
where USER_ID = t_userid and rownum=1;
else
select ROLE_ID
into t_id
from ROLE_TEST_WXX2
where IS_ENABLE = 1 and rownum = 1;
insert into ROLE_USER_TEST_WXX(USER_ID, ROLE_ID)
values (t_userid, t_id);
commit;
end if;
-- 设置APP_USER
apex_custom_auth.set_user(t_userid);
-- 将用户登入录信息注入session state
apex_util.set_session_state('ROLEID', t_roleid);
apex_util.set_session_state('DEPT_NAME', t_deptname);
apex_util.set_session_state('USERDEPT', t_deptid);
-- apex_util.set_session_state('USERTENANT', t_tenantid);
apex_util.set_session_state('USERNAME', t_name);
apex_util.set_session_state('USERJOBNUMBER', t_jobnumber);
-- apex_util.set_session_state('USERAUTH', t_auth);
apex_util.set_session_state('USERMOBILE', t_mobile);
end;破案了，原来多了一个DEPT_ID(焯！)
修正版本
create or replace PROCEDURE TEST_USER_WXX_NOW AS
T_USERID NUMBER(20);
T_DEPTID VARCHAR2(200);
T_ROLEID VARCHAR2(200);
T_PERMID VARCHAR2(200);
-- T_TENANTID VARCHAR2(10);
T_NAME VARCHAR2(48);
T_JOBNUMBER VARCHAR2(10);
-- T_AUTH VARCHAR2(10); --授权
T_MOBILE VARCHAR2(15);
T_EMAIL VARCHAR2(50);
T_COUNT NUMBER(10);
T_ID NUMBER(10);
T_DEPTNAME VARCHAR2(50);
begin
-- 获取用户基础信息
SELECT DEPT_ID,
ROLE_ID,
PERM_ID,
USER_ID,
USER_NAME,
JOB_NUMBER,
MOBILE,
EMAIL
--TENANT_ID
-- --,ATU.BFIRST
INTO T_DEPTID, T_ROLEID,T_PERMID,T_USERID, T_NAME, T_JOBNUMBER, T_MOBILE, T_EMAIL --T_TENANTID --,t_first
FROM TEST_USER_WXX_V
where JOB_NUMBER = upper(V('P9999_USERNAME'));
-- and ROWNUM = 1;
-- 获取用户权限等级
select count(*)
into t_count
from ROLE_USER_TEST_WXX ru
join ROLE_TEST_WXX2 r
on r.ROLE_ID = ru.ROLE_ID
where USER_ID = t_userid;
if t_count > 0 then
select r.ROLE_ID
into T_ROLEID
from ROLE_USER_TEST_WXX ru
join ROLE_TEST_WXX2 r
on r.ROLE_ID = ru.ROLE_ID
where USER_ID = t_userid and rownum=1;
else
select ROLE_ID
into t_id
from ROLE_TEST_WXX2
where IS_ENABLE = 1 and rownum = 1;
insert into ROLE_USER_TEST_WXX(USER_ID, ROLE_ID)
values (t_userid, t_id);
commit;
end if;
-- 设置APP_USER
apex_custom_auth.set_user(t_userid);
-- 将用户登入录信息注入session state
apex_util.set_session_state('ROLEID', t_roleid);
apex_util.set_session_state('DEPT_NAME', t_deptname);
apex_util.set_session_state('USERDEPT', t_deptid);
-- apex_util.set_session_state('USERTENANT', t_tenantid);
apex_util.set_session_state('USERNAME', t_name);
apex_util.set_session_state('USERJOBNUMBER', t_jobnumber);
-- apex_util.set_session_state('USERAUTH', t_auth);
apex_util.set_session_state('USERMOBILE', t_mobile);
end;
还是有问题
APEX - 插件处理期间引发的 PLSQL 代码中出错。 - 请与您的应用程序管理员联系ORA-06512: 在 "APEX_220200.WWV_FLOW_ERROR", line 1472 ORA-06512: 在 "APEX_220200.WWV_FLOW_ERROR", line 1507
删除权限
刷新
返回布尔
DECLARE
L_AUTH NUMBER(2);
BEGIN
SELECT nvl(max(A.BDELETE),0) INTO L_AUTH FROM AUTH_ROLE_MENU_ASSO A
LEFT JOIN AUTH_MENU B ON A.MENU_ID = B.MENU_ID
WHERE A.ROLE_ID= :ROLEID AND B.PAGE_ID = :APP_PAGE_ID ;
RETURN L_AUTH=1;
END;
您没有删除权限
始终
插入权限
返回布尔
返回布尔
DECLARE
L_AUTH NUMBER(2);
BEGIN
SELECT nvl(max(A.BINSERT),0) INTO L_AUTH FROM AUTH_ROLE_MENU_ASSO A
LEFT JOIN AUTH_MENU B ON A.MENU_ID = B.MENU_ID
WHERE A.ROLE_ID= :ROLEID AND B.PAGE_ID = :APP_PAGE_ID ;
RETURN L_AUTH=1;
END;
您没有插入权限
始终
更新权限
DECLARE
L_AUTH NUMBER(2);
BEGIN
SELECT nvl(max(A.BUPDATE),0) INTO L_AUTH FROM AUTH_ROLE_MENU_ASSO A
LEFT JOIN AUTH_MENU B ON A.MENU_ID = B.MENU_ID
WHERE A.ROLE_ID= :ROLEID AND B.PAGE_ID = :APP_PAGE_ID ;
RETURN L_AUTH=1;
END;
系统管理员
DECLARE
L_AUTH NUMBER(2);
BEGIN
RETURN :USERAUTH<=1;
END;
不是系统管理员
每个会话一次
初级管理员
DECLARE
L_AUTH NUMBER(2);
BEGIN
RETURN :USERAUTH=0;
END;
部门主管
DECLARE
L_AUTH NUMBER(2);
BEGIN
RETURN :USERAUTH<=3;
END;
不是部门主管
部门经理
DECLARE
L_AUTH NUMBER(2);
BEGIN
RETURN :USERAUTH<=2;
END;
参考
验证方案 ApexAppAuth
验证函数名 apex_app_auth_authentication_3
验证后过程名 APEX_APP_AUTH_POST_AUTHENTICATION_NOW
create or replace function apex_app_auth_authentication_3(
p_username in varchar2,
p_password in varchar2)
return boolean
as
v_err_msg varchar2(2000);
t_jobnumber varchar2(20);
t_password varchar2(120);
t_count number(10);
T_TENANT NUMBER;
begin
T_TENANT := apex_util.get_session_state('P9999_USER_TENANT');
select count(1)
into t_count
from MPF_SHARE_USER_V
where upper(MOBILE) = upper(p_username)
and IS_LEAVE = 0
AND TENANT_ID = T_TENANT;
if t_count > 0 then
select count(1)
into t_count
from APEX_TENANT_USERS
where MOBILE = upper(p_username)
AND TENANT_ID = T_TENANT
AND DEL_FLAG = 0;
if t_count > 0 then
select MOBILE, PASSWORD
into t_jobnumber,t_password
from APEX_TENANT_USERS
where MOBILE = upper(p_username)
AND TENANT_ID = T_TENANT
AND DEL_FLAG = 0;
else
insert into apex_tenant_users(ext_user_id, del_flag, tenant_id, sync_user_id, unionid, title, name, avatar,
state_code, mobile, job_number, email, is_leave, leader_ext_user_id,
hired_date, Is_Ext_User, LAST_SYNC_DATE)
select EXT_USER_ID,
0,
TENANT_ID,
SYNC_USER_ID,
UNION_ID,
TITLE,
NAME,
AVATAR,
STATE_CODE,
MOBILE,
JOB_NUMBER,
EMAIL,
IS_LEAVE,
LEADER_EXT_USER_ID,
HIRED_DATE,
0,
SYSDATE
FROM MPF_SHARE_USER_V
WHERE MOBILE = upper(p_username)
AND TENANT_ID = T_TENANT;
COMMIT;
update APEX_TENANT_USERS
set PASSWORD = ENCRYPT_ENC('123456')
where MOBILE = upper(p_username)
AND TENANT_ID = T_TENANT
AND DEL_FLAG = 0;
commit;
select MOBILE, PASSWORD
into t_jobnumber,t_password
from APEX_TENANT_USERS
where MOBILE = upper(p_username)
AND TENANT_ID = T_TENANT
AND DEL_FLAG = 0;
end if;
else
apex_util.set_custom_auth_status(p_status => '手机号不存在');
return false;
end if;
if (t_jobnumber is null or t_password is null) then
apex_util.set_custom_auth_status(p_status => '手机号和密码不能为空');
return false;
else
if ENCRYPT_ENC(p_password) <> t_password then
apex_util.set_custom_auth_status(p_status => '手机号或密码错误');
return false;
else
return true;
end if;
end if;
exception
when others then
v_err_msg := sqlerrm || chr(13) || dbms_utility.format_error_backtrace;
WRITE_LOG(GET_FN_NAME(), 'error', 'p_username:' || p_username || chr(13) || v_err_msg, -1, -1);
rollback;
return false;
end ;验证后过程名 APEX_APP_AUTH_POST_AUTHENTICATION_NOW
create PROCEDURE APEX_APP_AUTH_POST_AUTHENTICATION_NOW AS
T_USERID NUMBER(20);
T_DEPID VARCHAR2(200);
T_TENANTID VARCHAR2(10);
T_NAME VARCHAR2(48);
T_JOBNUMBER VARCHAR2(10);
T_AUTH VARCHAR2(10);
T_MOBILE VARCHAR2(15);
T_EMAIL VARCHAR2(50);
T_COUNT NUMBER(10);
T_ID NUMBER(10);
T_FIRST NUMBER(2);
T_APPKEY VARCHAR2(128);
T_APPSECRET VARCHAR2(128);
BEGIN
SELECT EXT_ORG_ID, EXT_USER_ID, NAME, JOB_NUMBER, MOBILE, EMAIL, TENANT_ID --,ATU.BFIRST
INTO T_DEPID, T_USERID, T_NAME, T_JOBNUMBER, T_MOBILE, T_EMAIL, T_TENANTID --,t_first
FROM -- APEX_TENANT_USERS ATU
MPF_USER_DEPT_MAIN_ASSO_V
WHERE MOBILE = UPPER(V('P9999_USERNAME'))
AND TENANT_ID = V('P9999_USER_TENANT')
AND ROWNUM <2;
-- SELECT APP_KEY,APP_SECRET INTO T_APPKEY,T_APPSECRET FROM TENANT_APP WHERE TENANT_ID = 1 AND NAME = 'APEX-UPGRADE' AND ROWNUM = 1;
--select count(*) into t_count from APEX_P_AUTH_ROLE_USER_ASSO where USER_ID = t_userid AND APP_ID=V('APP_ID');
SELECT COUNT(*)
INTO T_COUNT
FROM AUTH_USER_ROLE_ASSO A
LEFT JOIN AUTH_ROLE B
ON A.ROLE_ID = B.ROLE_ID
WHERE A.USER_ID = T_USERID
AND B.APP_CODE = V('APP_CODE')
AND TENANT_ID = T_TENANTID;
-- select max(AUTH_NUM) into t_auth from APEX_P_AUTH_ROLE where DEL_FLAG = 0 and TENANT_ID = t_tenantid and APP_ID = V('APP_ID');
SELECT nvl(max(ROLE_ID),0),nvl(max(AUTH_LEVEL),0)
INTO T_ID, T_AUTH
FROM AUTH_ROLE
WHERE APP_CODE = V('APP_CODE')
AND IS_DEFAULT = 1
AND TENANT_ID = T_TENANTID;
IF T_COUNT > 0 THEN
/* select AUTH_NUM into t_auth from APEX_P_AUTH_ROLE_USER_ASSO rua
join APEX_P_AUTH_ROLE r
on r.ROLE_ID = rua.ROLE_ID
where USER_ID = t_userid AND rua.app_id = V('APP_ID') AND ROWNUM = 1;*/
SELECT A.ROLE_ID, B.AUTH_LEVEL
INTO T_ID, T_AUTH
FROM AUTH_USER_ROLE_ASSO A
LEFT JOIN AUTH_ROLE B
ON A.ROLE_ID = B.ROLE_ID
WHERE A.USER_ID = T_USERID
AND B.APP_CODE = V('APP_CODE')
AND B.TENANT_ID = T_TENANTID
AND ROWNUM = 1;
ELSE
-- ������������������������������������������
/* select ROLE_ID into t_id from APEX_P_AUTH_ROLE
where AUTH_NUM = t_auth AND APP_ID = V('APP_ID');
insert into APEX_P_AUTH_ROLE_USER_ASSO(USER_ID,ROLE_ID,APP_ID)
values (t_userid,t_id,V('APP_ID'));
commit;*/
INSERT INTO AUTH_USER_ROLE_ASSO (USER_ID, ROLE_ID) VALUES (T_USERID, T_ID);
COMMIT;
END IF;
-- ����APP_USER
APEX_CUSTOM_AUTH.SET_USER(T_USERID);
-- ��������������������session state
APEX_UTIL.SET_SESSION_STATE('MPF_API_URL', 'http://gateway_dev.ywjasolar.com.cn:19999/');
-- APEX_UTIL.SET_SESSION_STATE('JINGBAO_URL', 'http://172.30.64.30:31000/');
APEX_UTIL.SET_SESSION_STATE('JINGBAO_URL', 'http://172.30.64.30:31000/');
APEX_UTIL.SET_SESSION_STATE('JINGBAO_API_URL', 'http://dev_server_jingbao.ywjasolar.com.cn:19999/');
-- APEX_UTIL.SET_SESSION_STATE('MPF_API_URL', 'http://gateway_test.ywjasolar.com/');
APEX_UTIL.SET_SESSION_STATE('ROLEID', T_ID);
APEX_UTIL.SET_SESSION_STATE('USERTENANT', T_TENANTID);
APEX_UTIL.SET_SESSION_STATE('USERDEPT', T_DEPID);
APEX_UTIL.SET_SESSION_STATE('USERNAME', T_NAME);
APEX_UTIL.SET_SESSION_STATE('USERJOBNUMBER', T_JOBNUMBER);
APEX_UTIL.SET_SESSION_STATE('USERAUTH', T_AUTH);
APEX_UTIL.SET_SESSION_STATE('USERMOBILE', T_MOBILE);
APEX_UTIL.SET_SESSION_STATE('USEREMAIL', T_EMAIL);
APEX_UTIL.SET_SESSION_STATE('USER_ID', T_USERID);
APEX_UTIL.SET_SESSION_STATE('USERID', T_USERID);
APEX_UTIL.SET_SESSION_STATE('APPKEY', GETAPPKEY(T_TENANTID));
APEX_UTIL.SET_SESSION_STATE('APPSECRET', GETAPPSECRET(T_TENANTID));
--apex_util.set_session_state('USERFIRST',t_first);
END;
/
参考2
应用162
验证函数名 apex_app_auth_authentication_3
验证后过程名 APEX_APP_AUTH_POST_AUTHENTICATION_162