Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
L
leaf-hlcm
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
hlcm
leaf-hlcm
Commits
9472f8ef
Commit
9472f8ef
authored
Sep 23, 2019
by
Spencer Chang
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[feat] 提前結清功能
parent
9944cf9c
Changes
18
Expand all
Show whitespace changes
Inline
Side-by-side
Showing
18 changed files
with
1743 additions
and
68 deletions
+1743
-68
.gitignore
.gitignore
+1
-0
INITIALIZE_SYS_FUNCTION_DYNAMIC.sql
src/main/database/Init/INITIALIZE_SYS_FUNCTION_DYNAMIC.sql
+12
-1
cus_con_contract_repo_pkg.pck
src/main/database/Package/cus_con_contract_repo_pkg.pck
+59
-64
cus_con_et_pkg.pck
src/main/database/Package/cus_con_et_pkg.pck
+451
-0
REGISTER_CON_ET001.sql
src/main/database/Register_function/REGISTER_CON_ET001.sql
+47
-0
REGISTER_CON_ET003.sql
src/main/database/Register_function/REGISTER_CON_ET003.sql
+46
-0
CON_CONTRACT_CHANGE_REQ.sql
src/main/database/Table/Alter/CON_CONTRACT_CHANGE_REQ.sql
+26
-1
CON_CONTRACT_REPO_MODIFY_LV.sql
src/main/database/View/CON_CONTRACT_REPO_MODIFY_LV.sql
+3
-2
con_contract_change_req_lv.sql
src/main/database/View/con_contract_change_req_lv.sql
+87
-0
calc_cashflow.lwm
...n/webapp/WEB-INF/classes/cont/CON_ET001/calc_cashflow.lwm
+13
-0
calc_et_date_amount.lwm
...pp/WEB-INF/classes/cont/CON_ET001/calc_et_date_amount.lwm
+34
-0
con_early_termination_query.lwm
...NF/classes/cont/CON_ET001/con_early_termination_query.lwm
+200
-0
create_change_req.lwm
...bapp/WEB-INF/classes/cont/CON_ET001/create_change_req.lwm
+20
-0
submit_change_req.lwm
...bapp/WEB-INF/classes/cont/CON_ET001/submit_change_req.lwm
+17
-0
con_early_termination_modify_query.lwm
...ses/cont/CON_ET003/con_early_termination_modify_query.lwm
+216
-0
con_early_termination_et_detail.lview
...ules/cont/CON_ET001/con_early_termination_et_detail.lview
+202
-0
con_early_termination_query.lview
.../modules/cont/CON_ET001/con_early_termination_query.lview
+156
-0
con_early_termination_modify_query.lview
...s/cont/CON_ET003/con_early_termination_modify_query.lview
+153
-0
No files found.
.gitignore
View file @
9472f8ef
...
...
@@ -20,6 +20,7 @@ overlays/
# sql
*~sql
*~pck
# common config rename
uncertain.local.xml
...
...
src/main/database/Init/INITIALIZE_SYS_FUNCTION_DYNAMIC.sql
View file @
9472f8ef
...
...
@@ -8,3 +8,14 @@ INSERT INTO SYS_FUNCTION_DYNAMIC
LAST_UPDATED_BY
)
VALUES
(
'CON_REPO001D'
,
'合同回购申请明细'
,
1
,
SYSDATE
,
-
1
,
SYSDATE
,
-
1
);
INSERT
INTO
SYS_FUNCTION_DYNAMIC
(
FUNCTION_CODE
,
FUNCTION_NAME
,
SEQUENCE
,
CREATION_DATE
,
CREATED_BY
,
LAST_UPDATE_DATE
,
LAST_UPDATED_BY
)
VALUES
(
'CON_ET002'
,
'提前结清申请明细'
,
1
,
SYSDATE
,
-
1
,
SYSDATE
,
-
1
);
\ No newline at end of file
src/main/database/Package/cus_con_contract_repo_pkg.pck
View file @
9472f8ef
create or replace package cus_con_contract_repo_pkg is
create or replace package cus_con_contract_repo_pkg is
-- Author : Spencer 3893
-- Created : 9/10/2019 2:21:13 PM
...
...
@@ -149,12 +149,7 @@ create or replace package body cus_con_contract_repo_pkg is
v_contract_rec con_contract%rowtype;
begin
select *
into v_contract_rec
from con_contract cc
where cc.contract_id = p_contract_id
for update nowait;
v_contract_rec := get_contract_rec(p_contract_id, p_user_id);
if v_contract_rec.contract_status <> 'INCEPT' and p_req_type = 'REPUR' then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => '只有起租状态的合同才能进行回购申请!',
...
...
@@ -601,16 +596,16 @@ create or replace package body cus_con_contract_repo_pkg is
select f.due_date, f.outstanding_rental_tax_incld
into v_last_rent_due_date, v_sum_unreceived_principal
from con_contract_cashflow f
where f.times = (select max(f.times)
from con_contract_cashflow f
where f.due_date < p_repurchase_date
and f.cf_item = 1
and f.cf_type = 1
and f.contract_id = p_contract_id
and f.times = (select max(f.times)
from con_contract_cashflow f
where f.due_date < p_repurchase_date
and f.contract_id = p_contract_id)
and f.due_date <= p_repurchase_date
and f.cf_item = 1
and f.cf_type = 1
and f.contract_id = p_contract_id)
;
and f.contract_id = p_contract_id
;
p_last_rent_due_date := v_last_rent_due_date;
--已回收租金
select sum(nvl(F.RECEIVED_AMOUNT, 0))
...
...
@@ -657,7 +652,7 @@ create or replace package body cus_con_contract_repo_pkg is
'之后数据发起回购!',
p_created_by => p_user_id,
p_package_name => 'cus_con_contract_repo_pkg',
p_procedure_function_name => '
get_last_rent_due_date
');
p_procedure_function_name => '
calc_repo_date_amount
');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
...
...
src/main/database/Package/cus_con_et_pkg.pck
0 → 100644
View file @
9472f8ef
This diff is collapsed.
Click to expand it.
src/main/database/Register_function/REGISTER_CON_ET001.sql
0 → 100644
View file @
9472f8ef
WHENEVER
SQLERROR
EXIT
FAILURE
ROLLBACK
;
WHENEVER
OSERROR
EXIT
FAILURE
ROLLBACK
;
spool
REGISTER_CON_ET001
.
log
set
feedback
off
set
define
off
begin
--页面注册
sys_function_assign_pkg
.
service_load
(
'modules/cont/CON_ET001/con_early_termination_query.lview'
,
'提前结清创建入口'
,
1
,
1
,
0
);
sys_function_assign_pkg
.
service_load
(
'modules/cont/CON_ET001/con_early_termination_et_detail.lview'
,
'提前结清申请明细'
,
1
,
1
,
0
);
--功能定义
SYS_LOAD_SYS_FUNCTION_PKG
.
SYS_FUNCTION_LOAD
(
'CON_ET001'
,
'提前结清创建'
,
'提前结清创建'
,
'100'
,
''
,
''
,
'modules/cont/CON_ET001/con_early_termination_query.lview'
,
'ZHS'
,
-
1
);
SYS_LOAD_SYS_FUNCTION_PKG
.
SYS_FUNCTION_LOAD
(
'CON_ET001'
,
'提前结清创建'
,
'提前结清创建'
,
'100'
,
''
,
''
,
'modules/cont/CON_ET001/con_early_termination_query.lview'
,
'US'
,
-
1
);
--分配页面
sys_function_assign_pkg
.
func_service_load
(
'CON_ET001'
,
'modules/cont/CON_ET001/con_early_termination_query.lview'
);
sys_function_assign_pkg
.
func_service_load
(
'CON_ET001'
,
'modules/cont/CON500/con_contract_authority_list_validate.lview'
);
sys_function_assign_pkg
.
func_service_load
(
'CON_ET001'
,
'modules/cont/CON500/con_contract_get_layout_code.lview'
);
sys_function_assign_pkg
.
func_service_load
(
'CON_ET001'
,
'modules/cont/CON_ET001/con_early_termination_et_detail.lview'
);
--分配bm
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON500.con_contract_get_layout_code'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON_ET001.create_change_req'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON_ET001.submit_change_req'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON_ET001.con_early_termination_query'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON731.cancel_change_req'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON_ET001.calc_et_date_amount'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON_ET001.calc_cashflow'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET001'
,
'cont.CON_ET001.submit_change_req'
);
--分配菜单
sys_load_sys_function_grp_pkg
.
sys_function_group_item_load
(
p_function_group_code
=>
'CON_CHANGE_REQ'
,
p_function_code
=>
'CON_ET001'
,
p_enabled_flag
=>
'Y'
,
P_USER_ID
=>-
1
);
end
;
/
commit
;
set
feedback
on
set
define
on
spool
off
exit
src/main/database/Register_function/REGISTER_CON_ET003.sql
0 → 100644
View file @
9472f8ef
WHENEVER
SQLERROR
EXIT
FAILURE
ROLLBACK
;
WHENEVER
OSERROR
EXIT
FAILURE
ROLLBACK
;
spool
REGISTER_CON_ET001
.
log
set
feedback
off
set
define
off
begin
--页面注册
sys_function_assign_pkg
.
service_load
(
'modules/cont/CON_ET003/con_early_termination_modify_query.lview'
,
'提前结清查询'
,
1
,
1
,
0
);
--功能定义
SYS_LOAD_SYS_FUNCTION_PKG
.
SYS_FUNCTION_LOAD
(
'CON_ET003'
,
'提前结清查询'
,
'提前结清查询'
,
'100'
,
''
,
''
,
'modules/cont/CON_ET003/con_early_termination_modify_query.lview'
,
'ZHS'
,
-
1
);
SYS_LOAD_SYS_FUNCTION_PKG
.
SYS_FUNCTION_LOAD
(
'CON_ET003'
,
'提前结清查询'
,
'提前结清查询'
,
'100'
,
''
,
''
,
'modules/cont/CON_ET003/con_early_termination_modify_query.lview'
,
'US'
,
-
1
);
--分配页面
sys_function_assign_pkg
.
func_service_load
(
'CON_ET003'
,
'modules/cont/CON_ET003/con_early_termination_modify_query.lview'
);
sys_function_assign_pkg
.
func_service_load
(
'CON_ET003'
,
'modules/cont/CON500/con_contract_authority_list_validate.lview'
);
sys_function_assign_pkg
.
func_service_load
(
'CON_ET003'
,
'modules/cont/CON500/con_contract_get_layout_code.lview'
);
sys_function_assign_pkg
.
func_service_load
(
'CON_ET003'
,
'modules/cont/CON_ET001/con_early_termination_et_detail.lview'
);
--分配bm
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON500.con_contract_get_layout_code'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON_ET001.submit_change_req'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON_ET003.con_early_termination_modify_query'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON731.cancel_change_req'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON_ET001.calc_et_date_amount'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON_ET001.calc_cashflow'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'basic.hls_division_for_lov'
);
sys_function_assign_pkg
.
func_bm_load
(
'CON_ET003'
,
'cont.CON_ET001.submit_change_req'
);
--分配菜单
sys_load_sys_function_grp_pkg
.
sys_function_group_item_load
(
p_function_group_code
=>
'CON_CHANGE_REQ'
,
p_function_code
=>
'CON_ET003'
,
p_enabled_flag
=>
'Y'
,
P_USER_ID
=>-
1
);
end
;
/
commit
;
set
feedback
on
set
define
on
spool
off
exit
src/main/database/Table/Alter/CON_CONTRACT_CHANGE_REQ.sql
View file @
9472f8ef
alter
table
CON_CONTRACT_CHANGE_REQ
add
REPO_CHANGE_FLAG
varchar2
(
1
);
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
REPO_CHANGE_FLAG
is
'是否回购'
;
alter
table
CON_CONTRACT_CHANGE_REQ
add
FUND_POSSESSION_TIME
number
;
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
FUND_POSSESSION_TIME
is
'资金占用天数'
;
alter
table
CON_CONTRACT_CHANGE_REQ
add
FUND_POSSESSION_COST
number
;
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
FUND_POSSESSION_COST
is
'资金占用费'
;
alter
table
CON_CONTRACT_CHANGE_REQ
add
FUND_POSSESSION_RATE
number
;
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
FUND_POSSESSION_RATE
is
'资金占用费利率'
;
alter
table
CON_CONTRACT_CHANGE_REQ
add
ET_DUE_AMOUNT
number
;
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
ET_DUE_AMOUNT
is
'提前结清租金'
;
alter
table
CON_CONTRACT_CHANGE_REQ
add
SUM_UNRECEIVED_PRINCIPAL
number
;
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
SUM_UNRECEIVED_PRINCIPAL
is
'剩余本金'
;
alter
table
CON_CONTRACT_CHANGE_REQ
add
ET_INTEREST_RATE
number
;
comment
on
column
CON_CONTRACT_CHANGE_REQ
.
ET_INTEREST_RATE
is
'提前结清利率'
;
src/main/database/View/CON_CONTRACT_REPO_MODIFY_LV.sql
View file @
9472f8ef
CREATE
OR
REPLACE
VIEW
CON_CONTRACT_REPO_MODIFY_LV
AS
CREATE
OR
REPLACE
VIEW
CON_CONTRACT_REPO_MODIFY_LV
AS
SELECT
t1
.
contract_id
,
t1
.
data_class
,
t1
.
calc_session_id
,
...
...
@@ -54,6 +54,7 @@ SELECT t1.contract_id,
cr
.
repo_change_flag
FROM
con_contract
t1
,
con_contract_change_req
cr
WHERE
t1
.
contract_id
=
cr
.
contract_id
WHERE
t1
.
contract_id
=
cr
.
change_req_id
AND
t1
.
data_class
=
'CHANGE_REQ'
AND
cr
.
repo_change_flag
=
'Y'
;
src/main/database/View/con_contract_change_req_lv.sql
0 → 100644
View file @
9472f8ef
CREATE
OR
REPLACE
VIEW
CON_CONTRACT_CHANGE_REQ_LV
AS
select
t
.
change_req_id
,
t
.
batch_id
,
t
.
change_quotation
,
t
.
change_lease_item
,
t
.
change_bp
,
t
.
change_req_number
,
t
.
document_type
,
(
select
t1
.
description
from
hls_document_type
t1
where
t1
.
document_type
=
t
.
document_type
)
as
document_type_n
,
t
.
document_category
,
t
.
business_type
,
t
.
company_id
,
t
.
contract_id
,
t
.
req_status
,
(
select
t1
.
code_value_name
from
sys_code_values_v
t1
where
t1
.
code
=
'CON_CHANGE_REQ_STATUS'
and
t1
.
code_value
=
t
.
req_status
)
as
req_status_n
,
t
.
req_date
,
t
.
description
,
t
.
wfl_instance_id
,
t
.
calc_session_id
,
t
.
owner_user_id
,
t
.
submit_date
,
t
.
approved_date
,
t
.
created_by
,
(
SELECT
su
.
user_name
FROM
sys_user
su
WHERE
su
.
user_id
=
t
.
created_by
)
created_by_n
,
t
.
creation_date
,
t
.
last_updated_by
,
t
.
last_update_date
,
t
.
ccr_price_list
,
t
.
ccr_calc_session_id
,
t
.
simulation_flag
,
decode
(
t
.
simulation_flag
,
'Y'
,
'Y'
,
''
)
as
simulation_flag_n
,
reschedule_flag
,
decode
(
t
.
reschedule_flag
,
'Y'
,
'Y'
,
''
)
as
reschedule_flag_n
,
t
.
et_flag
,
decode
(
t
.
et_flag
,
'Y'
,
'Y'
,
''
)
as
et_flag_n
,
t
.
tenant_change_flag
,
decode
(
t
.
tenant_change_flag
,
'Y'
,
'Y'
,
''
)
as
tenant_change_flag_n
,
t
.
bank_acc_change_flag
,
decode
(
t
.
bank_acc_change_flag
,
'Y'
,
'Y'
,
''
)
as
bank_acc_change_flag_n
,
t
.
lease_item_change_flag
,
decode
(
t
.
lease_item_change_flag
,
'Y'
,
'Y'
,
''
)
as
lease_item_change_flag_n
,
t
.
mortgage_change_flag
,
decode
(
t
.
mortgage_change_flag
,
'Y'
,
'Y'
,
''
)
as
mortgage_change_flag_n
,
t
.
guarantor_change_flag
,
decode
(
t
.
guarantor_change_flag
,
'Y'
,
'Y'
,
''
)
as
guarantor_change_flag_n
,
t
.
contract_cancel_flag
,
decode
(
t
.
contract_cancel_flag
,
'Y'
,
'Y'
,
''
)
as
contract_cancel_flag_n
,
t
.
cashflow_change_flag
,
decode
(
t
.
cashflow_change_flag
,
'Y'
,
'Y'
,
''
)
as
cashflow_change_flag_n
,
cc
.
contract_number
,
cc
.
contract_name
,
cc
.
bp_id_tenant
,
(
select
m
.
bp_name
from
hls_bp_master
m
where
m
.
bp_id
=
cc
.
bp_id_tenant
)
as
bp_id_tenant_n
,
cc
.
inception_of_lease
,
nvl
(
t
.
et_ins_derate_amount
,
0
)
et_ins_derate_amount
,
(
select
sum
(
cf
.
principal
)
-
sum
(
nvl
(
cf
.
received_principal
,
0
))
from
con_contract_cashflow
cf
where
cf
.
contract_id
=
t
.
change_req_id
and
cf
.
cf_item
=
1
and
cf
.
cf_direction
=
'INFLOW'
)
outstanding_principal
,
nvl
(
t
.
et_fee
,
500
)
et_fee
,
nvl
(
t
.
et_total_amount
,
0
)
et_total_amount
,
nvl
(
t
.
et_interest
,
0
)
et_interest
,
--提前结清 start
nvl
(
t
.
FUND_POSSESSION_TIME
,
0
)
FUND_POSSESSION_TIME
,
--资金占用天数
NVL
(
t
.
FUND_POSSESSION_COST
,
0
)
FUND_POSSESSION_COST
,
--资金占用费
NVL
(
t
.
FUND_POSSESSION_RATE
,
0
)
FUND_POSSESSION_RATE
,
--资金占用费利率
NVL
(
t
.
ET_DUE_AMOUNT
,
0
)
ET_DUE_AMOUNT
,
--提前结清租金
NVL
(
t
.
SUM_UNRECEIVED_PRINCIPAL
,
0
)
SUM_UNRECEIVED_PRINCIPAL
,
--剩余本金
NVL
(
t
.
ET_INTEREST_RATE
,
cc
.
int_rate_display
)
ET_INTEREST_RATE
,
--提前结清利率
cc
.
bp_id_agent_level1
,
(
SELECT
m
.
bp_name
FROM
hls_bp_master
m
WHERE
m
.
bp_id
=
cc
.
bp_id_agent_level1
)
AS
bp_id_agent_level1_n
,
nvl
(
t
.
residual_value
,
cc
.
residual_value
)
residual_value
,
t
.
ccr_reason
--提前结清 end
from
con_contract_change_req
t
,
con_contract
cc
where
t
.
contract_id
=
cc
.
contract_id
;
src/main/webapp/WEB-INF/classes/cont/CON_ET001/calc_cashflow.lwm
0 → 100644
View file @
9472f8ef
<?xml version="1.0" encoding="UTF-8"?>
<bm:model
xmlns:bm=
"http://www.leaf-framework.org/schema/bm"
>
<bm:operations>
<bm:operation
name=
"execute"
>
<bm:update-sql>
<![CDATA[
BEGIN
cus_con_et_pkg.calc_et_cashflows(p_contract_id=>
${@contract_id}, p_user_id=>${/session/@user_id});
END;
]]>
</bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
src/main/webapp/WEB-INF/classes/cont/CON_ET001/calc_et_date_amount.lwm
0 → 100644
View file @
9472f8ef
<?xml version="1.0" encoding="UTF-8"?>
<bm:model
xmlns:bm=
"http://www.leaf-framework.org/schema/bm"
>
<bm:operations>
<bm:operation
name=
"execute"
>
<bm:parameters>
<bm:parameter
name=
"et_fee"
dataType=
"java.lang.Double"
input=
"true"
output=
"true"
outputPath=
"@et_fee"
/>
<bm:parameter
name=
"et_total_amount"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@et_total_amount"
/>
<bm:parameter
name=
"et_due_amount"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@et_due_amount"
/>
<bm:parameter
name=
"overdue_amount"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@overdue_amount"
/>
<bm:parameter
name=
"penalty"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@penalty"
/>
<bm:parameter
name=
"fund_possession_time"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@fund_possession_time"
/>
<bm:parameter
name=
"fund_possession_cost"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@fund_possession_cost"
/>
<bm:parameter
name=
"sum_unreceived_principal"
dataType=
"java.lang.Double"
input=
"false"
output=
"true"
outputPath=
"@sum_unreceived_principal"
/>
</bm:parameters>
<bm:update-sql>
<![CDATA[
BEGIN
cus_con_et_pkg.calc_et_date_amount(p_contract_id =>
${@contract_id},
p_et_date => TO_DATE(${@termination_date},'yyyy-mm-dd'),
p_ET_FEE => ${@et_fee},
p_et_interest_rate => ${@et_interest_rate},
p_et_total_amount => ${@et_total_amount},
p_et_due_amount => ${@et_due_amount},
p_overdue_amount => ${@overdue_amount},
p_penalty => ${@penalty},
p_fund_possession_time => ${@fund_possession_time},
p_fund_possession_cost => ${@fund_possession_cost},
p_sum_unreceived_principal => ${@sum_unreceived_principal},
p_user_id => ${/session/@user_id});
END;
]]>
</bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
src/main/webapp/WEB-INF/classes/cont/CON_ET001/con_early_termination_query.lwm
0 → 100644
View file @
9472f8ef
This diff is collapsed.
Click to expand it.
src/main/webapp/WEB-INF/classes/cont/CON_ET001/create_change_req.lwm
0 → 100644
View file @
9472f8ef
<?xml version="1.0" encoding="UTF-8"?>
<bm:model
xmlns:bm=
"http://www.leaf-framework.org/schema/bm"
>
<bm:operations>
<bm:operation
name=
"execute"
>
<bm:parameters>
<bm:parameter
name=
"change_req_id"
dataType=
"java.lang.Long"
input=
"false"
output=
"true"
outputPath=
"@change_req_id"
/>
</bm:parameters>
<bm:update-sql>
<![CDATA[
BEGIN
cus_con_et_pkg.create_change_req_et(p_contract_id=>
${@contract_id},
p_req_type=>${@req_type},
p_user_id=>${/session/@user_id},
p_simulation_flag=>${@simulation_flag},
p_change_req_id=>${@change_req_id} );
END;
]]>
</bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
src/main/webapp/WEB-INF/classes/cont/CON_ET001/submit_change_req.lwm
0 → 100644
View file @
9472f8ef
<?xml version="1.0" encoding="UTF-8"?>
<bm:model
xmlns:bm=
"http://www.leaf-framework.org/schema/bm"
>
<bm:operations>
<bm:operation
name=
"execute"
>
<bm:parameters>
<bm:parameter
name=
"change_req_id"
dataType=
"java.lang.Long"
input=
"true"
output=
"false"
/>
<bm:parameter
name=
"user_id"
dataType=
"java.lang.Long"
input=
"true"
output=
"false"
/>
</bm:parameters>
<bm:update-sql>
<![CDATA[
begin
cus_con_et_pkg.submit_change_req_et(p_change_req_id=>
${@change_req_id},
p_layout_code=>${@layout_code},
p_user_id=>${/session/@user_id});
end;]]>
</bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
src/main/webapp/WEB-INF/classes/cont/CON_ET003/con_early_termination_modify_query.lwm
0 → 100644
View file @
9472f8ef
This diff is collapsed.
Click to expand it.
src/main/webapp/modules/cont/CON_ET001/con_early_termination_et_detail.lview
0 → 100644
View file @
9472f8ef
This diff is collapsed.
Click to expand it.
src/main/webapp/modules/cont/CON_ET001/con_early_termination_query.lview
0 → 100644
View file @
9472f8ef
This diff is collapsed.
Click to expand it.
src/main/webapp/modules/cont/CON_ET003/con_early_termination_modify_query.lview
0 → 100644
View file @
9472f8ef
<?xml version="1.0" encoding="UTF-8"?>
<!--
$Author: Spencer 3893
$Date: 2019-9-19
$Revision: 1.0
$Purpose: 提前结清维护入口
-->
<a:screen
xmlns:a=
"http://www.leaf-framework.org/application"
trace=
"true"
>
<a:init-procedure>
<a:model-query
fetchAll=
"true"
model=
"basic.hls_division_for_lov"
rootPath=
"hls_division_path"
/>
</a:init-procedure>
<a:view>
<a:link
id=
"con_et_get_layout_code_link_id"
model=
"cont.CON500.con_contract_get_layout_code"
modelaction=
"update"
/>
<a:link
id=
"con_et_change_link"
url=
"${/request/@context_path}/modules/cont/CON_ET001/con_early_termination_et_detail.lview"
/>
<a:link
id=
"con_et_create_change_link"
model=
"cont.CON_ET001.create_change_req"
modelaction=
"execute"
/>
<script
type=
"text/javascript"
>
<![CDATA[
function contractQueryScreen_query() {
$('contractQueryScreen_mainDs').query();
}
function contractQueryScreen_reset() {
$('contractQueryScreen_paraDs').reset();
}
function open_change_req(value,record,name){debugger
if(name=='change_req_number'){
var req_status = record.get('req_status');
var change_req_id = record.get('change_req_id');
var contract_id=record.get('contract_id');
if('NEW' == req_status || 'REJECT' == req_status){
return '<a href="javascript:open_change_req_detail(' + change_req_id + ',' + contract_id + ')">
'+value+'
</a>
';
}else{
return '
<a
href=
"javascript:open_change_req_readonly_detail(' + change_req_id + ',' + contract_id + ')"
>
'+value+'
</a>
';
}
}
return value;
}
function open_change_req_detail(change_req_id,contract_id) {debugger
var param = {};
param['change_req_id'] = change_req_id;
param['contract_id'] = change_req_id;
param['source_contract_id'] = contract_id;
//param['layout_debugger_flag'] = 'Y';
param['function_code'] = 'CON_ET002';
param['url_title'] = '提前结清维护';
param['function_usage'] = 'MODIFY';
param['maintain_type'] = 'UPDATE';
param['document_type'] = 'ET';
param['winid'] = 'con_et003_detail_winid';
hls_doc_get_layout_code('con_et_get_layout_code_link_id', param, 'con_et_change_link', 'contractQueryScreen_mainDs');
}
function open_change_req_readonly_detail(change_req_id,contract_id) {
var param = {};
param['change_req_id'] = change_req_id;
param['contract_id'] = change_req_id;
param['source_contract_id'] = contract_id;
//param['layout_debugger_flag'] = 'Y';
param['function_code'] = 'CON_ET002';
param['url_title'] = '提前结清明细';
param['function_usage'] = 'READONLY';
param['maintain_type'] = 'QUERY';
param['document_type'] = 'ET';
param['winid'] = 'con_et003_detail_winid';
hls_doc_get_layout_code('con_et_get_layout_code_link_id', param, 'con_et_change_link', 'contractQueryScreen_mainDs');
}
]]>
</script>
<a:screen-include
screen=
"modules/cont/CON500/con_contract_authority_list_validate.lview?document_category=CONTRACT&function_code=CON_ET001"
/>
<a:dataSets>
<a:dataSet
id=
"yes_or_no_ds"
lookupCode=
"YES_NO"
/>
<a:dataSet
id=
"contract_status_ds"
lookupCode=
"CON500_CONTRACT_STATUS"
/>
<a:dataSet
id=
"contract_chage_req_status_ds"
lookupCode=
"CON_CHANGE_REQ_STATUS"
/>
<a:dataSet
id=
"hls_division_ds"
>
<a:datas
dataSource=
"/model/hls_division_path"
/>
</a:dataSet>
<a:dataSet
id=
"contractQueryScreen_paraDs"
>
<a:fields>
<a:field
name=
"contract_number"
typeCase=
"upper"
/>
<a:field
name=
"contract_name"
/>
<a:field
name=
"date_from"
/>
<a:field
name=
"date_to"
/>
<a:field
name=
"bp_id_tenant"
/>
<a:field
name=
"bp_name"
lovGridHeight=
"330"
lovHeight=
"470"
lovLabelWidth=
"120"
lovService=
"cont.CON701.hls_bp_master_v_all_lov?bp_category=TENANT"
lovWidth=
"700"
title=
"承租人"
>
<a:mapping>
<a:map
from=
"bp_id"
to=
"bp_id_tenant"
/>
<a:map
from=
"bp_name"
to=
"bp_name"
/>
</a:mapping>
</a:field>
<!--代理商-->
<a:field
name=
"bp_id_agent_level1"
/>
<a:field
name=
"bp_agent"
lovGridHeight=
"330"
lovHeight=
"470"
lovLabelWidth=
"120"
lovService=
"cont.CON701.hls_bp_master_v_all_lov?bp_category=AGENT"
lovWidth=
"700"
title=
"代理商"
>
<a:mapping>
<a:map
from=
"bp_id"
to=
"bp_id_agent_level1"
/>
<a:map
from=
"bp_name"
to=
"bp_agent"
/>
</a:mapping>
</a:field>
<!--产品线-->
<a:field
name=
"division_n"
displayField=
"description"
options=
"hls_division_ds"
returnField=
"division"
valueField=
"division"
/>
<a:field
name=
"contract_status"
/>
<a:field
name=
"contract_status_desc"
displayField=
"code_value_name"
options=
"contract_status_ds"
returnField=
"contract_status"
valueField=
"code_value"
/>
<a:field
name=
"req_employee_n"
/>
<a:field
name=
"req_status"
/>
<a:field
name=
"req_status_n"
displayField=
"code_value_name"
options=
"contract_chage_req_status_ds"
returnField=
"contract_status"
valueField=
"code_value"
/>
</a:fields>
</a:dataSet>
<a:dataSet
id=
"contractQueryScreen_mainDs"
autoQuery=
"true"
fetchAll=
"false"
model=
"cont.CON_ET003.con_early_termination_modify_query"
pageSize=
"14"
queryDataSet=
"contractQueryScreen_paraDs"
selectable=
"true"
selectionModel=
"single"
>
<a:fields>
<a:field
name=
"et_type_dis"
autoComplete=
"true"
lovGridHeight=
"300"
lovHeight=
"450"
lovService=
"cont.CON701.hls_document_type_for_et_lov"
lovWidth=
"500"
prompt=
"提前结清类型"
readOnly=
"true"
required=
"true"
>
<a:mapping>
<a:map
from=
"document_type"
to=
"et_type"
/>
<a:map
from=
"document_type_desc"
to=
"et_type_dis"
/>
</a:mapping>
</a:field>
<a:field
name=
"termination_date"
datatype=
"date"
required=
"true"
/>
<a:field
name=
"overdue_status"
checkedValue=
"Y"
uncheckedValue=
"N"
/>
<a:field
name=
"trial"
checkedValue=
"Y"
uncheckedValue=
"N"
/>
<a:field
name=
"lease_execution_date"
datatype=
"date"
/>
</a:fields>
<a:events>
<a:event
name=
"query"
handler=
"aut_authority_list_validate_query"
/>
</a:events>
</a:dataSet>
</a:dataSets>
<a:screenBody>
<a:screenTopToolbar>
<a:screenTitle/>
<a:gridButton
click=
"contractQueryScreen_query"
text=
"HLS.QUERY"
/>
<a:gridButton
click=
"contractQueryScreen_reset"
text=
"HLS.RESET"
/>
</a:screenTopToolbar>
<a:form
column=
"4"
labelWidth=
"100"
marginWidth=
"40"
title=
"HLS.QUERY_TITLE"
>
<a:textField
name=
"change_req_number"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"合同变更编号"
/>
<a:textField
name=
"contract_number"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"合同编号"
/>
<a:textField
name=
"contract_name"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"合同名称"
/>
<a:lov
name=
"bp_name"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"承租人名称"
/>
<a:lov
name=
"bp_agent"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"代理店"
/>
<a:comboBox
name=
"division_n"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"产品线"
/>
<a:textField
name=
"req_employee_n"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"申请人"
/>
<a:comboBox
name=
"req_status_n"
bindTarget=
"contractQueryScreen_paraDs"
prompt=
"变更审批状态"
/>
</a:form>
<a:grid
id=
"contractQueryScreen_mainDs_grid"
bindTarget=
"contractQueryScreen_mainDs"
marginHeight=
"230"
marginWidth=
"40"
navBar=
"true"
>
<a:columns>
<a:column
name=
"change_req_number"
prompt=
"合同变更编号"
width=
"120"
align=
"left"
renderer=
"open_change_req"
/>
<a:column
name=
"contract_number"
prompt=
"合同编号"
width=
"120"
align=
"left"
/>
<a:column
name=
"contract_name"
prompt=
"合同名称"
width=
"120"
align=
"left"
/>
<a:column
name=
"bp_name"
prompt=
"承租人名称"
width=
"200"
align=
"left"
/>
<a:column
name=
"bp_agent"
prompt=
"代理店"
width=
"200"
align=
"left"
/>
<a:column
name=
"division_n"
prompt=
"产品线"
width=
"120"
align=
"left"
/>
<a:column
name=
"req_employee_n"
prompt=
"申请人"
width=
"80"
align=
"right"
/>
<a:column
name=
"req_status_n"
prompt=
"变更审批状态"
width=
"100"
align=
"center"
/>
</a:columns>
</a:grid>
</a:screenBody>
<a:screen-include
screen=
"modules/cont/CON500/con_contract_get_layout_code.lview"
/>
</a:view>
</a:screen>
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment