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
6a1b4509
Commit
6a1b4509
authored
Sep 27, 2019
by
Spencer Chang
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[fix] 承租人变更信息调整使用合同表字段
parent
cf4edef5
Changes
10
Show whitespace changes
Inline
Side-by-side
Showing
10 changed files
with
90 additions
and
89 deletions
+90
-89
INITIALIZE_LAYOUT_DB_OBJECT.sql
...ase/Init/Layout_db_object/INITIALIZE_LAYOUT_DB_OBJECT.sql
+3
-0
cus_con_change_req_wfl_pkg.pck
src/main/database/Package/cus_con_change_req_wfl_pkg.pck
+12
-5
cus_con_contract_repo_pkg.pck
src/main/database/Package/cus_con_contract_repo_pkg.pck
+10
-23
cus_con_et_pkg.pck
src/main/database/Package/cus_con_et_pkg.pck
+4
-22
CON_CONTRACT.sql
src/main/database/Table/Alter/CON_CONTRACT.sql
+5
-1
CON_CHANGE_CONTRACT_LV.sql
src/main/database/View/CON_CHANGE_CONTRACT_LV.sql
+6
-5
con_contract_change_req_lv.sql
src/main/database/View/con_contract_change_req_lv.sql
+1
-0
hls_con_contract_change_detail.lview
.../modules/cont/CON731/hls_con_contract_change_detail.lview
+46
-30
hls_ccr_modify_entrance.lview
.../webapp/modules/cont/CON732/hls_ccr_modify_entrance.lview
+2
-2
con_early_termination_et_detail.lview
...ules/cont/CON_ET001/con_early_termination_et_detail.lview
+1
-1
No files found.
src/main/database/Init/Layout_db_object/INITIALIZE_LAYOUT_DB_OBJECT.sql
View file @
6a1b4509
...
@@ -19,6 +19,9 @@ values ('CONTRACT', 'CON_CONTRACT_REPO_LV', 'VIEW', -1, sysdate, -1, sysdate);
...
@@ -19,6 +19,9 @@ values ('CONTRACT', 'CON_CONTRACT_REPO_LV', 'VIEW', -1, sysdate, -1, sysdate);
insert
into
HLS_DOC_CATEGORY_DB_OBJECT
(
DOCUMENT_CATEGORY
,
OBJECT_NAME
,
OBJECT_TYPE
,
CREATED_BY
,
CREATION_DATE
,
LAST_UPDATED_BY
,
LAST_UPDATE_DATE
)
insert
into
HLS_DOC_CATEGORY_DB_OBJECT
(
DOCUMENT_CATEGORY
,
OBJECT_NAME
,
OBJECT_TYPE
,
CREATED_BY
,
CREATION_DATE
,
LAST_UPDATED_BY
,
LAST_UPDATE_DATE
)
values
(
'CONTRACT'
,
'CON_CONTRACT_REPO_MODIFY_LV'
,
'VIEW'
,
-
1
,
sysdate
,
-
1
,
sysdate
);
values
(
'CONTRACT'
,
'CON_CONTRACT_REPO_MODIFY_LV'
,
'VIEW'
,
-
1
,
sysdate
,
-
1
,
sysdate
);
insert
into
HLS_DOC_CATEGORY_DB_OBJECT
(
DOCUMENT_CATEGORY
,
OBJECT_NAME
,
OBJECT_TYPE
,
CREATED_BY
,
CREATION_DATE
,
LAST_UPDATED_BY
,
LAST_UPDATE_DATE
)
values
(
'CONTRACT'
,
'CON_CONTRACT_CCR_Q_LV'
,
'VIEW'
,
-
1
,
sysdate
,
-
1
,
sysdate
);
end
;
end
;
/
/
commit
;
commit
;
...
...
src/main/database/Package/cus_con_change_req_wfl_pkg.pck
View file @
6a1b4509
...
@@ -29,11 +29,18 @@ create or replace package body cus_con_change_req_wfl_pkg is
...
@@ -29,11 +29,18 @@ create or replace package body cus_con_change_req_wfl_pkg is
v_bp_name varchar2(300);
v_bp_name varchar2(300);
v_workflow_desc varchar2(2000);
v_workflow_desc varchar2(2000);
begin
begin
--承租人已改变,此时con_contract_bp并没有新的承租人信息,会返回no_data_found例外
if p_layout_code = 'CON_TENANT_CHANGE_MODIFY' then
select lv.bp_name
into v_bp_name
from con_contract_bp_tenant_lv lv
where lv.contract_id = p_change_req_rec.contract_id;
else
select lv.bp_name
select lv.bp_name
into v_bp_name
into v_bp_name
from con_contract_bp_tenant_lv lv
from con_contract_bp_tenant_lv lv
where lv.contract_id = p_change_con_rec.contract_id;
where lv.contract_id = p_change_con_rec.contract_id;
end if;
update con_contract_change_req t
update con_contract_change_req t
set t.req_status = 'APPROVING',
set t.req_status = 'APPROVING',
t.submit_date = sysdate,
t.submit_date = sysdate,
...
...
src/main/database/Package/cus_con_contract_repo_pkg.pck
View file @
6a1b4509
...
@@ -3,7 +3,12 @@
...
@@ -3,7 +3,12 @@
-- Author : Spencer 3893
-- Author : Spencer 3893
-- Created : 9/10/2019 2:21:13 PM
-- Created : 9/10/2019 2:21:13 PM
-- Purpose : 合同回购
-- Purpose : 合同回购
function get_contract_repo_number(p_document_type varchar2,
p_document_date date,
p_company_id number,
p_user_id number,
p_contract_id number default null)
return varchar2;
--add by Spencer 3893 20190911 回购申请
--add by Spencer 3893 20190911 回购申请
procedure create_change_req_repo(p_contract_id in number,
procedure create_change_req_repo(p_contract_id in number,
p_req_type in varchar2,
p_req_type in varchar2,
...
@@ -751,28 +756,10 @@ create or replace package body cus_con_contract_repo_pkg is
...
@@ -751,28 +756,10 @@ create or replace package body cus_con_contract_repo_pkg is
con_contract_history_pkg.calc_change_history(p_change_req_id => p_change_req_id,
con_contract_history_pkg.calc_change_history(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
p_user_id => p_user_id);
select approval_method
cus_con_change_req_wfl_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
into v_approval_method
from hls_document_type
where document_category = r_change_req_rec.document_category
and document_type = r_change_req_rec.document_type;
if v_approval_method = 'WORK_FLOW' then
con_contract_change_req_wf_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
p_change_con_rec => r_change_con_rec,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
p_layout_code => p_layout_code,
p_user_id => p_user_id);
p_user_id => p_user_id);
else
update con_contract_change_req t
set t.req_status = 'APPROVING',
t.submit_date = sysdate,
last_updated_by = p_user_id,
last_update_date = sysdate
where t.change_req_id = p_change_req_id;
con_contract_change_req_pkg.change_req_confirm(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
end if;
exception
exception
when e_attachment_error then
when e_attachment_error then
...
...
src/main/database/Package/cus_con_et_pkg.pck
View file @
6a1b4509
...
@@ -424,28 +424,10 @@ create or replace package body cus_con_et_pkg is
...
@@ -424,28 +424,10 @@ create or replace package body cus_con_et_pkg is
con_contract_history_pkg.calc_change_history(p_change_req_id => p_change_req_id,
con_contract_history_pkg.calc_change_history(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
p_user_id => p_user_id);
select approval_method
into v_approval_method
from hls_document_type
where document_category = r_change_req_rec.document_category
and document_type = r_change_req_rec.document_type;
if v_approval_method = 'WORK_FLOW' then
con_contract_change_req_wf_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
con_contract_change_req_wf_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
p_change_con_rec => r_change_con_rec,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
p_layout_code => p_layout_code,
p_user_id => p_user_id);
p_user_id => p_user_id);
else
update con_contract_change_req t
set t.req_status = 'APPROVING',
t.submit_date = sysdate,
last_updated_by = p_user_id,
last_update_date = sysdate
where t.change_req_id = p_change_req_id;
con_contract_change_req_pkg.change_req_confirm(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
end if;
end submit_change_req_et;
end submit_change_req_et;
end cus_con_et_pkg;
end cus_con_et_pkg;
/
/
src/main/database/Table/Alter/CON_CONTRACT.sql
View file @
6a1b4509
...
@@ -57,3 +57,7 @@ is '是否展期';
...
@@ -57,3 +57,7 @@ is '是否展期';
alter
table
CON_CONTRACT
add
deflation_flag
varchar2
(
1
);
alter
table
CON_CONTRACT
add
deflation_flag
varchar2
(
1
);
comment
on
column
CON_CONTRACT
.
deflation_flag
comment
on
column
CON_CONTRACT
.
deflation_flag
is
'是否缩期'
;
is
'是否缩期'
;
alter
table
CON_CONTRACT
add
ccr_lease_date
date
;
comment
on
column
CON_CONTRACT
.
ccr_lease_date
is
'承租人变更日'
;
\ No newline at end of file
src/main/database/View/CON_CHANGE_CONTRACT_LV.sql
View file @
6a1b4509
...
@@ -215,10 +215,10 @@ SELECT t1.contract_id,
...
@@ -215,10 +215,10 @@ SELECT t1.contract_id,
FROM
con_contract_lease_item
cli
FROM
con_contract_lease_item
cli
WHERE
cli
.
contract_id
=
t1
.
contract_id
WHERE
cli
.
contract_id
=
t1
.
contract_id
AND
cli
.
equipment_type
=
'MAIN'
)
machine_number
,
--机号 --end
AND
cli
.
equipment_type
=
'MAIN'
)
machine_number
,
--机号 --end
t1
.
ccr_leas
s
e_rental
,
t1
.
ccr_lease_rental
,
t1
.
ccr_leas
s
e_interest
,
t1
.
ccr_lease_interest
,
t1
.
ccr_leas
s
e_principal
,
t1
.
ccr_lease_principal
,
t1
.
ccr_leas
s
e_penalty
,
t1
.
ccr_lease_penalty
,
t1
.
ccr_reason
,
t1
.
ccr_reason
,
t1
.
ccr_opinion
,
t1
.
ccr_opinion
,
nvl
(
t1
.
hd_user_col_v04
,
'DELAY'
)
hd_user_col_v04
,
--冬雨季延期方式
nvl
(
t1
.
hd_user_col_v04
,
'DELAY'
)
hd_user_col_v04
,
--冬雨季延期方式
...
@@ -295,7 +295,8 @@ SELECT t1.contract_id,
...
@@ -295,7 +295,8 @@ SELECT t1.contract_id,
and
v
.
code
=
'PAY_METHODS'
)
PAY_METHOD_N
,
--现支付方式
and
v
.
code
=
'PAY_METHODS'
)
PAY_METHOD_N
,
--现支付方式
t1
.
BANK_BRANCH_NAME
,
--现扣款银行
t1
.
BANK_BRANCH_NAME
,
--现扣款银行
t1
.
BANK_ACCOUNT_NAME
,
--现扣款账户名
t1
.
BANK_ACCOUNT_NAME
,
--现扣款账户名
t1
.
BANK_BRANCH_NUM
--现扣款账号
t1
.
BANK_BRANCH_NUM
,
--现扣款账号
t1
.
ccr_lease_date
--回款賬戶變更 end
--回款賬戶變更 end
FROM
con_contract
t1
FROM
con_contract
t1
;
;
src/main/database/View/con_contract_change_req_lv.sql
View file @
6a1b4509
...
@@ -56,6 +56,7 @@ select t.change_req_id,
...
@@ -56,6 +56,7 @@ select t.change_req_id,
cc
.
contract_name
,
cc
.
contract_name
,
cc
.
bp_id_tenant
,
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
,
(
select
m
.
bp_name
from
hls_bp_master
m
where
m
.
bp_id
=
cc
.
bp_id_tenant
)
as
bp_id_tenant_n
,
(
select
m
.
bp_name
from
hls_bp_master
m
,
con_contract
cct
where
m
.
bp_id
=
cct
.
bp_id_tenant
AND
cct
.
contract_id
=
t
.
contract_id
)
as
s_bp_id_tenant_n
,
cc
.
inception_of_lease
,
cc
.
inception_of_lease
,
nvl
(
t
.
et_ins_derate_amount
,
0
)
et_ins_derate_amount
,
nvl
(
t
.
et_ins_derate_amount
,
0
)
et_ins_derate_amount
,
(
select
sum
(
cf
.
principal
)
-
sum
(
nvl
(
cf
.
received_principal
,
0
))
(
select
sum
(
cf
.
principal
)
-
sum
(
nvl
(
cf
.
received_principal
,
0
))
...
...
src/main/webapp/modules/cont/CON731/hls_con_contract_change_detail.lview
View file @
6a1b4509
...
@@ -106,9 +106,8 @@
...
@@ -106,9 +106,8 @@
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_update'] = function(ds, record, name, value, old_value, bp_seq) {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_update'] = function(ds, record, name, value, old_value, bp_seq) {
var con_contract_change_req_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_change_req');
var ds_con_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'F_QUOTATION_01', 'con_contract');
if (ds.id == ds_con_id) {
if (ds.id == con_contract_change_req_ds_id) {
// 承租人变更
// 承租人变更
if ('${/parameter/@layout_code}' == 'CON_TENANT_CHANGE_MODIFY') {
if ('${/parameter/@layout_code}' == 'CON_TENANT_CHANGE_MODIFY') {
// 承租人变更日計算應繳金額相關信息
// 承租人变更日計算應繳金額相關信息
...
@@ -135,9 +134,6 @@
...
@@ -135,9 +134,6 @@
}
}
}
}
}
var ds_con_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'F_QUOTATION_01', 'con_contract');
if (ds.id == ds_con_id) {
// 回款賬戶變更
// 回款賬戶變更
if('${/parameter/@layout_code}' == 'CON_ACCOUNT_CHANGE_MODIFY'){
if('${/parameter/@layout_code}' == 'CON_ACCOUNT_CHANGE_MODIFY'){
if(name == 'BANK_BRANCH_NUM'){
if(name == 'BANK_BRANCH_NUM'){
...
@@ -148,6 +144,26 @@
...
@@ -148,6 +144,26 @@
}
}
}
}
}
}
// 租赁计划變更
if('${/parameter/@layout_code}' == 'CON_CHANGE_MODIFY'){debugger
var lease_times = record.get('lease_times')||0;
if(name == 'ccr_start_times'){
var ccr_outstanding_times = record.get('ccr_outstanding_times')||0;
var curr_times = minus(plus(value || 0,ccr_outstanding_times||0),1);
if(curr_times >
lease_times){
record.set('extend_flag','Y');
record.set('deflation_flag','N');
}
}
if(name == 'ccr_outstanding_times'){
var ccr_start_times = record.get('ccr_start_times')||0;
var curr_times = minus(plus(value || 0,ccr_start_times||0),1);
if(curr_times
< lease_times
){
record.set('extend_flag','N');
record.set('deflation_flag','Y');
}
}
}
}
}
};
};
...
...
src/main/webapp/modules/cont/CON732/hls_ccr_modify_entrance.lview
View file @
6a1b4509
...
@@ -98,10 +98,10 @@
...
@@ -98,10 +98,10 @@
}
}
if (record.get('ccr_document_type') == 'CUT_CHAG') {
if (record.get('ccr_document_type') == 'CUT_CHAG') {
param['function_code'] = 'CON733CF';
param['function_code'] = 'CON733CF';
param['url_title'] = '变更申请-合同
回款账户
变更';
param['url_title'] = '变更申请-合同
租金计划
变更';
} else if (record.get('ccr_document_type') == 'LEASE_CHAG') {
} else if (record.get('ccr_document_type') == 'LEASE_CHAG') {
param['function_code'] = 'CON733BPT';
param['function_code'] = 'CON733BPT';
param['url_title'] = '变更申请-合同
回款账户
变更';
param['url_title'] = '变更申请-合同
承租人
变更';
} else if (record.get('ccr_document_type') == 'ACC_CHAG') {
} else if (record.get('ccr_document_type') == 'ACC_CHAG') {
param['function_code'] = 'CON733BPB';
param['function_code'] = 'CON733BPB';
param['url_title'] = '变更申请-合同回款账户变更';
param['url_title'] = '变更申请-合同回款账户变更';
...
...
src/main/webapp/modules/cont/CON_ET001/con_early_termination_et_detail.lview
View file @
6a1b4509
...
@@ -6,7 +6,7 @@
...
@@ -6,7 +6,7 @@
<a:init-procedure/>
<a:init-procedure/>
<a:view>
<a:view>
<a:link
id=
"con_contract_repo_detail_get_layout_code_link_id"
model=
"cont.CON500.con_contract_get_layout_code"
modelaction=
"update"
/>
<a:link
id=
"con_contract_repo_detail_get_layout_code_link_id"
model=
"cont.CON500.con_contract_get_layout_code"
modelaction=
"update"
/>
<a:link
id=
"con_et002_submit_link"
model=
""
modelaction=
"execute"
/>
<a:link
id=
"con_et002_submit_link"
model=
"
cont.CON_ET001.submit_change_req
"
modelaction=
"execute"
/>
<a:link
id=
"con_et002_cancel_link"
model=
"cont.CON731.cancel_change_req"
modelaction=
"execute"
/>
<a:link
id=
"con_et002_cancel_link"
model=
"cont.CON731.cancel_change_req"
modelaction=
"execute"
/>
<a:link
id=
"con_et001_calc_cashflow_link"
model=
"cont.CON_ET001.calc_cashflow"
modelaction=
"execute"
/>
<a:link
id=
"con_et001_calc_cashflow_link"
model=
"cont.CON_ET001.calc_cashflow"
modelaction=
"execute"
/>
<a:link
id=
"con_et001_calc_et_date_amount_link"
model=
"cont.CON_ET001.calc_et_date_amount"
modelaction=
"execute"
/>
<a:link
id=
"con_et001_calc_et_date_amount_link"
model=
"cont.CON_ET001.calc_et_date_amount"
modelaction=
"execute"
/>
...
...
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