Commit d0912507 authored by homunculus's avatar homunculus

Merge branch 'develop' of https://hel.hand-china.com/hlcm/leaf-hlcm into develop

# Conflicts:
#	src/main/database/Init/Sys_message/INITIALIZE_CREATED_BY_ERROR_MESSAGE.sql
parents 95c124d6 e46fd0fa
INSERT INTO SYS_FUNCTION_DYNAMIC
(FUNCTION_CODE,
FUNCTION_NAME,
SEQUENCE,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
('CON733CF', '合同租金计划变更申请明细', 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
('CON733BPT', '合同承租人变更申请明细', 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
('CON733BPB', '合同回款账户变更申请明细', 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
('CON733BPBQ', '合同回款账户变更申请明细', 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
('CON733CF_Q','租金计划变更申请明细',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
('CON733BPT_Q','承租人变更申请明细',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_REPO001D_Q','回购申请明细',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_Q','提前结清申请明细',1,SYSDATE,-1,SYSDATE,-1);
INSERT INTO SYS_FUNCTION_DYNAMIC
(FUNCTION_CODE,
FUNCTION_NAME,
......@@ -18,4 +108,28 @@ VALUES
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
('CON_ET002', '提前结清申请明细', 1, SYSDATE, -1, SYSDATE, -1);
\ No newline at end of file
('CON_ET002', '提前结清申请明细', 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
('HLS36103', '授信详细', 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
('HLS36101', '授信详细', 1, SYSDATE, -1, SYSDATE, -1);
end;
\ No newline at end of file
......@@ -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)
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;
/
commit;
......
......@@ -11,6 +11,10 @@ sys_message_pkg.delete_message('ZJ_WFL_WORKFLOW_NODE_HIERARCHY_ERROR');
sys_message_pkg.insert_message('ZJ_WFL_WORKFLOW_NODE_HIERARCHY_ERROR','错误','查找工作流节点接收人出现错误,请联系管理员!','ZHS');
sys_message_pkg.insert_message('ZJ_WFL_WORKFLOW_NODE_HIERARCHY_ERROR','Error','查找工作流节点接收人出现错误,请联系管理员!','US');
sys_message_pkg.delete_message('CON_CONTRACT_CHANGE_REQ_PKG.IS_CALC_FLAG_ERR');
sys_message_pkg.insert_message('CON_CONTRACT_CHANGE_REQ_PKG.IS_CALC_FLAG_ERR','错误','未完成报价,请先完成报价计算操作!','ZHS');
sys_message_pkg.insert_message('CON_CONTRACT_CHANGE_REQ_PKG.IS_CALC_FLAG_ERR','Error','未完成报价,请先完成报价计算操作!','US');
end;
/
commit;
......
......@@ -6,7 +6,10 @@ spool CSH_TRANSACTION_PROMPT.log
set feedback off
set define off
begin
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH511.CSH_TRANSACTION.RETURNED_AMOUNT',
p_language => 'ZHS',
p_description => '已退款金额',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH510.CSH_TRANSACTION.TRANSACTION_AMOUNT_FROM',
p_language => 'ZHS',
p_description => '收款金额从',
......@@ -135,6 +138,43 @@ sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH510.CSH_TRANSACTION.ACCT_CO
p_language => 'ZHS',
p_description => '会计确认人',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH509.CSH_RECEIPT_CONFIRM.NEW_APPLY_BTN',
p_language => 'ZHS',
p_description => '新增确认',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH509.CSH_RECEIPT_CONFIRM.REFUSE_BTN',
p_language => 'ZHS',
p_description => '新增驳回',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH509.CSH_RECEIPT_CONFIRM.DROP_BTN',
p_language => 'ZHS',
p_description => '作废',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH509.CSH_RECEIPT_CONFIRM.QUERY_BTN',
p_language => 'ZHS',
p_description => '查询',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH511.CSH_TRANSACTION.MANUAL_ADD',
p_language => 'ZHS',
p_description => '收款手动新增',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH511.CSH_TRANSACTION.CLASS_DESC',
p_language => 'ZHS',
p_description => '款项分类',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH511.CSH_TRANSACTION.STATEMENT',
p_language => 'ZHS',
p_description => '备注',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH511.CSH_TRANSACTION.BANK_INFO',
p_language => 'ZHS',
p_description => '账户信息',
p_created_by => 1);
sys_prompt_pkg.sys_prompts_load(p_prompt_code => 'CSH511.CSH_TRANSACTION.ATTACHMENT',
p_language => 'ZHS',
p_description => '附件',
p_created_by => 1);
end;
/
commit;
......
create or replace package "FND_CODE_RULE_PKG" is
-- Author : Tengjianbo
-- Created : 2009-5-14 14:44:24
-- Purpose :
--Ver: 1.11
-- Mantis 0025577:编码规则取日期相关时,即使按期间重置,也不校验期间状态是否打开。
--Modify by bobo
--Ver: 1.12
--规则明细界面增加一列是否显示DISPLAY_FLAG
--Modify by bobo 2009.09.08
--Ver: 1.15
--WEB界面查询用函数:get_document_type_name 中的sql对company_id加上nvl
--否则系统级单据类型会取不到描述
--Modify by Razgriz.Tang @2010-04-26
--Ver: 1.16
--32996: 取期间时,排除调整期间
c_function_code constant varchar2(30) := 'FND1910';
--编码规则获取失败
c_error constant varchar2(30) := 'ERROR';
--编码长度超过30位 error_code :FND_CODING_RULE_MAX_LENGTH_ERROR
--c_max_length_error constant varchar2(30) := 'MAX_LENGTH_ERROR';
--编码规则对象定义
procedure insert_fnd_coding_rule_objects(p_document_category varchar2,
p_document_type varchar2,
p_company_id number,
p_operation_unit_id number,
p_enabled_flag varchar2,
p_coding_rule_id number,
p_priority number,
p_created_by number,
p_coding_rule_object_id out number);
procedure update_fnd_coding_rule_objects(p_coding_rule_object_id number,
p_coding_rule_id number,
p_enabled_flag varchar2,
p_priority number,
p_last_updated_by number);
/*--编码规则只能有一个启用
procedure coding_rules_check(p_coding_rule_object_id number,
p_created_by number);*/
function get_coding_rule_object_id(p_document_category varchar2,
p_document_type varchar2,
p_company_id number,
p_operation_unit_id number,
p_object_document_type out varchar2,
p_object_company_id out number,
p_object_operation_unit_id out number,
p_object_coding_rule_id out number,
p_reset_frequence out varchar2)
return number;
--编码规则
procedure insert_fnd_coding_rules(p_document_category varchar2,
p_coding_rule_code varchar2,
p_description varchar2,
p_note varchar2,
p_enabled_flag varchar2,
p_created_by number,
p_reset_frequence varchar2,
p_coding_rule_id out number);
procedure update_fnd_coding_rules(p_coding_rule_id number,
p_description varchar2,
p_note varchar2,
p_enabled_flag varchar2,
p_last_updated_by number,
p_reset_frequence varchar2);
procedure delete_fnd_coding_rules(p_coding_rule_id number,
p_last_updated_by number);
--规则明细
procedure insert_fnd_coding_rule_details(p_coding_rule_id number,
p_sequence number,
p_segment_type varchar2,
p_segment_value varchar2,
p_length number,
p_incremental number,
p_start_value number,
p_created_by number,
p_date_format varchar2,
p_display_flag varchar2);
procedure update_fnd_coding_rule_details(p_coding_rule_line_id number,
p_coding_rule_id number,
p_sequence number,
p_segment_type varchar2,
p_segment_value varchar2,
p_length number,
p_incremental number,
p_start_value number,
p_last_updated_by number,
p_date_format varchar2,
p_display_flag varchar2);
procedure delete_fnd_coding_rule_details(p_coding_rule_line_id number,
p_coding_rule_id number,
p_last_updated_by number);
function get_rule_next_auto_num(p_document_category varchar2,
p_document_type varchar2,
p_company_id number,
p_operation_unit_id number,
p_operation_date date,
p_division varchar2 default null,
p_bp_info varchar2 default null,
p_province_id number default null,
p_agent_code varchar2 default null,
p_price_ref_v05 varchar2 default null,
p_product_code varchar2 default null, -- 产品编号 add by liukang
p_created_by number) return varchar2;
end fnd_code_rule_pkg;
/
create or replace package body "FND_CODE_RULE_PKG" is
e_fnd_c_r_status_error exception;
e_fnd_c_r_max_length_error exception;
e_fnd_c_r_start_value_error exception;
e_fnd_c_r_incremental_error exception;
e_fnd_c_r_segment_error exception;
e_fnd_segment_type_06_err exception;
e_fnd_segment_type_02_err exception; --Data format error
e_binary_integer_error exception;
g_company_id number;
g_document_category varchar2(30);
g_document_type varchar2(30);
g_operation_unit_id number;
g_operation_date date;
procedure error_log(p_message varchar2, p_user_id number) is
pragma autonomous_transaction;
begin
insert into fnd_coding_rule_error_logs
(company_id,
document_category,
document_type,
operation_unit_id,
operation_date,
message,
created_by,
creation_date,
last_updated_by,
last_update_date)
values
(g_company_id,
g_document_category,
g_document_type,
g_operation_unit_id,
g_operation_date,
p_message,
p_user_id,
sysdate,
p_user_id,
sysdate);
commit;
end error_log;
--编码规则对象定义
procedure insert_fnd_coding_rule_objects(p_document_category varchar2,
p_document_type varchar2,
p_company_id number,
p_operation_unit_id number,
p_enabled_flag varchar2,
p_coding_rule_id number,
p_priority number,
p_created_by number,
p_coding_rule_object_id out number) is
v_count number;
v_coding_rule_object_id fnd_coding_rule_objects.coding_rule_object_id%type;
e_priority_duplicat exception;
begin
select fnd_coding_rule_objects_s.nextval
into v_coding_rule_object_id
from dual;
insert into fnd_coding_rule_objects
(coding_rule_object_id,
document_category,
coding_rule_id,
document_type,
company_id,
operation_unit_id,
priority,
enabled_flag,
created_by,
creation_date,
last_updated_by,
last_update_date)
values
(v_coding_rule_object_id,
p_document_category,
p_coding_rule_id,
p_document_type,
p_company_id,
p_operation_unit_id,
p_priority,
p_enabled_flag,
p_created_by,
sysdate,
p_created_by,
sysdate);
p_coding_rule_object_id := v_coding_rule_object_id;
exception
when dup_val_on_index then
--捕获 唯一索引错误
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_OBJECTS_DUPLICATE',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_objects');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_objects');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end insert_fnd_coding_rule_objects;
procedure update_fnd_coding_rule_objects(p_coding_rule_object_id number,
p_coding_rule_id number,
p_enabled_flag varchar2,
p_priority number,
p_last_updated_by number) is
begin
update fnd_coding_rule_objects o
set o.last_updated_by = p_last_updated_by,
o.last_update_date = sysdate,
o.coding_rule_id = p_coding_rule_id,
o.priority = p_priority,
o.enabled_flag = p_enabled_flag
where o.coding_rule_object_id = p_coding_rule_object_id;
end update_fnd_coding_rule_objects;
--校验编码规则是否已被引用
function coding_rule_details_modify_chk(p_coding_rule_id number)
return varchar2 is
v_ret varchar2(1);
begin
select 'N'
into v_ret
from dual
where exists (select 1
from fnd_coding_rule_values v
where v.coding_rule_id = p_coding_rule_id);
return v_ret;
exception
when no_data_found then
return 'Y';
end coding_rule_details_modify_chk;
/*--编码规则只能有一个启用
procedure coding_rules_check(p_coding_rule_object_id number,
p_created_by number) is
v_count number;
e_fnd_c_r_enabled_error exception;
begin
select count(1)
into v_count
from fnd_coding_rules r
where r.coding_rule_object_id = p_coding_rule_object_id
and r.enabled_flag = 'Y';
if v_count > 1 then
raise e_fnd_c_r_enabled_error;
end if;
exception
when e_fnd_c_r_enabled_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_ENABLED_FLAG_DUPLICATE',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'coding_rules_check');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end coding_rules_check;*/
--编码规则
procedure insert_fnd_coding_rules(p_document_category varchar2,
p_coding_rule_code varchar2,
p_description varchar2,
p_note varchar2,
p_enabled_flag varchar2,
p_created_by number,
p_reset_frequence varchar2,
p_coding_rule_id out number) is
v_description_id fnd_coding_rules.description_id%type;
begin
v_description_id := fnd_description_pkg.get_fnd_description_id;
select fnd_coding_rules_s.nextval into p_coding_rule_id from dual;
insert into fnd_coding_rules
(document_category,
coding_rule_id,
coding_rule_code,
description_id,
note,
enabled_flag,
created_by,
creation_date,
last_updated_by,
last_update_date,
reset_frequence)
values
(p_document_category,
p_coding_rule_id,
upper(p_coding_rule_code),
v_description_id,
p_note,
p_enabled_flag,
p_created_by,
sysdate,
p_created_by,
sysdate,
p_reset_frequence);
fnd_description_pkg.reset_fnd_descriptions(p_description_id => v_description_id,
p_ref_table => 'FND_CODING_RULES',
p_ref_field => 'DESCRIPTION_ID',
p_description_text => p_description,
p_function_name => c_function_code,
p_created_by => p_created_by,
p_last_updated_by => p_created_by,
p_language_code => userenv('lang'));
exception
when dup_val_on_index then
--捕获 唯一索引错误
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_DUPLICATE',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rules');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rules');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end insert_fnd_coding_rules;
procedure update_fnd_coding_rules(p_coding_rule_id number,
p_description varchar2,
p_note varchar2,
p_enabled_flag varchar2,
p_last_updated_by number,
p_reset_frequence varchar2) is
v_description_id fnd_coding_rules.description_id%type;
v_reset_frequence fnd_coding_rules.reset_frequence%type;
begin
select description_id, reset_frequence
into v_description_id, v_reset_frequence
from fnd_coding_rules
where coding_rule_id = p_coding_rule_id;
if p_reset_frequence <> v_reset_frequence and
coding_rule_details_modify_chk(p_coding_rule_id) = 'N' then
raise e_fnd_c_r_status_error;
end if;
update fnd_coding_rules r
set r.last_updated_by = p_last_updated_by,
r.reset_frequence = p_reset_frequence,
r.last_update_date = sysdate,
r.enabled_flag = p_enabled_flag,
r.note = p_note
where coding_rule_id = p_coding_rule_id;
fnd_description_pkg.reset_fnd_descriptions(p_description_id => v_description_id,
p_ref_table => 'FND_CODING_RULES',
p_ref_field => 'DESCRIPTION_ID',
p_description_text => p_description,
p_function_name => c_function_code,
p_created_by => p_last_updated_by,
p_last_updated_by => p_last_updated_by,
p_language_code => userenv('lang'));
exception
when e_fnd_c_r_status_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_STATUS_CHECK_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rules');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rules');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end update_fnd_coding_rules;
procedure delete_fnd_coding_rules(p_coding_rule_id number,
p_last_updated_by number) is
begin
if coding_rule_details_modify_chk(p_coding_rule_id) = 'Y' then
delete from fnd_coding_rule_details d
where d.coding_rule_id = p_coding_rule_id;
delete from fnd_coding_rules d
where d.coding_rule_id = p_coding_rule_id;
else
raise e_fnd_c_r_status_error;
end if;
exception
when e_fnd_c_r_status_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_STATUS_CHECK_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'delete_fnd_coding_rules');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end delete_fnd_coding_rules;
procedure binary_integer_check(p_nubmber number) is
v_temp number;
begin
if p_nubmber <= 0 then
raise e_binary_integer_error;
end if;
select instr(p_nubmber, '.') into v_temp from dual;
if v_temp > 0 then
raise e_binary_integer_error;
end if;
end binary_integer_check;
--规则长度校验
procedure coding_detail_rules_check(p_coding_rule_id number,
p_segment_type varchar2,
p_length number,
p_incremental number,
p_start_value number) is
v_max_length number;
v_count number;
begin
--06 序列号校验
if p_segment_type = '06' and
(p_length is null or p_incremental is null or p_start_value is null) then
raise e_fnd_segment_type_06_err;
end if;
if p_segment_type = '06' then
if length(p_start_value) > p_length then
raise e_fnd_c_r_start_value_error;
end if;
if length(p_incremental) > p_length then
raise e_fnd_c_r_incremental_error;
end if;
end if;
--(日期格式 + 序列号位数 + 字符串 )总长度校验
select sum(sub_length) + (decode(p_segment_type, '06', p_length, 0))
into v_max_length
from (select nvl(length(d.segment_value), 0) +
nvl(length(d.date_format), 0) sub_length
from fnd_coding_rule_details d
where d.coding_rule_id = p_coding_rule_id);
if v_max_length > 30 then
raise e_fnd_c_r_max_length_error;
end if;
--序列号只能有一个
select count(1)
into v_count
from fnd_coding_rule_details d
where d.coding_rule_id = p_coding_rule_id
and d.segment_type = '06';
if v_count > 1 then
raise e_fnd_c_r_segment_error;
end if;
end coding_detail_rules_check;
--规则明细
procedure insert_fnd_coding_rule_details(p_coding_rule_id number,
p_sequence number,
p_segment_type varchar2,
p_segment_value varchar2,
p_length number,
p_incremental number,
p_start_value number,
p_created_by number,
p_date_format varchar2,
p_display_flag varchar2) is
begin
if coding_rule_details_modify_chk(p_coding_rule_id) = 'Y' then
if p_segment_type = '02' and p_date_format is null then
raise e_fnd_segment_type_02_err;
end if;
binary_integer_check(p_sequence);
binary_integer_check(p_length);
binary_integer_check(p_incremental);
binary_integer_check(p_start_value);
insert into fnd_coding_rule_details
(coding_rule_line_id,
coding_rule_id,
sequence,
segment_type,
segment_value,
length,
incremental,
start_value,
created_by,
creation_date,
last_updated_by,
last_update_date,
date_format,
display_flag)
values
(fnd_coding_rule_details_s.nextval,
p_coding_rule_id,
p_sequence,
p_segment_type,
p_segment_value,
p_length,
p_incremental,
p_start_value,
p_created_by,
sysdate,
p_created_by,
sysdate,
p_date_format,
p_display_flag);
coding_detail_rules_check(p_coding_rule_id => p_coding_rule_id,
p_segment_type => p_segment_type,
p_length => p_length,
p_incremental => p_incremental,
p_start_value => p_start_value);
else
raise e_fnd_c_r_status_error;
end if;
exception
when e_binary_integer_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_BINARY_INTEGER_ERR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_segment_type_06_err then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_SEGMENT_TYPE_06_ERR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_segment_type_02_err then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_SEGMENT_TYPE_02_ERR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_status_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_STATUS_CHECK_ERROR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_segment_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_DETAILS_SEGMENT_DUPLICATE',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_max_length_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_MAX_LENGTH_ERROR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_start_value_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULES_TART_VALUE_ERROR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_incremental_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_INCREMENTAL_ERROR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when dup_val_on_index then
--捕获 唯一索引错误
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_DETAILS_SEQ_DUPLICATE',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'insert_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end insert_fnd_coding_rule_details;
procedure update_fnd_coding_rule_details(p_coding_rule_line_id number,
p_coding_rule_id number,
p_sequence number,
p_segment_type varchar2,
p_segment_value varchar2,
p_length number,
p_incremental number,
p_start_value number,
p_last_updated_by number,
p_date_format varchar2,
p_display_flag varchar2) is
begin
if coding_rule_details_modify_chk(p_coding_rule_id) = 'Y' then
if p_segment_type = '02' and p_date_format is null then
raise e_fnd_segment_type_02_err;
end if;
binary_integer_check(p_sequence);
binary_integer_check(p_length);
binary_integer_check(p_incremental);
binary_integer_check(p_start_value);
update fnd_coding_rule_details d
set d.sequence = p_sequence,
d.segment_type = p_segment_type,
d.segment_value = p_segment_value,
d.length = p_length,
d.incremental = p_incremental,
d.start_value = p_start_value,
d.last_updated_by = p_last_updated_by,
d.last_update_date = sysdate,
d.date_format = p_date_format,
d.display_flag = p_display_flag
where d.coding_rule_line_id = p_coding_rule_line_id;
coding_detail_rules_check(p_coding_rule_id => p_coding_rule_id,
p_segment_type => p_segment_type,
p_length => p_length,
p_incremental => p_incremental,
p_start_value => p_start_value);
else
raise e_fnd_c_r_status_error;
end if;
exception
when e_binary_integer_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_BINARY_INTEGER_ERR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_segment_type_02_err then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_SEGMENT_TYPE_02_ERR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_segment_type_06_err then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_SEGMENT_TYPE_06_ERR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_segment_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_DETAILS_SEGMENT_DUPLICATE',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_max_length_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_MAX_LENGTH_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_start_value_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULES_TART_VALUE_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_incremental_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_INCREMENTAL_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_fnd_c_r_status_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_STATUS_CHECK_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when dup_val_on_index then
--捕获 唯一索引错误
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_DETAILS_SEQ_DUPLICATE',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'update_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end update_fnd_coding_rule_details;
procedure delete_fnd_coding_rule_details(p_coding_rule_line_id number,
p_coding_rule_id number,
p_last_updated_by number) is
begin
if coding_rule_details_modify_chk(p_coding_rule_id) = 'Y' then
delete from fnd_coding_rule_details d
where d.coding_rule_line_id = p_coding_rule_line_id;
else
raise e_fnd_c_r_status_error;
end if;
exception
when e_fnd_c_r_status_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_STATUS_CHECK_ERROR',
p_created_by => p_last_updated_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'delete_fnd_coding_rule_details');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end delete_fnd_coding_rule_details;
--编码规则当前值
procedure insert_fnd_coding_rule_values(p_coding_rule_id number,
p_company_id number,
p_year number,
p_period_name varchar2,
p_current_value number,
p_created_by number,
p_document_category varchar2,
p_document_type varchar2,
p_operation_unit_id number,
p_bp_info varchar2,
p_province_id number,
p_days varchar2,
--p_product_code varchar2,
p_agent_value varchar2 default null) is
begin
insert into fnd_coding_rule_values
(coding_rule_id,
company_id,
year,
period_name,
current_value,
created_by,
creation_date,
last_updated_by,
last_update_date,
document_category,
document_type,
operation_unit_id,
agent_value,
bp_info,
province_id,
days)
values
(p_coding_rule_id,
'', --p_company_id,
p_year,
p_period_name,
p_current_value,
p_created_by,
sysdate,
p_created_by,
sysdate,
p_document_category,
null, --p_document_type,
null, --p_operation_unit_id
p_agent_value,
p_bp_info,
p_province_id,
p_days);
end insert_fnd_coding_rule_values;
function get_coding_rule_object_id(p_document_category varchar2,
p_document_type varchar2,
p_company_id number,
p_operation_unit_id number,
p_object_document_type out varchar2,
p_object_company_id out number,
p_object_operation_unit_id out number,
p_object_coding_rule_id out number,
p_reset_frequence out varchar2)
return number is
cursor cur_priority is
select o.coding_rule_object_id,
o.priority,
o.document_type,
o.company_id,
o.operation_unit_id,
o.coding_rule_id,
r.reset_frequence
from fnd_coding_rule_objects o, fnd_coding_rules r
where o.document_category = p_document_category
and o.enabled_flag = 'Y'
and o.coding_rule_id = r.coding_rule_id
and r.enabled_flag = 'Y'
order by o.priority;
v_coding_rule_object_id fnd_coding_rule_objects.coding_rule_object_id%type;
begin
v_coding_rule_object_id := null;
if p_document_type is null then
for c_priority in cur_priority loop
if nvl(c_priority.document_type, nvl(p_document_type, -1)) =
nvl(p_document_type, -1) and
nvl(c_priority.company_id, nvl(p_company_id, -1)) =
nvl(p_company_id, -1) and
nvl(c_priority.operation_unit_id, nvl(p_operation_unit_id, -1)) =
nvl(p_operation_unit_id, -1) then
v_coding_rule_object_id := c_priority.coding_rule_object_id;
p_object_document_type := c_priority.document_type;
p_object_company_id := c_priority.company_id;
p_object_operation_unit_id := c_priority.operation_unit_id;
p_object_coding_rule_id := c_priority.coding_rule_id;
p_reset_frequence := c_priority.reset_frequence;
exit;
end if;
end loop;
else
for c_coding_rules in (select o.coding_rule_object_id,
o.priority,
o.document_type,
o.company_id,
o.operation_unit_id,
o.coding_rule_id,
r.reset_frequence
from fnd_coding_rule_objects o,
fnd_coding_rules r
where o.document_category =
p_document_category
and o.document_type = p_document_type
and o.enabled_flag = 'Y'
and o.coding_rule_id = r.coding_rule_id
and r.enabled_flag = 'Y'
order by o.priority) loop
if nvl(c_coding_rules.company_id, nvl(p_company_id, -1)) =
nvl(p_company_id, -1) and
nvl(c_coding_rules.operation_unit_id,
nvl(p_operation_unit_id, -1)) = nvl(p_operation_unit_id, -1) then
v_coding_rule_object_id := c_coding_rules.coding_rule_object_id;
p_object_document_type := c_coding_rules.document_type;
p_object_company_id := c_coding_rules.company_id;
p_object_operation_unit_id := c_coding_rules.operation_unit_id;
p_object_coding_rule_id := c_coding_rules.coding_rule_id;
p_reset_frequence := c_coding_rules.reset_frequence;
exit;
end if;
end loop;
end if;
return v_coding_rule_object_id;
exception
when no_data_found then
return null;
end get_coding_rule_object_id;
/*function get_coding_rule_id(p_coding_rule_object_id number,
p_reset_frequence out varchar2)
return number is
v_coding_rule_id fnd_coding_rules.coding_rule_id%type;
begin
select coding_rule_id, reset_frequence
into v_coding_rule_id, p_reset_frequence
from fnd_coding_rules
where coding_rule_object_id = p_coding_rule_object_id
and enabled_flag = 'Y';
return v_coding_rule_id;
exception
when no_data_found then
return null;
end get_coding_rule_id;*/
function get_current_value(p_coding_rule_id number,
p_company_id number,
p_year number,
p_period_name varchar2,
p_document_category varchar2,
p_document_type varchar2,
p_operation_unit_id number,
p_bp_info varchar2 default null,
p_province_id number default null,
p_days varchar2,
-- p_product_code varchar2, -- add by liukang
p_agent_value varchar2 default null)
return number is
v_current_value fnd_coding_rule_values.current_value%type;
begin
select current_value
into v_current_value
from fnd_coding_rule_values v
where coding_rule_id = p_coding_rule_id
and v.document_category = p_document_category
and (bp_info = p_bp_info or (bp_info is null and p_bp_info is null))
and (province_id = p_province_id or
(province_id is null and p_province_id is null))
--AND (operation_unit_id = p_operation_unit_id OR
-- (operation_unit_id IS NULL AND p_operation_unit_id IS NULL))
and (v.year = p_year or (v.year is null and p_year is null))
and (period_name = p_period_name or
(period_name is null and p_period_name is null))
and (agent_value = p_agent_value or (p_agent_value is null))
and (v.days = p_days or (v.days is null and p_days is null));
--add by liukang
--and v.product_code = p_product_code;
return v_current_value;
exception
when no_data_found then
return null;
end get_current_value;
function get_gld_period_name(p_company_id number, p_operation_date date)
return varchar2 is
v_period_name gld_periods.period_name%type;
begin
select g.period_name
into v_period_name
from gld_periods g
--, gld_period_status p
where g.start_date <= trunc(p_operation_date)
and g.end_date >= trunc(p_operation_date)
--and g.period_set_code = p.period_set_code
--and p.company_id = p_company_id
--and p.internal_period_num = g.internal_period_num
--and p.period_status_code = 'O' --for mantis 0025577
and g.period_set_code =
(select b.period_set_code
from gld_set_of_books b
where b.set_of_books_id =
(select f.set_of_books_id
from fnd_companies f
where f.company_id = p_company_id))
and g.adjustment_flag = 'N';
return v_period_name;
exception
when no_data_found then
return null;
end get_gld_period_name;
function get_company_code(p_company_id number) return varchar2 is
v_company_code fnd_companies.company_code%type;
begin
select company_code
into v_company_code
from fnd_companies
where company_id = p_company_id;
return v_company_code;
exception
when no_data_found then
return null;
end get_company_code;
--获取经营单位代码
function get_operation_unit_code(p_operation_unit_id number)
return varchar2 is
v_operation_unit_code fnd_operation_units.operation_unit_code%type;
begin
select operation_unit_code
into v_operation_unit_code
from fnd_operation_units o
where o.operation_unit_id = p_operation_unit_id;
return v_operation_unit_code;
exception
when no_data_found then
return null;
end get_operation_unit_code;
function get_detail_segment_value(p_coding_rule_id number,
p_segment_type varchar2) return boolean is
v_exists number;
begin
select 1
into v_exists
from dual
where exists (select 1
from fnd_coding_rule_details d
where d.coding_rule_id = p_coding_rule_id
and d.segment_type = p_segment_type);
return true;
exception
when no_data_found then
return false;
end get_detail_segment_value;
--获取厂商代码 add by liukang 20160617
function get_product_code(p_product_plan_id number) return varchar2 is
v_product_code varchar2(2000);
begin
select hp.product_code
into v_product_code
from hls_product_plan_definition hp
where hp.product_plan_id = p_product_plan_id;
return v_product_code;
exception
when no_data_found then
return null;
end get_product_code;
function get_rule_next_auto_num(p_document_category varchar2,
p_document_type varchar2,
p_company_id number,
p_operation_unit_id number,
p_operation_date date,
p_division varchar2 default null,
p_bp_info varchar2 default null,
p_province_id number default null,
p_agent_code varchar2 default null,
p_price_ref_v05 varchar2 default null,
p_product_code varchar2 default null, -- 产品编号 add by liukang
p_created_by number) return varchar2 is
pragma autonomous_transaction;
cursor cur_details(p_coding_rule_id number) is
select d.segment_type,
d.segment_value,
d.date_format,
nvl(d.display_flag, 'N') display_flag
from fnd_coding_rule_details d
where d.coding_rule_id = p_coding_rule_id
order by d.sequence
for update;
v_details cur_details%rowtype;
v_coding_rule_object_id fnd_coding_rule_objects.coding_rule_object_id%type;
v_object_document_type fnd_coding_rule_objects.document_type%type;
v_object_company_id fnd_coding_rule_objects.company_id%type;
v_object_operation_unit_id fnd_coding_rule_objects.operation_unit_id%type;
v_reset_frequence fnd_coding_rules.reset_frequence%type;
v_coding_rule_id fnd_coding_rules.coding_rule_id%type;
v_length fnd_coding_rule_details.length%type;
v_incremental fnd_coding_rule_details.incremental%type;
v_start_value fnd_coding_rule_details.start_value%type;
v_current_value fnd_coding_rule_values.current_value%type;
v_year fnd_coding_rule_values.year%type;
v_period_name fnd_coding_rule_values.period_name%type;
--当前值
v_cur_document_type fnd_coding_rule_values.document_type%type;
v_cur_operation_unit_id fnd_coding_rule_values.operation_unit_id%type;
v_cur_company_id fnd_coding_rule_values.company_id%type;
--规则明细定义的段值
v_segment_document_type fnd_coding_rule_values.document_type%type;
v_segment_operation_unit_id fnd_coding_rule_values.operation_unit_id%type;
v_segment_company_id fnd_coding_rule_values.company_id%type;
v_operation_date date;
v_doc_number varchar2(500);
v_doc_number_tmp varchar2(30);
v_agent_value varchar2(30);
v_days varchar2(30);
e_null_error exception;
e_codeing_rule_null_error exception;
v_err_msg varchar2(2000);
--产品编号 add by liukang
--v_product_code varchar2(2000);
begin
--v_product_code := get_product_code(p_product_plan_id => p_product_plan_id);
-- 获取产品编号 add by liukang
g_company_id := p_company_id;
g_document_category := p_document_category;
g_document_type := p_document_type;
g_operation_unit_id := p_operation_unit_id;
g_operation_date := p_operation_date;
--获取编码规则对象
v_coding_rule_object_id := get_coding_rule_object_id(p_document_category => p_document_category,
p_document_type => p_document_type,
p_company_id => p_company_id,
p_operation_unit_id => p_operation_unit_id,
p_object_document_type => v_object_document_type,
p_object_company_id => v_object_company_id,
p_object_operation_unit_id => v_object_operation_unit_id,
p_object_coding_rule_id => v_coding_rule_id,
p_reset_frequence => v_reset_frequence);
if v_coding_rule_object_id is null then
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_OBJECT_NULL'),
p_user_id => p_created_by);
rollback;
-- raise e_codeing_rule_null_error;
return c_error;
end if;
if v_coding_rule_id is null then
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_NULL'),
p_user_id => p_created_by);
rollback;
-- raise e_codeing_rule_null_error;
return c_error;
end if;
--锁表
open cur_details(v_coding_rule_id);
--获取开始值、步长、位数
begin
select length, incremental, start_value
into v_length, v_incremental, v_start_value
from fnd_coding_rule_details d
where d.coding_rule_id = v_coding_rule_id
and d.segment_type = '06';
exception
when no_data_found then
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_SEQUENCE_NULL'),
p_user_id => p_created_by);
raise e_null_error;
end;
if p_operation_date is null then
select to_date(to_char(sysdate, 'YYYYMMDD'), 'YYYYMMDD')
into v_operation_date
from dual;
else
v_operation_date := p_operation_date;
end if;
if v_reset_frequence = 'NEVER' then
v_year := '';
v_period_name := '';
elsif v_reset_frequence = 'PERIOD' then
v_year := '';
v_period_name := get_gld_period_name(p_company_id => p_company_id,
p_operation_date => v_operation_date);
if v_period_name is null then
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_PERIOD_NAME_NULL'),
p_user_id => p_created_by);
raise e_null_error;
end if;
elsif v_reset_frequence = 'YEAR' then
v_period_name := '';
v_year := to_number(to_char(v_operation_date, 'YYYY'));
elsif v_reset_frequence = 'DAY' then
v_days := to_char(v_operation_date, 'YYYY-MM-DD');
end if;
--规则明细界面 段值
if get_detail_segment_value(v_coding_rule_id, '04') then
v_segment_company_id := p_company_id;
end if;
if get_detail_segment_value(v_coding_rule_id, '05') then
v_segment_operation_unit_id := p_operation_unit_id;
end if;
if get_detail_segment_value(v_coding_rule_id, '03') then
v_segment_document_type := p_document_type;
end if;
--取明细界面段值
v_cur_company_id := v_segment_company_id;
v_cur_document_type := v_segment_document_type;
v_cur_operation_unit_id := v_segment_operation_unit_id;
--取不到明细值,再取规则对象界面中的值
if v_cur_company_id is null then
v_cur_company_id := v_object_company_id;
end if;
if v_cur_document_type is null then
v_cur_document_type := v_object_document_type;
end if;
if v_cur_operation_unit_id is null then
v_cur_operation_unit_id := v_object_operation_unit_id;
end if;
--商业伙伴特俗编码规则
if p_bp_info is not null and p_province_id is not null then
if p_bp_info = 'GROUP_IN' then
v_agent_value := 'R';
elsif p_bp_info = 'GROUP_OUT' then
v_agent_value := 'S';
end if;
select v_agent_value || a.province_abbr
into v_agent_value
from fnd_province a
where a.province_id = p_province_id;
else
v_agent_value := null;
end if;
v_current_value := get_current_value(p_coding_rule_id => v_coding_rule_id,
p_company_id => v_cur_company_id,
p_year => v_year,
p_period_name => v_period_name,
p_document_category => p_document_category,
p_document_type => v_cur_document_type,
p_operation_unit_id => v_cur_operation_unit_id,
p_bp_info => p_bp_info,
p_province_id => p_province_id,
p_days => v_days,
--p_product_code => v_product_code, -- add by liukang
p_agent_value => v_agent_value);
if v_current_value is null then
v_current_value := v_start_value;
insert_fnd_coding_rule_values(p_coding_rule_id => v_coding_rule_id,
p_company_id => v_cur_company_id,
p_year => v_year,
p_period_name => v_period_name,
p_current_value => v_current_value,
p_created_by => p_created_by,
p_document_category => p_document_category,
p_document_type => v_cur_document_type,
p_operation_unit_id => v_cur_operation_unit_id,
p_bp_info => p_bp_info,
p_province_id => p_province_id,
p_days => v_days,
--p_product_code => v_product_code, -- add by liukang
p_agent_value => v_agent_value);
else
--当前值非空,判断是否达到最大位数
if length(v_current_value + v_incremental) > v_length then
--v_current_value := v_current_value;
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_SEQUENCE_MAX'),
p_user_id => p_created_by);
rollback;
return c_error;
else
v_current_value := v_current_value + v_incremental;
end if;
update fnd_coding_rule_values v
set v.current_value = v_current_value,
v.last_update_date = sysdate,
v.last_updated_by = p_created_by
where coding_rule_id = v_coding_rule_id
and v.document_category = p_document_category
and (bp_info = p_bp_info or
(bp_info is null and p_bp_info is null))
and (province_id = p_province_id or
(province_id is null and p_province_id is null))
/* AND (operation_unit_id = v_cur_operation_unit_id OR
(operation_unit_id IS NULL AND
v_cur_operation_unit_id IS NULL))*/
and (v.year = v_year or (v.year is null and v_year is null))
and (v.days = v_days or (v.days is null and v_days is null))
and (period_name = v_period_name or
(period_name is null and v_period_name is null));
-- add by liukang
--and v.product_code = v_product_code;
end if;
loop
fetch cur_details
into v_details;
exit when cur_details%notfound;
v_doc_number_tmp := '';
if v_details.segment_type = '03' then
--获取单据类型
if p_company_id is null or p_document_type is null then
close cur_details;
rollback;
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_SEGMENT_TYPE_06_ERROR'),
p_user_id => p_created_by);
return c_error;
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND_CODING_RULE_GET_DOC_TYPE_CODE_ERR',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'get_rule_next_auto_num',
p_token_1 => '#COMPANY_ID',
p_token_value_1 => p_company_id,
p_token_2 => '#DOCUMENT_TYPE',
p_token_value_2 => p_document_type);
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end if;
--HLS修改
--直接使用document_type作为单据类型
--不通过value进行关联
v_doc_number_tmp := p_document_type;
elsif v_details.segment_type = '04' then
if v_details.display_flag = 'Y' then
--获取公司编码
v_doc_number_tmp := get_company_code(p_company_id);
end if;
elsif v_details.segment_type = '06' then
--左面补零
select lpad(v_current_value, v_length, '0')
into v_doc_number_tmp
from dual;
elsif v_details.segment_type = '02' then
--日期格式
v_doc_number_tmp := to_char(v_operation_date, v_details.date_format);
elsif v_details.segment_type = '01' then
v_doc_number_tmp := v_details.segment_value;
elsif v_details.segment_type = '05' then
--获取经营单位代码
v_doc_number_tmp := get_operation_unit_code(p_operation_unit_id);
-- 内外部
elsif v_details.segment_type = '07' then
if p_bp_info = 'GROUP_IN' then
v_doc_number_tmp := 'R';
elsif p_bp_info = 'GROUP_OUT' then
v_doc_number_tmp := 'S';
end if;
elsif v_details.segment_type = '08' then
select a.province_abbr
into v_doc_number_tmp
from fnd_province a
where a.province_id = p_province_id;
elsif v_details.segment_type = '09' then
v_doc_number_tmp := p_agent_code;
elsif v_details.segment_type = '10' then
v_doc_number_tmp := p_price_ref_v05;
elsif v_details.segment_type = '11' then
v_doc_number_tmp := p_product_code;
end if;
if v_doc_number is null then
v_doc_number := v_doc_number_tmp;
else
v_doc_number := v_doc_number || v_doc_number_tmp;
end if;
end loop;
close cur_details;
if length(v_doc_number) > 30 then
rollback;
error_log(p_message => sys_message_pkg.get_string('FND_CODING_RULE_MAX_LENGTH'),
p_user_id => p_created_by);
--return c_max_length_error;
return c_error;
end if;
evt_event_core_pkg.fire_event(p_event_name => 'FND_CODE_RULE_NEXT',
p_event_param => null,
p_param1 => v_doc_number,
p_param2 => p_document_category,
p_created_by => p_created_by);
commit;
return v_doc_number;
exception
when e_codeing_rule_null_error then
if cur_details%isopen then
close cur_details;
end if;
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'FND1910_CODING_RULE_NULL',
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'get_rule_next_auto_num');
return c_error;
when e_null_error then
if cur_details%isopen then
close cur_details;
end if;
rollback;
return c_error;
when others then
if cur_details%isopen then
close cur_details;
end if;
v_err_msg := dbms_utility.format_error_backtrace || ' ' || sqlerrm;
sys_raise_app_error_pkg.raise_sys_others_error(p_message => v_err_msg,
p_created_by => p_created_by,
p_package_name => 'fnd_code_rule_pkg',
p_procedure_function_name => 'get_rule_next_auto_num');
rollback;
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
return c_error;
end get_rule_next_auto_num;
end fnd_code_rule_pkg;
/
create or replace package cus_con_change_req_pkg is
-- Author : Spencer 3893
-- Created : 9/23/2019 4:25:37 PM
-- Purpose : 合同變更申請
procedure create_change_req(p_contract_id number,
p_req_date date,
p_req_type varchar2,
p_description varchar2,
p_user_id number,
p_simulation_flag varchar2 default 'N',
p_ref_v01 number,
p_change_req_id out number);
--報價計算
procedure calc_change_req(p_change_req_id in number,
p_ccr_start_times in number,
p_ccr_outstanding_times in number,
p_calc_session_id in out number,
p_calc_successful out varchar2,
p_warning_message out varchar2,
p_user_id in number);
--承租人變更日計算應繳金額相關信息
procedure calc_tenant_change_req(p_change_req_id in number,
p_ccr_lease_date in date,
p_ccr_lease_rental out number, --应交租金
p_ccr_lease_principal out number, --应交本金
p_ccr_lease_interest out number, --应交利息
p_ccr_lease_penalty out number, --应交罚息
p_user_id in number);
--提交工作流
procedure submit_change_req(p_change_req_id in number,
p_layout_code in varchar2,
p_user_id in number);
end cus_con_change_req_pkg;
/
create or replace package body cus_con_change_req_pkg is
e_lock_table exception;
pragma exception_init(e_lock_table, -54);
function get_contract_rec(p_contract_id number, p_user_id number)
return con_contract%rowtype is
v_con_contract_rec con_contract%rowtype;
begin
select *
into v_con_contract_rec
from con_contract t
where t.contract_id = p_contract_id
for update nowait;
return v_con_contract_rec;
exception
when e_lock_table then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'CON_CONTRACT_PKG.CONTRACT_LOCK_ERROR',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'get_contract_rec');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end;
function get_con_change_req_rec(p_change_req_id con_contract_change_req.change_req_id%type,
p_user_id con_contract_change_req.created_by%type)
return con_contract_change_req%rowtype is
v_change_req_rec con_contract_change_req%rowtype;
begin
select *
into v_change_req_rec
from con_contract_change_req t
where t.change_req_id = p_change_req_id
for update nowait;
return v_change_req_rec;
exception
when e_lock_table then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'CON_CONTRACT_CHANGE_REQ_PKG.CON_CHANGE_REQ_LOCK',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'get_con_change_req_rec');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end;
procedure create_change_req(p_contract_id number,
p_req_date date,
p_req_type varchar2,
p_description varchar2,
p_user_id number,
p_simulation_flag varchar2 default 'N',
p_ref_v01 number,
p_change_req_id out number) is
v_change_req_id number;
v_contract_rec con_contract%rowtype;
begin
v_contract_rec := get_contract_rec(p_contract_id, p_user_id);
if v_contract_rec.contract_status <> 'INCEPT' and
p_req_type in ('CUT_CHAG', 'LEASE_CHAG', 'ACC_CHAG') then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => '只有起租状态的合同才能进行合同变更申请!',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'create_change_req');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end if;
con_contract_history_pkg.create_change_req(p_contract_id => p_contract_id,
p_change_req_id => v_change_req_id,
p_req_date => p_req_date,
p_ref_v01 => p_ref_v01,
p_description => p_description,
p_change_quotation => null,
p_change_lease_item => null,
p_change_bp => null,
p_req_doc_type => p_req_type,
p_simulation_flag => p_simulation_flag,
p_cashflow_change_flag => 'Y',
p_user_id => p_user_id);
p_change_req_id := v_change_req_id;
end create_change_req;
--報價計算
procedure calc_change_req(p_change_req_id in number,
p_ccr_start_times in number,
p_ccr_outstanding_times in number,
p_calc_session_id in out number,
p_calc_successful out varchar2,
p_warning_message out varchar2,
p_user_id in number) is
r_change_req con_contract_change_req%rowtype;
r_contract_rec con_contract%rowtype;
v_ccr_outstanding_incld number;
v_exists number;
v_count number;
begin
r_change_req := get_con_change_req_rec(p_change_req_id, p_user_id);
r_contract_rec := get_contract_rec(p_change_req_id, p_user_id);
--根据开始期数计算未到期本金
select nvl(sum(nvl(ccc.principal, 0) - nvl(ccc.received_principal, 0)),
0) sum_ccr_outstanding_incld
into v_ccr_outstanding_incld
from con_contract_cashflow ccc
where ccc.contract_id = r_change_req.contract_id
and ccc.write_off_flag <> 'FULL'
and ccc.cf_item = 1
and ccc.cf_direction = 'INFLOW'
and ccc.cf_status = 'RELEASE'
and ccc.times >= p_ccr_start_times;
--核销的不能进行更改,要从没核销的期数开始修改
select count(1)
into v_count
from con_contract_cashflow ccc
where ccc.contract_id = r_change_req.contract_id
and ccc.times >= p_ccr_start_times
and ccc.cf_item <> 304
and ccc.cf_direction = 'INFLOW'
and ccc.cf_status = 'RELEASE'
and ccc.write_off_flag <> 'NOT';
if v_count > 0 then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => '延期开始期数之后的期数存在核销,请选择正确的日期或者进行核销反冲!',
p_created_by => -1,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'calc_change_req');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end if;
if r_change_req.ccr_start_times is not null then
begin
select 1
into v_exists
from dual
where exists (select 1
from con_contract_cashflow a
where contract_id = p_change_req_id
and cf_type = 1
and times >= r_change_req.ccr_start_times
and nvl(a.received_amount, 0) <> 0);
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'CON_CHANGE_REQ_CALC_ITFC_PKG.CCR_START_TIMES_ERROR',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'calc_change_req');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
exception
when no_data_found then
null;
end;
end if;
select hls_fin_calculator_hd_s.nextval
into r_contract_rec.calc_session_id
from dual;
hls_fin_calculator_ccr_pkg.create_calculate(p_change_req_id => p_change_req_id,
p_calc_session_id => r_contract_rec.calc_session_id,
p_recreate_h_formula => 'Y', --modify 2017年12月18日16:40:01
p_recreate_l_std => 'Y',
p_recreate_l_formula => 'Y',
p_calc_successful => p_calc_successful,
p_warning_message => p_warning_message,
p_user_id => p_user_id);
update con_contract_change_req
set calc_session_id = r_contract_rec.calc_session_id,
ccr_calc_session_id = r_contract_rec.calc_session_id,
is_calc_flag = 'Y'
where change_req_id = p_change_req_id;
update con_contract
set calc_session_id = r_contract_rec.calc_session_id
where contract_id = p_change_req_id;
p_calc_session_id := r_contract_rec.calc_session_id;
end calc_change_req;
--承租人變更日計算應繳金額相關信息
procedure calc_tenant_change_req(p_change_req_id in number,
p_ccr_lease_date in date,
p_ccr_lease_rental out number, --应交租金
p_ccr_lease_principal out number, --应交本金
p_ccr_lease_interest out number, --应交利息
p_ccr_lease_penalty out number, --应交罚息
p_user_id in number) is
v_ccr_lease_rental number; --应交租金
v_ccr_lease_principal number; --应交本金
v_ccr_lease_interest number; --应交利息
v_ccr_lease_penalty number; --应交罚息
begin
select nvl(sum(f.due_amount), 0),
nvl(sum(f.principal), 0),
nvl(sum(f.interest), 0)
into v_ccr_lease_rental, v_ccr_lease_principal, v_ccr_lease_interest
from con_contract_cashflow f
where f.due_date <= p_ccr_lease_date
and f.write_off_flag = 'NOT'
and f.cf_item = 1
and f.cf_type = 1
and f.cf_direction = 'INFLOW'
and f.contract_id = p_change_req_id;
select nvl(sum(f.due_amount), 0)
into v_ccr_lease_penalty
from con_contract_cashflow f
where f.due_date <= p_ccr_lease_date
and f.write_off_flag = 'NOT'
and f.cf_item = 9
and f.cf_type = 9
and f.cf_direction = 'INFLOW'
and f.contract_id = p_change_req_id;
p_ccr_lease_rental := v_ccr_lease_rental;
p_ccr_lease_principal := v_ccr_lease_principal;
p_ccr_lease_interest := v_ccr_lease_interest;
p_ccr_lease_penalty := v_ccr_lease_penalty;
exception
when others then
null;
end calc_tenant_change_req;
--提交工作流
procedure submit_change_req(p_change_req_id in number,
p_layout_code in varchar2,
p_user_id in number) is
r_change_req_rec con_contract_change_req%rowtype;
r_change_con_rec con_contract%rowtype;
v_approval_method hls_document_type.approval_method%type;
e_change_req_status_error exception;
e_is_calc_flag_err exception;
begin
hls_document_compare_pkg.con_contract_compare(p_table_name => 'CON_CONTRACT',
p_change_req_id => p_change_req_id,
p_from_table_pk => '',
p_to_table_pk => p_change_req_id,
p_user_id => p_user_id);
r_change_req_rec := get_con_change_req_rec(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
r_change_con_rec := con_contract_pkg.get_contract_rec(p_contract_id => p_change_req_id,
p_user_id => p_user_id);
if r_change_req_rec.req_status not in ('NEW', 'REJECT') then
raise e_change_req_status_error;
end if;
--租金計劃變更需要校驗是否計算報價
if p_layout_code = 'CON_CHANGE_MODIFY' then
if nvl(r_change_req_rec.is_calc_flag, 'N') = 'N' then
raise e_is_calc_flag_err;
end if;
end if;
con_change_req_custom_pkg.before_submit_change_req(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
con_contract_history_pkg.calc_change_history(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
cus_con_change_req_wfl_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
p_user_id => p_user_id);
exception
when e_change_req_status_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'CON_CONTRACT_CHANGE_REQ_PKG.CHANGE_REQ_STATUS_ERROR',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'submit_change_req');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when e_is_calc_flag_err then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'CON_CONTRACT_CHANGE_REQ_PKG.IS_CALC_FLAG_ERR',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_pkg',
p_procedure_function_name => 'submit_change_req');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end submit_change_req;
end cus_con_change_req_pkg;
/
create or replace package cus_con_change_req_wfl_pkg is
-- Author : Spencer 3893
-- Created : 2019/9/25 13:51:00
-- Purpose : 合同變更工作流相關邏輯
procedure workflow_start(p_change_req_rec in con_contract_change_req%rowtype,
p_change_con_rec in con_contract%rowtype,
p_layout_code in varchar2,
p_user_id in number);
procedure workflow_approve(p_change_req_id in number,
p_user_id in number);
procedure workflow_reject(p_change_req_id in number, p_user_id in number);
procedure workflow_cancel(p_change_req_id in number, p_user_id in number);
end cus_con_change_req_wfl_pkg;
/
create or replace package body cus_con_change_req_wfl_pkg is
procedure workflow_start(p_change_req_rec in con_contract_change_req%rowtype,
p_change_con_rec in con_contract%rowtype,
p_layout_code in varchar2,
p_user_id in number) is
v_document_info varchar2(2000);
v_instance_id number;
v_bp_name varchar2(300);
v_workflow_desc varchar2(2000);
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
into v_bp_name
from con_contract_bp_tenant_lv lv
where lv.contract_id = p_change_con_rec.contract_id;
end if;
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_rec.change_req_id;
v_instance_id := p_change_req_rec.wfl_instance_id;
begin
select t1.workflow_desc
into v_workflow_desc
from hls_document_type_v t1
where t1.enabled_flag = 'Y'
and t1.document_type = p_change_req_rec.document_type
and t1.document_category = p_change_req_rec.document_category;
exception
when others then
null;
end;
v_document_info := v_workflow_desc || ':' ||
p_change_con_rec.contract_number || '-' || v_bp_name;
hls_workflow_pkg.workflow_start(p_instance_id => v_instance_id,
p_document_id => p_change_req_rec.change_req_id,
p_document_category => p_change_req_rec.document_category,
p_document_type => p_change_req_rec.document_type,
p_business_type => p_change_req_rec.business_type,
p_business_type_2nd => p_change_con_rec.business_type,
p_document_category_2nd => p_change_con_rec.document_category,
p_document_type_2nd => p_change_con_rec.document_type,
p_company_id => p_change_con_rec.company_id,
p_user_id => p_user_id,
p_lease_org => p_change_con_rec.lease_organization, --事业部
p_lease_channel => p_change_con_rec.lease_channel,
p_division => p_change_con_rec.division,
p_ccr_reschedule => p_change_req_rec.reschedule_flag,
p_ccr_et => p_change_req_rec.et_flag,
p_ccr_tenant_change => p_change_req_rec.tenant_change_flag,
p_ccr_lease_item_change => p_change_req_rec.lease_item_change_flag,
p_ccr_mortgage_change => p_change_req_rec.mortgage_change_flag,
p_ccr_guarantor_change => p_change_req_rec.guarantor_change_flag,
p_ccr_bank_acc_change => p_change_req_rec.bank_acc_change_flag,
p_ccr_contract_cancel => p_change_req_rec.contract_cancel_flag,
p_ccr_cashflow_change => p_change_req_rec.cashflow_change_flag,
-- parameter values
p_parameter_1 => 'NEW_CONTRACT_ID',
p_parameter_1_value => p_change_req_rec.change_req_id,
p_parameter_2 => 'OLD_CONTRACT_ID',
p_parameter_2_value => p_change_req_rec.contract_id,
p_parameter_4 => 'OWNER_USER_ID',
p_parameter_4_value => nvl(p_change_req_rec.owner_user_id,
p_user_id),
p_parameter_5 => 'CHANGE_REQ_ID',
p_parameter_5_value => p_change_req_rec.change_req_id,
p_parameter_6 => 'DOCUMENT_INFO',
p_parameter_6_value => v_document_info,
p_parameter_8 => 'CHANGE_REQ_NUMBER',
p_parameter_8_value => p_change_req_rec.change_req_number,
p_parameter_9 => 'PROJECT_ID',
p_parameter_9_value => p_change_con_rec.project_id,
p_parameter_10 => 'LAYOUT_CODE',
p_parameter_10_value => p_layout_code);
update con_contract_change_req t
set t.wfl_instance_id = v_instance_id
where t.change_req_id = p_change_req_rec.change_req_id;
exception
when no_data_found then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'CON_CONTRACT_CHG_REQ_WFL_PKG.NO_DATA_FOUND',
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_wfl_pkg',
p_procedure_function_name => 'workflow_start');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_user_id,
p_package_name => 'cus_con_change_req_wfl_pkg',
p_procedure_function_name => 'workflow_start');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end;
procedure workflow_approve(p_change_req_id in number,
p_user_id in number) is
begin
con_contract_change_req_pkg.change_req_confirm(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
end;
procedure workflow_reject(p_change_req_id in number, p_user_id in number) is
begin
con_contract_change_req_pkg.change_req_reject(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
end;
procedure workflow_cancel(p_change_req_id in number, p_user_id in number) is
begin
con_contract_change_req_pkg.change_req_cancel(p_change_req_id => p_change_req_id,
p_user_id => p_user_id);
end;
end cus_con_change_req_wfl_pkg;
/
......@@ -3,7 +3,12 @@
-- Author : Spencer 3893
-- Created : 9/10/2019 2:21:13 PM
-- 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 回购申请
procedure create_change_req_repo(p_contract_id in number,
p_req_type in varchar2,
......@@ -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,
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,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
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;
cus_con_change_req_wfl_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
p_user_id => p_user_id);
exception
when e_attachment_error then
......
......@@ -164,18 +164,15 @@ create or replace package body cus_con_et_pkg is
and f.cf_type = 1
and f.contract_id = p_contract_id;
--上一次完全核销现金流
/*select (p_et_date - cwo.write_off_date) fund_possession_time
into v_fund_possession_time
from con_contract_cashflow f, csh_write_off cwo
where cwo.reversed_flag = 'N'
and cwo.cashflow_id = f.cashflow_id
and cwo.contract_id = p_contract_id
and f.due_date > p_et_date
and f.write_off_flag != 'NOT'
and f.cf_item = 1
and f.cf_type = 1
and f.contract_id = p_contract_id;*/
v_fund_possession_time := 11;
select (p_et_date - f.due_date + 1) fund_possession_time
into v_fund_possession_time
from con_contract_cashflow f
where f.due_date > p_et_date
and f.write_off_flag = 'FULL'
and f.cf_item = 1
and f.cf_type = 1
and f.cf_direction != 'NONCASH'
and f.contract_id = p_contract_id;
v_fund_possession_cost := v_sum_unreceived_principal *
nvl(v_fund_possession_time, 1) *
NVL(p_et_interest_rate,
......@@ -187,11 +184,12 @@ create or replace package body cus_con_et_pkg is
where f.write_off_flag != 'FULL'
and f.overdue_status = 'Y'
and f.cf_item = 1
and f.cf_type = 1
and f.cf_direction != 'NONCASH'
and f.contract_id = p_contract_id;
-- 逾期天数 overdue_max_days+现在至回购日天数
v_overdue_max_days := nvl(v_contract_rec.overdue_max_days, 0) +
trunc(p_et_date - sysdate);
v_fund_possession_time;
-- v_penalty 逾期罚息,逾期罚息=逾期租金* 逾期天数 * 0.0004。回购总额中罚息由系统自动计算,可直接进行手动调整,不需要通过罚息减免流程;逾期罚息,计算到回购解约日为止
v_penalty := v_sum_overdue_amount * v_overdue_max_days * 0.0004;
v_et_due_amount := v_sum_unreceived_principal + v_sum_overdue_amount;
......@@ -424,28 +422,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,
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,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
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;
cus_con_change_req_wfl_pkg.workflow_start(p_change_req_rec => r_change_req_rec,
p_change_con_rec => r_change_con_rec,
p_layout_code => p_layout_code,
p_user_id => p_user_id);
end submit_change_req_et;
end cus_con_et_pkg;
/
create or replace package hls_fin_calculator_ccr_pkg is
-- Author : ZHANGLEI
-- Created : 2014/10/20 9:15:42
-- Purpose :
procedure create_calculate(p_change_req_id in number,
p_calc_session_id in number,
p_recreate_h_formula in varchar2 default 'N',
p_recreate_l_std in varchar2 default 'N',
p_recreate_l_formula in varchar2 default 'N',
p_calc_successful out varchar2,
p_warning_message out varchar2,
p_user_id in number);
end hls_fin_calculator_ccr_pkg;
/
create or replace package body hls_fin_calculator_ccr_pkg is
function replace_k(p_source varchar2, p_replace_j number) return varchar2 is
begin
return hls_fin_calculator_itfc_pkg.replace_k(p_source => p_source,
p_replace_j => p_replace_j);
end;
function replace_n(p_source varchar2, p_replace_j number) return varchar2 is
begin
return hls_fin_calculator_itfc_pkg.replace_n(p_source => p_source,
p_replace_j => p_replace_j);
end;
procedure create_h_data(p_calc_session_id number,
p_contract_id number,
p_change_req_id number,
p_price_list varchar2,
p_ccr_start_times number,
p_ccr_lease_times number,
p_user_id number) is
r_hls_fin_calculator_hd hls_fin_calculator_hd%rowtype;
begin
hls_document_transfer_pkg.doc_to_doc(p_from_doc_table => 'CON_CONTRACT',
p_from_doc_pk => p_change_req_id,
p_to_doc_table => 'HLS_FIN_CALCULATOR_HD',
p_to_doc_pk => p_calc_session_id,
p_to_doc_column_1 => 'source_doc_category',
p_to_doc_column_1_value => 'CHANGE_REQ',
p_to_doc_column_2 => 'source_doc_id',
p_to_doc_column_2_value => p_change_req_id,
p_to_doc_column_3 => 'price_list',
p_to_doc_column_3_value => p_price_list,
p_user_id => p_user_id);
-- replace hd.lease_times
update hls_fin_calculator_hd
set lease_times = p_ccr_start_times + p_ccr_lease_times - 1,
business_type =
(select BUSINESS_TYPE
from con_contract
where contract_id = p_contract_id)
where calc_session_id = p_calc_session_id;
hls_document_transfer_pkg.doc_to_doc(p_from_doc_table => 'HLS_FIN_CALCULATOR_HD',
p_from_doc_pk => p_calc_session_id,
p_to_doc_table => 'HLS_FIN_CALCULATOR_HD_FORMULA',
p_to_doc_pk => p_calc_session_id,
p_user_id => p_user_id);
hls_fin_calculator_itfc_pkg.calculator_h_formula(p_calc_session_id => p_calc_session_id,
p_user_id => p_user_id);
end;
procedure create_l_data(p_calc_session_id number,
p_contract_id number,
p_change_req_id number,
p_price_list varchar2,
p_ccr_start_times number,
p_ccr_lease_times number,
p_recreate_l_std varchar2,
p_recreate_l_formula varchar2,
p_user_id number) is
n number; --原合同总期数
k number; --变更后总期数
i number;
v_lease_times number;
t_column_cf_item hls_fin_calculator_itfc_pkg.column_cf_item_t;
r_calculator_ln hls_fin_calculator_ln%rowtype;
r_calculator_ln_formula hls_fin_calculator_ln_formula%rowtype;
ln_formula_record hls_fin_calculator_itfc_pkg.ln_formula_type;
v_cf_item varchar2(100);
v_calc_line_id number;
v_exists varchar2(1);
v_sql varchar2(32767);
v_matrix_j_initial number;
v_matrix_j_interval number;
v_formula varchar2(4000);
v_old_calc_session_id number;
e_lease_times_error exception;
e_times_formula_error exception;
function get_column_value(p_source in varchar2, p_j in number)
return number is
i number := 0;
v_instr number;
v_text varchar2(2000);
v_sql varchar2(32767);
v_value varchar2(1000);
v_parent_column varchar2(100);
e_ignore_flag exception;
begin
if substr(ltrim(p_source), 1, 1) <> '=' then
return p_source;
end if;
v_text := p_source;
--检索头数组 H
loop
i := i + 1;
v_instr := instr(upper(v_text),
hls_fin_calculator_core_pkg.c_h,
1,
i);
if v_instr = 0 or v_instr is null then
exit;
end if;
v_parent_column := null;
for i in 1 .. length(v_text) - v_instr loop
begin
if substr(v_text, v_instr + i, 1) not in
('0', '1', '2', '3', '4', '5', '6', '7', '8', '9') then
if i = 1 then
raise e_ignore_flag; --H数组第一个字符必须是数组
end if;
v_parent_column := hls_fin_calculator_core_pkg.c_h ||
substr(v_text, v_instr + 1, i - 1);
begin
select b.column_name
into v_parent_column
from hls_fin_calc_config b
where b.layout_area_seq = 'H'
and b.price_list = p_price_list
and b.column_code = v_parent_column;
begin
v_sql := 'select ' || v_parent_column ||
' from hls_fin_calculator_hd where calc_session_id = ' ||
p_calc_session_id;
execute immediate v_sql
into v_value;
v_text := substr(v_text, 1, v_instr - 1) || v_value ||
substr(v_text, v_instr + i);
--v_text := replace(v_text,v_parent_column,v_value);
exception
when others then
raise e_ignore_flag;
end;
exception
when no_data_found then
raise e_ignore_flag;
end;
exit;
end if;
if i = (length(v_text) - v_instr) then
v_parent_column := hls_fin_calculator_core_pkg.c_h ||
substr(v_text, v_instr + 1);
begin
select b.column_name
into v_parent_column
from hls_fin_calc_config b
where b.layout_area_seq = 'H'
and b.price_list = p_price_list
and b.column_code = v_parent_column;
begin
v_sql := 'select ' || v_parent_column ||
' from hls_fin_calculator_hd where calc_session_id = ' ||
p_calc_session_id;
execute immediate v_sql
into v_value;
v_text := substr(v_text, 1, v_instr - 1) || v_value;
--v_text := replace(v_text,v_parent_column,v_value);
exception
when others then
raise e_ignore_flag;
end;
exception
when no_data_found then
raise e_ignore_flag;
end;
end if;
exception
when e_ignore_flag then
exit;
end;
end loop;
end loop;
v_value := hls_fin_calculator_itfc_pkg.execute_formula(v_text,
p_calc_session_id,
p_price_list);
return v_value;
exception
when others then
return null;
end;
begin
select lease_times
into v_lease_times
from hls_fin_calculator_hd
where calc_session_id = p_calc_session_id;
if p_ccr_lease_times is null or p_ccr_lease_times < 0 or
p_ccr_start_times is null or p_ccr_start_times < 0 then
raise e_lease_times_error;
end if;
if p_recreate_l_std = 'Y' then
delete from hls_fin_calculator_ln
where calc_session_id = p_calc_session_id
and to_number(times) < p_ccr_start_times;
delete from hls_fin_calculator_ln_formula
where calc_session_id = p_calc_session_id
and to_number(times) < p_ccr_start_times;
t_column_cf_item := hls_fin_calculator_itfc_pkg.get_column_cf_item(p_price_list => p_price_list);
--------------------------------------
--step 1 将调整之前的期数回写到计算器行表
--------------------------------------
i := t_column_cf_item.first;
while t_column_cf_item.exists(i) loop
v_cf_item := t_column_cf_item(i).cf_item;
for c_cf in (select a.cashflow_id, a.times
from con_contract_cashflow a
where a.contract_id = p_change_req_id
and a.cf_item = v_cf_item
and a.times < p_ccr_start_times) loop
if v_cf_item = 1 then
for c_column in (select c.DATA_TYPE,
c.COLUMN_NAME,
c.COLUMN_NAME as COLUMN_NAME_cf,
cc.column_id as matrix_i
from user_tab_columns c,
hls_fin_calc_column_code cc
where c.TABLE_NAME = 'CON_CONTRACT_CASHFLOW'
and cc.table_name = 'HLS_FIN_CALCULATOR_LN'
and c.COLUMN_NAME = cc.column_name
union
select c.data_type,
c.column_name,
'DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.column_name = 'RENTAL'
and c.layout_area_seq = 'L'
union
select c.data_type,
c.column_name,
'NET_DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.column_name = 'NET_RENTAL'
and c.layout_area_seq = 'L'
union
select c.data_type,
c.column_name,
'VAT_DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.column_name = 'VAT_RENTAL'
and c.layout_area_seq = 'L') loop
execute immediate 'select ' || c_column.column_name_cf ||
' from con_contract_cashflow where cashflow_id=' ||
c_cf.cashflow_id
into v_formula;
ln_formula_record(c_cf.times).n(c_column.matrix_i).column_name := c_column.column_name;
ln_formula_record(c_cf.times).n(c_column.matrix_i).data_type := c_column.data_type;
ln_formula_record(c_cf.times).n(c_column.matrix_i).formula := v_formula;
end loop;
elsif v_cf_item = 0 then
for c_column in (select c.DATA_TYPE,
c.COLUMN_NAME,
c.COLUMN_NAME as COLUMN_NAME_cf,
cc.column_id as matrix_i
from user_tab_columns c,
hls_fin_calc_column_code cc
where c.TABLE_NAME = 'CON_CONTRACT_CASHFLOW'
and cc.table_name = 'HLS_FIN_CALCULATOR_LN'
and c.column_name = cc.column_name
and c.column_name <> t_column_cf_item(i)
.column_name
union
select c.data_type,
c.column_name,
'DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.layout_area_seq = 'L'
and c.column_name = t_column_cf_item(i)
.column_name) loop
execute immediate 'select ' || c_column.column_name_cf ||
' from con_contract_cashflow where cashflow_id=' ||
c_cf.cashflow_id
into v_formula;
ln_formula_record(c_cf.times).n(c_column.matrix_i).column_name := c_column.column_name;
ln_formula_record(c_cf.times).n(c_column.matrix_i).data_type := c_column.data_type;
ln_formula_record(c_cf.times).n(c_column.matrix_i).formula := v_formula;
end loop;
else
for c_column in (select c.data_type,
c.column_name,
'DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.layout_area_seq = 'L'
and c.column_name = t_column_cf_item(i)
.column_name
union
select c.data_type,
c.column_name,
'NET_DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.layout_area_seq = 'L'
and c.column_name = t_column_cf_item(i)
.net_column_name
union
select c.data_type,
c.column_name,
'VAT_DUE_AMOUNT' as column_name_cf,
c.column_id as matrix_i
from hls_fin_calc_config c
where c.price_list = p_price_list
and c.layout_area_seq = 'L'
and c.column_name = t_column_cf_item(i)
.vat_column_name
) loop
execute immediate 'select ' || c_column.column_name_cf ||
' from con_contract_cashflow where cashflow_id=' ||
c_cf.cashflow_id
into v_formula;
ln_formula_record(c_cf.times).n(c_column.matrix_i).column_name := c_column.column_name;
ln_formula_record(c_cf.times).n(c_column.matrix_i).data_type := c_column.data_type;
ln_formula_record(c_cf.times).n(c_column.matrix_i).formula := v_formula;
end loop;
end if;
end loop;
i := t_column_cf_item.next(i);
end loop;
end if;
--------------------------------------
--step 2 按新公式填写剩余的计算器行表
--------------------------------------
if p_recreate_l_formula = 'Y' then
delete from hls_fin_calculator_ln
where calc_session_id = p_calc_session_id
and to_number(times) >= p_ccr_start_times;
delete from hls_fin_calculator_ln_formula
where calc_session_id = p_calc_session_id
and to_number(times) >= p_ccr_start_times;
for c_l_column in (select a.column_name, a.config_id, a.data_type
from hls_fin_calc_config a
where a.price_list = p_price_list
and a.layout_area_seq = 'L'
and a.enabled_flag = 'Y') loop
for c_l_formula in (select b.matrix_i,
b.matrix_j_type,
b.matrix_j_initial,
b.matrix_j_interval,
b.calc_formula,
b.loop_remain_times_only
from hls_fin_calc_config_formula b
where b.config_id = c_l_column.config_id
and b.enabled_flag = 'Y'
order by b.matrix_i asc,
b.calc_seq asc,
decode(b.matrix_j_type, 'CYCLE', 1, 2) asc
) loop
/* 起始值字段如果没有输入=,自动补等号 */
if substr(ltrim(c_l_formula.matrix_j_initial), 1, 1) <> '=' then
c_l_formula.matrix_j_initial := '=' ||
c_l_formula.matrix_j_initial;
end if;
/* 间隔 字段如果没有输入=,自动补等号 */
if substr(ltrim(c_l_formula.matrix_j_interval), 1, 1) <> '=' then
c_l_formula.matrix_j_interval := '=' ||
c_l_formula.matrix_j_interval;
end if;
if c_l_formula.matrix_j_type = 'CYCLE' then
v_matrix_j_initial := get_column_value(c_l_formula.matrix_j_initial,
null);
v_matrix_j_interval := get_column_value(c_l_formula.matrix_j_interval,
null);
if v_matrix_j_initial is null then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'HLS050_MATRIX_J_INITIAL_VALUE_ERROR',
p_token_1 => '',
p_token_value_1 => c_l_column.column_name,
p_token_2 => '',
p_token_value_2 => c_l_formula.matrix_j_initial,
p_created_by => -1,
p_package_name => 'con_change_req_calc_itfc_pkg',
p_procedure_function_name => 'create_l_data');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end if;
if v_matrix_j_interval is null then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'HLS050_MATRIX_J_INTERVAL_VALUE_ERROR',
p_token_1 => '',
p_token_value_1 => c_l_column.column_name,
p_token_2 => '',
p_token_value_2 => c_l_formula.matrix_j_interval,
p_created_by => -1,
p_package_name => 'con_change_req_calc_itfc_pkg',
p_procedure_function_name => 'create_l_data');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end if;
if v_matrix_j_interval > 0 then
--从小到大循环
if c_l_formula.loop_remain_times_only = 'Y' then
for j in v_matrix_j_initial .. p_ccr_lease_times loop
if v_matrix_j_initial is not null and
v_matrix_j_interval is not null then
--能计算循环周期
if j >= v_matrix_j_initial and
mod(j - v_matrix_j_initial, v_matrix_j_interval) = 0 then
k := p_ccr_start_times + j - 1;
v_formula := replace_k(c_l_formula.calc_formula, k);
ln_formula_record(k).n(c_l_formula.matrix_i).column_name := c_l_column.column_name;
ln_formula_record(k).n(c_l_formula.matrix_i).data_type := c_l_column.data_type;
if c_l_column.column_name = 'TIMES' then
v_formula := get_column_value(v_formula, k);
if v_formula is null then
raise e_times_formula_error;
end if;
end if;
ln_formula_record(k).n(c_l_formula.matrix_i).formula := v_formula;
end if;
end if;
end loop;
else
for j in v_matrix_j_initial .. v_lease_times loop
if v_matrix_j_initial is not null and
v_matrix_j_interval is not null then
--能计算循环周期
if j >= v_matrix_j_initial and
mod(j - v_matrix_j_initial, v_matrix_j_interval) = 0 then
n := j;
v_formula := replace_n(c_l_formula.calc_formula, n);
ln_formula_record(n).n(c_l_formula.matrix_i).column_name := c_l_column.column_name;
ln_formula_record(n).n(c_l_formula.matrix_i).data_type := c_l_column.data_type;
if c_l_column.column_name = 'TIMES' then
v_formula := get_column_value(v_formula, n);
if v_formula is null then
raise e_times_formula_error;
end if;
end if;
ln_formula_record(n).n(c_l_formula.matrix_i).formula := v_formula;
end if;
end if;
end loop;
end if;
elsif v_matrix_j_interval < 0 then
--从大到小循环
if c_l_formula.loop_remain_times_only = 'Y' then
for j in 0 .. v_matrix_j_initial loop
if v_matrix_j_initial is not null and
v_matrix_j_interval is not null then
--能计算循环周期
if j <= v_matrix_j_initial and
mod(v_matrix_j_initial - j, v_matrix_j_interval) = 0 then
k := p_ccr_start_times + j - 1;
v_formula := replace_k(c_l_formula.calc_formula, k);
ln_formula_record(k).n(c_l_formula.matrix_i).column_name := c_l_column.column_name;
ln_formula_record(k).n(c_l_formula.matrix_i).data_type := c_l_column.data_type;
if c_l_column.column_name = 'TIMES' then
v_formula := get_column_value(v_formula, k);
if v_formula is null then
raise e_times_formula_error;
end if;
end if;
ln_formula_record(k).n(c_l_formula.matrix_i).formula := v_formula;
end if;
end if;
end loop;
else
for j in 0 .. v_matrix_j_initial loop
if v_matrix_j_initial is not null and
v_matrix_j_interval is not null then
--能计算循环周期
if j <= v_matrix_j_initial and
mod(v_matrix_j_initial - j, v_matrix_j_interval) = 0 then
n := j;
v_formula := replace_n(c_l_formula.calc_formula, n);
ln_formula_record(n).n(c_l_formula.matrix_i).column_name := c_l_column.column_name;
ln_formula_record(n).n(c_l_formula.matrix_i).data_type := c_l_column.data_type;
if c_l_column.column_name = 'TIMES' then
v_formula := get_column_value(v_formula, n);
if v_formula is null then
raise e_times_formula_error;
end if;
end if;
ln_formula_record(n).n(c_l_formula.matrix_i).formula := v_formula;
end if;
end if;
end loop;
end if;
end if;
elsif c_l_formula.matrix_j_type = 'FIXED' then
v_matrix_j_initial := get_column_value(c_l_formula.matrix_j_initial,
null);
if v_matrix_j_initial is null then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'HLS050_MATRIX_J_INITIAL_VALUE_ERROR',
p_token_1 => '',
p_token_value_1 => c_l_column.column_name,
p_token_2 => '',
p_token_value_2 => c_l_formula.matrix_j_initial,
p_created_by => -1,
p_package_name => 'con_change_req_calc_itfc_pkg',
p_procedure_function_name => 'create_l_data');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end if;
if c_l_formula.loop_remain_times_only = 'Y' then
k := v_matrix_j_initial + p_ccr_start_times - 1;
if k is not null then
v_formula := replace_k(c_l_formula.calc_formula, k);
if c_l_column.column_name = 'TIMES' then
v_formula := get_column_value(v_formula, k);
if v_formula is null then
raise e_times_formula_error;
end if;
end if;
ln_formula_record(k).n(c_l_formula.matrix_i).data_type := c_l_column.data_type;
ln_formula_record(k).n(c_l_formula.matrix_i).column_name := c_l_column.column_name;
ln_formula_record(k).n(c_l_formula.matrix_i).formula := v_formula;
end if;
else
n := v_matrix_j_initial;
if n is not null then
v_formula := replace_n(c_l_formula.calc_formula, n);
if c_l_column.column_name = 'TIMES' then
v_formula := get_column_value(v_formula, n);
if v_formula is null then
raise e_times_formula_error;
end if;
end if;
ln_formula_record(n).n(c_l_formula.matrix_i).data_type := c_l_column.data_type;
ln_formula_record(n).n(c_l_formula.matrix_i).column_name := c_l_column.column_name;
ln_formula_record(n).n(c_l_formula.matrix_i).formula := v_formula;
end if;
end if;
end if;
end loop;
end loop;
end if;
hls_fin_calculator_itfc_pkg.save_l_formula(p_ln_formula_record => ln_formula_record,
p_user_id => p_user_id,
p_calc_session_id => p_calc_session_id);
--计算复制于源价目表字段
if p_recreate_l_std = 'Y' then
select calc_session_id
into v_old_calc_session_id
from con_contract a
where a.contract_id = p_contract_id;
for cur in (select a.column_name
from hls_fin_calc_config a
where a.layout_area_seq = 'L'
and a.price_list = p_price_list
and a.ref_v03 = 'Y') loop
v_sql := 'update hls_fin_calculator_ln_formula l set ' ||
cur.column_name || ' = (select ' || cur.column_name ||
' from hls_fin_calculator_ln ol where ol.calc_session_id = ' ||
v_old_calc_session_id || ' and ol.times = l.times)' ||
' where calc_session_id = ' || p_calc_session_id ||
' and to_number(times) <' || p_ccr_start_times;
execute immediate v_sql;
end loop;
end if;
end;
procedure create_calculate(p_change_req_id in number,
p_calc_session_id in number,
p_recreate_h_formula in varchar2 default 'N',
p_recreate_l_std in varchar2 default 'N',
p_recreate_l_formula in varchar2 default 'N',
p_calc_successful out varchar2,
p_warning_message out varchar2,
p_user_id in number) is
column_list_array hls_fin_calculator_core_pkg.column_list_type;
v_error_count number;
r_hls_fin_calc_hd_rec hls_fin_calculator_hd%rowtype;
r_contract con_contract%rowtype;
v_contract_id number;
e_ccr_start_times_error exception;
begin
if p_calc_session_id is null then
return;
else
execute immediate 'alter session set nls_date_format = ''yyyy-mm-dd''';
r_contract := con_contract_pkg.get_contract_rec(p_contract_id => p_change_req_id,
p_user_id => p_user_id);
if r_contract.ccr_start_times is null or
r_contract.ccr_outstanding_times is null then
raise e_ccr_start_times_error;
end if;
if r_contract.ccr_start_times < 1 then
raise e_ccr_start_times_error;
end if;
select contract_id
into v_contract_id
from con_contract_change_req
where change_req_id = p_change_req_id;
if p_recreate_h_formula = 'Y' then
delete from hls_fin_calculator_hd
where calc_session_id = p_calc_session_id;
delete from hls_fin_calculator_hd_formula
where calc_session_id = p_calc_session_id;
--create h
create_h_data(p_calc_session_id => p_calc_session_id,
p_contract_id => v_contract_id,
p_change_req_id => p_change_req_id,
p_price_list => r_contract.price_list,
p_ccr_start_times => r_contract.ccr_start_times,
p_ccr_lease_times => r_contract.ccr_outstanding_times,
p_user_id => p_user_id);
end if;
select *
into r_hls_fin_calc_hd_rec
from hls_fin_calculator_hd
where calc_session_id = p_calc_session_id;
if not (r_hls_fin_calc_hd_rec.source_doc_category = 'CHANGE_REQ' and
r_hls_fin_calc_hd_rec.source_doc_id is not null) then
return;
end if;
if p_recreate_l_formula = 'Y' then
update hls_fin_calculator_hd_formula
set lease_times = r_hls_fin_calc_hd_rec.ccr_start_times +
r_hls_fin_calc_hd_rec.ccr_outstanding_times - 1
where calc_session_id = p_calc_session_id;
update hls_fin_calculator_hd hd
set lease_times = r_hls_fin_calc_hd_rec.ccr_start_times +
r_hls_fin_calc_hd_rec.ccr_outstanding_times - 1
where calc_session_id = p_calc_session_id;
--create l
create_l_data(p_calc_session_id => p_calc_session_id,
p_contract_id => v_contract_id,
p_change_req_id => p_change_req_id,
p_price_list => r_hls_fin_calc_hd_rec.price_list,
p_ccr_start_times => r_hls_fin_calc_hd_rec.ccr_start_times,
p_ccr_lease_times => r_hls_fin_calc_hd_rec.ccr_outstanding_times,
p_recreate_l_std => p_recreate_l_std,
p_recreate_l_formula => p_recreate_l_formula,
p_user_id => p_user_id);
end if;
end if;
hls_fin_calculator_itfc_pkg.calculate_main(p_calc_session_id => p_calc_session_id,
p_calc_successful => p_calc_successful,
p_warning_message => p_warning_message,
p_user_id => p_user_id);
exception
when e_ccr_start_times_error then
sys_raise_app_error_pkg.raise_user_define_error(p_message_code => 'HLS_FIN_CALCULATOR_CCR_PKG.CCR_START_TIMES_ERROR',
p_created_by => p_user_id,
p_package_name => 'hls_fin_calculator_ccr_pkg',
p_procedure_function_name => 'create_calculate');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
when others then
sys_raise_app_error_pkg.raise_sys_others_error(p_message => dbms_utility.format_error_backtrace || ' ' ||
sqlerrm,
p_created_by => p_user_id,
p_package_name => 'hls_fin_calculator_ccr_pkg',
p_procedure_function_name => 'create_calculate');
raise_application_error(sys_raise_app_error_pkg.c_error_number,
sys_raise_app_error_pkg.g_err_line_id);
end;
end hls_fin_calculator_ccr_pkg;
/
WHENEVER SQLERROR EXIT FAILURE ROLLBACK;
WHENEVER OSERROR EXIT FAILURE ROLLBACK;
spool REGISTER_CON_REPO001.log
spool REGISTER_CON_ET001.log
set feedback off
set define off
begin
--页面注册
sys_function_assign_pkg.service_load('modules/csh/CSH510/csh_transaction_hand_receipt_update.lview','收款维护',1,1,0);
sys_function_assign_pkg.func_service_load('CSH510','modules/csh/CSH510/csh_transaction_hand_receipt_update.lview');
end;
--分配bm
sys_function_assign_pkg.func_bm_load('CON733','cont.CON733.create_change_req');
sys_function_assign_pkg.func_bm_load('CON733','cont.CON733.calc_change_req');
sys_function_assign_pkg.func_bm_load('CON733','cont.CON733.calc_tenant_change_req');
end;
/
commit;
......
......@@ -21,6 +21,9 @@ sys_function_assign_pkg.func_service_load('CSH509','modules/csh/CSH509/csh_trans
--分配菜单 p_function_group_code=>'DEMO1' 为功能EXERCISES001的菜单
sys_load_sys_function_grp_pkg.sys_function_group_item_load(p_function_group_code=>'CSH_MANAGE',p_function_code=>'CSH509',p_enabled_flag=>'Y',P_USER_ID=>-1);
sys_function_assign_pkg.func_bm_load('CSH509','csh.CSH509.query_roles_info');
end;
/
......
......@@ -12,9 +12,12 @@ begin
sys_function_assign_pkg.func_bm_load('CSH510','csh.CSH510N.csh_transaction_list_tmp');
sys_function_assign_pkg.func_bm_load('CSH510','csh.CSH510.csh_transaction_for_lov');
sys_function_assign_pkg.func_bm_load('CSH510','csh.CSH510.csh_transaction_update');
sys_function_assign_pkg.func_bm_load('CSH509','csh.CSH509.query_roles_info');
sys_function_assign_pkg.func_bm_load('CSH510','csh.CSH510.csh_transaction_update_bp_info');
--页面注册
sys_function_assign_pkg.service_load('modules/csh/CSH510/csh_transaction_hand_receipt_update.lview','收款维护',1,1,0);
sys_function_assign_pkg.func_service_load('CSH510','modules/csh/CSH510/csh_transaction_hand_receipt_update.lview');
end;
/
commit;
......
WHENEVER SQLERROR EXIT FAILURE ROLLBACK;
WHENEVER OSERROR EXIT FAILURE ROLLBACK;
spool REGISTER_CON_REPO001.log
spool REGISTER_CON_ET001.log
set feedback off
set define off
begin
--页面注册
sys_function_assign_pkg.service_load('modules/hls/HLS361N/hls_bp_master_credit.lview','授信管理',1,1,0);
--创建动态页面的虚拟功能号
INSERT INTO sys_function_dynamic
(function_code,
function_name,
sequence,
creation_date,
created_by,
last_update_date,
last_updated_by)
VALUES
('HLS36101', '授信详细', 1, SYSDATE, -1, SYSDATE, -1);
end;
--分配bm
sys_function_assign_pkg.func_bm_load('CSH531N','csh.CSH531N.csh_write_off');
sys_function_assign_pkg.func_bm_load('CSH531N','csh.CSH531N.csh_transaction_plan_query');
sys_function_assign_pkg.func_bm_load('CSH531N','csh.CSH531N.csh_con_contract_cashflow');
sys_function_assign_pkg.func_bm_load('CSH531N','csh.CSH531N.csh_reverse_write_off');
end;
/
commit;
......
......@@ -7,6 +7,18 @@ set feedback off
set define off
begin
--页面注册
sys_function_assign_pkg.service_load('modules/hls/HLS361N/hls_bp_master_credit.lview','授信管理',1,1,0);
--功能定义 EXERCISES001 是功能号
SYS_LOAD_SYS_FUNCTION_PKG.SYS_FUNCTION_LOAD('HLS361N','授信管理','授信管理','30','','','modules/hls/HLS361N/hls_bp_master_credit.lview','ZHS',-1);
SYS_LOAD_SYS_FUNCTION_PKG.SYS_FUNCTION_LOAD('HLS361N','授信管理','授信管理','30','','','modules/hls/HLS361N/hls_bp_master_credit.lview','US',-1);
--分配页面 将页面分配给哪个功能号
sys_function_assign_pkg.func_service_load('HLS361N','modules/hls/HLS361N/hls_bp_master_credit.lview');
--分配菜单 p_function_group_code=>'DEMO1' 为功能EXERCISES001的菜单
sys_load_sys_function_grp_pkg.sys_function_group_item_load(p_function_group_code=>'CON_LEASE',p_function_code=>'HLS361N',p_enabled_flag=>'Y',P_USER_ID=>-1);
--分配bm
sys_function_assign_pkg.func_bm_load('HLS361N','csh.CSH509.query_roles_info');
......
WHENEVER SQLERROR EXIT FAILURE ROLLBACK;
WHENEVER OSERROR EXIT FAILURE ROLLBACK;
spool REGISTER_CON_REPO001.log
set feedback off
set define off
begin
--页面注册
sys_function_assign_pkg.service_load('modules/hls/HLS361N/hls_bp_master_credit.lview','授信管理',1,1,0);
--功能定义 EXERCISES001 是功能号
SYS_LOAD_SYS_FUNCTION_PKG.SYS_FUNCTION_LOAD('HLS361N','授信管理','授信管理','30','','','modules/hls/HLS361N/hls_bp_master_credit.lview','ZHS',-1);
SYS_LOAD_SYS_FUNCTION_PKG.SYS_FUNCTION_LOAD('HLS361N','授信管理','授信管理','30','','','modules/hls/HLS361N/hls_bp_master_credit.lview','US',-1);
--分配页面 将页面分配给哪个功能号
sys_function_assign_pkg.func_service_load('HLS361N','modules/hls/HLS361N/hls_bp_master_credit.lview');
--分配菜单 p_function_group_code=>'DEMO1' 为功能EXERCISES001的菜单
sys_load_sys_function_grp_pkg.sys_function_group_item_load(p_function_group_code=>'CON_LEASE',p_function_code=>'HLS361N',p_enabled_flag=>'Y',P_USER_ID=>-1);
end;
/
commit;
set feedback on
set define on
spool off
exit
......@@ -23,6 +23,8 @@ sys_load_sys_function_grp_pkg.sys_function_group_item_load(p_function_group_code
--bm
sys_function_assign_pkg.func_bm_load('HLS362N','hls.HLS361N.hls_bp_master_credit_confirmed');
sys_function_assign_pkg.service_load('modules/hls/HLS362N/credit_entrance_detail_confirm.lview','授信详细',1,1,0);
sys_function_assign_pkg.func_service_load('HLS361N','modules/hls/HLS362N/credit_entrance_detail_confirm.lview');
end;
/
commit;
......
WHENEVER SQLERROR EXIT FAILURE ROLLBACK;
WHENEVER OSERROR EXIT FAILURE ROLLBACK;
spool REGISTER_CON_REPO001.log
set feedback off
set define off
begin
--页面注册
begin
--页面注册
sys_function_assign_pkg.service_load('modules/hls/HLS362N/credit_entrance_detail_confirm.lview','授信详细',1,1,0);
sys_function_assign_pkg.func_service_load('HLS361N','modules/hls/HLS362N/credit_entrance_detail_confirm.lview');
end;
--创建动态页面的虚拟功能号
INSERT INTO sys_function_dynamic
(function_code,
function_name,
sequence,
creation_date,
created_by,
last_update_date,
last_updated_by)
VALUES
('HLS36103', '授信详细', 1, SYSDATE, -1, SYSDATE, -1);
/
commit;
set feedback on
set define on
spool off
exit
......@@ -48,4 +48,16 @@ is '逾期租金(回购)';
alter table CON_CONTRACT add SUM_UNRECEIVED_PRINCIPAL number;
comment on column CON_CONTRACT.SUM_UNRECEIVED_PRINCIPAL
is '剩余本金(回购)';
\ No newline at end of file
is '剩余本金(回购)';
alter table CON_CONTRACT add extend_flag varchar2(1);
comment on column CON_CONTRACT.extend_flag
is '是否展期';
alter table CON_CONTRACT add deflation_flag varchar2(1);
comment on column CON_CONTRACT.deflation_flag
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
CREATE TABLE csh_transaction_plan(
plan_id NUMBER,
transaction_id NUMBER,
write_off_type VARCHAR2(20),
company_id number,
bp_id NUMBER,
write_off_amount NUMBER,
write_off_date DATE,
created_by NUMBER,
creation_date DATE,
last_updated_by NUMBER,
last_update_date DATE
);
ALTER TABLE csh_transaction_plan
ADD CONSTRAINTS csh_transaction_plan_pk PRIMARY KEY (plan_id);
CREATE SEQUENCE csh_transaction_plan_s;
COMMENT ON TABLE csh_transaction_plan IS '保证金、预收款-收款单生成-核销计划';
COMMENT ON COLUMN csh_transaction_plan.plan_id IS 'pk';
COMMENT ON COLUMN csh_transaction_plan.company_id IS '公司ID';
COMMENT ON COLUMN csh_transaction_plan.transaction_id IS 'csh_transaction -- pk';
COMMENT ON COLUMN csh_transaction_plan.write_off_type IS '核销事务类型 (保证金/预收款)';
COMMENT ON COLUMN csh_transaction_plan.bp_id IS '商业伙伴ID -- 代理商(保证金)/商业伙伴(预收款)';
COMMENT ON COLUMN csh_transaction_plan.write_off_amount IS '核销金额';
COMMENT ON COLUMN csh_transaction_plan.write_off_date IS '核销日期';
\ No newline at end of file
CREATE OR REPLACE VIEW CON_CHANGE_CONTRACT_LV AS
SELECT t1.contract_id,
t1.calc_session_id,
(SELECT t.calc_successful FROM hls_fin_calculator_hd t WHERE t.calc_session_id = t1.calc_session_id)calc_successful,
t1.contract_number,
t1.contract_name,
t1.document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = t1.document_type) AS document_type_n,
t1.document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = t1.document_category) AS document_category_n,
t1.project_id,
(SELECT p.project_number
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_c,
(SELECT p.project_name
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_n,
t1.company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.company_id) AS company_id_n,
t1.division,
(SELECT d.description
FROM hls_division d
WHERE d.division = t1.division) AS division_n,
t1.bp_id_tenant,
(SELECT m.bp_name
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_tenant) AS bp_id_tenant_n,
(SELECT ma.bp_name
FROM hls_bp_master ma
WHERE ma.bp_id = t1.bp_id_tenant) bp_id_tenant_name,
t1.bp_id_agent_level1,
(SELECT m.bp_name
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level1) AS bp_id_agent_level1_n,
t1.bp_id_agent_level2,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level2) AS bp_id_agent_level2_n,
t1.bp_id_agent_level3,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level3) AS bp_id_agent_level3_n,
t1.owner_user_id,
(SELECT a.description
FROM sys_user a
WHERE a.user_id = t1.owner_user_id) owner_user_id_n,
t1.employee_id,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id) AS employee_id_n,
t1.unit_id,
(SELECT h.bp_name FROM hls_bp_master h WHERE h.bp_id = t1.unit_id) AS unit_id_n,
t1.employee_id_of_manager,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id_of_manager) AS employee_id_of_manager_n,
t1.description,
t1.price_list,
(SELECT l.description
FROM hls_price_list l
WHERE l.price_list = t1.price_list) AS price_list_n,
t1.calc_method,
t1.inception_of_lease,
t1.lease_start_date,
t1.first_pay_date,
t1.lease_end_date,
t1.lease_times,
t1.pay_times,
t1.int_rate_display,
t1.annual_pay_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_ANNUAL_PAY_TIMES'
AND v.code_value = t1.annual_pay_times) AS annual_pay_times_n,
t1.lease_term,
t1.pay_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_PAY_TYPE'
AND v.code_value = t1.pay_type) AS pay_type_n,
t1.currency,
(SELECT g.currency_name
FROM gld_currency_vl g
WHERE g.currency_code = t1.currency) AS currency_n,
t1.currency_precision,
t1.machinery_amount,
t1.parts_amount,
t1.lease_item_amount,
t1.lease_item_cost,
t1.down_payment,
t1.down_payment_ratio,
t1.finance_amount,
t1.net_finance_amount,
t1.total_interest,
t1.total_rental,
t1.total_fee,
t1.contract_amount,
t1.tax_type_id,
(SELECT t.description
FROM fnd_tax_type_codes t
WHERE t.tax_type_id = t1.tax_type_id) AS tax_type_id_n,
t1.vat_flag,
t1.vat_rate,
t1.vat_input,
t1.vat_total_interest,
t1.vat_finance_amount,
t1.vat_total_rental,
t1.vat_total_fee,
t1.net_total_interest,
t1.net_total_rental,
t1.net_total_fee,
t1.net_lease_item_amount,
nvl(t1.lease_charge, 0) lease_charge,
t1.lease_charge_ratio,
t1.lease_mgt_fee,
t1.lease_mgt_fee_ratio,
t1.lease_mgt_fee_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_MGT_FEE_RULE'
AND v.code_value = t1.lease_mgt_fee_rule) AS lease_mgt_fee_rule_n,
t1.deposit,
t1.deposit_ratio,
nvl(t1.residual_value, 0) residual_value,
t1.other_fee,
t1.base_rate,
t1.int_rate,
t1.int_rate_implicit,
t1.int_rate_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_INT_RATE_TYPE'
AND v.code_value = t1.int_rate_type) AS int_rate_type_n,
t1.contract_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_CONTRACT_STATUS'
AND v.code_value = t1.contract_status) AS contract_status_n,
t1.created_by,
t1.creation_date,
t1.last_updated_by,
t1.last_update_date,
t1.data_class,
(SELECT sc.code_value_name
FROM sys_code_values_v sc
WHERE sc.code = 'HLS_DATA_CLASS'
AND sc.code_value = t1.data_class) data_class_n,
t1.ccr_penalty,
nvl(t1.ccr_fee,
decode((SELECT ccc1.document_type
FROM con_contract_change_req ccc1
WHERE ccc1.change_req_id = t1.contract_id),
'LEASSE_CHAG',
'1000',
'LEASEHOLD_CHAG',
'1000',
'CONEXTHAG',
'1000',
'DEBT_CHAG',
'2000',
'PART_CHAG',
'500',
'PAY_CHAG',
'0')) ccr_fee,
--modify by liyuan begin
(SELECT ccb.score_level
FROM con_contract_bp ccb
WHERE t1.contract_id = ccb.contract_id
AND ccb.bp_category = 'TENANT') score_level,
(SELECT ccc1.document_type
FROM con_contract_change_req ccc1
WHERE ccc1.change_req_id = t1.contract_id) ccr_document_type,
(SELECT ht.description
FROM hls_document_type ht
WHERE ht.document_type =
(SELECT ccc1.document_type
FROM con_contract_change_req ccc1
WHERE ccc1.change_req_id = t1.contract_id)) AS ccr_document_type_n, --变更类型
/*decode((SELECT ccc1.document_type
FROM con_contract_change_req ccc1
WHERE ccc1.change_req_id = t1.contract_id),
'LEASSE_CHAG',
'1',
'LEASEHOLD_CHAG',
'2',
'CONEXTHAG',
'3',
'DEBT_CHAG',
'4',
'PART_CHAG',
'5',
'PAY_CHAG',
'6') times,*/
(SELECT to_date(to_char(cccc.req_date,'yyyy-mm-dd'),'yyyy-mm-dd')
FROM con_contract_change_req cccc
WHERE cccc.change_req_id = t1.contract_id) req_date, --变更申请日期
(SELECT cccc.ref_v01
FROM con_contract_change_req cccc
WHERE cccc.change_req_id = t1.contract_id) ref_v01, --变更人
(SELECT cli.pattern
FROM con_contract_lease_item cli
WHERE cli.contract_id = t1.contract_id
AND cli.equipment_type = 'MAIN') lease_item_id_n, --机型
(SELECT cli.lease_item_id
FROM con_contract_lease_item cli
WHERE cli.contract_id = t1.contract_id
AND cli.equipment_type = 'MAIN') lease_item_id,
(SELECT cli.machine_number
FROM con_contract_lease_item cli
WHERE cli.contract_id = t1.contract_id
AND cli.equipment_type = 'MAIN') machine_number, --机号 --end
t1.ccr_lease_rental,
t1.ccr_lease_interest,
t1.ccr_lease_principal,
t1.ccr_lease_penalty,
t1.ccr_reason,
t1.ccr_opinion,
nvl(t1.hd_user_col_v04, 'DELAY') hd_user_col_v04, --冬雨季延期方式
t1.ccr_start_times,
t1.interim_times, --延期期数
t1.ccr_outstanding_prin_tax_incld, --剩余本金
t1.ccr_finance_amount,
t1.interim_rental,
t1.ccr_outstanding_times,
t1.ccr_dept,
t1.btb_payment_date, --变更基准日期
t1.btb_finance_amount,
t1.ccr_overdue_rental, --变更逾期租金
t1.HD_USER_COL_V06, --罚息是否参与债权再调整
(select v.code_value_name as value_name
from sys_code_values_v v
where v.code_enabled_flag = 'Y'
and v.code_value_enabled_flag = 'Y'
and v.code = 'YES_NO'
and v.code_value = t1.HD_USER_COL_V06) HD_USER_COL_V06_n,
t1.ccr_overdue_prin, --逾期本金
t1.CCR_OVERDUE_INTEREST, --变更逾期利息
t1.CCR_OUTSTANDING_PRIN_TI_TOTAL, --未到期本金
t1. CCR_DUE_AMOUNT, --变更罚息总金额
t1. CCR_DUE_RATIO, --变更收取比例
t1.CCR_DUE_CHARGE, --变更收取罚息金额
t1.BTB_INTEREST_MARGIN, --债权再调整变更不收本金期数
t1.bp_character, --承租人性格
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code_value = t1.bp_character
and v.code='BP_CHARACTER') bp_character_n,
t1.bp_engineer_source, --工程来源
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code_value = t1.bp_engineer_source
and v.code='BP_ENGINEER_SOURCE') bp_engineer_source_n,
t1.bp_credit_conscious, --信用意识
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code_value = t1.bp_credit_conscious
and v.code='BP_CREDIT_CONSCIOUS') bp_credit_conscious_n,
t1.bp_income_situation, --资产与收入情况
t1.bp_engineer_discrip, --工程情况描述
t1.bp_risk, --有何风险
t1.bp_evaluate, --整体风险
t1.fee_waiver, --是否手续费减免
t1.fee_waiver_reason,--手续费减免说明
--租金計劃變更 start
(SELECT c.lease_times FROM con_contract c,con_contract_change_req cr WHERE c.contract_id = cr.contract_id
AND cr.change_req_id = t1.contract_id)TIMES_S,
(SELECT c.irr FROM con_contract c ,con_contract_change_req cr WHERE c.contract_id = cr.contract_id
AND cr.change_req_id = t1.contract_id)IRR_S,
(SELECT c.int_rate_display FROM con_contract c,con_contract_change_req cr WHERE c.contract_id = cr.contract_id
AND cr.change_req_id = t1.contract_id)RATE_S,
t1.lease_times TIMES_C,
t1.irr IRR_C,
t1.int_rate_display RATE_C,
--租金計劃變更 end
--回款賬戶變更 start
(SELECT v.code_value_name FROM con_contract c,con_contract_change_req cr,sys_code_values_v v WHERE c.contract_id = cr.contract_id
AND v.code_value = c.pay_method
AND cr.change_req_id = t1.contract_id)PAYMENT_METHOD_ID_S, --原支付方式
(SELECT c.BANK_BRANCH_NAME FROM con_contract c,con_contract_change_req cr WHERE c.contract_id = cr.contract_id
AND cr.change_req_id = t1.contract_id)BANK_FULL_NAME_S, --原扣款银行
(SELECT c.BANK_ACCOUNT_NAME FROM con_contract c,con_contract_change_req cr WHERE c.contract_id = cr.contract_id
AND cr.change_req_id = t1.contract_id)BANK_ACCOUNT_NAME_S, --原扣款账户名
(SELECT c.BANK_BRANCH_NUM FROM con_contract c,con_contract_change_req cr WHERE c.contract_id = cr.contract_id
AND cr.change_req_id = t1.contract_id)BANK_ACCOUNT_NUM_S, --原扣款账号
t1.pay_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code_value = t1.pay_method
and v.code='PAY_METHODS') PAY_METHOD_N, --现支付方式
t1.BANK_BRANCH_NAME , --现扣款银行
t1.BANK_ACCOUNT_NAME , --现扣款账户名
t1.BANK_BRANCH_NUM, --现扣款账号
t1.ccr_lease_date
--回款賬戶變更 end
FROM con_contract t1
;
CREATE OR REPLACE VIEW CON_CONTRACT_CCR_LV AS
SELECT t1.contract_id,
t1.calc_session_id,
t1.contract_number,
t1.contract_name,
t1.business_type,
(SELECT bt.description
FROM hls_business_type bt
WHERE bt.business_type = t1.business_type) AS business_type_n,
t1.document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = t1.document_type) AS document_type_n,
t1.document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = t1.document_category) AS document_category_n,
t1.project_id,
(SELECT p.project_number
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_c,
(SELECT p.project_name
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_n,
t1.company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.company_id) AS company_id_n,
t1.spv_company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.spv_company_id) AS spv_company_id_n,
t1.lease_organization,
(SELECT o.description
FROM hls_lease_organization o
WHERE o.lease_organization = t1.lease_organization) AS lease_organization_n,
t1.lease_channel,
(SELECT ch.description
FROM hls_lease_channel ch
WHERE ch.lease_channel = t1.lease_channel) AS lease_channel_n,
t1.division,
(SELECT d.description
FROM hls_division d
WHERE d.division = t1.division) AS division_n,
t1.bp_id_tenant,
(SELECT m.bp_name
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_tenant) AS bp_id_tenant_n,
(SELECT ma.bp_name
FROM hls_bp_master ma
WHERE ma.bp_id = t1.bp_id_tenant) bp_id_tenant_name,
t1.bp_id_agent_level1,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level1) AS bp_id_agent_level1_n,
t1.bp_id_agent_level2,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level2) AS bp_id_agent_level2_n,
t1.bp_id_agent_level3,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level3) AS bp_id_agent_level3_n,
t1.owner_user_id,
t1.employee_id,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id) AS employee_id_n,
t1.unit_id,
(SELECT u.description
FROM exp_org_unit_vl u
WHERE u.unit_id = t1.unit_id) AS unit_id_n,
t1.employee_id_of_manager,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id_of_manager) AS employee_id_of_manager_n,
t1.factoring_type,
t1.description,
t1.price_list,
(SELECT l.description
FROM hls_price_list l
WHERE l.price_list = t1.price_list) AS price_list_n,
t1.calc_method,
t1.inception_of_lease,
t1.lease_start_date,
t1.first_pay_date,
t1.last_pay_date,
t1.lease_end_date,
t1.lease_times,
t1.pay_times,
t1.annual_pay_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_ANNUAL_PAY_TIMES'
AND v.code_value = t1.annual_pay_times) AS annual_pay_times_n,
t1.lease_term,
t1.pay_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_PAY_TYPE'
AND v.code_value = t1.pay_type) AS pay_type_n,
t1.currency,
(SELECT g.currency_name
FROM gld_currency_vl g
WHERE g.currency_code = t1.currency) AS currency_n,
t1.currency_precision,
t1.machinery_amount,
t1.parts_amount,
t1.lease_item_amount,
t1.lease_item_cost,
t1.down_payment,
t1.down_payment_ratio,
t1.finance_amount,
t1.net_finance_amount,
t1.total_interest,
t1.total_rental,
t1.total_fee,
t1.contract_amount,
t1.tax_type_id,
(SELECT t.description
FROM fnd_tax_type_codes t
WHERE t.tax_type_id = t1.tax_type_id) AS tax_type_id_n,
t1.vat_flag,
t1.vat_rate,
t1.vat_input,
t1.vat_total_interest,
t1.vat_finance_amount,
t1.vat_total_rental,
t1.vat_total_fee,
t1.net_total_interest,
t1.net_total_rental,
t1.net_total_fee,
t1.net_lease_item_amount,
t1.lease_charge,
t1.lease_charge_ratio,
t1.lease_mgt_fee,
t1.lease_mgt_fee_ratio,
t1.lease_mgt_fee_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_MGT_FEE_RULE'
AND v.code_value = t1.lease_mgt_fee_rule) AS lease_mgt_fee_rule_n,
t1.deposit,
t1.deposit_ratio,
t1.deposit_deduction,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_DEPOSIT_DEDUCTION'
AND v.code_value = t1.deposit_deduction) AS deposit_deduction_n,
t1.residual_value,
t1.residual_ratio,
t1.balloon,
t1.balloon_ratio,
t1.interim_rent_period,
t1.interim_times,
t1.interim_rental,
t1.insurance_fee,
t1.insurance_rate,
t1.commission_payable,
t1.commission_receivable,
t1.third_party_deposit,
t1.promise_to_pay,
t1.other_fee,
t1.other_payment,
t1.rounding_object,
t1.rounding_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_CASHFLOW_ACCURATED'
AND v.code_value = t1.rounding_method) AS rounding_method_n,
t1.int_rate_fixing_way,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'TRE502_INT_RATE_FIXING_WAY'
AND v.code_value = t1.int_rate_fixing_way) AS int_rate_fixing_way_n,
t1.int_rate_fixing_range,
t1.int_rate_display,
t1.base_rate_type,
(SELECT rt.description
FROM fnd_base_rate_type rt
WHERE rt.base_rate_type = t1.base_rate_type) AS base_rate_type_n,
t1.base_rate,
t1.int_rate,
t1.int_rate_implicit,
t1.int_rate_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_INT_RATE_TYPE'
AND v.code_value = t1.int_rate_type) AS int_rate_type_n,
t1.flt_rate_profile,
(SELECT description
FROM con_flt_rate_profile p
WHERE p.flt_rate_profile = t1.flt_rate_profile) AS flt_rate_profile_n,
t1.flt_rate_adj_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_FLT_RATE_ADJ_METHOD'
AND v.code_value = t1.flt_rate_adj_method) AS flt_rate_adj_method_n,
t1.flt_simulate_step,
t1.flt_simulate_range,
t1.flt_unit_adj_amt,
t1.flt_execute_times_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS_FLT_EXECUTE_TIMES_RULE'
AND v.code_value = t1.flt_execute_times_rule) AS flt_execute_times_rule_n,
t1.flt_int_rate_adj_date,
t1.flt_delay_execute_period,
t1.flt_annual_adj_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS_FLT_ANNUAL_ADJ_TIMES'
AND v.code_value = t1.flt_annual_adj_times) AS flt_annual_adj_times_n,
flt_next_adj_date,
t1.int_rate_precision,
t1.irr,
t1.irr_after_tax,
t1.int_rate_implicit_after_tax,
t1.irr_reserved1,
t1.irr_reserved2,
t1.irr_reserved3,
t1.pmt,
t1.pmt_first,
t1.npv_using_cof,
t1.annual_mean_rate,
t1.total_salestax,
t1.biz_day_convention,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS050_BIZ_DAY_CONVENTION'
AND v.code_value = t1.biz_day_convention) AS biz_day_convention_n,
t1.calc_with_residual_value,
t1.exchange_rate_type,
(SELECT v.rate_type_desc
FROM gld_exchange_rate_type_v v
WHERE v.rate_type_code = t1.exchange_rate_type) AS exchange_rate_type_n,
t1.exchange_rate_quotation,
t1.exchange_rate,
t1.penalty_profile,
t1.grace_period,
t1.penalty_rate,
t1.penalty_calc_base,
t1.penalty_total_base_ratio,
t1.credit_write_off_order, --?
t1.fin_income_recognize_method,
t1.early_termination_profile,
(SELECT p.description
FROM con_contract_et_profile p
WHERE p.et_profile = t1.early_termination_profile
AND rownum = 1) AS early_termination_profile_n,
t1.payment_method_id,
t1.telex_transfer_bank_id,
t1.tt_bank_branch_name,
t1.tt_bank_account_num,
t1.tt_bank_account_name,
t1.tt_remark,
t1.direct_debit_bank_id,
t1.dd_bank_branch_name,
t1.dd_bank_account_num,
t1.dd_bank_account_name,
t1.dd_agreement_no,
t1.dd_agreement_status,
t1.dd_remark,
t1.purchase_order_no,
t1.contract_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_CONTRACT_STATUS'
AND v.code_value = t1.contract_status) AS contract_status_n,
t1.user_status_1,
t1.user_status_2,
t1.user_status_3,
t1.print_status,
t1.print_times,
t1.first_print_date,
t1.first_print_by,
t1.delivery_status,
t1.delivery_date,
t1.billing_method,
(SELECT bm.description
FROM con_billing_method bm
WHERE bm.billing_method = t1.billing_method) AS billing_method_n,
t1.billing_status,
t1.signing_date,
t1.original_recall_date,
t1.lease_card_recall_date,
t1.early_termination_date,
t1.termination_date,
t1.assignment_agreement_no,
t1.assignment_date,
t1.btb_payment_date,
t1.btb_int_rate,
t1.btb_int_rate_implicit,
t1.btb_finance_amount,
t1.btb_net_finance_amount,
t1.btb_total_repayment,
t1.btb_total_interest,
t1.btb_total_fee_pv,
t1.btb_total_fee,
t1.btb_finance_ratio,
t1.btb_interest_margin,
t1.btb_vat_interest,
t1.btb_vat_fee,
t1.btb_interest_after_tax,
t1.btb_fee_after_tax,
t1.cdd_list_id,
t1.hd_user_col_d01,
t1.hd_user_col_d02,
t1.hd_user_col_d03,
t1.hd_user_col_d04,
t1.hd_user_col_d05,
t1.hd_user_col_v01,
t1.hd_user_col_v02,
t1.hd_user_col_v03,
t1.hd_user_col_v04,
t1.hd_user_col_v05,
t1.hd_user_col_v06,
t1.hd_user_col_v07,
t1.hd_user_col_v08,
t1.hd_user_col_v09,
t1.hd_user_col_v10,
t1.hd_user_col_n01,
t1.hd_user_col_n02,
t1.hd_user_col_n03,
t1.hd_user_col_n04,
t1.hd_user_col_n05,
t1.hd_user_col_n06,
t1.hd_user_col_n07,
t1.hd_user_col_n08,
t1.hd_user_col_n09,
t1.hd_user_col_n10,
t1.hd_user_col_n11,
t1.hd_user_col_n12,
t1.hd_user_col_n13,
t1.serial_number,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n13)) AS hd_user_col_n13_n,
t1.hd_user_col_n14,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n14)) AS hd_user_col_n14_n,
t1.hd_user_col_n15,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n15)) AS hd_user_col_n15_n,
overdue_status,
overdue_max_days,
five_class_code,
(SELECT r.description
FROM rsc_five_class_code r
WHERE t1.five_class_code = r.five_class_code) AS five_class_code_n,
main_business_income,
main_business_cost,
financing_cost,
calc_prompt,
calc_prompt_msg,
lease_item_price_agent,
legal_fee,
version,
version_date,
version_display,
version_external,
version_reason,
version_note,
t1.created_by,
(SELECT su.description
FROM sys_user su
WHERE su.user_id = cr.created_by) change_created_by_n,
t1.creation_date,
t1.last_updated_by,
t1.last_update_date,
t1.search_term_1,
t1.search_term_2,
'CHANGE_REQ' data_class,
t1.ccr_start_times,
t1.ccr_outstanding_times,
t1.ccr_outstanding_prin_tax_incld,
t1.ccr_overdue_rental,
t1.ccr_penalty,
t1.ccr_fee,
t1.ccr_finance_amount,
t1.ccr_pmt,
t1.ccr_outstanding_prin_ti_total,
t1.ccr_financing_overdue_rental,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.ccr_financing_overdue_rental)) AS ccr_financing_overdue_rental_n,
t1.ccr_period_int_rate_implicit,
t1.ccr_period_lease_start_date,
t1.ccr_added_principal,
t1.ccr_nominal_finance_amount,
t1.ccr_original_finance_amount,
cr.change_quotation,
cr.change_lease_item,
cr.change_bp,
cr.change_req_number,
cr.req_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON_CHANGE_REQ_STATUS'
AND v.code_value = cr.req_status) AS req_status_n,
cr.req_date,
cr.description AS ccr_description,
cr.document_type AS ccr_document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = cr.document_type) AS ccr_document_type_n,
cr.document_category AS ccr_document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = cr.document_category) AS ccr_document_category_n,
cr.business_type AS ccr_business_type,
(SELECT bt.description
FROM hls_business_type bt
WHERE bt.business_type = cr.business_type) AS ccr_business_type_n,
cr.change_req_id,
(SELECT su.description
FROM sys_user su
WHERE su.user_id = t1.owner_user_id) owner, -- 单据所有者
t1.depart_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'DEPART_STATUS'
AND v.code_value = t1.depart_status) depart_status_n, --发车状态
t1.history_contract_id,
(SELECT ccd.comments
FROM con_contract_case_record ccd
WHERE ccd.document_table = 'CON_CONTRACT_CHANGE_REQ'
AND ccd.document_id = cr.change_req_id
and ccd.status in ('APPROVING','APPROVED','REJECT')) comments, --返回意见
cr.approved_date,--审批通过时间
cr.creation_date create_date,--创建时间
cr.contract_id source_contract_id
FROM con_contract t1,
con_contract_change_req cr
WHERE t1.contract_id = cr.change_req_id
AND cr.document_type IN ('CUT_CHAG' ,'LEASE_CHAG','ACC_CHAG')
;
CREATE OR REPLACE VIEW CON_CONTRACT_CCR_LV AS
SELECT t1.contract_id,
t1.calc_session_id,
t1.contract_number,
t1.contract_name,
t1.business_type,
(SELECT bt.description
FROM hls_business_type bt
WHERE bt.business_type = t1.business_type) AS business_type_n,
t1.document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = t1.document_type) AS document_type_n,
t1.document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = t1.document_category) AS document_category_n,
t1.project_id,
(SELECT p.project_number
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_c,
(SELECT p.project_name
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_n,
t1.company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.company_id) AS company_id_n,
t1.spv_company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.spv_company_id) AS spv_company_id_n,
t1.lease_organization,
(SELECT o.description
FROM hls_lease_organization o
WHERE o.lease_organization = t1.lease_organization) AS lease_organization_n,
t1.lease_channel,
(SELECT ch.description
FROM hls_lease_channel ch
WHERE ch.lease_channel = t1.lease_channel) AS lease_channel_n,
t1.division,
(SELECT d.description
FROM hls_division d
WHERE d.division = t1.division) AS division_n,
t1.bp_id_tenant,
(SELECT m.bp_name
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_tenant) AS bp_id_tenant_n,
(SELECT ma.bp_name
FROM hls_bp_master ma
WHERE ma.bp_id = t1.bp_id_tenant) bp_id_tenant_name,
t1.bp_id_agent_level1,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level1) AS bp_id_agent_level1_n,
t1.bp_id_agent_level2,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level2) AS bp_id_agent_level2_n,
t1.bp_id_agent_level3,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level3) AS bp_id_agent_level3_n,
t1.owner_user_id,
t1.employee_id,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id) AS employee_id_n,
t1.unit_id,
(SELECT u.description
FROM exp_org_unit_vl u
WHERE u.unit_id = t1.unit_id) AS unit_id_n,
t1.employee_id_of_manager,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id_of_manager) AS employee_id_of_manager_n,
t1.factoring_type,
t1.description,
t1.price_list,
(SELECT l.description
FROM hls_price_list l
WHERE l.price_list = t1.price_list) AS price_list_n,
t1.calc_method,
t1.inception_of_lease,
t1.lease_start_date,
t1.first_pay_date,
t1.last_pay_date,
t1.lease_end_date,
t1.lease_times,
t1.pay_times,
t1.annual_pay_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_ANNUAL_PAY_TIMES'
AND v.code_value = t1.annual_pay_times) AS annual_pay_times_n,
t1.lease_term,
t1.pay_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_PAY_TYPE'
AND v.code_value = t1.pay_type) AS pay_type_n,
t1.currency,
(SELECT g.currency_name
FROM gld_currency_vl g
WHERE g.currency_code = t1.currency) AS currency_n,
t1.currency_precision,
t1.machinery_amount,
t1.parts_amount,
t1.lease_item_amount,
t1.lease_item_cost,
t1.down_payment,
t1.down_payment_ratio,
t1.finance_amount,
t1.net_finance_amount,
t1.total_interest,
t1.total_rental,
t1.total_fee,
t1.contract_amount,
t1.tax_type_id,
(SELECT t.description
FROM fnd_tax_type_codes t
WHERE t.tax_type_id = t1.tax_type_id) AS tax_type_id_n,
t1.vat_flag,
t1.vat_rate,
t1.vat_input,
t1.vat_total_interest,
t1.vat_finance_amount,
t1.vat_total_rental,
t1.vat_total_fee,
t1.net_total_interest,
t1.net_total_rental,
t1.net_total_fee,
t1.net_lease_item_amount,
t1.lease_charge,
t1.lease_charge_ratio,
t1.lease_mgt_fee,
t1.lease_mgt_fee_ratio,
t1.lease_mgt_fee_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_MGT_FEE_RULE'
AND v.code_value = t1.lease_mgt_fee_rule) AS lease_mgt_fee_rule_n,
t1.deposit,
t1.deposit_ratio,
t1.deposit_deduction,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_DEPOSIT_DEDUCTION'
AND v.code_value = t1.deposit_deduction) AS deposit_deduction_n,
t1.residual_value,
t1.residual_ratio,
t1.balloon,
t1.balloon_ratio,
t1.interim_rent_period,
t1.interim_times,
t1.interim_rental,
t1.insurance_fee,
t1.insurance_rate,
t1.commission_payable,
t1.commission_receivable,
t1.third_party_deposit,
t1.promise_to_pay,
t1.other_fee,
t1.other_payment,
t1.rounding_object,
t1.rounding_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_CASHFLOW_ACCURATED'
AND v.code_value = t1.rounding_method) AS rounding_method_n,
t1.int_rate_fixing_way,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'TRE502_INT_RATE_FIXING_WAY'
AND v.code_value = t1.int_rate_fixing_way) AS int_rate_fixing_way_n,
t1.int_rate_fixing_range,
t1.int_rate_display,
t1.base_rate_type,
(SELECT rt.description
FROM fnd_base_rate_type rt
WHERE rt.base_rate_type = t1.base_rate_type) AS base_rate_type_n,
t1.base_rate,
t1.int_rate,
t1.int_rate_implicit,
t1.int_rate_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_INT_RATE_TYPE'
AND v.code_value = t1.int_rate_type) AS int_rate_type_n,
t1.flt_rate_profile,
(SELECT description
FROM con_flt_rate_profile p
WHERE p.flt_rate_profile = t1.flt_rate_profile) AS flt_rate_profile_n,
t1.flt_rate_adj_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_FLT_RATE_ADJ_METHOD'
AND v.code_value = t1.flt_rate_adj_method) AS flt_rate_adj_method_n,
t1.flt_simulate_step,
t1.flt_simulate_range,
t1.flt_unit_adj_amt,
t1.flt_execute_times_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS_FLT_EXECUTE_TIMES_RULE'
AND v.code_value = t1.flt_execute_times_rule) AS flt_execute_times_rule_n,
t1.flt_int_rate_adj_date,
t1.flt_delay_execute_period,
t1.flt_annual_adj_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS_FLT_ANNUAL_ADJ_TIMES'
AND v.code_value = t1.flt_annual_adj_times) AS flt_annual_adj_times_n,
flt_next_adj_date,
t1.int_rate_precision,
t1.irr,
t1.irr_after_tax,
t1.int_rate_implicit_after_tax,
t1.irr_reserved1,
t1.irr_reserved2,
t1.irr_reserved3,
t1.pmt,
t1.pmt_first,
t1.npv_using_cof,
t1.annual_mean_rate,
t1.total_salestax,
t1.biz_day_convention,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS050_BIZ_DAY_CONVENTION'
AND v.code_value = t1.biz_day_convention) AS biz_day_convention_n,
t1.calc_with_residual_value,
t1.exchange_rate_type,
(SELECT v.rate_type_desc
FROM gld_exchange_rate_type_v v
WHERE v.rate_type_code = t1.exchange_rate_type) AS exchange_rate_type_n,
t1.exchange_rate_quotation,
t1.exchange_rate,
t1.penalty_profile,
t1.grace_period,
t1.penalty_rate,
t1.penalty_calc_base,
t1.penalty_total_base_ratio,
t1.credit_write_off_order, --?
t1.fin_income_recognize_method,
t1.early_termination_profile,
(SELECT p.description
FROM con_contract_et_profile p
WHERE p.et_profile = t1.early_termination_profile
AND rownum = 1) AS early_termination_profile_n,
t1.payment_method_id,
t1.telex_transfer_bank_id,
t1.tt_bank_branch_name,
t1.tt_bank_account_num,
t1.tt_bank_account_name,
t1.tt_remark,
t1.direct_debit_bank_id,
t1.dd_bank_branch_name,
t1.dd_bank_account_num,
t1.dd_bank_account_name,
t1.dd_agreement_no,
t1.dd_agreement_status,
t1.dd_remark,
t1.purchase_order_no,
t1.contract_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_CONTRACT_STATUS'
AND v.code_value = t1.contract_status) AS contract_status_n,
t1.user_status_1,
t1.user_status_2,
t1.user_status_3,
t1.print_status,
t1.print_times,
t1.first_print_date,
t1.first_print_by,
t1.delivery_status,
t1.delivery_date,
t1.billing_method,
(SELECT bm.description
FROM con_billing_method bm
WHERE bm.billing_method = t1.billing_method) AS billing_method_n,
t1.billing_status,
t1.signing_date,
t1.original_recall_date,
t1.lease_card_recall_date,
t1.early_termination_date,
t1.termination_date,
t1.assignment_agreement_no,
t1.assignment_date,
t1.btb_payment_date,
t1.btb_int_rate,
t1.btb_int_rate_implicit,
t1.btb_finance_amount,
t1.btb_net_finance_amount,
t1.btb_total_repayment,
t1.btb_total_interest,
t1.btb_total_fee_pv,
t1.btb_total_fee,
t1.btb_finance_ratio,
t1.btb_interest_margin,
t1.btb_vat_interest,
t1.btb_vat_fee,
t1.btb_interest_after_tax,
t1.btb_fee_after_tax,
t1.cdd_list_id,
t1.hd_user_col_d01,
t1.hd_user_col_d02,
t1.hd_user_col_d03,
t1.hd_user_col_d04,
t1.hd_user_col_d05,
t1.hd_user_col_v01,
t1.hd_user_col_v02,
t1.hd_user_col_v03,
t1.hd_user_col_v04,
t1.hd_user_col_v05,
t1.hd_user_col_v06,
t1.hd_user_col_v07,
t1.hd_user_col_v08,
t1.hd_user_col_v09,
t1.hd_user_col_v10,
t1.hd_user_col_n01,
t1.hd_user_col_n02,
t1.hd_user_col_n03,
t1.hd_user_col_n04,
t1.hd_user_col_n05,
t1.hd_user_col_n06,
t1.hd_user_col_n07,
t1.hd_user_col_n08,
t1.hd_user_col_n09,
t1.hd_user_col_n10,
t1.hd_user_col_n11,
t1.hd_user_col_n12,
t1.hd_user_col_n13,
t1.serial_number,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n13)) AS hd_user_col_n13_n,
t1.hd_user_col_n14,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n14)) AS hd_user_col_n14_n,
t1.hd_user_col_n15,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n15)) AS hd_user_col_n15_n,
overdue_status,
overdue_max_days,
five_class_code,
(SELECT r.description
FROM rsc_five_class_code r
WHERE t1.five_class_code = r.five_class_code) AS five_class_code_n,
main_business_income,
main_business_cost,
financing_cost,
calc_prompt,
calc_prompt_msg,
lease_item_price_agent,
legal_fee,
version,
version_date,
version_display,
version_external,
version_reason,
version_note,
t1.created_by,
(SELECT su.description
FROM sys_user su
WHERE su.user_id = cr.created_by) change_created_by_n,
t1.creation_date,
t1.last_updated_by,
t1.last_update_date,
t1.search_term_1,
t1.search_term_2,
t1.data_class,
t1.ccr_start_times,
t1.ccr_outstanding_times,
t1.ccr_outstanding_prin_tax_incld,
t1.ccr_overdue_rental,
t1.ccr_penalty,
t1.ccr_fee,
t1.ccr_finance_amount,
t1.ccr_pmt,
t1.ccr_outstanding_prin_ti_total,
t1.ccr_financing_overdue_rental,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.ccr_financing_overdue_rental)) AS ccr_financing_overdue_rental_n,
t1.ccr_period_int_rate_implicit,
t1.ccr_period_lease_start_date,
t1.ccr_added_principal,
t1.ccr_nominal_finance_amount,
t1.ccr_original_finance_amount,
cr.change_quotation,
cr.change_lease_item,
cr.change_bp,
cr.change_req_number,
cr.req_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON_CHANGE_REQ_STATUS'
AND v.code_value = cr.req_status) AS req_status_n,
cr.req_date,
cr.description AS ccr_description,
cr.document_type AS ccr_document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = cr.document_type) AS ccr_document_type_n,
cr.document_category AS ccr_document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = cr.document_category) AS ccr_document_category_n,
cr.business_type AS ccr_business_type,
(SELECT bt.description
FROM hls_business_type bt
WHERE bt.business_type = cr.business_type) AS ccr_business_type_n,
cr.change_req_id,
(SELECT su.description
FROM sys_user su
WHERE su.user_id = t1.owner_user_id) owner, -- 单据所有者
t1.depart_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'DEPART_STATUS'
AND v.code_value = t1.depart_status) depart_status_n, --发车状态
t1.history_contract_id,
(SELECT ccd.comments
FROM con_contract_case_record ccd
WHERE ccd.document_table = 'CON_CONTRACT_CHANGE_REQ'
AND ccd.document_id = cr.change_req_id
and ccd.status in ('APPROVING','APPROVED','REJECT')) comments, --doodream返回意见
cr.approved_date,--审批通过时间
cr.creation_date create_date--创建时间
FROM con_contract t1,
con_contract_change_req cr
WHERE t1.data_class = 'CHANGE_REQ'
AND t1.contract_id = cr.change_req_id
--增加migration数据
UNION ALL
SELECT t1.contract_id,
t1.calc_session_id,
t1.contract_number,
t1.contract_name,
t1.business_type,
(SELECT bt.description
FROM hls_business_type bt
WHERE bt.business_type = t1.business_type) AS business_type_n,
t1.document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = t1.document_type) AS document_type_n,
t1.document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = t1.document_category) AS document_category_n,
t1.project_id,
(SELECT p.project_number
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_c,
(SELECT p.project_name
FROM prj_project p
WHERE t1.project_id = p.project_id) AS project_id_n,
t1.company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.company_id) AS company_id_n,
t1.spv_company_id,
(SELECT c.company_short_name
FROM fnd_companies_vl c
WHERE c.company_id = t1.spv_company_id) AS spv_company_id_n,
t1.lease_organization,
(SELECT o.description
FROM hls_lease_organization o
WHERE o.lease_organization = t1.lease_organization) AS lease_organization_n,
t1.lease_channel,
(SELECT ch.description
FROM hls_lease_channel ch
WHERE ch.lease_channel = t1.lease_channel) AS lease_channel_n,
t1.division,
(SELECT d.description
FROM hls_division d
WHERE d.division = t1.division) AS division_n,
t1.bp_id_tenant,
(SELECT m.bp_name
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_tenant) AS bp_id_tenant_n,
(SELECT ma.bp_name
FROM hls_bp_master ma
WHERE ma.bp_id = t1.bp_id_tenant) bp_id_tenant_name,
t1.bp_id_agent_level1,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level1) AS bp_id_agent_level1_n,
t1.bp_id_agent_level2,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level2) AS bp_id_agent_level2_n,
t1.bp_id_agent_level3,
(SELECT m.bp_code
FROM hls_bp_master m
WHERE m.bp_id = t1.bp_id_agent_level3) AS bp_id_agent_level3_n,
t1.owner_user_id,
t1.employee_id,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id) AS employee_id_n,
t1.unit_id,
(SELECT u.description
FROM exp_org_unit_vl u
WHERE u.unit_id = t1.unit_id) AS unit_id_n,
t1.employee_id_of_manager,
(SELECT e.name
FROM exp_employees e
WHERE e.employee_id = t1.employee_id_of_manager) AS employee_id_of_manager_n,
t1.factoring_type,
t1.description,
t1.price_list,
(SELECT l.description
FROM hls_price_list l
WHERE l.price_list = t1.price_list) AS price_list_n,
t1.calc_method,
t1.inception_of_lease,
t1.lease_start_date,
t1.first_pay_date,
t1.last_pay_date,
t1.lease_end_date,
t1.lease_times,
t1.pay_times,
t1.annual_pay_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_ANNUAL_PAY_TIMES'
AND v.code_value = t1.annual_pay_times) AS annual_pay_times_n,
t1.lease_term,
t1.pay_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_PAY_TYPE'
AND v.code_value = t1.pay_type) AS pay_type_n,
t1.currency,
(SELECT g.currency_name
FROM gld_currency_vl g
WHERE g.currency_code = t1.currency) AS currency_n,
t1.currency_precision,
t1.machinery_amount,
t1.parts_amount,
t1.lease_item_amount,
t1.lease_item_cost,
t1.down_payment,
t1.down_payment_ratio,
t1.finance_amount,
t1.net_finance_amount,
t1.total_interest,
t1.total_rental,
t1.total_fee,
t1.contract_amount,
t1.tax_type_id,
(SELECT t.description
FROM fnd_tax_type_codes t
WHERE t.tax_type_id = t1.tax_type_id) AS tax_type_id_n,
t1.vat_flag,
t1.vat_rate,
t1.vat_input,
t1.vat_total_interest,
t1.vat_finance_amount,
t1.vat_total_rental,
t1.vat_total_fee,
t1.net_total_interest,
t1.net_total_rental,
t1.net_total_fee,
t1.net_lease_item_amount,
t1.lease_charge,
t1.lease_charge_ratio,
t1.lease_mgt_fee,
t1.lease_mgt_fee_ratio,
t1.lease_mgt_fee_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_MGT_FEE_RULE'
AND v.code_value = t1.lease_mgt_fee_rule) AS lease_mgt_fee_rule_n,
t1.deposit,
t1.deposit_ratio,
t1.deposit_deduction,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_DEPOSIT_DEDUCTION'
AND v.code_value = t1.deposit_deduction) AS deposit_deduction_n,
t1.residual_value,
t1.residual_ratio,
t1.balloon,
t1.balloon_ratio,
t1.interim_rent_period,
t1.interim_times,
t1.interim_rental,
t1.insurance_fee,
t1.insurance_rate,
t1.commission_payable,
t1.commission_receivable,
t1.third_party_deposit,
t1.promise_to_pay,
t1.other_fee,
t1.other_payment,
t1.rounding_object,
t1.rounding_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_CASHFLOW_ACCURATED'
AND v.code_value = t1.rounding_method) AS rounding_method_n,
t1.int_rate_fixing_way,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'TRE502_INT_RATE_FIXING_WAY'
AND v.code_value = t1.int_rate_fixing_way) AS int_rate_fixing_way_n,
t1.int_rate_fixing_range,
t1.int_rate_display,
t1.base_rate_type,
(SELECT rt.description
FROM fnd_base_rate_type rt
WHERE rt.base_rate_type = t1.base_rate_type) AS base_rate_type_n,
t1.base_rate,
t1.int_rate,
t1.int_rate_implicit,
t1.int_rate_type,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_INT_RATE_TYPE'
AND v.code_value = t1.int_rate_type) AS int_rate_type_n,
t1.flt_rate_profile,
(SELECT description
FROM con_flt_rate_profile p
WHERE p.flt_rate_profile = t1.flt_rate_profile) AS flt_rate_profile_n,
t1.flt_rate_adj_method,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS500_FLT_RATE_ADJ_METHOD'
AND v.code_value = t1.flt_rate_adj_method) AS flt_rate_adj_method_n,
t1.flt_simulate_step,
t1.flt_simulate_range,
t1.flt_unit_adj_amt,
t1.flt_execute_times_rule,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS_FLT_EXECUTE_TIMES_RULE'
AND v.code_value = t1.flt_execute_times_rule) AS flt_execute_times_rule_n,
t1.flt_int_rate_adj_date,
t1.flt_delay_execute_period,
t1.flt_annual_adj_times,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS_FLT_ANNUAL_ADJ_TIMES'
AND v.code_value = t1.flt_annual_adj_times) AS flt_annual_adj_times_n,
flt_next_adj_date,
t1.int_rate_precision,
t1.irr,
t1.irr_after_tax,
t1.int_rate_implicit_after_tax,
t1.irr_reserved1,
t1.irr_reserved2,
t1.irr_reserved3,
t1.pmt,
t1.pmt_first,
t1.npv_using_cof,
t1.annual_mean_rate,
t1.total_salestax,
t1.biz_day_convention,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'HLS050_BIZ_DAY_CONVENTION'
AND v.code_value = t1.biz_day_convention) AS biz_day_convention_n,
t1.calc_with_residual_value,
t1.exchange_rate_type,
(SELECT v.rate_type_desc
FROM gld_exchange_rate_type_v v
WHERE v.rate_type_code = t1.exchange_rate_type) AS exchange_rate_type_n,
t1.exchange_rate_quotation,
t1.exchange_rate,
t1.penalty_profile,
t1.grace_period,
t1.penalty_rate,
t1.penalty_calc_base,
t1.penalty_total_base_ratio,
t1.credit_write_off_order, --?
t1.fin_income_recognize_method,
t1.early_termination_profile,
(SELECT p.description
FROM con_contract_et_profile p
WHERE p.et_profile = t1.early_termination_profile
AND rownum = 1) AS early_termination_profile_n,
t1.payment_method_id,
t1.telex_transfer_bank_id,
t1.tt_bank_branch_name,
t1.tt_bank_account_num,
t1.tt_bank_account_name,
t1.tt_remark,
t1.direct_debit_bank_id,
t1.dd_bank_branch_name,
t1.dd_bank_account_num,
t1.dd_bank_account_name,
t1.dd_agreement_no,
t1.dd_agreement_status,
t1.dd_remark,
t1.purchase_order_no,
t1.contract_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON500_CONTRACT_STATUS'
AND v.code_value = t1.contract_status) AS contract_status_n,
t1.user_status_1,
t1.user_status_2,
t1.user_status_3,
t1.print_status,
t1.print_times,
t1.first_print_date,
t1.first_print_by,
t1.delivery_status,
t1.delivery_date,
t1.billing_method,
(SELECT bm.description
FROM con_billing_method bm
WHERE bm.billing_method = t1.billing_method) AS billing_method_n,
t1.billing_status,
t1.signing_date,
t1.original_recall_date,
t1.lease_card_recall_date,
t1.early_termination_date,
t1.termination_date,
t1.assignment_agreement_no,
t1.assignment_date,
t1.btb_payment_date,
t1.btb_int_rate,
t1.btb_int_rate_implicit,
t1.btb_finance_amount,
t1.btb_net_finance_amount,
t1.btb_total_repayment,
t1.btb_total_interest,
t1.btb_total_fee_pv,
t1.btb_total_fee,
t1.btb_finance_ratio,
t1.btb_interest_margin,
t1.btb_vat_interest,
t1.btb_vat_fee,
t1.btb_interest_after_tax,
t1.btb_fee_after_tax,
t1.cdd_list_id,
t1.hd_user_col_d01,
t1.hd_user_col_d02,
t1.hd_user_col_d03,
t1.hd_user_col_d04,
t1.hd_user_col_d05,
t1.hd_user_col_v01,
t1.hd_user_col_v02,
t1.hd_user_col_v03,
t1.hd_user_col_v04,
t1.hd_user_col_v05,
t1.hd_user_col_v06,
t1.hd_user_col_v07,
t1.hd_user_col_v08,
t1.hd_user_col_v09,
t1.hd_user_col_v10,
t1.hd_user_col_n01,
t1.hd_user_col_n02,
t1.hd_user_col_n03,
t1.hd_user_col_n04,
t1.hd_user_col_n05,
t1.hd_user_col_n06,
t1.hd_user_col_n07,
t1.hd_user_col_n08,
t1.hd_user_col_n09,
t1.hd_user_col_n10,
t1.hd_user_col_n11,
t1.hd_user_col_n12,
t1.hd_user_col_n13,
t1.serial_number,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n13)) AS hd_user_col_n13_n,
t1.hd_user_col_n14,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n14)) AS hd_user_col_n14_n,
t1.hd_user_col_n15,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.hd_user_col_n15)) AS hd_user_col_n15_n,
overdue_status,
overdue_max_days,
five_class_code,
(SELECT r.description
FROM rsc_five_class_code r
WHERE t1.five_class_code = r.five_class_code) AS five_class_code_n,
main_business_income,
main_business_cost,
financing_cost,
calc_prompt,
calc_prompt_msg,
lease_item_price_agent,
legal_fee,
version,
version_date,
version_display,
version_external,
version_reason,
version_note,
t1.created_by,
(SELECT su.description
FROM sys_user su
WHERE su.user_id = cr.created_by) change_created_by_n,
t1.creation_date,
t1.last_updated_by,
t1.last_update_date,
t1.search_term_1,
t1.search_term_2,
'CHANGE_REQ' data_class,
t1.ccr_start_times,
t1.ccr_outstanding_times,
t1.ccr_outstanding_prin_tax_incld,
t1.ccr_overdue_rental,
t1.ccr_penalty,
t1.ccr_fee,
t1.ccr_finance_amount,
t1.ccr_pmt,
t1.ccr_outstanding_prin_ti_total,
t1.ccr_financing_overdue_rental,
(SELECT t.code_value_name
FROM sys_code_values_v t
WHERE t.code = 'HLS050_ZERO_OR_ONE'
AND t.code_value = to_char(t1.ccr_financing_overdue_rental)) AS ccr_financing_overdue_rental_n,
t1.ccr_period_int_rate_implicit,
t1.ccr_period_lease_start_date,
t1.ccr_added_principal,
t1.ccr_nominal_finance_amount,
t1.ccr_original_finance_amount,
cr.change_quotation,
cr.change_lease_item,
cr.change_bp,
cr.change_req_number,
cr.req_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'CON_CHANGE_REQ_STATUS'
AND v.code_value = cr.req_status) AS req_status_n,
cr.req_date,
cr.description AS ccr_description,
cr.document_type AS ccr_document_type,
(SELECT dt.description
FROM hls_document_type dt
WHERE dt.document_type = cr.document_type) AS ccr_document_type_n,
cr.document_category AS ccr_document_category,
(SELECT dc.description
FROM hls_document_category dc
WHERE dc.document_category = cr.document_category) AS ccr_document_category_n,
cr.business_type AS ccr_business_type,
(SELECT bt.description
FROM hls_business_type bt
WHERE bt.business_type = cr.business_type) AS ccr_business_type_n,
cr.change_req_id,
(SELECT su.description
FROM sys_user su
WHERE su.user_id = t1.owner_user_id) owner, -- 单据所有者
t1.depart_status,
(SELECT v.code_value_name
FROM sys_code_values_v v
WHERE v.code = 'DEPART_STATUS'
AND v.code_value = t1.depart_status) depart_status_n, --发车状态
t1.history_contract_id,
(SELECT ccd.comments
FROM con_contract_case_record ccd
WHERE ccd.document_table = 'CON_CONTRACT_CHANGE_REQ'
AND ccd.document_id = cr.change_req_id
and ccd.status in ('APPROVING','APPROVED','REJECT')) comments, --doodream返回意见
cr.approved_date,--审批通过时间
cr.creation_date create_date--创建时间
FROM con_contract t1,
con_contract_change_req cr
WHERE t1.contract_id = cr.change_req_id
AND (cr.cashflow_change_flag='Y' OR cr.extension_change_flag = 'Y' OR
cr.RESCHEDULE_FLAG='Y' OR cr.BANK_ACC_CHANGE_FLAG= 'Y')
;
CREATE OR REPLACE VIEW CON_CONTRACT_CHANGE_REQ_LV AS
CREATE OR REPLACE VIEW CON_CONTRACT_CHANGE_REQ_LV AS
select t.change_req_id,
t.batch_id,
t.change_quotation,
......@@ -56,6 +56,7 @@ select t.change_req_id,
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,
(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,
nvl(t.et_ins_derate_amount,0) et_ins_derate_amount,
(select sum(cf.principal) - sum(nvl(cf.received_principal, 0))
......@@ -66,22 +67,24 @@ select t.change_req_id,
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,--提前结清利率
--提前结清 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
t.ccr_reason,
t.termination_date
--提前结清 end
from con_contract_change_req t,
con_contract cc
where t.contract_id = cc.contract_id
where cc.contract_id = t.change_req_id
AND cc.data_class = 'CHANGE_REQ'
;
......@@ -17,5 +17,15 @@
end;
]]></bm:update-sql>
</bm:operation>
<bm:operation name="execute">
<bm:update-sql><![CDATA[
begin
con_contract_workflow_pkg.contract_incept_submit(
p_contract_id =>${@contract_id},
p_user_id => ${/session/@user_id}
);
end;
]]></bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
......@@ -4,19 +4,14 @@
<bm:operation name="execute">
<bm:parameters>
<bm:parameter name="change_req_id" dataType="java.lang.Long" input="true" output="false"/>
<bm:parameter name="ccr_fee" input="true" output="false"/>
<bm:parameter name="ccr_penalty" input="true" output="false"/>
<bm:parameter name="btb_payment_date" input="true" output="false"/>
<bm:parameter name="layout_code" dataType="java.lang.String" input="true" output="false"/>
<bm:parameter name="user_id" dataType="java.lang.Long" input="true" output="false"/>
</bm:parameters>
<bm:update-sql><![CDATA[
begin
CON_CHANGE_REQ_CALC_ITFC_PKG.SUBMIT_CHANGE_REQ
cus_con_change_req_pkg.SUBMIT_CHANGE_REQ
(
p_change_req_id=>${@change_req_id},
p_ccr_fee=>${@ccr_fee},
p_ccr_penalty=>${@ccr_penalty},
p_btb_payment_date=>to_date(${@btb_payment_date},'yyyy-mm-dd'),
p_layout_code=>${@layout_code},
p_user_id=>${/session/@user_id}
);
......
<?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="calc_session_id" dataType="java.lang.Long" input="false" output="true"/>
<bm:parameter name="calc_successful" dataType="java.lang.String" input="false" output="true"/>
<bm:parameter name="warning_message" dataType="java.lang.String" input="false" output="true"/>
</bm:parameters>
<bm:update-sql><![CDATA[
begin
cus_con_change_req_pkg.CALC_CHANGE_REQ
(
p_change_req_id=>${@change_req_id},
p_ccr_start_times =>${@ccr_start_times},
p_ccr_outstanding_times =>${@ccr_outstanding_times},
p_calc_session_id=>${@calc_session_id},
p_calc_successful=>${@calc_successful},
p_warning_message=>${@warning_message},
p_user_id=>${/session/@user_id}
);
end;]]></bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
<?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="ccr_lease_rental" dataType="java.lang.Double" input="false" output="true" outputPath="@ccr_lease_rental"/>
<bm:parameter name="ccr_lease_principal" dataType="java.lang.Double" input="false" output="true" outputPath="@ccr_lease_principal"/>
<bm:parameter name="ccr_lease_interest" dataType="java.lang.Double" input="false" output="true" outputPath="@ccr_lease_interest"/>
<bm:parameter name="ccr_lease_penalty" dataType="java.lang.Double" input="false" output="true" outputPath="@ccr_lease_penalty"/>
</bm:parameters>
<bm:update-sql><![CDATA[
begin
cus_con_change_req_pkg.calc_tenant_change_req(p_change_req_id =>${@change_req_id},
p_ccr_lease_date =>to_date(${@ccr_lease_date},'yyyy-mm-dd'),
p_ccr_lease_rental =>${@ccr_lease_rental},
p_ccr_lease_principal =>${@ccr_lease_principal},
p_ccr_lease_interest =>${@ccr_lease_interest},
p_ccr_lease_penalty =>${@ccr_lease_penalty},
p_user_id =>${/session/@user_id}
);
end;]]></bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
<?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"/>
</bm:parameters>
<bm:update-sql><![CDATA[
DECLARE
v_change_req_id NUMBER;
BEGIN
cus_con_change_req_pkg.create_change_req(p_contract_id=>${@contract_id},
p_req_date=>to_date(${@req_date},'YYYY-MM-DD'),
p_req_type=>${@req_type},
p_description=>${@description},
p_user_id=>${/session/@user_id},
p_simulation_flag=>${@simulation_flag},
p_ref_v01=>${@ref_v01},
p_change_req_id=>v_change_req_id );
${@change_req_id}:=v_change_req_id;
END;
]]>
</bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
......@@ -41,6 +41,6 @@
</bm:query-fields>
<bm:data-filters>
<bm:data-filter name="query" expression="(t1.company_id=${/session/@company_id})"/>
<bm:data-filter name="query" expression="(t1.posted_flag in (&apos;N&apos;))"/>
<!-- <bm:data-filter name="query" expression="(t1.posted_flag in (&apos;N&apos;))"/>-->
</bm:data-filters>
</bm:model>
......@@ -87,7 +87,7 @@
</bm:primary-key>
<bm:data-filters>
<bm:data-filter name="query" expression="(t1.company_id=${/session/@company_id})"/>
<bm:data-filter name="query" expression="(t1.posted_flag=&apos;Y&apos;)"/>
<!-- <bm:data-filter name="query" expression="(t1.posted_flag=&apos;Y&apos;)"/>-->
</bm:data-filters>
<bm:query-fields>
<bm:query-field field="receipt_type" queryOperator="="/>
......@@ -112,7 +112,7 @@
<bm:query-field name="bp_id_from" queryExpression="t1.bp_id&gt;=${@bp_id_from}"/>
<bm:query-field name="bp_id_to" queryExpression="t1.bp_id&lt;=${@bp_id_to}"/>
<bm:query-field field="write_off_flag" queryOperator="="/>
<bm:query-field field="posted_flag" queryOperator="="/>
<!-- <bm:query-field field="posted_flag" queryOperator="="/>-->
<bm:query-field field="returned_flag" queryOperator="="/>
<bm:query-field field="reversed_flag" queryOperator="="/>
<bm:query-field field="period_name" queryOperator="="/>
......
......@@ -48,7 +48,7 @@
<bm:field name="history_flag" expression="(SELECT ct.history_flag FROM csh_transaction ct WHERE ct.transaction_id = t1.csh_transaction_id)" forInsert="false" forUpdate="false"/>
<bm:field name="ref_bp_name" expression="(select cc.bp_name from con_contract_v cc where cc.contract_id = nvl(t1.contract_id,t1.ASSIGNS_CONTRACT_ID))" forInsert="false" forUpdate="false"/>
<bm:field name="ref_contract_number" expression="(select cc.contract_number from con_contract cc where cc.contract_id = nvl(t1.contract_id,t1.ASSIGNS_CONTRACT_ID))" forInsert="false" forUpdate="false"/>
<bm:field name="ref_agent_name" expression="(select cc.extra_nam from con_contract_v cc where cc.contract_id = nvl(t1.contract_id,t1.ASSIGNS_CONTRACT_ID))" forInsert="false" forUpdate="false"/>
<!-- <bm:field name="ref_agent_name" expression="(select cc.extra_nam from con_contract_v cc where cc.contract_id = nvl(t1.contract_id,t1.ASSIGNS_CONTRACT_ID))" forInsert="false" forUpdate="false"/>-->
</bm:fields>
<bm:features>
<f:standard-who/>
......
<?xml version="1.0" encoding="UTF-8"?>
<!--
$Author: qwm
$Date: 2013-5-30 下午08:08:02
$Revision: 1.0
$Purpose:
$Author: sf
$Date: 2019-9-9 下午01:23:36
$Revision: 1.0
$Purpose:
-->
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm">
<bm:operations>
<bm:operation name="query">
<bm:query-sql><![CDATA[select t1.transaction_id,
t1.transaction_num,
t1.transaction_category,
t1.transaction_type,
to_char(t1.transaction_date,'yyyy-mm-dd') transaction_date,
t1.penalty_calc_date,
t1.bank_slip_num,
t1.company_id,
t1.internal_period_num,
t1.period_name,
t1.payment_method_id,
t1.distribution_set_id,
t1.cashflow_amount,
t1.currency_code,
t1.transaction_amount,
t1.exchange_rate_type,
t1.exchange_rate_quotation,
t1.exchange_rate,
t1.bank_account_id,
t1.bp_category,
t1.bp_id,
t1.bp_bank_account_id,
t1.bp_bank_account_num,
t1.description,
t1.handling_charge,
t1.posted_flag,
t1.reversed_flag,
t1.reversed_date,
t1.returned_flag,
t1.returned_amount,
t1.write_off_flag,
t1.write_off_amount,
t1.full_write_off_date,
t1.twin_csh_trx_id,
t1.return_from_csh_trx_id,
t1.reversed_csh_trx_id,
t1.source_csh_trx_type,
t1.source_csh_trx_id,
t1.source_doc_category,
t1.source_doc_type,
t1.source_doc_id,
t1.source_doc_line_id,
t1.create_je_mothed,
t1.create_je_flag,
t1.gld_interface_flag,
(select d.bp_code from hls_bp_master_v d where d.bp_id = t1.bp_id) as bp_code,
(select d.bp_name from hls_bp_master_v d where d.bp_id = t1.bp_id) as bp_name,
(select cp.description
from csh_payment_method cp
where cp.payment_method_id = t1.payment_method_id) as payment_method_display,
(select gc.currency_name
from gld_currency_vl gc
where gc.currency_code = t1.currency_code) as currency_name,
(select b.description
from hls_bp_category b
where b.bp_category = t1.bp_category) as bp_category_display,
(select tv.type_name
from gld_exchangerate_types_vl tv
where tv.type_code = t1.exchange_rate_type) as exchange_rate_type_display,
gld_exchange_rate_pkg.get_currency_exchange(t1.transaction_amount,t1.exchange_rate,t1.exchange_rate_quotation) as transaction_functional_amount,
(select a.bank_account_code
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_code,
(select a.bank_account_name
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_name,
(select a.bank_account_num
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_num,
(select a.bank_account_code from hls_bp_master_bank_account a where a.bank_account_id = t1.bp_bank_account_id) as bp_bank_account_code,
(select a.bank_account_name from hls_bp_master_bank_account a where a.bank_account_id = t1.bp_bank_account_id) as bp_bank_account_name,
(select gb.functional_currency_code
from fnd_companies fc, gld_set_of_books gb
where fc.company_id = ${/session/@company_id}
and fc.set_of_books_id = gb.set_of_books_id) as functional_currency_code,
(select t.rate_method_code
from gld_exchangerate_types t
where t.type_code = t1.exchange_rate_type) as rate_method_code,
(select d.zero_amounts_allowed
from csh_bank_account_v d
where d.bank_account_id = t1.bank_account_id) as zero_amounts_allowed,
(t1.transaction_amount - nvl(t1.write_off_amount, 0)) as unwrite_off_amount,
(select g.precision
from gld_currency g
where g.country_code = t1.currency_code) as precision,
(-1 * t1.transaction_amount) as reverse_amount,
(t1.transaction_amount-nvl(t1.returned_amount, 0)-nvl(t1.write_off_amount, 0)) can_return_amount,
t1.created_by,
(select u.employee_name from sys_user_v u where u.user_id=t1.created_by )user_desc,
(t1.transaction_amount-nvl(t1.returned_amount, 0)-nvl(t1.write_off_amount, 0)) remain_total_amount
from csh_transaction t1
#WHERE_CLAUSE#
order by t1.transaction_date desc,t1.transaction_num desc
]]></bm:query-sql>
</bm:operation>
</bm:operations>
<bm:model xmlns:f="leaf.database.features" xmlns:bm="http://www.leaf-framework.org/schema/bm" alias="t1" baseTable="CSH_TRANSACTION" defaultOrderBy="t1.transaction_num asc" needAccessControl="false">
<bm:fields>
<bm:field name="transaction_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="TRANSACTION_ID" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_ID"/>
<bm:field name="transaction_num" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="TRANSACTION_NUM" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_NUM"/>
<bm:field name="transaction_category" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="TRANSACTION_CATEGORY" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_CATEGORY"/>
<bm:field name="transaction_type" databaseType="VARCHAR2" datatype="java.lang.String" lookupCode="CSH511_TRANSACTION_TYPE" lookupField="transaction_type_desc" physicalName="TRANSACTION_TYPE" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_TYPE"/>
<bm:field name="transaction_date" databaseType="DATE" datatype="java.util.Date" physicalName="TRANSACTION_DATE" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_DATE"/>
<bm:field name="penalty_calc_date" databaseType="DATE" datatype="java.util.Date" physicalName="PENALTY_CALC_DATE" prompt="CSH511.CSH_TRANSACTION.PENALTY_CALC_DATE"/>
<bm:field name="bank_slip_num" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="BANK_SLIP_NUM" prompt="CSH511.CSH_TRANSACTION.BANK_SLIP_NUM"/>
<bm:field name="company_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="COMPANY_ID" prompt="CSH511.CSH_TRANSACTION.COMPANY_ID"/>
<bm:field name="internal_period_num" databaseType="NUMBER" datatype="java.lang.Long" physicalName="INTERNAL_PERIOD_NUM" prompt="CSH511.CSH_TRANSACTION.INTERNAL_PERIOD_NUM"/>
<bm:field name="period_name" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="PERIOD_NAME" prompt="HLS.ACCOUNT_PERIOD_NAME"/>
<bm:field name="payment_method_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="PAYMENT_METHOD_ID" prompt="HLS.PAYMENT_METHOD"/>
<bm:field name="distribution_set_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="DISTRIBUTION_SET_ID" prompt="CSH511.CSH_TRANSACTION.DISTRIBUTION_SET_ID"/>
<bm:field name="cashflow_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="CASHFLOW_AMOUNT" prompt="CSH511.CSH_TRANSACTION.CASHFLOW_AMOUNT"/>
<bm:field name="currency_code" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="CURRENCY_CODE" prompt="HLS.CURRENCY"/>
<bm:field name="transaction_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="TRANSACTION_AMOUNT" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_AMOUNT"/>
<bm:field name="exchange_rate_type" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="EXCHANGE_RATE_TYPE" prompt="HLS.EXCHANGE_RATE_TYPE_DESC"/>
<bm:field name="exchange_rate_quotation" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="EXCHANGE_RATE_QUOTATION" prompt="CSH511.CSH_TRANSACTION.EXCHANGE_RATE_QUOTATION"/>
<bm:field name="exchange_rate" databaseType="NUMBER" datatype="java.lang.Double" physicalName="EXCHANGE_RATE" prompt="HLS.EXCHANGE_RATE"/>
<bm:field name="bank_account_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="BANK_ACCOUNT_ID" prompt="CSH511.CSH_TRANSACTION.BANK_ACCOUNT_ID"/>
<bm:field name="bp_category" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="BP_CATEGORY" prompt="CSH511.CSH_TRANSACTION.BP_CATEGORY"/>
<bm:field name="bp_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="BP_ID" prompt="CSH511.CSH_TRANSACTION.BP_ID"/>
<bm:field name="bp_bank_account_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="BP_BANK_ACCOUNT_ID" prompt="CSH511.CSH_TRANSACTION.BP_BANK_ACCOUNT_ID"/>
<bm:field name="bp_bank_account_num" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="BP_BANK_ACCOUNT_NUM" prompt="CSH511.BANK_ACCOUNT_NUM"/>
<bm:field name="description" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="DESCRIPTION" prompt="HLS.NOTE"/>
<bm:field name="handling_charge" databaseType="NUMBER" datatype="java.lang.Double" physicalName="HANDLING_CHARGE" prompt="CSH511.CSH_TRANSACTION.HANDLING_CHARGE"/>
<bm:field name="posted_flag" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="POSTED_FLAG" prompt="CSH511.CSH_TRANSACTION.POSTED_FLAG"/>
<bm:field name="reversed_flag" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="REVERSED_FLAG" prompt="CSH511.CSH_TRANSACTION.REVERSED_FLAG"/>
<bm:field name="reversed_date" databaseType="DATE" datatype="java.util.Date" physicalName="REVERSED_DATE" prompt="CSH511.CSH_TRANSACTION.REVERSED_DATE"/>
<bm:field name="returned_flag" databaseType="VARCHAR2" datatype="java.lang.String" lookupCode="CSH510_RETURN_SELECT" lookupField="returned_flag_desc" physicalName="RETURNED_FLAG" prompt="CSH511.CSH_TRANSACTION.RETURNED_FLAG"/>
<bm:field name="returned_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="RETURNED_AMOUNT" prompt="CSH511.CSH_TRANSACTION.RETURNED_AMOUNT" expression="(select nvl(returned_amount,0) from dual)"/>
<bm:field name="write_off_flag" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="WRITE_OFF_FLAG" prompt="CSH511.CSH_TRANSACTION.WRITE_OFF_FLAG"/>
<bm:field name="write_off_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_AMOUNT" prompt="CSH511.CSH_TRANSACTION.WRITE_OFF_AMOUNT"/>
<bm:field name="full_write_off_date" databaseType="DATE" datatype="java.util.Date" physicalName="FULL_WRITE_OFF_DATE" prompt="CSH511.CSH_TRANSACTION.FULL_WRITE_OFF_DATE"/>
<bm:field name="twin_csh_trx_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="TWIN_CSH_TRX_ID" prompt="CSH511.CSH_TRANSACTION.TWIN_CSH_TRX_ID"/>
<bm:field name="return_from_csh_trx_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="RETURN_FROM_CSH_TRX_ID" prompt="CSH511.CSH_TRANSACTION.RETURN_FROM_CSH_TRX_ID"/>
<bm:field name="reversed_csh_trx_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="REVERSED_CSH_TRX_ID" prompt="CSH511.CSH_TRANSACTION.REVERSED_CSH_TRX_ID"/>
<bm:field name="source_csh_trx_type" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="SOURCE_CSH_TRX_TYPE" prompt="CSH511.CSH_TRANSACTION.SOURCE_CSH_TRX_TYPE"/>
<bm:field name="source_csh_trx_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="SOURCE_CSH_TRX_ID" prompt="CSH511.CSH_TRANSACTION.SOURCE_CSH_TRX_ID"/>
<bm:field name="source_doc_category" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="SOURCE_DOC_CATEGORY"/>
<bm:field name="source_doc_type" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="SOURCE_DOC_TYPE" prompt="CSH511.CSH_TRANSACTION.SOURCE_DOC_TYPE"/>
<bm:field name="source_doc_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="SOURCE_DOC_ID" prompt="CSH511.CSH_TRANSACTION.SOURCE_DOC_ID"/>
<bm:field name="source_doc_line_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="SOURCE_DOC_LINE_ID" prompt="CSH511.CSH_TRANSACTION.SOURCE_DOC_LINE_ID"/>
<bm:field name="create_je_mothed" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="CREATE_JE_MOTHED"/>
<bm:field name="create_je_flag" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="CREATE_JE_FLAG"/>
<bm:field name="gld_interface_flag" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="GLD_INTERFACE_FLAG" prompt="CSH511.CSH_TRANSACTION.GLD_INTERFACE_FLAG"/>
<bm:field name="bp_code" expression="(select d.bp_code from hls_bp_master_v d where d.bp_id=t1.bp_id)" forInsert="false" forUpdate="false" prompt="HLS.BP_CODE"/>
<bm:field name="bp_name" expression="(select d.bp_name from hls_bp_master_v d where d.bp_id=t1.bp_id)" forInsert="false" forUpdate="false" prompt="HLS.BP_NAME"/>
<bm:field name="payment_method_display" expression="(select cp.description from csh_payment_method cp where cp.payment_method_id=t1.payment_method_id)" forInsert="false" forUpdate="false" prompt="HLS.PAYMENT_METHOD"/>
<bm:field name="currency_name" expression="(select gc.currency_name from gld_currency_vl gc where gc.currency_code=t1.currency_code)" forInsert="false" forUpdate="false" prompt="HLS.CURRENCY"/>
<bm:field name="bp_category_display" expression="(select b.description from hls_bp_category b where b.bp_category=t1.bp_category)" forInsert="false" forUpdate="false" prompt="CSH511.CSH_TRANSACTION.BP_CATEGORY"/>
<bm:field name="exchange_rate_type_display" expression="(select tv.type_name from gld_exchangerate_types_vl tv where tv.type_code=t1.exchange_rate_type)" forInsert="false" forUpdate="false" prompt="HLS.EXCHANGE_RATE_TYPE_DESC"/>
<bm:field name="transaction_functional_amount" expression="gld_exchange_rate_pkg.get_currency_exchange(t1.transaction_amount,t1.exchange_rate,t1.exchange_rate_quotation)" forInsert="false" forUpdate="false" prompt="HLS.FUNCTIONAL_AMOUNT"/>
<bm:field name="bank_account_code" expression="(select a.bank_account_code from csh_bank_account a where a.bank_account_id=t1.bank_account_id)" forInsert="false" forUpdate="false" prompt="CSH511.BANK_ACCOUNT_CODE"/>
<bm:field name="bank_account_name" expression="(select a.bank_account_name from csh_bank_account a where a.bank_account_id=t1.bank_account_id)" forInsert="false" forUpdate="false" prompt="CSH511.BANK_ACCOUNT_NAME"/>
<bm:field name="bank_account_num" expression="(select a.bank_account_num from csh_bank_account a where a.bank_account_id=t1.bank_account_id)" forInsert="false" forUpdate="false" prompt="CSH511.BANK_ACCOUNT_NUM"/>
<bm:field name="bp_bank_account_code" expression="(select a.bank_account_code from hls_bp_master_bank_account a where a.bank_account_id = t1.bp_bank_account_id)" forInsert="false" forUpdate="false" prompt="CSH511.BP_BANK_ACCOUNT_CODE"/>
<!--<bm:field name="bp_bank_account_name" expression="(select a.bank_account_name from hls_bp_master_bank_account a where a.bank_account_id = t1.bp_bank_account_id)" forInsert="false" forUpdate="false" prompt="CSH511.BANK_ACCOUNT_NAME"/>-->
<bm:field name="bp_bank_account_name" prompt="CSH511.BANK_ACCOUNT_NAME"/>
<bm:field name="functional_currency_code" expression="(select gb.functional_currency_code from fnd_companies fc, gld_set_of_books gb where fc.company_id = ${/session/@company_id} and fc.set_of_books_id = gb.set_of_books_id)" forInsert="false" forUpdate="false"/>
<bm:field name="rate_method_code" expression="(select t.rate_method_code from gld_exchangerate_types t where t.type_code=t1.exchange_rate_type)" forInsert="false" forUpdate="false"/>
<bm:field name="zero_amounts_allowed" expression="(select d.zero_amounts_allowed from csh_bank_account_v d where d.bank_account_id=t1.bank_account_id)" forInsert="false" forUpdate="false"/>
<bm:field name="transaction_type_desc" forInsert="false" forUpdate="false" prompt="HLS.TRANSACTION_TYPE"/>
<bm:field name="unwrite_off_amount" expression="(nvl(t1.transaction_amount,0)-nvl(t1.write_off_amount,0)-nvl(t1.returned_amount,0))" forInsert="false" forUpdate="false" prompt="HLS.UNWRITEOFF_AMOUNT"/>
<bm:field name="precision" expression="(select g.precision from gld_currency g where g.currency_code =t1.currency_code)" forInsert="false" forUpdate="false"/>
<bm:field name="reverse_amount" expression="(-1*t1.transaction_amount)" forInsert="false" forUpdate="false" prompt="CSH511.REVERSE_AMOUNT"/>
<bm:field name="user_desc" expression="(select su.description from sys_user su where su.user_id=t1.created_by)" forInsert="false" forUpdate="false"/>
<bm:field name="auto_filt_penalty" expression="&apos;N&apos;" forInsert="false" forUpdate="false" prompt="CSH513.AUTO_FILT_PENALTY"/>
<bm:field name="auto_filt_prinicipal_interest" expression="&apos;Y&apos;" forInsert="false" forUpdate="false" prompt="CSH513.AUTO_FILT_PRINICIPAL_INTEREST"/>
<bm:field name="returned_flag_desc" forInsert="false" forUpdate="false" prompt="CSH511.CSH_TRANSACTION.RETURNED_FLAG"/>
<bm:field name="receipt_type"/>
<bm:field name="receipt_type_des" expression="(select v.code_value_name from sys_code_values_v v where v.code=&apos;RECEIPT_TYPE&apos; and v.code_value=t1.receipt_type)"/>
<bm:field name="ref_contract_id"/>
<bm:field name="contract_number" expression="(select cc.contract_number from con_contract cc where cc.contract_id = t1.ref_contract_id)"/>
<bm:field name="collection_classes"/>
<bm:field name="collection_classes_desc" expression="(select v.code_value_name from sys_code_values_v v where v.code = 'DS_COLLECTION_CLASSES' and v.code_value =t1.collection_classes)" forInsert="false" forUpdate="false"/>
<bm:field name="confirmed_flag_desc" expression="(select v.code_value_name from sys_code_values_v v where v.code = 'CONFIRMED_FLAG' and v.code_value =t1.confirmed_flag)" forInsert="false" forUpdate="false"/>
<bm:field name="written_off_flag_desc" expression="(select v.code_value_name from sys_code_values_v v where v.code = 'WRITE_OFF_FLAG' and v.code_value =t1.WRITE_OFF_FLAG)" forInsert="false" forUpdate="false"/>
<bm:field name="bank_branch_name" expression="(select bank_branch_name from csh_bank_branch where bank_branch_id = (select bank_branch_id from csh_bank_account where bank_account_id = t1.bank_account_id))" forInsert="false" forUpdate="false"/>
<bm:field name="use_money_amount" expression="(select t1.transaction_amount-t1.returned_amount from dual)" forInsert="false" forUpdate="false"/>
<bm:field name="opposite_band_na"/>
<bm:field name="banka"/>
<bm:field name="purpose"/>
<bm:field name="can_returned_amount" expression="(select transaction_amount-nvl(returned_amount,0) from dual)"/>
<bm:field name="gsber"/>
<bm:field name="sus_belnr"/>
<bm:field name="bp_virtual_bank_account"/>
<bm:field name="confirmed_flag" />
<bm:field name="debt_confirmed_by"/>
<bm:field name="debt_confirmed_by_desc" expression="(select description from sys_user where user_id=t1.debt_confirmed_by)" forInsert="false" forUpdate="false"/>
<bm:field name="acc_confirmed_by"/>
<bm:field name="acc_confirmed_by_desc" expression="(select description from sys_user where user_id=t1.acc_confirmed_by)" forInsert="false" forUpdate="false"/>
<bm:field name="receipt_type_n" expression="(select v.code_value_name from sys_code_values_v v where v.code = 'RECEIPT_TYPE' and v.code_value =t1.receipt_type)" forInsert="false" forUpdate="false"/>
</bm:fields>
<bm:features>
<f:standard-who/>
</bm:features>
<bm:primary-key>
<bm:pk-field name="transaction_id"/>
</bm:primary-key>
<bm:data-filters>
<bm:data-filter name="query" expression="(t1.company_id=${/session/@company_id} and t1.posted_flag=&apos;Y&apos; and t1.reversed_flag=&apos;N&apos; and write_off_flag&lt;&gt; &apos;FULL&apos; and returned_flag &lt;&gt; &apos;FULL&apos; and t1.transaction_type in (&apos;RECEIPT&apos;,&apos;ADVANCE_RECEIPT&apos;) and (nvl(t1.returned_amount, 0)+nvl(t1.write_off_amount, 0)&lt;t1.transaction_amount)) "/>
<bm:data-filter name="query" expression="(t1.company_id=${/session/@company_id} and t1.posted_flag=&apos;Y&apos; and t1.reversed_flag=&apos;N&apos; and write_off_flag&lt;&gt; &apos;FULL&apos; and returned_flag not in ( &apos;FULL&apos;,&apos;RETURN&apos;) and t1.transaction_type in (&apos;RECEIPT&apos;,&apos;ADVANCE_RECEIPT&apos;) and (nvl(t1.returned_amount, 0)+nvl(t1.write_off_amount, 0)&lt;t1.transaction_amount)) "/>
<bm:data-filter name="query" expression="(t1.confirmed_flag=&apos;APPROVED&apos; and t1.write_off_flag in(&apos;NOT&apos;,&apos;PARTIAL&apos;))"/>
</bm:data-filters>
<bm:query-fields>
<bm:query-field name="transaction_type" queryExpression="t1.transaction_type=${@transaction_type}"/>
<bm:query-field name="bp_name" queryExpression="t1.bp_id=${@bp_id}"/>
<bm:query-field name="transaction_num_from" queryExpression="t1.transaction_num like ${@transaction_num_from}"/>
<!--<bm:query-field name="transaction_num_to" queryExpression="t1.transaction_num &lt;= ${@transaction_num_to}"/>-->
<bm:query-field name="bank_slip_num_from" queryExpression="t1.bank_slip_num like ${@bank_slip_num_from}"/>
<!--<bm:query-field name="bank_slip_num_to" queryExpression="t1.bank_slip_num &lt;= ${@bank_slip_num_to}"/>-->
<bm:query-field field="confirmed_flag" queryExpression="t1.confirmed_flag =${@confirmed_flag}"/>
<bm:query-field field="write_off_flag" queryExpression="t1.write_off_flag =${@write_off_flag}"/>
<bm:query-field field="bp_bank_account_name" queryOperator="like"/>
<bm:query-field field="receipt_type" queryOperator="="/>
<bm:query-field field="opposite_band_na" queryOperator="="/>
<bm:query-field name="transaction_num_from" queryExpression="t1.transaction_num &gt;= ${@transaction_num_from}"/>
<bm:query-field name="transaction_num_to" queryExpression="t1.transaction_num &lt;= ${@transaction_num_to}"/>
<bm:query-field name="bank_slip_num" queryExpression="t1.bank_slip_num like &apos;%&apos;||${@bank_slip_num}||&apos;%&apos;"/>
<!-- <bm:query-field name="bank_slip_num_to" queryExpression="t1.bank_slip_num &lt;= ${@bank_slip_num_to}"/>-->
<bm:query-field name="transaction_amount_from" queryExpression="t1.transaction_amount &gt;= ${@transaction_amount_from}"/>
<bm:query-field name="transaction_amount_to" queryExpression="t1.transaction_amount &lt;= ${@transaction_amount_to}"/>
<bm:query-field name="currency_code_from" queryExpression="t1.currency_code &gt;= ${@currency_code_from}"/>
<bm:query-field name="currency_code_to" queryExpression="t1.currency_code &lt;= ${@currency_code_to}"/>
<bm:query-field name="bank_account_code_from" queryExpression="(select a.bank_account_code from csh_bank_account a where a.bank_account_id=t1.bank_account_id) = ${@bank_account_code_from}"/>
<!--<bm:query-field name="bank_account_code_to" queryExpression="(select a.bank_account_code from csh_bank_account a where a.bank_account_id=t1.bank_account_id) &lt;= ${@bank_account_code_to}"/>-->
<bm:query-field name="transaction_date_from" queryExpression="trunc(t1.transaction_date) &gt;= to_date(${@transaction_date_from},&apos;YYYY-MM-DD&apos;)"/>
<bm:query-field name="transaction_date_to" queryExpression="trunc(t1.transaction_date) &lt;= to_date(${@transaction_date_to},&apos;YYYY-MM-DD&apos;)"/>
<bm:query-field name="payment_method_id" queryExpression="t1.payment_method_id =${@payment_method_id}"/>
<bm:query-field name="returned_flag" queryExpression="t1.returned_flag=${@returned_flag}"/>
<bm:query-field name="period_name" queryExpression="t1.period_name=${@period_name}"/>
<bm:query-field name="bank_account_code" queryExpression="exists (select a.bank_account_code from csh_bank_account a where a.bank_account_id=t1.bank_account_id and a.bank_account_code = ${@bank_account_code})"/>
<bm:query-field name="bank_account_code_from" queryExpression="(select a.bank_account_code from csh_bank_account a where a.bank_account_id=t1.bank_account_id) &gt;= ${@bank_account_code_from}"/>
<bm:query-field name="bank_account_code_to" queryExpression="(select a.bank_account_code from csh_bank_account a where a.bank_account_id=t1.bank_account_id) &lt;= ${@bank_account_code_to}"/>
<bm:query-field name="transaction_date_from" queryExpression="transaction_date &gt;= to_date(${@transaction_date_from},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field name="transaction_date_to" queryExpression="transaction_date &lt;= to_date(${@transaction_date_to},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field name="user_id" queryExpression="t1.created_by=${@user_id}"/>
<bm:query-field name="receipt" queryExpression="(t1.transaction_type=${@receipt} or t1.transaction_type=${@advance_receipt})"/>
<bm:query-field name="full_write_off_flag" queryExpression="t1.write_off_flag!=${@full_write_off_flag}"/>
<bm:query-field name="full_returned_flag" queryExpression="t1.returned_flag!=${@full_returned_flag}"/>
<bm:query-field name="not_write_off_flag" queryExpression="t1.write_off_flag!=${@not_write_off_flag}"/>
<bm:query-field name="not_reversed_flag_r" queryExpression="t1.reversed_flag!=${@not_reversed_flag_r}"/>
<bm:query-field name="bp_id_from" queryExpression="t1.bp_id&gt;=${@bp_id_from}"/>
<bm:query-field name="bp_id_to" queryExpression="t1.bp_id&lt;=${@bp_id_to}"/>
<bm:query-field field="write_off_flag" queryOperator="="/>
<bm:query-field field="posted_flag" queryOperator="="/>
<bm:query-field field="returned_flag" queryOperator="="/>
<bm:query-field field="reversed_flag" queryOperator="="/>
<bm:query-field field="period_name" queryOperator="="/>
<bm:query-field field="payment_method_id" queryOperator="="/>
<!-- <bm:query-field field="posted_flag" queryOperator="="/> -->
<bm:query-field field="transaction_category" queryOperator="="/>
<bm:query-field field="transaction_type" queryOperator="="/>
<bm:query-field field="transaction_id" queryOperator="="/>
<bm:query-field field="collection_classes" queryOperator="="/>
<bm:query-field name="bp_id_from" queryExpression="t1.bp_id &gt;= ${@bp_id_from}"/>
<bm:query-field name="bp_id_to" queryExpression="t1.bp_id &lt;= ${@bp_id_to}"/>
<bm:query-field name="reverse_write_off_amount_flag" queryExpression="t1.write_off_amount &gt; 0 and ${@reverse_write_off_amount_flag}=&apos;Y&apos;"/>
<bm:query-field field="bp_id" queryOperator="="/>
<bm:query-field name="description" queryExpression="t1.description like &apos;%&apos;||${@description}||&apos;%&apos;"/>
<bm:query-field name="bank_account_num" queryExpression="(select a.bank_account_num from csh_bank_account a where a.bank_account_id=t1.bank_account_id) like &apos;%&apos;||upper(${@bank_account_num})||&apos;%&apos;"/>
<bm:query-field name="contract_number" queryExpression="(SELECT cc.contract_number FROM con_contract cc WHERE cc.contract_id = t1.ref_contract_id) like &apos;%&apos;||upper(${@contract_number})||&apos;%&apos;"/>
</bm:query-fields>
</bm:model>
......@@ -8,76 +8,80 @@
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm">
<bm:operations>
<bm:operation name="query">
<bm:query-sql><![CDATA[select r.return_id,
t1.transaction_num,
t1.transaction_date,
t1.currency_code,
(select gc.currency_name
from gld_currency_vl gc
where gc.currency_code = t1.currency_code) as currency_name,
t1.transaction_amount,
(select a.bank_account_code
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_code,
(select a.bank_account_name
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_name,
(select d.bp_name from hls_bp_master_v d where d.bp_id = t1.bp_id) as bp_name,
(select b.description
from hls_bp_category b
where b.bp_category = t1.bp_category) as bp_category_display,
t1.bank_slip_num,
t1.period_name,
(select cp.description
from csh_payment_method cp
where cp.payment_method_id = t1.payment_method_id) as payment_method_display,
t1.exchange_rate,
(select tv.type_name
from gld_exchangerate_types_vl tv
where tv.type_code = t1.exchange_rate_type) as exchange_rate_type_display,
(select a.bank_account_code
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_code,
(select a.bank_account_name
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_name,
(select a.bank_account_num
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_num,
t1.bp_bank_account_num,
(select a.bank_account_code
from hls_bp_master_bank_account a
where a.bank_account_id = t1.bp_bank_account_id) as bp_bank_account_code,
(select a.bank_account_name
from hls_bp_master_bank_account a
where a.bank_account_id = t1.bp_bank_account_id) as bp_bank_account_name,
(select u.employee_name from sys_user_v u where u.user_id=t1.created_by )user_desc,
r.notes,
(select h.bp_name
from hls_bp_master h
where h.bp_id = (select c.bp_id_tenant
from con_contract c
where contract_id = r.ref_contract_id)) bp_name_t,
(select h.bp_name
from hls_bp_master h
where h.bp_id = (select c.bp_id_agent_level1
from con_contract c
where contract_id = r.ref_contract_id)) agent_name_t,
(select c.contract_number
from con_contract c
where contract_id = r.ref_contract_id) contract_number_t
from
csh_transaction t1, csh_transaction_return r
where
t1.return_from_csh_trx_id = r.transaction_id and
t1.transaction_id = r.return_transaction_id and
r.status = 'APPROVED' and
t1.return_from_csh_trx_id = ${@return_from_csh_trx_id}
<bm:query-sql><![CDATA[select r.return_id,
r.this_return_amount,
t1.transaction_num,
t1.transaction_date,
t1.currency_code,
b.bank_account_num,
b.bank_branch_name,
bank_slip_num,
t1.period_name,
(select gc.currency_name
from gld_currency_vl gc
where gc.currency_code = t1.currency_code) as currency_name,
t1.transaction_amount,
(select a.bank_account_code
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_code,
(select a.bank_account_name
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_name,
(select d.bp_name from hls_bp_master_v d where d.bp_id = t1.bp_id) as bp_name,
(select b.description
from hls_bp_category b
where b.bp_category = t1.bp_category) as bp_category_display,
(select cp.description
from csh_payment_method cp
where cp.payment_method_id = t1.payment_method_id) as payment_method_display,
t1.exchange_rate,
(select tv.type_name
from gld_exchangerate_types_vl tv
where tv.type_code = t1.exchange_rate_type) as exchange_rate_type_display,
(select a.bank_account_code
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_code,
(select a.bank_account_name
from csh_bank_account a
where a.bank_account_id = t1.bank_account_id
and a.company_id = t1.company_id) as bank_account_name,
(select a.bank_account_code
from hls_bp_master_bank_account a
where a.bank_account_id = t1.bp_bank_account_id) as bp_bank_account_code,
(select a.bank_account_name
from hls_bp_master_bank_account a
where a.bank_account_id = t1.bp_bank_account_id) as bp_bank_account_name,
(select u.employee_name
from sys_user_v u
where u.user_id = t1.created_by) user_desc,
r.notes,
(select h.bp_name
from hls_bp_master h
where h.bp_id = (select c.bp_id_tenant
from con_contract c
where contract_id = r.ref_contract_id)) bp_name_t,
(select h.bp_name
from hls_bp_master h
where h.bp_id = (select c.bp_id_agent_level1
from con_contract c
where contract_id = r.ref_contract_id)) agent_name_t,
(select c.contract_number
from con_contract c
where contract_id = r.ref_contract_id) contract_number_t
from csh_transaction t1,
csh_transaction_return r,
hls_bp_master_bank_account b
where
t1.transaction_id = r.transaction_id
and r.bp_id = b.bp_id
and r.status = 'APPROVED'
and t1.transaction_id = ${@return_from_csh_trx_id}
]]></bm:query-sql>
</bm:operation>
</bm:operations>
......
......@@ -10,24 +10,15 @@
t1.contract_number,
t1.contract_name,
t1.bp_id_tenant,
t2.cashflow_id,
t2.times,
t2.cf_item,
(select a.cf_item_desc from hls_cashflow_item_v a where a.cf_item = t2.cf_item) as cf_item_desc,
t2.due_amount,
(t2.due_amount-nvl(t2.received_amount,0)) as unreceived_amount,
(t2.due_amount - nvl(t2.received_amount,0)) as left_amount,
(t2.principal - nvl(t2.received_principal,0)) as left_principal,
(t2.interest - nvl(t2.received_interest,0)) as left_interest,
t2.due_date
from con_contract t1,
con_contract_cashflow t2
where t1.contract_id = t2.contract_id and
t1.contract_status in ('INCEPT','SIGN','ET','AGENT_TERMINATE','LOSSSHARE_TERMINATE','VIRTUAL_TERMINATE','TERMINATE')
(select bp_name from hls_bp_master where bp_id = t1.bp_id_tenant) bp_name,
(SELECT sc.code_value_name
FROM sys_code_values_v sc
WHERE sc.code = 'CON500_CONTRACT_STATUS'
AND sc.code_value = t1.contract_status) contract_status_desc
from con_contract t1
where
t1.contract_status in ('INCEPT','ET')
and t1.data_class = 'NORMAL'
and t2.cf_status = 'RELEASE'
and t2.cf_direction = 'INFLOW'
and t2.due_amount > nvl(t2.received_amount,0)
and t1.company_id in ((
select company_id
from fnd_companies t
......@@ -39,37 +30,29 @@ select t.parent_company_id company_id
where t.parent_company_id is not null
and (t.company_id = ${/session/@company_id} or t.parent_company_id = ${/session/@company_id})))) t
#WHERE_CLAUSE#
order by t.due_date,t.times,t.cf_item
]]></bm:query-sql>
</bm:operation>
</bm:operations>
<bm:fields>
<bm:field name="contract_id"/>
<bm:field name="bp_id_tenant"/>
<bm:field name="contract_number"/>
<bm:field name="contract_name"/>
<bm:field name="times"/>
<bm:field name="cf_item"/>
<bm:field name="cf_item_desc"/>
<bm:field name="unreceived_amount"/>
<bm:field name="due_amount"/>
<bm:field name="due_date" datatype="java.util.Date"/>
<bm:field name="cashflow_id"/>
<bm:field name="bp_name"/>
<bm:field name="contract_status_desc"/>
<bm:field name="dd_bank_account_num"/>
<bm:field name="dd_bank_account_name"/>
<bm:field name="left_amount"/>
<bm:field name="left_principal"/>
<bm:field name="left_interest"/>
</bm:fields>
<bm:query-fields>
<bm:query-field field="contract_id" queryOperator="="/>
<bm:query-field field="contract_number" queryOperator="="/>
<bm:query-field field="cf_item_desc" queryOperator="="/>
<bm:query-field name="due_amount_from" queryExpression="due_amount &gt;= ${@due_amount_from}"/>
<bm:query-field name="due_amount_to" queryExpression="due_amount &lt;= ${@due_amount_to}"/>
<bm:query-field name="due_date_from" queryExpression="due_date &gt;= to_date(${@due_date_from},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field name="due_date_to" queryExpression="due_date &lt;= to_date(${@due_date_to},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field field="contract_number" queryOperator="like"/>
<bm:query-field name="due_date_from"
queryExpression="due_date &gt;= to_date(${@due_date_from},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field name="due_date_to"
queryExpression="due_date &lt;= to_date(${@due_date_to},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field field="dd_bank_account_num" queryOperator="="/>
<bm:query-field field="dd_bank_account_name" queryOperator="="/>
<bm:query-field name="bp_id_tenant" queryExpression="t.bp_id = ${@bp_id}"/>
<bm:query-field name="bp_name" queryExpression="t.bp_name like '%' || ${@bp_name} || '%'"/>
</bm:query-fields>
</bm:model>
<?xml version="1.0" encoding="UTF-8"?>
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm">
<bm:operations>
<bm:operation name="query">
<bm:query-sql><![CDATA[
select times,
cf_item,
cashflow_id,
(select cf_item_desc from hls_cashflow_item_v where cf_item = t.cf_item and enabled_flag = 'Y' and cf_type = t.cf_type) cf_item_desc,
contract_id,
to_char(due_date,'yyyy-mm-dd') due_date,
due_amount,
principal - nvl(received_principal,0) unreceived_principal,
interest - nvl(received_interest,0) unreceived_interest,
due_amount - nvl(received_amount,0) unreceived_amount,
decode(cf_item,1,due_amount-nvl(received_amount,0)) unreceived_rental
from con_contract_cashflow t
#WHERE_CLAUSE#
order by times, due_date
]]></bm:query-sql>
</bm:operation>
</bm:operations>
<bm:fields>
<bm:field name="contract_id"/>
<bm:field name="cashflow_id"/>
<bm:field name="times"/>
<bm:field name="cf_item"/>
<bm:field name="cf_item_desc"/>
<bm:field name="due_date"/>
<bm:field name="due_amount"/>
<bm:field name="unreceived_principal"/>
<bm:field name="unreceived_interest"/>
<bm:field name="unreceived_amount"/>
<bm:field name="unreceived_rental"/>
</bm:fields>
<bm:query-fields>
<bm:query-field name="contract_id" queryExpression="t.contract_id = ${@contract_id}"/>
<!-- <bm:query-field name="due_date_from" queryExpression="t.due_date between to_date(${@due_date_from},'yyyy-mm-dd') and nvl(to_date(${@due_date_to},'yyyy-mm-dd'),t.due_date)"/>-->
<!-- <bm:query-field name="due_date_to" queryExpression="t.due_date between nvl(to_date(${@due_date_from},'yyyy-mm-dd'),t.due_date) and to_date(${@due_date_to},'yyyy-mm-dd')"/>-->
<bm:query-field name="cf_item" queryExpression="t.cf_item = ${@cf_item}"/>
<bm:query-field name="due_date_from"
queryExpression="due_date &gt;= to_date(${@due_date_from},&apos;yyyy-mm-dd&apos;)"/>
<bm:query-field name="due_date_to"
queryExpression="due_date &lt;= to_date(${@due_date_to},&apos;yyyy-mm-dd&apos;)"/>
</bm:query-fields>
<bm:data-filters>
<bm:data-filter name="query" expression="t.cf_status = 'RELEASE' and t.write_off_flag != 'FULL'"/>
</bm:data-filters>
</bm:model>
<?xml version="1.0" encoding="UTF-8"?>
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm" xmlns:f="leaf.database.features">
<bm:operations>
<bm:operation name="update">
<bm:update-sql><![CDATA[
begin
-- Call the procedure
csh_write_off_pkg.reverse_write_off_all(p_transaction_id => ${@transaction_id},
p_reversed_date => trunc(sysdate),
p_description => '反冲',
p_user_id => ${/session/@user_id});
end;
]]>
</bm:update-sql>
</bm:operation>
</bm:operations>
</bm:model>
......@@ -96,6 +96,7 @@ where transaction_id = ${@transaction_id}
<bm:field name="ref_v01"/>
<bm:field name="ref_v05"/>
<bm:field name="purpose"/>
<bm:field name="paid_byother_flag_n" expression="(select code_value_name from sys_code_values_v where code = 'PAID_BYOTHER_FLAG' and code_value = t1.paid_byother_flag)"/>
<bm:field name="contract_number" expression="(select cc.contract_number from con_contract cc where cc.contract_id = t1.ref_contract_id)"/>
<!--add by chenlingfeng-->
<bm:field name="write_off_flag_desc" forInsert="false" forUpdate="false"/>
......
<?xml version="1.0" encoding="UTF-8"?>
<!--
$Author: leaf Generator
$Date: Mon Sep 16 09:55:25 CST 2019
$Revision: 1.0
$Purpose:
-->
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm" xmlns:e="leaf.service.exception" xmlns:o="leaf.database.local.oracle" xmlns:f="leaf.database.features" alias="t1" baseTable="CSH_TRANSACTION_PLAN">
<bm:fields>
<bm:field name="plan_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="PLAN_ID" prompt="CSH_TRANSACTION_PLAN.PLAN_ID"/>
<bm:field name="transaction_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="TRANSACTION_ID" prompt="CSH_TRANSACTION_PLAN.TRANSACTION_ID"/>
<bm:field name="write_off_type" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="WRITE_OFF_TYPE" prompt="CSH_TRANSACTION_PLAN.WRITE_OFF_TYPE"/>
<bm:field name="bp_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="BP_ID" prompt="CSH_TRANSACTION_PLAN.BP_ID"/>
<bm:field name="bp_agent_name" expression="(select bp_name from hls_bp_master where bp_id = t1.bp_id)" prompt="代理店" forInsert="false" forceUpdate="false"/>
<bm:field name="bp_name" expression="(select bp_name from hls_bp_master where bp_id = t1.bp_id)" prompt="商业伙伴" forInsert="false" forceUpdate="false"/>
<bm:field name="write_off_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_AMOUNT" prompt="核销金额"/>
<bm:field name="write_off_date" databaseType="DATE" datatype="java.util.Date" physicalName="WRITE_OFF_DATE" prompt="CSH_TRANSACTION_PLAN.WRITE_OFF_DATE"/>
<bm:field name="company_id" databaseType="NUMBER" databasetype="java.lang.Long" physicalName="COMPANY_ID" prompt="CSH_TRANSACTION_PLAN.COMPANY_ID"/>
</bm:fields>
<bm:primary-key>
<bm:pk-field name="plan_id"/>
</bm:primary-key>
<bm:features>
<o:sequence-pk sequenceName="csh_transaction_plan_s"/>
<f:standard-who xmlns:f="leaf.database.features"/>
</bm:features>
<bm:data-filters>
<bm:data-filter name="query" expression="(t1.transaction_id=${@transaction_id} and t1.company_id=${/session/@company_id} and t1.write_off_type = ${@write_off_type})"/>
</bm:data-filters>
</bm:model>
\ No newline at end of file
......@@ -5,7 +5,7 @@
$Revision: 1.0
$Purpose:
-->
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm" xmlns:f="leaf.database.features" alias="t1" baseTable="CSH_TRANSACTION" defaultOrderBy="t1.transaction_date ,t1.transaction_num desc">
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm" xmlns:f="leaf.database.features" alias="t1" baseTable="CSH_TRANSACTION" defaultOrderBy="t1.transaction_date desc,t1.transaction_num desc">
<bm:fields>
<bm:field name="transaction_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="TRANSACTION_ID" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_ID"/>
<bm:field name="transaction_num" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="TRANSACTION_NUM" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_NUM"/>
......@@ -80,8 +80,10 @@
<bm:field name="returned_flag_desc" forInsert="false" forUpdate="false" prompt="CSH511.CSH_TRANSACTION.RETURNED_FLAG"/>
<bm:field name="unallocate_amount" expression="(nvl(t1.transaction_amount,0)-nvl(t1.write_off_amount,0)-nvl(t1.returned_amount,0)-nvl((select sum(i.write_off_amount) from csh_write_off_interface i where i.trx_interface_id = t1.transaction_id and i.record_type is not null),0))" forInsert="false" forUpdate="false" />
<bm:field name="status" expression="nvl(t1.status,&apos;NEW&apos;)" forInsert="false" forUpdate="false"/>
<bm:field name="status_desc" expression="(select code_value_name from sys_code_values_v where code = 'CSH_WRITE_OFF_STATUS' and code_value = nvl(t1.status,'NEW'))" />
<bm:field name="ref_contract_id"/>
<bm:field name="csh_bp_name"/>
<bm:field name="receipt_type_desc" expression="(select code_value_name from sys_code_values_v where code = 'RECEIPT_TYPE' and code_value = t1.receipt_type)"/>
<bm:field name="contract_number" expression="(select cc.contract_number from con_contract cc where cc.contract_id = t1.ref_contract_id)"/>
<!--add by chenlingfeng-->
<bm:field name="bank_name" expression="(select a.bank_short_name from csh_bank_account_v a where a.bank_account_id=t1.bank_account_id)" forInsert="false" forUpdate="false"/>
......@@ -96,6 +98,8 @@
<!--end-->
<!--add by lisitong-->
<bm:field name="approving_return_amount" datatype="java.lang.Double" expression="(select nvl(sum(ctr.this_return_amount),0) from csh_transaction_return ctr where ctr.transaction_id = t1.transaction_id and ctr.status = 'APPROVING')" forInsert="false" forUpdate="false" prompt="审批中退款金额"/>
<bm:field name="created_user_name" expression="(select description from sys_user where user_id = t1.created_by)" forceUpdate="false" forInsert="false"/>
<bm:field name="confirm_user_name" expression="(select description from sys_user where user_id = t1.confirmed_by)" forceUpdate="false" forInsert="false"/>
<!--end-->
</bm:fields>
<bm:features>
......@@ -144,7 +148,7 @@
<bm:query-field name="reverse_write_off_amount_flag" queryExpression="t1.write_off_amount &gt; 0 and ${@reverse_write_off_amount_flag}=&apos;Y&apos;"/>
<bm:query-field field="bp_id" queryOperator="="/>
<bm:query-field name="status" queryExpression="nvl(t1.status,&apos;NEW&apos;) = ${@status}"/>
<bm:query-field name="bp_name" queryExpression="t1.bp_id in (select d.bp_id from hls_bp_master d where d.bp_name like &apos;%&apos;||${@bp_name_from}||&apos;%&apos;)"/>
<!-- <bm:query-field name="bp_name" queryExpression="t1.bp_id in (select d.bp_id from hls_bp_master d where d.bp_name like &apos;%&apos;||${@bp_name_from}||&apos;%&apos;)"/>-->
<bm:query-field name="contract_number" queryExpression="(SELECT cc.contract_number FROM con_contract cc WHERE cc.contract_id = t1.ref_contract_id) like &apos;%&apos;||upper(${@contract_number})||&apos;%&apos;"/>
<!--add by chenlingfeng-->
<bm:query-field name="full_write_off_flag" queryExpression="(t1.write_off_flag = ${@full_write_off_flag} or t1.write_off_flag = ${@partial_write_off_flag} or t1.write_off_flag = ${@not_write_off_flag})"/>
......@@ -162,6 +166,9 @@
</bm:query-fields>
<bm:data-filters>
<bm:data-filter name="query" expression="(t1.company_id=${/session/@company_id})"/>
<bm:data-filter name="type" expression="t1.transaction_type in ('ADVANCE_RECEIPT','RECEIPT') and t1.returned_flag != 'FULL' and t1.reversed_flag = 'N' and nvl(t1.deposit_flag,'N')='N' "/>
<!-- <bm:data-filter name="type" expression="t1.transaction_type in ('ADVANCE_RECEIPT','RECEIPT') and t1.returned_flag != 'FULL' and t1.reversed_flag = 'N' and nvl(t1.deposit_flag,'N')='N' "/>-->
<bm:data-filter name="type" expression="t1.transaction_type in ('ADVANCE_RECEIPT','RECEIPT') and t1.returned_flag != 'FULL' and nvl(t1.deposit_flag,'N')='N' and t1.confirmed_flag = 'APPROVED' "/>
</bm:data-filters>
</bm:model>
<?xml version="1.0" encoding="UTF-8"?>
<bm:model xmlns:bm="http://www.leaf-framework.org/schema/bm" xmlns:f="leaf.database.features">
<bm:operations>
<bm:operation name="delete">
<bm:update-sql><![CDATA[
begin
csh_transaction_interface_pkg.delete_write_off_interface(
p_write_off_interface_id=>${@write_off_interface_id},
p_user_id => ${/session/@user_id}
);
end;
]]>
</bm:update-sql>
</bm:operation>
<bm:operation name="insert">
<bm:update-sql><![CDATA[
begin
-- Call the procedure
csh_transaction_interface_pkg.insert_write_off_interface(p_write_off_interface_id =>
${@write_off_interface_id},
p_record_type => ${@record_type},
p_transaction_id => ${@trx_interface_id},
p_company_id => ${@company_id},
p_contract_number => ${@contract_number},
p_contract_id => ${@contract_id},
p_write_off_type => ${@write_off_type},
p_write_off_date => to_date(${@write_off_date},'yyyy-mm-dd'),
p_write_off_period_name => ${@write_off_period_name},
p_write_off_period_num => ${@write_off_period_num},
p_write_off_amount => ${@write_off_amount},
p_write_off_bp_id => ${@write_off_bp_id},
p_batch_id => ${@batch_id},
p_write_off_cashflow_id => ${@write_off_cashflow_id},
p_write_off_times => ${@write_off_times},
p_write_off_cf_item => ${@write_off_cf_item},
p_write_off_principal => ${@write_off_principal},
p_write_off_interest => ${@write_off_interest},
p_write_off_description => ${@write_off_description},
p_post_flag => ${@post_flag},
p_write_off_classification => ${@write_off_classification},
p_journal_date => to_date(${@journal_date},'yyyy-mm-dd'),
p_user_id => ${/session/@user_id});
end;
]]>
</bm:update-sql>
</bm:operation>
<bm:operation name="update">
<bm:update-sql><![CDATA[
begin
-- Call the procedure
csh_transaction_interface_pkg.insert_write_off_interface(p_write_off_interface_id =>
${@write_off_interface_id},
p_record_type => ${@record_type},
p_transaction_id => ${@trx_interface_id},
p_company_id => ${@company_id},
p_contract_number => ${@contract_number},
p_contract_id => ${@contract_id},
p_write_off_type => ${@write_off_type},
p_write_off_date => to_date(${@write_off_date},'yyyy-mm-dd'),
p_write_off_period_name => ${@write_off_period_name},
p_write_off_period_num => ${@write_off_period_num},
p_write_off_amount => ${@write_off_amount},
p_write_off_bp_id => ${@write_off_bp_id},
p_batch_id => ${@batch_id},
p_write_off_cashflow_id => ${@write_off_cashflow_id},
p_write_off_times => ${@write_off_times},
p_write_off_cf_item => ${@write_off_cf_item},
p_write_off_principal => ${@write_off_principal},
p_write_off_interest => ${@write_off_interest},
p_write_off_description => ${@write_off_description},
p_post_flag => ${@post_flag},
p_write_off_classification => ${@write_off_classification},
p_journal_date => to_date(${@journal_date},'yyyy-mm-dd'),
p_user_id => ${/session/@user_id});
end;
]]>
</bm:update-sql>
</bm:operation>
<bm:operation name="query">
<bm:query-sql><![CDATA[
select * from (
select write_off_id,
(select company_id from csh_transaction where transaction_id = t1.csh_transaction_id) company_id,
t1.csh_transaction_id transaction_id,
(select contract_number from con_contract where contract_id = t1.contract_id) contract_number,
contract_id,
cashflow_id write_off_cashflow_id,
(select a.due_date from con_contract_cashflow a where a.cashflow_id = t1.cashflow_id) due_date,
write_off_date,
write_off_type,
period_name write_off_period_name,
t1.INTERNAL_PERIOD_NUM write_off_period_num,
times write_off_times,
cf_item write_off_cf_item,
(select a.cf_item_desc from hls_cashflow_item_v a where a.cf_item = t1.cf_item) write_off_cf_item_desc,
t1.WRITE_OFF_DUE_AMOUNT write_off_amount,
t1.WRITE_OFF_PRINCIPAL,
t1.WRITE_OFF_INTEREST,
(select bp_name from hls_bp_master where bp_id = t1.bp_id) bp_tenant_name
from csh_write_off t1) t
#WHERE_CLAUSE#
]]></bm:query-sql>
</bm:operation>
</bm:operations>
<bm:fields>
<bm:field name="company_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="COMPANY_ID"
prompt="CSH_WRITE_OFF.COMPANY_ID"/>
<bm:field name="contract_number" databaseType="VARCHAR2" datatype="java.lang.String"
physicalName="CONTRACT_NUMBER" prompt="合同编号"/>
<bm:field name="contract_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="CONTRACT_ID"
prompt="CSH_WRITE_OFF.CONTRACT_ID"/>
<bm:field name="write_off_cashflow_id" databaseType="NUMBER" datatype="java.lang.Long"
physicalName="WRITE_OFF_CASHFLOW_ID" prompt="CSH_WRITE_OFF.WRITE_OFF_CASHFLOW_ID"/>
<bm:field name="due_date" datatype="java.util.Date" forInsert="false" forUpdate="false"/>
<bm:field name="write_off_type" databaseType="VARCHAR2" datatype="java.lang.String"
physicalName="WRITE_OFF_TYPE" prompt="CSH_WRITE_OFF.WRITE_OFF_TYPE"/>
<bm:field name="write_off_date" databaseType="DATE" datatype="java.util.Date" physicalName="WRITE_OFF_DATE"
prompt="CSH_WRITE_OFF.WRITE_OFF_DATE"/>
<bm:field name="write_off_period_name" databaseType="VARCHAR2" datatype="java.lang.String"
physicalName="WRITE_OFF_PERIOD_NAME" prompt="CSH_WRITE_OFF.WRITE_OFF_PERIOD_NAME"/>
<bm:field name="write_off_period_num" databaseType="NUMBER" datatype="java.lang.Long"
physicalName="WRITE_OFF_PERIOD_NUM" prompt="CSH_WRITE_OFF.WRITE_OFF_PERIOD_NUM"/>
<bm:field name="write_off_times" databaseType="NUMBER" datatype="java.lang.Long" physicalName="WRITE_OFF_TIMES"
prompt="CSH_WRITE_OFF.WRITE_OFF_TIMES"/>
<bm:field name="write_off_cf_item" databaseType="NUMBER" datatype="java.lang.Long"
physicalName="WRITE_OFF_CF_ITEM" prompt="CSH_WRITE_OFF.WRITE_OFF_CF_ITEM"/>
<bm:field name="write_off_cf_item_desc" forInsert="false" forUpdate="false"/>
<bm:field name="write_off_amount" databaseType="NUMBER" datatype="java.lang.Double"
physicalName="WRITE_OFF_AMOUNT" prompt="核销金额"/>
<!-- <bm:field name="write_off_principal" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_PRINCIPAL" prompt="CSH_WRITE_OFF.WRITE_OFF_PRINCIPAL"/>-->
<!-- <bm:field name="write_off_interest" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_INTEREST" prompt="CSH_WRITE_OFF.WRITE_OFF_INTEREST"/>-->
<!-- <bm:field name="write_off_description" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="WRITE_OFF_DESCRIPTION" prompt="CSH_WRITE_OFF.WRITE_OFF_DESCRIPTION"/>-->
<bm:field name="write_off_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="WRITE_OFF_ID"
prompt="CSH_WRITE_OFF.WRITE_OFF_ID"/>
<bm:field name="transaction_id"/>
<bm:field name="bp_tenant_name"/>
</bm:fields>
<bm:query-fields>
<bm:query-field field="transaction_id" queryOperator="="/>
</bm:query-fields>
<bm:data-filters>
<bm:data-filter name="query" expression="t.contract_id is not null"/>
</bm:data-filters>
</bm:model>
......@@ -78,7 +78,7 @@ end;
<bm:field name="trx_interface_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="TRX_INTERFACE_ID" prompt="CSH_WRITE_OFF_INTERFACE.TRX_INTERFACE_ID"/>
<!-- <bm:field name="trx_number" databaseType="NUMBER" datatype="java.lang.Long" physicalName="TRX_NUMBER" prompt="CSH_WRITE_OFF_INTERFACE.TRX_NUMBER"/> -->
<bm:field name="company_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="COMPANY_ID" prompt="CSH_WRITE_OFF_INTERFACE.COMPANY_ID"/>
<bm:field name="contract_number" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="CONTRACT_NUMBER" />
<bm:field name="contract_number" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="CONTRACT_NUMBER" prompt="合同编号" />
<bm:field name="contract_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="CONTRACT_ID" prompt="CSH_WRITE_OFF_INTERFACE.CONTRACT_ID"/>
<bm:field name="write_off_cashflow_id" databaseType="NUMBER" datatype="java.lang.Long" physicalName="WRITE_OFF_CASHFLOW_ID" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_CASHFLOW_ID"/>
<bm:field name="due_date" datatype="java.util.Date" expression="(select a.due_date from con_contract_cashflow a where a.cashflow_id = t1.write_off_cashflow_id)" forInsert="false" forUpdate="false"/>
......@@ -90,7 +90,7 @@ end;
<bm:field name="write_off_times" databaseType="NUMBER" datatype="java.lang.Long" physicalName="WRITE_OFF_TIMES" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_TIMES"/>
<bm:field name="write_off_cf_item" databaseType="NUMBER" datatype="java.lang.Long" physicalName="WRITE_OFF_CF_ITEM" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_CF_ITEM"/>
<bm:field name="write_off_cf_item_desc" expression="(select a.cf_item_desc from hls_cashflow_item_v a where a.cf_item = t1.write_off_cf_item)" forInsert="false" forUpdate="false"/>
<bm:field name="write_off_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_AMOUNT" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_AMOUNT"/>
<bm:field name="write_off_amount" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_AMOUNT" prompt="核销金额"/>
<bm:field name="write_off_principal" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_PRINCIPAL" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_PRINCIPAL"/>
<bm:field name="write_off_interest" databaseType="NUMBER" datatype="java.lang.Double" physicalName="WRITE_OFF_INTEREST" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_INTEREST"/>
<bm:field name="write_off_description" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="WRITE_OFF_DESCRIPTION" prompt="CSH_WRITE_OFF_INTERFACE.WRITE_OFF_DESCRIPTION"/>
......@@ -104,13 +104,16 @@ end;
<bm:field name="csh_bank_slip_num" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="CSH_BANK_SLIP_NUM" prompt="CSH_WRITE_OFF_INTERFACE.CSH_BANK_SLIP_NUM"/>
<bm:field name="error_message" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="ERROR_MESSAGE" prompt="CSH_WRITE_OFF_INTERFACE.ERROR_MESSAGE"/>
<bm:field name="trx_number" databaseType="VARCHAR2" datatype="java.lang.String" physicalName="TRX_NUMBER" prompt="事务编号"/>
<bm:field name="left_amount" expression="(select ca.due_amount - nvl(ca.received_amount,0) from con_contract_cashflow ca where ca.cashflow_id = t1.write_off_cashflow_id)" forInsert="false" forUpdate="false"/>
<bm:field name="left_amount" expression="(select decode(cf_item,1,ca.due_amount - nvl(ca.received_amount,0)) from con_contract_cashflow ca where ca.cashflow_id = t1.write_off_cashflow_id)" forInsert="false" forUpdate="false"/>
<bm:field name="unreceived_amount" expression="(select ca.due_amount - nvl(ca.received_amount,0) from con_contract_cashflow ca where ca.cashflow_id = t1.write_off_cashflow_id)" forInsert="false" forUpdate="false"/>
<bm:field name="left_principal" expression="(select ca.principal - nvl(ca.received_principal,0) from con_contract_cashflow ca where ca.cashflow_id = t1.write_off_cashflow_id)" forInsert="false" forUpdate="false"/>
<bm:field name="left_interest" expression="(select ca.interest - nvl(ca.received_interest,0) from con_contract_cashflow ca where ca.cashflow_id = t1.write_off_cashflow_id)" forInsert="false" forUpdate="false"/>
<bm:field name="unreceived_penalty" expression="(select ca.due_amount - nvl(ca.received_amount,0) from con_contract_cashflow ca where ca.contract_id = t1.contract_id and ca.times = t1.write_off_times and cf_item = 9)" forInsert="false" forUpdate="false"/>
<bm:field name="agent_id" databaseType="NUMBER" datatype="java.lang.Long"/>
<bm:field name="agent_id_desc" expression="(select hbm.bp_name from hls_bp_master hbm where hbm.bp_id = t1.agent_id)" forUpdate="false" forInsert="false"/>
<bm:field name="write_off_classification" lookupField="write_off_classification_desc" lookupCode="DS_CSH_WRITE_OFF_CLASSIFICATION" databaseType="VARCHAR2" datatype="java.lang.String" />
<bm:field name="write_off_classification_desc" forInsert="false" forUpdate="false"/>
<bm:field name="bp_tenant_name" expression="(select bp_name from hls_bp_master where bp_id = t1.write_off_bp_id)" forInsert="false" forUpdate="false"/>
<bm:field name="journal_date" databaseType="DATE" datatype="java.util.Date"/>
</bm:fields>
<bm:features>
......
......@@ -6,6 +6,9 @@ var override_queryfields = [
{
name : 'bp_name',
queryexpression : "exists (select 1 from hls_bp_master hr where hr.bp_id=t1.bp_id_tenant and hr.bp_name like ${@bp_name})"
},{
name : 'bp_id_agent_level1_n',
queryexpression : "exists (select 1 from hls_bp_master hr where hr.bp_id=t1.bp_id_agent_level1 and hr.bp_name like ${@bp_id_agent_level1_n})"
},
{
name : 'lease_start_date_from',
......@@ -14,6 +17,14 @@ var override_queryfields = [
{
name : 'lease_start_date_to',
queryexpression : "t1.lease_start_date between nvl(to_date(${@lease_start_date_from},'yyyy-mm-dd'),t1.lease_start_date) and to_date(${@lease_start_date_to},'yyyy-mm-dd')"
},
{
name : 'inception_of_lease_from',
queryexpression : "t1.inception_of_lease between to_date(${@inception_of_lease_from},'yyyy-mm-dd') and nvl(to_date(${@inception_of_lease_to},'yyyy-mm-dd'),t1.inception_of_lease)"
},
{
name : 'inception_of_lease_to',
queryexpression : "t1.inception_of_lease between nvl(to_date(${@inception_of_lease_from},'yyyy-mm-dd'),t1.inception_of_lease) and to_date(${@inception_of_lease_to},'yyyy-mm-dd')"
}, {
field : 'project_id',
queryoperator : "="
......
......@@ -36,7 +36,7 @@ var override_queryfields = [
queryoperator: "="
}, {
name: 'contract_name',
queryexpression: "t1.contract_number like ${@contract_number}"
queryexpression: "t1.contract_name like ${@contract_name}"
}, {
field: 'lease_channel',
queryoperator: "="
......
var add_datafilters = [
{
name:'contract_status',
expression:"t1.contract_status not in ('NEW','SIGN_RETURN')"
},
{
name : 'authority',
expression : "(exists (select 1 from aut_trx_user_authorize a1, aut_owner_user_authorize a2 where a1.trx_category = 'CONTRACT' and a1.trx_id = t1.contract_id and trunc(sysdate) between a1.start_date and nvl(a1.end_date, trunc(sysdate)) and a1.user_id = a2.owner_user_id and a1.trx_category = a2.trx_category and a2.authorized_user_id = ${/session/@user_id} and trunc(sysdate) between a2.start_date and nvl(a2.end_date, trunc(sysdate))))"
}
];
add_datafilter();
\ No newline at end of file
var add_datafilters = [
{
name: 'document_type',
expression: "t1.document_type = 'CARCON'"
},
{
name : 'authority',
expression : "(exists (select 1 from aut_trx_user_authorize a1, aut_owner_user_authorize a2 where a1.trx_category = 'CONTRACT' and a1.trx_id = t1.contract_id and trunc(sysdate) between a1.start_date and nvl(a1.end_date, trunc(sysdate)) and a1.user_id = a2.owner_user_id and a1.trx_category = a2.trx_category and a2.authorized_user_id = ${/session/@user_id} and trunc(sysdate) between a2.start_date and nvl(a2.end_date, trunc(sysdate))))"
}
];
add_datafilter();
\ No newline at end of file
......@@ -18,7 +18,7 @@
function open_contract_win(ds_id, record_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
if(record.get('contract_status')=='NEW' || record.get('contract_status')=='REJECT'){
if(record.get('contract_status')=='NEW' || record.get('contract_status')=='SIGN_RETURN'){
param['function_code'] = 'CON301MM';
param['function_usage'] = 'MODIFY';
}
......
<?xml version="1.0" encoding="UTF-8"?>
<!--
$Author: zlf
$Date: 2014-11-10 下午5:42:24
$Revision: 1.0
$Purpose:
-->
<a:screen xmlns:a="http://www.leaf-framework.org/application" xmlns:s="leaf.plugin.script" customizationEnabled="true" dynamiccreateenabled="true" trace="true">
<a:init-procedure>
<a:model-query fetchAll="true" model="cont.CON500.con_contract_get_guid_file_name" rootPath="file_name_path"/>
<s:server-script import="contract_print_path.js"><![CDATA[
$ctx.parameter.file_path = con_print_path['con_print_path'];
$ctx.parameter.tomcat_source = con_print_path['tomcat_source'];
]]>
</s:server-script>
<s:server-script import="con_print_path.js"><![CDATA[
set_parameter_file_path();
]]>
</s:server-script>
</a:init-procedure>
<a:view>
<a:link id="wfl_readonly_pageLink_projectQueryScreen_update_project" url="${/request/@context_path}/modules/prj/PRJ501N/prj_project_maintain_readonly.lview"/>
<a:link id="${/parameter/@layout_code}_con_contract_get_layout_code_link_id" model="cont.CON500.con_contract_get_layout_code" modelaction="update"/>
<a:link id="${/parameter/@layout_code}_con_contract_content_confirm_link_id" url="${/request/@context_path}/modules/cont/CON501N/con_contract_content_confirm.lview"/>
<a:link id="contract_lease_item_query_link" url="${/request/@context_path}/modules/cont/CON505/con_lease_item_query.lview"/>
<a:link id="contract_history_window_link" url="${/request/@context_path}/modules/cont/CON501N/con_document_history_query.lview"/>
<a:link id="con505_hls_bp_master_query_link" url="${/request/@context_path}/modules/cont/CON505/hls_bp_master_query.lview"/>
<a:link id="${/parameter/@layout_code}_prj500_cdd_uploadFile_id" url="${/request/@context_path}/uploadFile.lview"/>
<a:link id="${/parameter/@layout_code}_prj500_cdd_downloadFile_id" url="${/request/@context_path}/downloadFile.lview"/>
<!--打印使用-->
<a:link id="${/parameter/@layout_code}_con505_contract_content_id" model="cont.CON505.con505_contract_content" modelaction="update"/>
<a:link id="${/parameter/@layout_code}_creat_con_contract_content_link_id" model="cont.CON505.con505_contract_content" modelaction="execute"/>
<a:link id="${/parameter/@layout_code}_file_copy_from_template_link_id" url="${/request/@context_path}/modules/cont/CON505/file_copy_from_template.lsc"/>
<a:link id="${/parameter/@layout_code}_con_batch_dl_link_id" url="${/request/@context_path}/modules/cont/CON505/con_atm_batch_dl.lsc"/>
<a:link id="${/parameter/@layout_code}_con_cashflow_wirte_off_detail_link" url="${/request/@context_path}/modules/cont/CON302N/con_cashflow_wirte_off_detail.lview"/>
<a:link id="con_approval_link_id" model="cont.CON505.contract_approval" modelaction="execute"/>
<link href="${/request/@context_path}/css/lightbox.css" rel="stylesheet" type="text/css"/>
<script src="${/request/@context_path}/javascripts/lightbox.js" type="text/javascript"/>
<script type="text/javascript"><![CDATA[
Ext.ux.Lightbox.register('a[ref=img]', true);
function lock_current_window() {
Leaf.Masker.mask(Ext.getBody(), '${l:HLS.EXECUTING}');
}
function unlock_current_window() {
Leaf.Masker.unmask(Ext.getBody());
}
window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function () {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var contract_id = $(ds_id).getCurrentRecord().get('contract_id');
new Leaf.Window({
id: 'contract_history_window',
url: $('contract_history_window_link').getUrl(),
params: {
contract_id: contract_id
},
fullScreen: true
});
};
// window['${/parameter/@layout_code}_dynamic_link_renderer'] = function(value, record, name, config_record) {
// if (name == 'car_detail') {
// return '<a href="javascript:open_contract_window(\'' + record.id + '\',\'' + record.ds.id + '\')">' + config_record.get('prompt') + '</a>';
// }
// return value;
// };
window['${/parameter/@layout_code}_received_amount_detail'] = function (ds_id, id, name, query_only) {
var url = $('${/parameter/@layout_code}_con_cashflow_wirte_off_detail_link').getUrl();
var record = $(ds_id).findById(id);
if (record) {
var win = new Leaf.Window({
id: 'con_cashflow_wirte_off_detail_window',
url: url,
params: {
cashflow_id: record.get('cashflow_id'),
winid: 'con_cashflow_wirte_off_detail_window'
},
draggable: true,
fullScreen: true
});
}
};
window['${/parameter/@layout_code}_dynamic_link_renderer'] = function (value, record, name, config_record, bp_seq) {
var link_function = '';
window['${/parameter/@layout_code}_hls_link_render_record'][record.id + '---' + name] = record;
if (name == 'project_number') {
return '<a href="javascript:wfl_prj501_grid_update(\'' + record.id + '\',\'' + record.ds.id + '\')">' + value + '</a>';
} else if (name == 'gps_attch') {
link_function = '${/parameter/@layout_code}_ast_con_cdd4_attachtment_upload';
if (record.get('atm_num3') > 0) {
return '<a style="color:red" href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>';
} else {
return '<a style="font-weight:bolder;font-size:1.2em" href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>';
}
} else if (name == 'description') {
if (record.get('important_flag') == 'Y') {
return '<font color="RED">' + value + '</font>';
}
return value;
} else if (name == 'bp_link' && record.get('bp_id') && record.get('record_id')) {
link_function = '${/parameter/@layout_code}_open_bp_detail_window';
return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\');">' + config_record.get('prompt') + '</a>';
} else if (name == 'car_detail' && record.get('contract_lease_item_id')) {
link_function = '${/parameter/@layout_code}_open_lease_item_detail_window';
return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\');">' + config_record.get('prompt') + '</a>';
} else if (name == 'attachment') {
link_function = '${/parameter/@layout_code}_prj500_cdd_attachtment_upload';
return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>';
} else if (name == 'attach_file_name' || name == 'attach_file_name_print' ) {
var content_type = record.get('content_type');
var content_id = record.get('content_id');
//电子合同
// if(content_type == '01'){
// var link = '${/request/@context_path}/modules/xxx/pdf_download.lsc?type=SIN&content_id=' + content_id;
// var url = '';
// url = url + '<a href=' + link + '>' + '下载' + '</a>' + ',';
// return url;
// }else {
if (value != null) {
var link = '${/request/@context_path}/atm_download.lsc?attachment_id=';
var str = value.split(';;');
var url = '';
for (var i = 0; i < str.length; i++) {
var temp = str[i].split('--');
if (!Leaf.isEmpty(temp[0])) {
var file_name = temp[0].toUpperCase();
var file_suffix = temp[0].substr(temp[0].lastIndexOf('.') + 1).toUpperCase();
if (file_name.indexOf('.PDF') >= 0) {
url = url + '<a href=javascript:view_pdf(\'' + temp[1] + '\')>' + temp[0] + '</a>' + ',';
} else if (file_suffix == 'BMP' || file_suffix == 'JPG' || file_suffix == 'JPEG' || file_suffix == 'PNG' || file_suffix == 'GIF') {
url = url + '<a href=' + link + temp[1] + ' ref="img">' + temp[0] + '</a>' + ',';
} else {
url = url + '<a href=' + link + temp[1] + '>' + temp[0] + '</a>' + ',';
}
}
}
return url;
}
//}
} else if (name == 'received_amount') {
link_function = '${/parameter/@layout_code}_received_amount_detail';
if (value) {
return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + Leaf.formatMoney(value) + '</a>';
}
return '';
}
};
function wfl_prj501_grid_update(record_id, ds_id) {
var record = $(ds_id).findById(record_id);
var param = {};
param['bp_class'] = record.get('bp_class');
param['project_id'] = record.get('project_id');
param['function_code'] = 'PRJ502D';
param['function_usage'] = 'QUERY';
param['url_title'] = '租赁申请查询';
hls_doc_get_layout_code('${/parameter/@layout_code}_con_contract_get_layout_code_link_id', param, 'wfl_readonly_pageLink_projectQueryScreen_update_project', record.ds.id, '${/parameter/@layout_code}');
}
window['${/parameter/@layout_code}_ast_con_cdd4_attachtment_upload'] = function (ds_id, id, name, query_only) {
var record = $(ds_id).findById(id);
// if (record.get('con_contract_id')) {
var url;
if (query_only == 'Y') {
url = $('${/parameter/@layout_code}_prj500_cdd_downloadFile_id').getUrl() + '?table_name=CON_CONTRACT&header_id=' + record.get('contract_id');
} else {
url = $('${/parameter/@layout_code}_prj500_cdd_uploadFile_id').getUrl() + '?table_name=CON_CONTRACT&header_id=' + record.get('contract_id');
}
var win = new Leaf.Window({
url: url,
title: 'gps附件上传',
id: '${/parameter/@layout_code}${/parameter/@tree_code}_ast_con_cdd4_attachtment_upload_id',
width: 850,
height: 400
});
// win.on('close', function(){
// $(ds_id).query();
// });
// } else {
// Leaf.showMessage('${l:HLS.PROMPT}', '请先保存!');
// }
};
window['${/parameter/@layout_code}_open_lease_item_detail_window'] = function (id, name) {
var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name];
var param = record.data;
var contract_lease_item_id = record.get('contract_lease_item_id');
new Leaf.Window({
id: 'contract_lease_item_maintain_window',
url: $('contract_lease_item_query_link').getUrl(),
params: {
contract_lease_item_id: contract_lease_item_id,
winid: 'contract_lease_item_maintain_window'
},
draggable: true,
fullScreen: true
});
};
window['${/parameter/@layout_code}_open_bp_detail_window'] = function (id, name) {
var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name];
var param = {};//record.data;
param['bp_id'] = record.get('bp_id');
param['cdd_list_id'] = record.get('cdd_list_id');
param['company_id'] = '${/session/company_id}';
param['document_id'] = record.get('bp_id');
param['document_category'] = 'BP';
param['bp_class'] = record.get('bp_class');
param['bp_category'] = record.get('bp_category');
param['bp_type'] = record.get('bp_type');
param['function_code'] = 'CON505H';
param['function_usage'] = 'QUERY';
param['maintain_type'] = 'QUERY';
param['url_title'] = '${l:HLS212.BP_MASTER_QUERY}';
hls_doc_get_layout_code('${/parameter/@layout_code}_con_contract_get_layout_code_link_id', param, 'con505_hls_bp_master_query_link', record.ds.id, '${/parameter/@layout_code}');
};
// function open_contract_window(record_id, ds_id) {
// var record = $(ds_id).findById(record_id);
// var param = record.data;
// var contract_lease_item_id = record.get('contract_lease_item_id');
// new Leaf.Window({
// id: 'contract_lease_item_maintain_window',
// url: $('contract_lease_item_maintain_link').getUrl(),
// params: {
// contract_lease_item_id: contract_lease_item_id
// },
// fullScreen: true
// });
// // param['function_code'] = 'CON501D';
// // param['function_usage'] = 'MODIFY';
// // param['maintain_type'] = 'UPDATE';
// // param['url_title'] = '${l:CON301.CONTRACT_DETAIL}';
// // hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link',ds_id);
// }
window['${/parameter/@layout_code}_prj500_cdd_attachtment_upload'] = function (ds_id, id, name, query_only) {
var record = $(ds_id).findById(id);
if (record.get('check_id')) {
var url;
if (query_only == 'Y') {
url = $('${/parameter/@layout_code}_prj500_cdd_downloadFile_id').getUrl() + '?table_name=PRJ_CDD_ITEM_CHECK&header_id=' + record.get('check_id');
} else {
url = $('${/parameter/@layout_code}_prj500_cdd_uploadFile_id').getUrl() + '?table_name=PRJ_CDD_ITEM_CHECK&header_id=' + record.get('check_id');
}
var win = new Leaf.Window({
url: url,
title: '${l:HLS.SUPPORTING_DOCUMENT}',
id: '${/parameter/@layout_code}${/parameter/@tree_code}_prj500_cdd_uploadFile_screen_id',
width: 850,
height: 400
});
win.on('close', function () {
record.ds.query();
});
} else {
Leaf.showMessage('${l:HLS.PROMPT}', '请先保存!');
}
};
window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function () {
//
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var record = $(ds_id).getCurrentRecord();
var content_id;
//alert($('${/parameter/@layout_code}_con505_contract_content_id').getUrl);
Leaf.request({
url: $('${/parameter/@layout_code}_con505_contract_content_id').getUrl(),
para: {
content_id: content_id,
contract_id: record.get('contract_id'),
contract_bp_id: record.get('content_bp_pk'),
clause_usage: 'GH_WITHHOLD_AGREE'
},
success: function (rsc) {
//
//alert(rsc.result.content_id);
Leaf.request({
url: $('${/parameter/@layout_code}_creat_con_contract_content_link_id').getUrl(),
para: {
content_id: rsc.result.content_id,
file_path: '${/parameter/@file_path}'
},
success: function () {
Leaf.request({
url: $('${/parameter/@layout_code}_file_copy_from_template_link_id').getUrl(),
para: {
contract_id: record.get('contract_id'),
content_id: rsc.result.content_id,
file_path: '${/parameter/@file_path}',
batch_flag: 'Y'
},
success: function () {
var url = $('${/parameter/@layout_code}_con_batch_dl_link_id').getUrl() + '?contract_id=' + record.get('contract_id') + '&content_id=' + rsc.result.content_id;
window.open(url, '_self');
unlock_current_window();
}
});
unlock_current_window();
},
error: function () {
unlock_current_window();
},
failure: function () {
unlock_current_window();
},
scope: this
});
},
error: function () {
unlock_current_window();
},
failure: function () {
unlock_current_window();
},
scope: this
});
};
window['${/parameter/@layout_code}_user_button3_layout_dynamic_click'] = function () {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var record = $(ds_id).getCurrentRecord();
var direct_debit_bank_id = record.get('direct_debit_bank_id');
var dd_bank_account_name = record.get('dd_bank_account_name');
var dd_bank_account_num = record.get('dd_bank_account_num');
if (!Ext.isEmpty(record.get('contract_number'))) {
new Leaf.Window({
id: '${/parameter/@layout_code}_con_contract_content_confirm_win_id',
params: {
action: 'VIEW',
contract_id: record.get('contract_id'),
company_id: record.get('company_id'),
document_category: record.get('document_category'),
business_type: record.get('business_type'),
winid: '${/parameter/@layout_code}_con_contract_content_confirm_win_id'
},
url: $('${/parameter/@layout_code}_con_contract_content_confirm_link_id').getUrl(),
title: '合同查看',
width: 1300,
height: 550
});
} else {
Leaf.showErrorMessage('错误', '请先点击保存生成合同编号!');
}
};
var change_flag = 'N';
//工作流中合同文本生成按钮
//基本信息tab页 新增必输字段的校验 add by liukang 20160328
window['${/parameter/@layout_code}_print_layout_dynamic_click'] = function () {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var con_lease_item_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_lease_item');
var record = $(ds_id).getCurrentRecord();
var con_lease_record = $(con_lease_item_id).getCurrentRecord();
var direct_debit_bank_id = record.get('direct_debit_bank_id');
var dd_bank_account_name = record.get('dd_bank_account_name');
var dd_bank_account_num = record.get('dd_bank_account_num');
var color_of_apprearance = con_lease_record.get('color_of_apprearance');
var item_frame_number = con_lease_record.get('item_frame_number');
var item_engine_number = con_lease_record.get('item_engine_number');
var license_number = con_lease_record.get('license_number');
/* if (Ext.isEmpty(direct_debit_bank_id)) {
Leaf.showMessage('${l:HLS.PROMPT}', '请先填写数据并保存!');
} else */
if (!Ext.isEmpty(record.get('contract_number'))) {
var win = new Leaf.Window({
id: '${/parameter/@layout_code}_con_contract_content_confirm_win_id',
params: {
contract_id: record.get('contract_id'),
company_id: record.get('company_id'),
document_category: record.get('document_category'),
business_type: record.get('business_type'),
winid: '${/parameter/@layout_code}_con_contract_content_confirm_win_id',
change_flag: change_flag,
contract_name: record.get('contract_name'),
contract_number: record.get('contract_number')
},
url: $('${/parameter/@layout_code}_con_contract_content_confirm_link_id').getUrl(),
title: '合同文本生成',
width: 1300,
height: 550
});
//在关闭页面之后,刷新一下ds
win.on('close', function () {
if (ds_id) {
$(ds_id).query();
}
});
} else {
Leaf.showErrorMessage('错误', '请先点击保存生成合同编号!');
}
};
//add by zhuxianfei 20180207
function view_pdf(attachment_id) {
Leaf.request({
url: '${/request/@context_path}/autocrud/fnd.fnd_atm_attachment/query',
para: {
attachment_id: attachment_id
},
success: function (res) {
var path = res.result.record.file_path;
path = path.substr(path.indexOf('hls_attachment'));
var tomcat_source = '${/parameter/@tomcat_source}';
var source_path = 'http://' + window.location.host + '/' + tomcat_source + '/' + path+'?type=pdf';
var oWin = window.open(source_path);
},
scope: this
});
}
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_grid_query'] = function(ds, qpara, bp_seq) {
// var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_bs_score');
// if (ds == $(ds_id)) {
// qpara.contract_id = '${/parameter/@contract_id}';
//$(ds_id).setQueryParameter('contract_id', '${/parameter/@contract_id}');
// }
};
window['${/parameter/@layout_code}_submit_approval_layout_dynamic_click'] = function () {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var record = $(ds_id).getCurrentRecord();
var contract_id=record.get('contract_id');
if (record.dirty == true) {
Leaf.showMessage('${l:PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
return;
}
if($(ds_id).validate()){
Leaf.showConfirm('${HLS.PROMPT}', '确认要提交工作流吗?', function() {
window['${/parameter/@layout_code}_lock_layout_dynamic_window']();
Leaf.request({
url: $('con_approval_link_id').getUrl(),
para: {
contract_id:contract_id
},
scope: this,
success: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
$('${/parameter/@winid}').close();
},
failure: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
}
});
});
}
}
]]></script>
<a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/>
</a:view>
</a:screen>
<?xml version="1.0" encoding="UTF-8"?>
<!--
$Author: xuls
$Date: 2017-4-21 下午01:54:29
$Revision: 1.0
$Purpose: 合同维护入口界面
-->
<a:screen xmlns:a="http://www.leaf-framework.org/application" customizationEnabled="true" dynamiccreateenabled="true" trace="true">
<a:view>
<a:link id="con311_create_entrusts_link" model="cont.CON311.create_entrusts" modelaction="execute"/>
<a:link id="${/parameter/@layout_code}${/parameter/@pre_layout}zj_wfl_approve_history_check" url="${/request/@context_path}/modules/zjwfl/zj_wfl_approve_history_check.lview"/>
<a:link id="con_contract_get_layout_code_link_id" model="cont.CON500.con_contract_get_layout_code" modelaction="update"/>
<a:link id="con_contract_modify_link" url="${/request/@context_path}/modules/cont/CON3200/con_re_incept_modify.lview"/>
<a:link id="${/parameter/@layout_code}con_contract_query_link"
url="${/request/@context_path}/modules/cont/CON3200/con_re_incept_modify.lview"/>
<a:link id="car_modify_special_link" url="${/request/@context_path}/modules/prj/PRJ500N/prj_project_create_special.lview"/>
<script type="text/javascript"><![CDATA[
function open_contract_win(ds_id, record_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
if(record.get('contract_status')=='SIGNING' || record.get('contract_status')=='INCEPT_RETURN'||record.get('contract_status')=='SIGN'){
param['function_code'] = 'CON3200N';
param['function_usage'] = 'MODIFY';
}
else{
param['function_code'] = 'CON3200Q';
param['function_usage'] = 'QUERY';
}
param['winid'] = 'con_contract_modify_win_id';
param['url_title'] = '${l:CON301.CONTRACT_DETAIL}';
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, '${/parameter/@layout_code}con_contract_query_link', ds_id);
}
function open_project_Window(record_id, ds_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
param['company_id'] = record.get('company_id');
param['project_id'] = record.get('project_id');
param['function_usage'] = 'QUERY';
param['function_code'] = 'PRJ501_WFL';
param['bp_class'] = record.get('bp_class');
param['maintain_type'] = 'QUERY';
/* param['window_open_flag'] = 'Y';
param['show_history_flag'] = 'Y'; */
param['url_title'] = '${l:HLS.PROJECT_MAITAIN}';
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'car_modify_special_link', ds_id, '${/parameter/@layout_code}');
}
function open_bs_Window(record_id, ds_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
param['function_code'] = 'CON301BS';
param['function_usage'] = 'QUERY';
param['maintain_type'] = 'QUERY';
param['contract_id'] = record.get('contract_id');
param['url_title'] = 'BS明细';
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link', ds_id);
}
window['${/parameter/@layout_code}_dynamic_link_renderer'] = function(value, record, name, config_record) {
if (name == 'contract_number' && value) {
return '<a href="javascript:open_contract_win(\'' + record.ds.id + '\',\'' + record.id + '\')">' + value + '</a>';
}
if (name == 'project_id_c' && value) {
return '<a href="javascript:open_project_Window(\'' + record.id + '\',\'' + record.ds.id + '\')">' + value + '</a>';
}
if (name == 'bs_link') {
return '<a href="javascript:open_bs_Window(\'' + record.id + '\',\'' + record.ds.id + '\')">明细</a>';
}
return value;
};
window['${/parameter/@layout_code}_on_layout_dynamic_grid_query'] = function(ds, qpara, bp_seq) {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
if (ds == $(ds_id)) {
aut_authority_list_validate_query(ds, qpara);
}
};
//单据跟踪
window['${/parameter/@layout_code}_user_button3_layout_dynamic_click'] = function() {
// var prj_project_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
// var records = $('prj_project_ds_id').getSelected();
var ds = $('CONTRACT_QUERY_ENTRANCE_G_CONTRACT_RESULT_con_contract_ds');
var records = ds.getSelected();
if (records.length != 1) {
Leaf.showMessage('提示', '请选择一条数据!');
return;
}
var instance_id = records[0].get('wfl_instance_id');
var win = new Leaf.Window({
id: 'history_check',
url: $('${/parameter/@layout_code}${/parameter/@pre_layout}zj_wfl_approve_history_check').getUrl(),
params: {
instance_id: instance_id
},
title: '单据历史查看',
height: 500,
width: 860,
fullScreen: true
});
};
//合同文本打印
window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function() {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var records = $(ds_id).getSelected();
for (var i = 0;i < records.length;i++) {
var param = records[i].data;
param['function_code'] = 'CON311D';
if(records[i].data.contract_status=='NEW'){
param['maintain_type'] = 'UPDATE';
param['function_usage'] = 'UPDATE';
param['query_only'] = 'N';
}
else{
param['maintain_type'] = 'QUERY';
param['function_usage'] = 'QUERY';
param['query_only'] = 'Y';
}
param['winid'] = 'con_contract_modify_link_winid';
param['url_title'] = '${l:CON301.CONTRACT_DETAIL}';
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link', ds_id);
}
};
]]></script>
<a:screen-include screen="modules/cont/CON500/con_contract_authority_list_validate.lview?document_category=CONTRACT&amp;function_code=CON501"/>
<a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/>
</a:view>
</a:screen>
<?xml version="1.0" encoding="UTF-8"?><!-- $Author: zlf $Date: 2014-11-10 下午5:42:24 $Revision: 1.0 $Purpose: --><a:screen xmlns:a="http://www.leaf-framework.org/application" xmlns:s="leaf.plugin.script" customizationEnabled="true" dynamiccreateenabled="true" trace="true"> <a:init-procedure> <a:model-query fetchAll="true" model="cont.CON500.con_contract_get_guid_file_name" rootPath="file_name_path"/> <s:server-script import="contract_print_path.js"><![CDATA[ $ctx.parameter.file_path = con_print_path['con_print_path']; $ctx.parameter.tomcat_source = con_print_path['tomcat_source']; ]]> </s:server-script> <s:server-script import="con_print_path.js"><![CDATA[ set_parameter_file_path(); ]]> </s:server-script> </a:init-procedure> <a:view> <a:link id="wfl_readonly_pageLink_projectQueryScreen_update_project" url="${/request/@context_path}/modules/prj/PRJ501N/prj_project_maintain_readonly.lview"/> <a:link id="${/parameter/@layout_code}_con_contract_get_layout_code_link_id" model="cont.CON500.con_contract_get_layout_code" modelaction="update"/> <a:link id="${/parameter/@layout_code}_con_contract_content_confirm_link_id" url="${/request/@context_path}/modules/cont/CON501N/con_contract_content_confirm.lview"/> <a:link id="contract_lease_item_query_link" url="${/request/@context_path}/modules/cont/CON505/con_lease_item_query.lview"/> <a:link id="contract_history_window_link" url="${/request/@context_path}/modules/cont/CON501N/con_document_history_query.lview"/> <a:link id="con505_hls_bp_master_query_link" url="${/request/@context_path}/modules/cont/CON505/hls_bp_master_query.lview"/> <a:link id="${/parameter/@layout_code}_prj500_cdd_uploadFile_id" url="${/request/@context_path}/uploadFile.lview"/> <a:link id="${/parameter/@layout_code}_prj500_cdd_downloadFile_id" url="${/request/@context_path}/downloadFile.lview"/> <!--打印使用--> <a:link id="${/parameter/@layout_code}_con505_contract_content_id" model="cont.CON505.con505_contract_content" modelaction="update"/> <a:link id="${/parameter/@layout_code}_creat_con_contract_content_link_id" model="cont.CON505.con505_contract_content" modelaction="execute"/> <a:link id="${/parameter/@layout_code}_file_copy_from_template_link_id" url="${/request/@context_path}/modules/cont/CON505/file_copy_from_template.lsc"/> <a:link id="${/parameter/@layout_code}_con_batch_dl_link_id" url="${/request/@context_path}/modules/cont/CON505/con_atm_batch_dl.lsc"/> <a:link id="${/parameter/@layout_code}_con_cashflow_wirte_off_detail_link" url="${/request/@context_path}/modules/cont/CON302N/con_cashflow_wirte_off_detail.lview"/> <a:link id="con_approval_link_id" model="cont.CON505.contract_approval" modelaction="update"/> <link href="${/request/@context_path}/css/lightbox.css" rel="stylesheet" type="text/css"/> <script src="${/request/@context_path}/javascripts/lightbox.js" type="text/javascript"/> <script type="text/javascript"><![CDATA[ Ext.ux.Lightbox.register('a[ref=img]', true); function lock_current_window() { Leaf.Masker.mask(Ext.getBody(), '${l:HLS.EXECUTING}'); } function unlock_current_window() { Leaf.Masker.unmask(Ext.getBody()); } window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var contract_id = $(ds_id).getCurrentRecord().get('contract_id'); new Leaf.Window({ id: 'contract_history_window', url: $('contract_history_window_link').getUrl(), params: { contract_id: contract_id }, fullScreen: true }); }; // window['${/parameter/@layout_code}_dynamic_link_renderer'] = function(value, record, name, config_record) { // if (name == 'car_detail') { // return '<a href="javascript:open_contract_window(\'' + record.id + '\',\'' + record.ds.id + '\')">' + config_record.get('prompt') + '</a>'; // } // return value; // }; window['${/parameter/@layout_code}_received_amount_detail'] = function (ds_id, id, name, query_only) { var url = $('${/parameter/@layout_code}_con_cashflow_wirte_off_detail_link').getUrl(); var record = $(ds_id).findById(id); if (record) { var win = new Leaf.Window({ id: 'con_cashflow_wirte_off_detail_window', url: url, params: { cashflow_id: record.get('cashflow_id'), winid: 'con_cashflow_wirte_off_detail_window' }, draggable: true, fullScreen: true }); } }; window['${/parameter/@layout_code}_dynamic_link_renderer'] = function (value, record, name, config_record, bp_seq) { var link_function = ''; window['${/parameter/@layout_code}_hls_link_render_record'][record.id + '---' + name] = record; if (name == 'project_number') { return '<a href="javascript:wfl_prj501_grid_update(\'' + record.id + '\',\'' + record.ds.id + '\')">' + value + '</a>'; } else if (name == 'gps_attch') { link_function = '${/parameter/@layout_code}_ast_con_cdd4_attachtment_upload'; if (record.get('atm_num3') > 0) { return '<a style="color:red" href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>'; } else { return '<a style="font-weight:bolder;font-size:1.2em" href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>'; } } else if (name == 'description') { if (record.get('important_flag') == 'Y') { return '<font color="RED">' + value + '</font>'; } return value; } else if (name == 'bp_link' && record.get('bp_id') && record.get('record_id')) { link_function = '${/parameter/@layout_code}_open_bp_detail_window'; return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\');">' + config_record.get('prompt') + '</a>'; } else if (name == 'car_detail' && record.get('contract_lease_item_id')) { link_function = '${/parameter/@layout_code}_open_lease_item_detail_window'; return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\');">' + config_record.get('prompt') + '</a>'; } else if (name == 'attachment') { link_function = '${/parameter/@layout_code}_prj500_cdd_attachtment_upload'; return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>'; } else if (name == 'attach_file_name' || name == 'attach_file_name_print' ) { var content_type = record.get('content_type'); var content_id = record.get('content_id'); //电子合同 // if(content_type == '01'){ // var link = '${/request/@context_path}/modules/xxx/pdf_download.lsc?type=SIN&content_id=' + content_id; // var url = ''; // url = url + '<a href=' + link + '>' + '下载' + '</a>' + ','; // return url; // }else { if (value != null) { var link = '${/request/@context_path}/atm_download.lsc?attachment_id='; var str = value.split(';;'); var url = ''; for (var i = 0; i < str.length; i++) { var temp = str[i].split('--'); if (!Leaf.isEmpty(temp[0])) { var file_name = temp[0].toUpperCase(); var file_suffix = temp[0].substr(temp[0].lastIndexOf('.') + 1).toUpperCase(); if (file_name.indexOf('.PDF') >= 0) { url = url + '<a href=javascript:view_pdf(\'' + temp[1] + '\')>' + temp[0] + '</a>' + ','; } else if (file_suffix == 'BMP' || file_suffix == 'JPG' || file_suffix == 'JPEG' || file_suffix == 'PNG' || file_suffix == 'GIF') { url = url + '<a href=' + link + temp[1] + ' ref="img">' + temp[0] + '</a>' + ','; } else { url = url + '<a href=' + link + temp[1] + '>' + temp[0] + '</a>' + ','; } } } return url; } //} } else if (name == 'received_amount') { link_function = '${/parameter/@layout_code}_received_amount_detail'; if (value) { return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + Leaf.formatMoney(value) + '</a>'; } return ''; } }; function wfl_prj501_grid_update(record_id, ds_id) { var record = $(ds_id).findById(record_id); var param = {}; param['bp_class'] = record.get('bp_class'); param['project_id'] = record.get('project_id'); param['function_code'] = 'PRJ502D'; param['function_usage'] = 'QUERY'; param['url_title'] = '租赁申请查询'; hls_doc_get_layout_code('${/parameter/@layout_code}_con_contract_get_layout_code_link_id', param, 'wfl_readonly_pageLink_projectQueryScreen_update_project', record.ds.id, '${/parameter/@layout_code}'); } window['${/parameter/@layout_code}_ast_con_cdd4_attachtment_upload'] = function (ds_id, id, name, query_only) { var record = $(ds_id).findById(id); // if (record.get('con_contract_id')) { var url; if (query_only == 'Y') { url = $('${/parameter/@layout_code}_prj500_cdd_downloadFile_id').getUrl() + '?table_name=CON_CONTRACT&header_id=' + record.get('contract_id'); } else { url = $('${/parameter/@layout_code}_prj500_cdd_uploadFile_id').getUrl() + '?table_name=CON_CONTRACT&header_id=' + record.get('contract_id'); } var win = new Leaf.Window({ url: url, title: 'gps附件上传', id: '${/parameter/@layout_code}${/parameter/@tree_code}_ast_con_cdd4_attachtment_upload_id', width: 850, height: 400 }); // win.on('close', function(){ // $(ds_id).query(); // }); // } else { // Leaf.showMessage('${l:HLS.PROMPT}', '请先保存!'); // } }; window['${/parameter/@layout_code}_open_lease_item_detail_window'] = function (id, name) { var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name]; var param = record.data; var contract_lease_item_id = record.get('contract_lease_item_id'); new Leaf.Window({ id: 'contract_lease_item_maintain_window', url: $('contract_lease_item_query_link').getUrl(), params: { contract_lease_item_id: contract_lease_item_id, winid: 'contract_lease_item_maintain_window' }, draggable: true, fullScreen: true }); }; window['${/parameter/@layout_code}_open_bp_detail_window'] = function (id, name) { var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name]; var param = {};//record.data; param['bp_id'] = record.get('bp_id'); param['cdd_list_id'] = record.get('cdd_list_id'); param['company_id'] = '${/session/company_id}'; param['document_id'] = record.get('bp_id'); param['document_category'] = 'BP'; param['bp_class'] = record.get('bp_class'); param['bp_category'] = record.get('bp_category'); param['bp_type'] = record.get('bp_type'); param['function_code'] = 'CON505H'; param['function_usage'] = 'QUERY'; param['maintain_type'] = 'QUERY'; param['url_title'] = '${l:HLS212.BP_MASTER_QUERY}'; hls_doc_get_layout_code('${/parameter/@layout_code}_con_contract_get_layout_code_link_id', param, 'con505_hls_bp_master_query_link', record.ds.id, '${/parameter/@layout_code}'); }; // function open_contract_window(record_id, ds_id) { // var record = $(ds_id).findById(record_id); // var param = record.data; // var contract_lease_item_id = record.get('contract_lease_item_id'); // new Leaf.Window({ // id: 'contract_lease_item_maintain_window', // url: $('contract_lease_item_maintain_link').getUrl(), // params: { // contract_lease_item_id: contract_lease_item_id // }, // fullScreen: true // }); // // param['function_code'] = 'CON501D'; // // param['function_usage'] = 'MODIFY'; // // param['maintain_type'] = 'UPDATE'; // // param['url_title'] = '${l:CON301.CONTRACT_DETAIL}'; // // hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link',ds_id); // } window['${/parameter/@layout_code}_prj500_cdd_attachtment_upload'] = function (ds_id, id, name, query_only) { var record = $(ds_id).findById(id); if (record.get('check_id')) { var url; if (query_only == 'Y') { url = $('${/parameter/@layout_code}_prj500_cdd_downloadFile_id').getUrl() + '?table_name=PRJ_CDD_ITEM_CHECK&header_id=' + record.get('check_id'); } else { url = $('${/parameter/@layout_code}_prj500_cdd_uploadFile_id').getUrl() + '?table_name=PRJ_CDD_ITEM_CHECK&header_id=' + record.get('check_id'); } var win = new Leaf.Window({ url: url, title: '${l:HLS.SUPPORTING_DOCUMENT}', id: '${/parameter/@layout_code}${/parameter/@tree_code}_prj500_cdd_uploadFile_screen_id', width: 850, height: 400 }); win.on('close', function () { record.ds.query(); }); } else { Leaf.showMessage('${l:HLS.PROMPT}', '请先保存!'); } }; window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function () { // var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var record = $(ds_id).getCurrentRecord(); var content_id; //alert($('${/parameter/@layout_code}_con505_contract_content_id').getUrl); Leaf.request({ url: $('${/parameter/@layout_code}_con505_contract_content_id').getUrl(), para: { content_id: content_id, contract_id: record.get('contract_id'), contract_bp_id: record.get('content_bp_pk'), clause_usage: 'GH_WITHHOLD_AGREE' }, success: function (rsc) { // //alert(rsc.result.content_id); Leaf.request({ url: $('${/parameter/@layout_code}_creat_con_contract_content_link_id').getUrl(), para: { content_id: rsc.result.content_id, file_path: '${/parameter/@file_path}' }, success: function () { Leaf.request({ url: $('${/parameter/@layout_code}_file_copy_from_template_link_id').getUrl(), para: { contract_id: record.get('contract_id'), content_id: rsc.result.content_id, file_path: '${/parameter/@file_path}', batch_flag: 'Y' }, success: function () { var url = $('${/parameter/@layout_code}_con_batch_dl_link_id').getUrl() + '?contract_id=' + record.get('contract_id') + '&content_id=' + rsc.result.content_id; window.open(url, '_self'); unlock_current_window(); } }); unlock_current_window(); }, error: function () { unlock_current_window(); }, failure: function () { unlock_current_window(); }, scope: this }); }, error: function () { unlock_current_window(); }, failure: function () { unlock_current_window(); }, scope: this }); }; window['${/parameter/@layout_code}_user_button3_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var record = $(ds_id).getCurrentRecord(); var direct_debit_bank_id = record.get('direct_debit_bank_id'); var dd_bank_account_name = record.get('dd_bank_account_name'); var dd_bank_account_num = record.get('dd_bank_account_num'); if (!Ext.isEmpty(record.get('contract_number'))) { new Leaf.Window({ id: '${/parameter/@layout_code}_con_contract_content_confirm_win_id', params: { action: 'VIEW', contract_id: record.get('contract_id'), company_id: record.get('company_id'), document_category: record.get('document_category'), business_type: record.get('business_type'), winid: '${/parameter/@layout_code}_con_contract_content_confirm_win_id' }, url: $('${/parameter/@layout_code}_con_contract_content_confirm_link_id').getUrl(), title: '合同查看', width: 1300, height: 550 }); } else { Leaf.showErrorMessage('错误', '请先点击保存生成合同编号!'); } }; var change_flag = 'N'; //工作流中合同文本生成按钮 //基本信息tab页 新增必输字段的校验 add by liukang 20160328 window['${/parameter/@layout_code}_print_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var con_lease_item_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_lease_item'); var record = $(ds_id).getCurrentRecord(); var con_lease_record = $(con_lease_item_id).getCurrentRecord(); var direct_debit_bank_id = record.get('direct_debit_bank_id'); var dd_bank_account_name = record.get('dd_bank_account_name'); var dd_bank_account_num = record.get('dd_bank_account_num'); var color_of_apprearance = con_lease_record.get('color_of_apprearance'); var item_frame_number = con_lease_record.get('item_frame_number'); var item_engine_number = con_lease_record.get('item_engine_number'); var license_number = con_lease_record.get('license_number'); /* if (Ext.isEmpty(direct_debit_bank_id)) { Leaf.showMessage('${l:HLS.PROMPT}', '请先填写数据并保存!'); } else */ if (!Ext.isEmpty(record.get('contract_number'))) { var win = new Leaf.Window({ id: '${/parameter/@layout_code}_con_contract_content_confirm_win_id', params: { contract_id: record.get('contract_id'), company_id: record.get('company_id'), document_category: record.get('document_category'), business_type: record.get('business_type'), winid: '${/parameter/@layout_code}_con_contract_content_confirm_win_id', change_flag: change_flag, contract_name: record.get('contract_name'), contract_number: record.get('contract_number') }, url: $('${/parameter/@layout_code}_con_contract_content_confirm_link_id').getUrl(), title: '合同文本生成', width: 1300, height: 550 }); //在关闭页面之后,刷新一下ds win.on('close', function () { if (ds_id) { $(ds_id).query(); } }); } else { Leaf.showErrorMessage('错误', '请先点击保存生成合同编号!'); } }; //add by zhuxianfei 20180207 function view_pdf(attachment_id) { Leaf.request({ url: '${/request/@context_path}/autocrud/fnd.fnd_atm_attachment/query', para: { attachment_id: attachment_id }, success: function (res) { var path = res.result.record.file_path; path = path.substr(path.indexOf('hls_attachment')); var tomcat_source = '${/parameter/@tomcat_source}'; var source_path = 'http://' + window.location.host + '/' + tomcat_source + '/' + path+'?type=pdf'; var oWin = window.open(source_path); }, scope: this }); } window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_grid_query'] = function(ds, qpara, bp_seq) { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_bs_score'); if (ds == $(ds_id)) { qpara.contract_id = '${/parameter/@contract_id}'; //$(ds_id).setQueryParameter('contract_id', '${/parameter/@contract_id}'); } }; window['${/parameter/@layout_code}_submit_approval_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var record = $(ds_id).getCurrentRecord(); var contract_id=record.get('contract_id'); if (record.dirty == true) { Leaf.showMessage('${l:PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}'); return; } if($(ds_id).validate()){ Leaf.showConfirm('${HLS.PROMPT}', '确认要提交工作流吗?', function() { window['${/parameter/@layout_code}_lock_layout_dynamic_window'](); Leaf.request({ url: $('con_approval_link_id').getUrl(), para: { contract_id:contract_id }, scope: this, success: function() { window['${/parameter/@layout_code}_unlock_layout_dynamic_window'](); $('${/parameter/@winid}').close(); }, failure: function() { window['${/parameter/@layout_code}_unlock_layout_dynamic_window'](); }, error: function() { window['${/parameter/@layout_code}_unlock_layout_dynamic_window'](); } }); }); } } ]]></script> <a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/> </a:view></a:screen>
\ No newline at end of file
<?xml version="1.0" encoding="UTF-8"?><!-- $Author: zlf $Date: 2014-11-10 下午5:42:24 $Revision: 1.0 $Purpose: --><a:screen xmlns:a="http://www.leaf-framework.org/application" xmlns:s="leaf.plugin.script" customizationEnabled="true" dynamiccreateenabled="true" trace="true"> <a:init-procedure> <a:model-query fetchAll="true" model="cont.CON500.con_contract_get_guid_file_name" rootPath="file_name_path"/> <s:server-script import="contract_print_path.js"><![CDATA[ $ctx.parameter.file_path = con_print_path['con_print_path']; $ctx.parameter.tomcat_source = con_print_path['tomcat_source']; ]]> </s:server-script> <s:server-script import="con_print_path.js"><![CDATA[ set_parameter_file_path(); ]]> </s:server-script> </a:init-procedure> <a:view> <a:link id="wfl_readonly_pageLink_projectQueryScreen_update_project" url="${/request/@context_path}/modules/prj/PRJ501N/prj_project_maintain_readonly.lview"/> <a:link id="${/parameter/@layout_code}_con_contract_get_layout_code_link_id" model="cont.CON500.con_contract_get_layout_code" modelaction="update"/> <a:link id="${/parameter/@layout_code}_con_contract_content_confirm_link_id" url="${/request/@context_path}/modules/cont/CON501N/con_contract_content_confirm.lview"/> <a:link id="contract_lease_item_query_link" url="${/request/@context_path}/modules/cont/CON505/con_lease_item_query.lview"/> <a:link id="contract_history_window_link" url="${/request/@context_path}/modules/cont/CON501N/con_document_history_query.lview"/> <a:link id="con505_hls_bp_master_query_link" url="${/request/@context_path}/modules/cont/CON505/hls_bp_master_query.lview"/> <a:link id="${/parameter/@layout_code}_prj500_cdd_uploadFile_id" url="${/request/@context_path}/uploadFile.lview"/> <a:link id="${/parameter/@layout_code}_prj500_cdd_downloadFile_id" url="${/request/@context_path}/downloadFile.lview"/> <!--打印使用--> <a:link id="${/parameter/@layout_code}_con505_contract_content_id" model="cont.CON505.con505_contract_content" modelaction="update"/> <a:link id="${/parameter/@layout_code}_creat_con_contract_content_link_id" model="cont.CON505.con505_contract_content" modelaction="execute"/> <a:link id="${/parameter/@layout_code}_file_copy_from_template_link_id" url="${/request/@context_path}/modules/cont/CON505/file_copy_from_template.lsc"/> <a:link id="${/parameter/@layout_code}_con_batch_dl_link_id" url="${/request/@context_path}/modules/cont/CON505/con_atm_batch_dl.lsc"/> <a:link id="${/parameter/@layout_code}_con_cashflow_wirte_off_detail_link" url="${/request/@context_path}/modules/cont/CON302N/con_cashflow_wirte_off_detail.lview"/> <a:link id="con_approval_link_id" model="cont.CON505.contract_approval" modelaction="update"/> <link href="${/request/@context_path}/css/lightbox.css" rel="stylesheet" type="text/css"/> <script src="${/request/@context_path}/javascripts/lightbox.js" type="text/javascript"/> <script type="text/javascript"><![CDATA[ Ext.ux.Lightbox.register('a[ref=img]', true); function lock_current_window() { Leaf.Masker.mask(Ext.getBody(), '${l:HLS.EXECUTING}'); } function unlock_current_window() { Leaf.Masker.unmask(Ext.getBody()); } window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var contract_id = $(ds_id).getCurrentRecord().get('contract_id'); new Leaf.Window({ id: 'contract_history_window', url: $('contract_history_window_link').getUrl(), params: { contract_id: contract_id }, fullScreen: true }); }; // window['${/parameter/@layout_code}_dynamic_link_renderer'] = function(value, record, name, config_record) { // if (name == 'car_detail') { // return '<a href="javascript:open_contract_window(\'' + record.id + '\',\'' + record.ds.id + '\')">' + config_record.get('prompt') + '</a>'; // } // return value; // }; window['${/parameter/@layout_code}_received_amount_detail'] = function (ds_id, id, name, query_only) { var url = $('${/parameter/@layout_code}_con_cashflow_wirte_off_detail_link').getUrl(); var record = $(ds_id).findById(id); if (record) { var win = new Leaf.Window({ id: 'con_cashflow_wirte_off_detail_window', url: url, params: { cashflow_id: record.get('cashflow_id'), winid: 'con_cashflow_wirte_off_detail_window' }, draggable: true, fullScreen: true }); } }; window['${/parameter/@layout_code}_dynamic_link_renderer'] = function (value, record, name, config_record, bp_seq) { var link_function = ''; window['${/parameter/@layout_code}_hls_link_render_record'][record.id + '---' + name] = record; if (name == 'project_number') { return '<a href="javascript:wfl_prj501_grid_update(\'' + record.id + '\',\'' + record.ds.id + '\')">' + value + '</a>'; } else if (name == 'gps_attch') { link_function = '${/parameter/@layout_code}_ast_con_cdd4_attachtment_upload'; if (record.get('atm_num3') > 0) { return '<a style="color:red" href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>'; } else { return '<a style="font-weight:bolder;font-size:1.2em" href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>'; } } else if (name == 'description') { if (record.get('important_flag') == 'Y') { return '<font color="RED">' + value + '</font>'; } return value; } else if (name == 'bp_link' && record.get('bp_id') && record.get('record_id')) { link_function = '${/parameter/@layout_code}_open_bp_detail_window'; return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\');">' + config_record.get('prompt') + '</a>'; } else if (name == 'car_detail' && record.get('contract_lease_item_id')) { link_function = '${/parameter/@layout_code}_open_lease_item_detail_window'; return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.id + '\',\'' + name + '\');">' + config_record.get('prompt') + '</a>'; } else if (name == 'attachment') { link_function = '${/parameter/@layout_code}_prj500_cdd_attachtment_upload'; return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>'; } else if (name == 'attach_file_name' || name == 'attach_file_name_print' ) { var content_type = record.get('content_type'); var content_id = record.get('content_id'); //电子合同 // if(content_type == '01'){ // var link = '${/request/@context_path}/modules/xxx/pdf_download.lsc?type=SIN&content_id=' + content_id; // var url = ''; // url = url + '<a href=' + link + '>' + '下载' + '</a>' + ','; // return url; // }else { if (value != null) { var link = '${/request/@context_path}/atm_download.lsc?attachment_id='; var str = value.split(';;'); var url = ''; for (var i = 0; i < str.length; i++) { var temp = str[i].split('--'); if (!Leaf.isEmpty(temp[0])) { var file_name = temp[0].toUpperCase(); var file_suffix = temp[0].substr(temp[0].lastIndexOf('.') + 1).toUpperCase(); if (file_name.indexOf('.PDF') >= 0) { url = url + '<a href=javascript:view_pdf(\'' + temp[1] + '\')>' + temp[0] + '</a>' + ','; } else if (file_suffix == 'BMP' || file_suffix == 'JPG' || file_suffix == 'JPEG' || file_suffix == 'PNG' || file_suffix == 'GIF') { url = url + '<a href=' + link + temp[1] + ' ref="img">' + temp[0] + '</a>' + ','; } else { url = url + '<a href=' + link + temp[1] + '>' + temp[0] + '</a>' + ','; } } } return url; } //} } else if (name == 'received_amount') { link_function = '${/parameter/@layout_code}_received_amount_detail'; if (value) { return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + Leaf.formatMoney(value) + '</a>'; } return ''; } }; function wfl_prj501_grid_update(record_id, ds_id) { var record = $(ds_id).findById(record_id); var param = {}; param['bp_class'] = record.get('bp_class'); param['project_id'] = record.get('project_id'); param['function_code'] = 'PRJ502D'; param['function_usage'] = 'QUERY'; param['url_title'] = '租赁申请查询'; hls_doc_get_layout_code('${/parameter/@layout_code}_con_contract_get_layout_code_link_id', param, 'wfl_readonly_pageLink_projectQueryScreen_update_project', record.ds.id, '${/parameter/@layout_code}'); } window['${/parameter/@layout_code}_ast_con_cdd4_attachtment_upload'] = function (ds_id, id, name, query_only) { var record = $(ds_id).findById(id); // if (record.get('con_contract_id')) { var url; if (query_only == 'Y') { url = $('${/parameter/@layout_code}_prj500_cdd_downloadFile_id').getUrl() + '?table_name=CON_CONTRACT&header_id=' + record.get('contract_id'); } else { url = $('${/parameter/@layout_code}_prj500_cdd_uploadFile_id').getUrl() + '?table_name=CON_CONTRACT&header_id=' + record.get('contract_id'); } var win = new Leaf.Window({ url: url, title: 'gps附件上传', id: '${/parameter/@layout_code}${/parameter/@tree_code}_ast_con_cdd4_attachtment_upload_id', width: 850, height: 400 }); // win.on('close', function(){ // $(ds_id).query(); // }); // } else { // Leaf.showMessage('${l:HLS.PROMPT}', '请先保存!'); // } }; window['${/parameter/@layout_code}_open_lease_item_detail_window'] = function (id, name) { var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name]; var param = record.data; var contract_lease_item_id = record.get('contract_lease_item_id'); new Leaf.Window({ id: 'contract_lease_item_maintain_window', url: $('contract_lease_item_query_link').getUrl(), params: { contract_lease_item_id: contract_lease_item_id, winid: 'contract_lease_item_maintain_window' }, draggable: true, fullScreen: true }); }; window['${/parameter/@layout_code}_open_bp_detail_window'] = function (id, name) { var record = window['${/parameter/@layout_code}_hls_link_render_record'][id + '---' + name]; var param = {};//record.data; param['bp_id'] = record.get('bp_id'); param['cdd_list_id'] = record.get('cdd_list_id'); param['company_id'] = '${/session/company_id}'; param['document_id'] = record.get('bp_id'); param['document_category'] = 'BP'; param['bp_class'] = record.get('bp_class'); param['bp_category'] = record.get('bp_category'); param['bp_type'] = record.get('bp_type'); param['function_code'] = 'CON505H'; param['function_usage'] = 'QUERY'; param['maintain_type'] = 'QUERY'; param['url_title'] = '${l:HLS212.BP_MASTER_QUERY}'; hls_doc_get_layout_code('${/parameter/@layout_code}_con_contract_get_layout_code_link_id', param, 'con505_hls_bp_master_query_link', record.ds.id, '${/parameter/@layout_code}'); }; // function open_contract_window(record_id, ds_id) { // var record = $(ds_id).findById(record_id); // var param = record.data; // var contract_lease_item_id = record.get('contract_lease_item_id'); // new Leaf.Window({ // id: 'contract_lease_item_maintain_window', // url: $('contract_lease_item_maintain_link').getUrl(), // params: { // contract_lease_item_id: contract_lease_item_id // }, // fullScreen: true // }); // // param['function_code'] = 'CON501D'; // // param['function_usage'] = 'MODIFY'; // // param['maintain_type'] = 'UPDATE'; // // param['url_title'] = '${l:CON301.CONTRACT_DETAIL}'; // // hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link',ds_id); // } window['${/parameter/@layout_code}_prj500_cdd_attachtment_upload'] = function (ds_id, id, name, query_only) { var record = $(ds_id).findById(id); if (record.get('check_id')) { var url; if (query_only == 'Y') { url = $('${/parameter/@layout_code}_prj500_cdd_downloadFile_id').getUrl() + '?table_name=PRJ_CDD_ITEM_CHECK&header_id=' + record.get('check_id'); } else { url = $('${/parameter/@layout_code}_prj500_cdd_uploadFile_id').getUrl() + '?table_name=PRJ_CDD_ITEM_CHECK&header_id=' + record.get('check_id'); } var win = new Leaf.Window({ url: url, title: '${l:HLS.SUPPORTING_DOCUMENT}', id: '${/parameter/@layout_code}${/parameter/@tree_code}_prj500_cdd_uploadFile_screen_id', width: 850, height: 400 }); win.on('close', function () { record.ds.query(); }); } else { Leaf.showMessage('${l:HLS.PROMPT}', '请先保存!'); } }; window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function () { // var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var record = $(ds_id).getCurrentRecord(); var content_id; //alert($('${/parameter/@layout_code}_con505_contract_content_id').getUrl); Leaf.request({ url: $('${/parameter/@layout_code}_con505_contract_content_id').getUrl(), para: { content_id: content_id, contract_id: record.get('contract_id'), contract_bp_id: record.get('content_bp_pk'), clause_usage: 'GH_WITHHOLD_AGREE' }, success: function (rsc) { // //alert(rsc.result.content_id); Leaf.request({ url: $('${/parameter/@layout_code}_creat_con_contract_content_link_id').getUrl(), para: { content_id: rsc.result.content_id, file_path: '${/parameter/@file_path}' }, success: function () { Leaf.request({ url: $('${/parameter/@layout_code}_file_copy_from_template_link_id').getUrl(), para: { contract_id: record.get('contract_id'), content_id: rsc.result.content_id, file_path: '${/parameter/@file_path}', batch_flag: 'Y' }, success: function () { var url = $('${/parameter/@layout_code}_con_batch_dl_link_id').getUrl() + '?contract_id=' + record.get('contract_id') + '&content_id=' + rsc.result.content_id; window.open(url, '_self'); unlock_current_window(); } }); unlock_current_window(); }, error: function () { unlock_current_window(); }, failure: function () { unlock_current_window(); }, scope: this }); }, error: function () { unlock_current_window(); }, failure: function () { unlock_current_window(); }, scope: this }); }; window['${/parameter/@layout_code}_user_button3_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var record = $(ds_id).getCurrentRecord(); var direct_debit_bank_id = record.get('direct_debit_bank_id'); var dd_bank_account_name = record.get('dd_bank_account_name'); var dd_bank_account_num = record.get('dd_bank_account_num'); if (!Ext.isEmpty(record.get('contract_number'))) { new Leaf.Window({ id: '${/parameter/@layout_code}_con_contract_content_confirm_win_id', params: { action: 'VIEW', contract_id: record.get('contract_id'), company_id: record.get('company_id'), document_category: record.get('document_category'), business_type: record.get('business_type'), winid: '${/parameter/@layout_code}_con_contract_content_confirm_win_id' }, url: $('${/parameter/@layout_code}_con_contract_content_confirm_link_id').getUrl(), title: '合同查看', width: 1300, height: 550 }); } else { Leaf.showErrorMessage('错误', '请先点击保存生成合同编号!'); } }; var change_flag = 'N'; //工作流中合同文本生成按钮 //基本信息tab页 新增必输字段的校验 add by liukang 20160328 window['${/parameter/@layout_code}_print_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var con_lease_item_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_lease_item'); var record = $(ds_id).getCurrentRecord(); var con_lease_record = $(con_lease_item_id).getCurrentRecord(); var direct_debit_bank_id = record.get('direct_debit_bank_id'); var dd_bank_account_name = record.get('dd_bank_account_name'); var dd_bank_account_num = record.get('dd_bank_account_num'); var color_of_apprearance = con_lease_record.get('color_of_apprearance'); var item_frame_number = con_lease_record.get('item_frame_number'); var item_engine_number = con_lease_record.get('item_engine_number'); var license_number = con_lease_record.get('license_number'); /* if (Ext.isEmpty(direct_debit_bank_id)) { Leaf.showMessage('${l:HLS.PROMPT}', '请先填写数据并保存!'); } else */ if (!Ext.isEmpty(record.get('contract_number'))) { var win = new Leaf.Window({ id: '${/parameter/@layout_code}_con_contract_content_confirm_win_id', params: { contract_id: record.get('contract_id'), company_id: record.get('company_id'), document_category: record.get('document_category'), business_type: record.get('business_type'), winid: '${/parameter/@layout_code}_con_contract_content_confirm_win_id', change_flag: change_flag, contract_name: record.get('contract_name'), contract_number: record.get('contract_number') }, url: $('${/parameter/@layout_code}_con_contract_content_confirm_link_id').getUrl(), title: '合同文本生成', width: 1300, height: 550 }); //在关闭页面之后,刷新一下ds win.on('close', function () { if (ds_id) { $(ds_id).query(); } }); } else { Leaf.showErrorMessage('错误', '请先点击保存生成合同编号!'); } }; //add by zhuxianfei 20180207 function view_pdf(attachment_id) { Leaf.request({ url: '${/request/@context_path}/autocrud/fnd.fnd_atm_attachment/query', para: { attachment_id: attachment_id }, success: function (res) { var path = res.result.record.file_path; path = path.substr(path.indexOf('hls_attachment')); var tomcat_source = '${/parameter/@tomcat_source}'; var source_path = 'http://' + window.location.host + '/' + tomcat_source + '/' + path+'?type=pdf'; var oWin = window.open(source_path); }, scope: this }); } window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_grid_query'] = function(ds, qpara, bp_seq) { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_bs_score'); if (ds == $(ds_id)) { qpara.contract_id = '${/parameter/@contract_id}'; //$(ds_id).setQueryParameter('contract_id', '${/parameter/@contract_id}'); } }; window['${/parameter/@layout_code}_submit_approval_layout_dynamic_click'] = function () { var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract'); var record = $(ds_id).getCurrentRecord(); var contract_id=record.get('contract_id'); if (record.dirty == true) { Leaf.showMessage('${l:PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}'); return; } if($(ds_id).validate()){ Leaf.showConfirm('${HLS.PROMPT}', '确认要提交工作流吗?', function() { window['${/parameter/@layout_code}_lock_layout_dynamic_window'](); Leaf.request({ url: $('con_approval_link_id').getUrl(), para: { contract_id:contract_id }, scope: this, success: function() { window['${/parameter/@layout_code}_unlock_layout_dynamic_window'](); $('${/parameter/@winid}').close(); }, failure: function() { window['${/parameter/@layout_code}_unlock_layout_dynamic_window'](); }, error: function() { window['${/parameter/@layout_code}_unlock_layout_dynamic_window'](); } }); }); } } ]]></script> <a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/> </a:view></a:screen>
\ No newline at end of file
......
<?xml version="1.0" encoding="UTF-8"?>
<a:screen xmlns:a="http://www.leaf-framework.org/application" customizationEnabled="true" dynamiccreateenabled="true" trace="true">
<a:view>
<a:link id="con731_calc_ccr_fee_link" model="cont.CON731.calc_ccr_fee" modelaction="execute"/>
<!-- <a:link id="con731_calc_ccr_fee_link" model="cont.CON731.calc_ccr_fee" modelaction="execute"/>-->
<a:link id="calc_leasse_amount_link" model="cont.CON731.calc_leasse_date" modelaction="execute"/>
<a:link id="calc_pay_amount_link" model="cont.CON731.calc_leasse_pay" modelaction="execute"/>
<a:link id="con731_update_link" model="cont.CON731.update_change_req" modelaction="execute"/>
<a:link id="calc_tenant_amount_link" model="cont.CON733.calc_tenant_change_req" modelaction="execute"/>
<a:link id="con731_quote_link" url="${/request/@context_path}/modules/hls/HLS500N/hls_fin_calculator_update_n.lview"/>
<a:link id="con731_quote_calc_link" model="cont.CON731.calc_change_req" modelaction="execute"/>
<a:link id="con733_quote_calc_change_req_link" model="cont.CON733.calc_change_req" modelaction="execute"/>
<a:link id="con731_submit_link" model="cont.CON731.submit_change_req" modelaction="execute"/>
<a:link id="con731_cancel_link" model="cont.CON731.cancel_change_req" modelaction="execute"/>
<a:link id="${/parameter/@layout_code}_prj500_cdd_uploadFile_id" url="${/request/@context_path}/uploadFile.lview"/>
......@@ -14,45 +14,54 @@
<script src="${/request/@context_path}/javascripts/lightbox.js" type="text/javascript"/>
<link href="${/request/@context_path}/css/lightbox.css" rel="stylesheet" type="text/css"/>
<a:link id="${/parameter/@layout_code}${/parameter/@tree_code}_hls_fin_doc_quotation_link_id" url="${/request/@context_path}/modules/hls/HLS500/hls_fin_doc_quotation.lsc"/>
<a:link id="get_xml" model="cont.CON731.con_change_case_submit" modelaction="execute"/>
<script type="text/javascript"><![CDATA[
Ext.ux.Lightbox.register('a[ref=img]', true);
Leaf.onReady(function() {
if ('${/parameter/@layout_code}' == 'CCR_UNIVERSAL_LEASSE' || '${/parameter/@layout_code}' == 'CCR_UNIVERSAL_LEASEHOLD') {
($('${/parameter/@layout_code}_quote'))?$('${/parameter/@layout_code}_quote').disable():null;
($('${/parameter/@layout_code}_user_button2'))?$('${/parameter/@layout_code}_user_button2').hide():null;//隐藏生效按钮
} else if ('${/parameter/@layout_code}' == 'CCR_UNIVERSAL_PAYDATE') {
($('${/parameter/@layout_code}_quote'))?$('${/parameter/@layout_code}_quote').disable():null;
($('${/parameter/@layout_code}_user_button2'))?$('${/parameter/@layout_code}_user_button2').show():null; //显示生效按钮
} else {
($('${/parameter/@layout_code}_quote'))?$('${/parameter/@layout_code}_quote').enable():null;
($('${/parameter/@layout_code}_user_button2'))?$('${/parameter/@layout_code}_user_button2').hide():null; //隐藏生效按钮
}
var ds_con_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'F_QUOTATION_01', 'con_contract');
if ($(ds_con_id)) {
$(ds_con_id).setQueryParameter('contract_id','${/parameter/@contract_id}');
$(ds_con_id).query();
}
});
function open_contract_win(ds_id, record_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
param['function_code'] = 'CON301';
param['function_usage'] = 'QUERY';
param['download'] = 'Y';
param['maintain_type'] = 'UPDATE';
param['url_title'] = '${l:CON301.CONTRACT_DETAIL}';
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link', ds_id);
}
window['${/parameter/@layout_code}_quote_layout_dynamic_click'] = function() {
var req_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
$('${/parameter/@layout_code}_quote').disable(); //按钮不可用
var req_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'F_QUOTATION_01', 'con_contract');
var req_record = $(req_ds_id).getAt(0);
var calc_session_id = req_record.get('calc_session_id');
var quo_win;
var calc_type = '${/parameter/@calc_type}';
var document_category = req_record.get('document_category');
var btb_payment_date = req_record.get('btb_payment_date');
// 變更起始期數
var ccr_start_times = req_record.get('ccr_start_times');
//變更剩餘期數
var ccr_outstanding_times = req_record.get('ccr_outstanding_times');
var change_document_type = req_record.get('change_document_type');
if ($(req_ds_id).validate()) {
if ($(req_ds_id).validate($('${/parameter/@layout_code}_quote').enable())) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
return;
}
// if (!calc_session_id) {
window['${/parameter/@layout_code}_lock_layout_dynamic_window']();
Leaf.request({
url: $('con731_quote_calc_link').getUrl(),
url: $('con733_quote_calc_change_req_link').getUrl(),
para: {
change_req_id: ${/parameter/@change_req_id},
btb_payment_date: btb_payment_date,
ccr_start_times: ccr_start_times,
ccr_outstanding_times: ccr_outstanding_times,
calc_session_id: calc_session_id
},
success: function(res) {
$('${/parameter/@layout_code}_quote').enable();
req_record.set('calc_session_id', res.result.calc_session_id);
req_record.dirty = false;
quo_win = new Leaf.Window({
......@@ -76,13 +85,18 @@
});
quo_win.addListener('close', function() {
$(req_ds_id).query();
var cf_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'G_QUOTATION_04', 'con_contract_cashflow');
$(cf_ds_id).setQueryParameter('contract_id','${/parameter/@contract_id}');
$(cf_ds_id).query();
});
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
$('${/parameter/@layout_code}_quote').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
$('${/parameter/@layout_code}_quote').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
......@@ -92,239 +106,97 @@
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_update'] = function(ds, record, name, value, old_value, bp_seq) {
var bp_info_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_bp');
var lease_item_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_lease_item');
var con_contract_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var con_contract_change_req_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_change_req');
if (ds.id == con_contract_ds_id) {
if (name == 'price_list') {
if (!(Ext.isEmpty(record.get('price_list')))) {
if (record.get('price_list') == 'DS_PRICE_CHANGE_50') {
record.getField('btb_interest_margin').setRequired(true);
record.getField('btb_interest_margin').setReadOnly(false);
record.set('btb_interest_margin', 0);
} else {
record.getField('btb_interest_margin').setRequired(false);
record.getField('btb_interest_margin').setReadOnly(true);
record.set('btb_interest_margin', 0);
}
}
}
// 承租人变更和債權債務时计算变更费用
if (name == 'btb_payment_date') {
if (!(Ext.isEmpty(record.get('btb_payment_date')))) {
var today = new Date();
var btb_payment_date = record.get('btb_payment_date');
if (btb_payment_date.format('yyyy-mm-dd') < today.format('yyyy-mm-dd')) {
Leaf.showMessage('提示', '结算日期早于当前日期!');
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_TENANT_CHANGE_MODIFY') {
// 承租人变更日計算應繳金額相關信息
if(name == 'ccr_lease_date'){
Leaf.request({
url: $('calc_tenant_amount_link').getUrl(),
para: {
change_req_id: ${/parameter/@change_req_id},
ccr_lease_date: record.get('ccr_lease_date')
},
success: function(res) {
record.set('ccr_lease_rental', res.result.ccr_lease_rental);
record.set('ccr_lease_principal', res.result.ccr_lease_principal);
record.set('ccr_lease_interest', res.result.ccr_lease_interest);
record.set('ccr_lease_penalty', res.result.ccr_lease_penalty);
},
error: function() {
},
failure: function() {
},
sync: true,
scope: this
});
}
}
Leaf.request({
url: $('calc_leasse_amount_link').getUrl(),
para: {
contract_id: record.get('contract_id'),
btb_payment_date: record.get('btb_payment_date')
},
success: function(res) {
if ('${/parameter/@layout_code}' == 'CCR_UNIVERSAL_LEASSE') {
record.set('ccr_leasse_rental', res.result.ccr_leasse_rental);
record.set('ccr_leasse_principal', res.result.ccr_leasse_principal);
record.set('ccr_leasse_interest', res.result.ccr_leasse_interest);
record.set('ccr_leasse_penalty', res.result.ccr_leasse_penalty);
} else if ('${/parameter/@layout_code}' == 'CCR_UNIVERSAL_DEPT') {
record.set('ccr_overdue_rental', res.result.ccr_leasse_rental);
record.set('ccr_overdue_prin', res.result.ccr_leasse_principal);
record.set('ccr_overdue_interest', res.result.ccr_leasse_interest);
record.set('ccr_due_amount', res.result.ccr_leasse_penalty);
record.set('ccr_outstanding_prin_ti_total', res.result.ccr_outstanding_prin_ti_total); //未到期本金
record.set('ccr_outstanding_prin_tax_incld', res.result.ccr_outstanding_prin_ti_total + res.result.ccr_leasse_principal); //剩余本金
// 回款賬戶變更
if('${/parameter/@layout_code}' == 'CON_ACCOUNT_CHANGE_MODIFY'){
if(name == 'BANK_BRANCH_NUM'){
var bank_account_num_s =record.get('bank_account_num_s');
if(bank_account_num_s == value){
Leaf.showMessage('警告', '现扣款账号和原扣款账号不能重复!');
return;
}
}
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
sync: true,
scope: this
});
}
}
// 还款日变更时计算变更期数
if ('${/parameter/@layout_code}' == 'CCR_UNIVERSAL_PAYDATE') {
if (name == 'ccr_start_times' || name == 'btb_payment_date' || name == 'interim_rental') {
if (!(Ext.isEmpty(record.get('ccr_start_times'))) && !(Ext.isEmpty(record.get('btb_payment_date'))) && !(Ext.isEmpty(record.get('interim_rental')))) {
Leaf.request({
url: $('calc_pay_amount_link').getUrl(),
para: {
contract_id: record.get('contract_id'),
layout_code: '${/parameter/@layout_code}',
ccr_start_times: record.get('ccr_start_times'),
btb_payment_date: record.get('btb_payment_date'),
interim_rental: record.get('interim_rental')
},
success: function(res) {
record.set('ccr_fee', res.result.ccr_fee);
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
sync: true,
scope: this
});
}
}
}
// 非月付变更时计算变更费用
if ('${/parameter/@layout_code}' == 'CCR_UNIVERSAL_PAY') {
if (name == 'ccr_start_times') {
if (!(Ext.isEmpty(record.get('ccr_start_times')))) {
Leaf.request({
url: $('calc_pay_amount_link').getUrl(),
para: {
contract_id: record.get('contract_id'),
layout_code: '${/parameter/@layout_code}',
ccr_start_times: record.get('ccr_start_times')
},
success: function(res) {
record.set('ccr_dept', res.result.ccr_dept);
record.set('ccr_outstanding_times', res.result.ccr_outstanding_times);
record.set('ccr_outstanding_prin_tax_incld', res.result.ccr_outstanding_prin_tax_incld);
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
sync: true,
scope: this
});
// 租赁计划變更
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');
}
}
}
}
}
if (name == 'ccr_due_ratio') {
if (!(Ext.isEmpty(record.get('ccr_due_ratio'))) && !(Ext.isEmpty(record.get('ccr_due_amount')))) {
record.set('ccr_penalty', record.get('ccr_due_amount') * record.get('ccr_due_ratio'));
}
}
}
};
// //提交之前插入手续费
// window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_before_submit'] = function(ds, record) {
// var check_flag = true;
//
// return check_flag;
// };
//新增和加载时调用form
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_form_add_and_load'] = function(ds, record, config_records, bp_seq) {
};
window['${/parameter/@layout_code}_submit_approval_layout_dynamic_click'] = function() {
$('${/parameter/@layout_code}_submit_approval').disable();
var req_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var req_record = $(req_ds_id).getAt(0);
var case_type = '';
var document_type = '${/parameter/@document_type}';
var calc_session_id = req_record.get('calc_session_id');
//冬雨季变更,债权待调整 走企案doodream
if (document_type == 'CONEXTHAG' || document_type == 'DEBT_CHAG') {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_lock_layout_dynamic_window']();
if (Leaf.isEmpty(calc_session_id)) {
Leaf.showMessage('提示', '请先进行报价之后再提交审批!');
} else{
if ($(req_ds_id).validate()) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
}
// setTimeout(window['${/parameter/@layout_code}_SAVE_LAYOUT_DYNAMIC_CLICK'](con731_submit), 2000);
if (document_type == 'CONEXTHAG') {
//冬雨季延期工作申请禀议 CFL-34392ECC-275A-4118-A4FE-4269818973A8
case_type = 'CFL-34392ECC-275A-4118-A4FE-4269818973A8';
}
//债务再调整工作申请禀议 CFL-3332CCE6-8AB4-4FC0-B0F4-FB8EE9C7F9CE
else if (document_type == 'DEBT_CHAG') {
case_type = 'CFL-3332CCE6-8AB4-4FC0-B0F4-FB8EE9C7F9CE';
}
$('${/parameter/@layout_code}_save').disable();
$('${/parameter/@layout_code}_quote').disable();
$('${/parameter/@layout_code}_submit_approval').disable();
$('${/parameter/@layout_code}_user_button1').disable();
getXml(case_type);
} else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
}
}
}
//承租人 ,租赁物 走企案doodream
else if (document_type == 'LEASSE_CHAG') {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_lock_layout_dynamic_window']();
if ($(req_ds_id).validate()) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
}
// setTimeout(window['${/parameter/@layout_code}_SAVE_LAYOUT_DYNAMIC_CLICK'](con731_submit), 2000);
if (document_type == 'LEASSE_CHAG') {
//承租人变更工作申请禀议 CFL-315FB433-77A0-4548-BC03-46F6CE55B8AE
case_type = 'CFL-315FB433-77A0-4548-BC03-46F6CE55B8AE';
}
// else if (document_type == 'LEASEHOLD_CHAG') {
// case_type = '';
if ($(req_ds_id).validate($('${/parameter/@layout_code}_submit_approval').enable())) {
// if (req_record.dirty) {
// Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
// window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
// return;
// }
$('${/parameter/@layout_code}_save').disable();
$('${/parameter/@layout_code}_quote').disable();
$('${/parameter/@layout_code}_submit_approval').disable();
$('${/parameter/@layout_code}_user_button1').disable();
getXml(case_type);
} else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
}
}
//非月付转月付
else if (document_type == 'PAY_CHAG') {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_lock_layout_dynamic_window']();
if (Leaf.isEmpty(calc_session_id)) {
Leaf.showMessage('提示', '请先进行报价之后再提交审批!');
} else {
if ($(req_ds_id).validate()) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
$('${/parameter/@layout_code}_submit_approval').disable();
$('${/parameter/@layout_code}_save').disable();
if('${/parameter/@layout_code}' == 'CON_CHANGE_MODIFY'){
$('${/parameter/@layout_code}_quote').disable();
}
setTimeout(window['${/parameter/@layout_code}_SAVE_LAYOUT_DYNAMIC_CLICK'](con731_submit), 2000);
} else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
}
}
} else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_lock_layout_dynamic_window']();
if ($(req_ds_id).validate()) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
}
$('${/parameter/@layout_code}_user_button1').disable();
$('${/parameter/@layout_code}_user_button2').disable();
setTimeout(window['${/parameter/@layout_code}_SAVE_LAYOUT_DYNAMIC_CLICK'](con731_submit), 2000);
} else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
}
}
};
function con731_submit() {
......@@ -335,9 +207,6 @@
url: $('con731_submit_link').getUrl(),
para: {
change_req_id: ${/parameter/@change_req_id},
ccr_fee: req_record.get('ccr_fee'),
ccr_penalty: req_record.get('ccr_penalty'),
btb_payment_date: req_record.get('btb_payment_date'),
layout_code: '${/parameter/@layout_code}'
},
success: function(res) {
......@@ -345,108 +214,62 @@
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
$('${/parameter/@layout_code}_submit_approval').enable();
$('${/parameter/@layout_code}_save').enable();
if('${/parameter/@layout_code}' == 'CON_CHANGE_MODIFY'){
$('${/parameter/@layout_code}_quote').enable();
}
$('${/parameter/@layout_code}_user_button1').enable();
$('${/parameter/@layout_code}_user_button2').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
$('${/parameter/@layout_code}_submit_approval').enable();
$('${/parameter/@layout_code}_save').enable();
if('${/parameter/@layout_code}' == 'CON_CHANGE_MODIFY'){
$('${/parameter/@layout_code}_quote').enable();
}
$('${/parameter/@layout_code}_user_button1').enable();
$('${/parameter/@layout_code}_user_button2').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
});
}
function getXml(case_type) {
var req_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var req_record = $(req_ds_id).getAt(0);
var change_req_id = ${/parameter/@change_req_id};
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '页面数据存在修改,请先保存再发起起案!');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
}
Leaf.request({
url: $('get_xml').getUrl(),
para: {
change_req_id: change_req_id,
interface_name: case_type
},
success: function(res) {
getUrl(res.result.xml)
//document.getElementById("doodream_iframe").contentWindow.ConnData(res.result.xml);
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
});
}
function getUrl(xml) {
Leaf.request({
url: '${/request/@context_path}/doodream/post/url',
para: {
xml: xml
},
success: function(res) {
window.open(res.message, "", "width=940, height=650, scrollbars=yes, toolbar=no, location=no, status=no, menubar=no");
Leaf.SideBar.show({
msg: '${l:HLS.SUBMIT_SUCCESS}',
duration: 2000
});
},
failure: function() {
Leaf.SideBar.show({
msg: 'failure',
duration: 2000
});
},
error: function() {
Leaf.SideBar.show({
msg: 'error',
duration: 2000
});
},
scope: this
});
}
//保存submitsuccess调用
window['${/parameter/@layout_code}_on_layout_dynamic_submitsuccess'] = function(ds, record, res, bp_seq) {
var ca_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_cashflow');
if (ca_ds_id) {
$(ca_ds_id).query();
}
var con_contract_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var record = $(con_contract_ds_id).getCurrentRecord();
Leaf.request({
url: $('con731_calc_ccr_fee_link').getUrl(),
para: {
contract_id: ${/parameter/@change_req_id},
bp_id: record.get('bp_id_tenant'),
lease_item_id: record.get('lease_item_id'),
pattern: record.get('lease_item_id_n'),
machine_number: record.get('machine_number'),
interim_times: record.get('interim_times'),
ccr_start_times: record.get('ccr_start_times'),
ccr_document_type: record.get('ccr_document_type'),
hd_user_col_v04: record.get('hd_user_col_v04'),
btb_payment_date: record.get('btb_payment_date')
},
success: function(res) {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
});
// var con_contract_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
// var record = $(con_contract_ds_id).getCurrentRecord();
// Leaf.request({
// url: $('con731_calc_ccr_fee_link').getUrl(),
// para: {
// contract_id: ${/parameter/@change_req_id},
// bp_id: record.get('bp_id_tenant'),
// lease_item_id: record.get('lease_item_id'),
// pattern: record.get('lease_item_id_n'),
// machine_number: record.get('machine_number'),
// interim_times: record.get('interim_times'),
// ccr_start_times: record.get('ccr_start_times'),
// ccr_document_type: record.get('ccr_document_type'),
// hd_user_col_v04: record.get('hd_user_col_v04'),
// btb_payment_date: record.get('btb_payment_date')
// },
// success: function(res) {
// window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
// },
// failure: function() {
// window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
// },
// error: function() {
// window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
// },
// scope: this
// });
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
......@@ -454,6 +277,7 @@
window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function() {
$('${/parameter/@layout_code}_user_button1').disable();
Leaf.showConfirm('${l:HLS.PROMPT}', '是否确认取消变更?', function() {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_lock_layout_dynamic_window']();
Leaf.request({
......@@ -462,61 +286,29 @@
change_req_id: ${/parameter/@change_req_id}
},
success: function(res) {
$('${/parameter/@layout_code}_user_button1').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
$('${/parameter/@winid}').close();
},
failure: function() {
$('${/parameter/@layout_code}_user_button1').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
$('${/parameter/@layout_code}_user_button1').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
});
});
};
//还款日期变更更新现金流的日期生效按钮
window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function() {
var req_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var req_record = $(req_ds_id).getAt(0);
if ($(req_ds_id).validate()) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
}else{
Leaf.request({
url: $('con731_update_link').getUrl(),
para: {
contract_id: req_record.get('contract_id'),
ccr_start_times: req_record.get('ccr_start_times'),
btb_payment_date: req_record.get('btb_payment_date')
},
success: function(res) {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
var ca_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_cashflow');
if (ca_ds_id) {
$(ca_ds_id).query();
}
parent.Leaf.SideBar.show({
msg: '已生效',
duration: 2000
});
},
failure: function() {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
});
}
}else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
}
};
$('${/parameter/@layout_code}_user_button1').disable();
$('${/parameter/@layout_code}_user_button1').enable();
};
//////附件上传
window['${/parameter/@layout_code}_dynamic_link_renderer'] = function(value, record, name, config_record, bp_seq) {
......@@ -525,7 +317,9 @@
if (name == 'leasse_attachment') {
link_function = '${/parameter/@layout_code}_leasse_cdd_attachtment_upload';
return '<a href="javascript:window[\'' + link_function + '\'](\'' + record.ds.id + '\',\'' + record.id + '\',\'' + name + '\',\'' + config_record.get('query_only') + '\');">' + config_record.get('prompt') + '</a>';
} else if (name == 'leasse_attach_file_name') {
} else if (name == 'contract_number' && value) {
return '<a href="javascript:open_contract_win(\'' + record.ds.id + '\',\'' + record.id + '\')">' + value + '</a>';
}else if (name == 'leasse_attach_file_name') {
if (value != null) {
var link = '${/request/@context_path}/atm_download.lsc?attachment_id=';
var str = value.split(';;');
......@@ -707,7 +501,6 @@
}
};
window['${/parameter/@layout_code}_leasse_cdd_attachtment_upload'] = function(ds_id, id, name, query_only) {
var record = $(ds_id).findById(id);
if (record.get('contract_attch_id')) {
......@@ -904,6 +697,22 @@
};
/// 附件上传 end
//图片渲染
window['${/parameter/@bp_seq}${/parameter/@layout_code}_dynamic_pic_renderer'] = function(record, name, bp_seq) {
var result = name.match(/(.*)_pic$/);
if (result) {
var pic_value = record.get(result[1]);
if (pic_value == 'OUTFLOW') {
return '<img src="${/request/@context_path}/images/outflow.png" style="margin-top:4px"/>';
} else if (pic_value == 'INFLOW') {
return '<img src="${/request/@context_path}/images/inflow.png" style="margin-top:4px"/>';
} else if (pic_value == 'NONCASH') {
return '<img src="${/request/@context_path}/images/noncash.png" style="margin-top:4px"/>';
} else if (pic_value == 'CASH') {
return '<img src="${/request/@context_path}/images/cash.png" style="margin-top:4px"/>';
}
}
};
]]></script>
<a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/>
</a:view>
......
......@@ -84,37 +84,28 @@
var req_status = record.get('req_status');
var param = record.data;
var req_status = record.get('req_status');
param['change_req_id'] = record.get('contract_id');
param['contract_id'] = record.get('contract_id');
param['function_code'] = 'CON732D';
param['function_usage'] = 'MODIFY';
param['change_req_id'] = record.get('change_req_id');
param['source_contract_id'] = record.get('source_contract_id');//變更前源合同id
param['contract_id'] = record.get('change_req_id');
param['req_status'] = req_status;
if (req_status == 'APPROVED' || req_status == 'APPROVING' || req_status == 'CANCEL') {
if (req_status == 'APPROVED' || req_status == 'APPROVING' || req_status == 'CANCEL' || req_status == 'REJECT' ) {
param['maintain_type'] = 'READONLY';
param['function_usage'] = 'QUERY';
} else {
param['maintain_type'] = 'UPDATE';
param['function_usage'] = 'MODIFY';
}
if (record.get('ccr_document_type') == 'PAYCARD' && (req_status == 'REJECT' || req_status == 'CANCEL' || req_status == 'APPROVED' || req_status == 'APPROVING')) {
param['function_code'] = 'CON732Q';
param['function_usage'] = 'QUERY';
param['url_title'] = '变更申请-还款卡变更查询 ';
} else if (record.get('ccr_document_type') == 'BASICHAG' && (req_status == 'REJECT' || req_status == 'CANCEL' || req_status == 'APPROVED' || req_status == 'APPROVING')) {
param['function_code'] = 'CON702E';
param['function_usage'] = 'QUERY';
param['url_title'] = '变更申请-常规信息查询 ';
} else if (record.get('ccr_document_type') == 'CONEXTHAG' && (req_status == 'REJECT' || req_status == 'CANCEL' || req_status == 'APPROVED' || req_status == 'APPROVING')) {
param['function_code'] = 'CON732D';
param['function_usage'] = 'QUERY';
param['url_title'] = '变更申请-还款卡变更 ';
} else {
param['function_code'] = 'CON732D_BASIC';
param['url_title'] = '变更申请-常规信息调整 ';
if (record.get('ccr_document_type') == 'CUT_CHAG') {
param['function_code'] = 'CON733CF';
param['url_title'] = '变更申请-合同租金计划变更';
} else if (record.get('ccr_document_type') == 'LEASE_CHAG') {
param['function_code'] = 'CON733BPT';
param['url_title'] = '变更申请-合同承租人变更';
} else if (record.get('ccr_document_type') == 'ACC_CHAG') {
param['function_code'] = 'CON733BPB';
param['url_title'] = '变更申请-合同回款账户变更';
}
param['function_code'] = 'CON732D';
param['function_usage'] = 'MODIFY';
param['document_type'] = record.get('ccr_document_type');
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_change_link', ds_id);
};
......
......@@ -58,27 +58,6 @@
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link', ds_id);
}
function open_change_detail(ds_id, record_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
param['change_req_id'] = record.get('contract_id');
param['contract_id'] = record.get('contract_id');
param['function_usage'] = 'MODIFY';
param['maintain_type'] = 'UPDATE';
if (record.get('ccr_document_type') == 'CCHAG') {
param['function_code'] = 'CON732D';
param['url_title'] = '变更申请-报价信息变更 ';
} else if (record.get('ccr_document_type') == 'CGUTCHAG') {
param['function_code'] = 'CON732D_GUAR';
param['url_title'] = '变更申请-新增商业伙伴';
} else {
param['function_code'] = 'CON732D_BASIC';
param['url_title'] = '变更申请-常规信息调整 ';
}
param['document_type'] = record.get('ccr_document_type');
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_change_link', ds_id);
}
//工作流审批记录
function open_wfl_msg_detail(ds_id, record_id) {
......@@ -123,11 +102,21 @@
var req_status = record.get('req_status');
var param = record.data;
var req_status = record.get('req_status');
param['change_req_id'] = record.get('contract_id');
param['contract_id'] = record.get('contract_id');
param['function_code'] = 'CON732E';
param['change_req_id'] = record.get('change_req_id');
param['source_contract_id'] = record.get('source_contract_id');//變更前源合同id
param['contract_id'] = record.get('change_req_id');
if (record.get('ccr_document_type') == 'CUT_CHAG') {
param['function_code'] = 'CON733CF_Q';
param['url_title'] = '变更申请-合同回款账户变更查询';
} else if (record.get('ccr_document_type') == 'LEASE_CHAG') {
param['function_code'] = 'CON733BPT_Q';
param['url_title'] = '变更申请-合同回款账户变更查询';
} else if (record.get('ccr_document_type') == 'ACC_CHAG') {
//param['function_code'] = 'CON733BPB';
param['function_code'] = 'CON733BPBQ';
param['url_title'] = '变更申请-合同回款账户变更查询';
}
param['function_usage'] = 'QUERY';
param['url_title'] = '变更申请查询';
param['req_status'] = req_status;
param['query_flag'] = 'Y';
param['maintain_type'] = 'QUERY';
......
<?xml version="1.0" encoding="UTF-8"?>
<!--
2017-1-10 Harry 9952 2017/1/10 合同变更-经销商
合同变更
租金計劃變更
承租人變更
回款賬戶變更
-->
<a:screen xmlns:s="leaf.plugin.script" xmlns:a="http://www.leaf-framework.org/application"
customizationEnabled="true" dynamiccreateenabled="true" trace="true">
......@@ -13,7 +15,7 @@
url="${/request/@context_path}/modules/cont/CON505/con_contract_modify.lview"/>
<a:link id="con_contract_change_link"
url="${/request/@context_path}/modules/cont/CON731/hls_con_contract_change_detail.lview"/>
<a:link id="con731_create_change_link" model="cont.CON731.create_change_req" modelaction="execute"/>
<a:link id="con733_create_change_link" model="cont.CON733.create_change_req" modelaction="execute"/>
<a:link id="con_contract_change_req_link"
url="${/request/@context_path}/modules/cont/CON701/con_contract_et_print.lsc"/>
<script type="text/javascript"><![CDATA[
......@@ -34,6 +36,7 @@
return value;
};
window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function () {
$('${/parameter/@layout_code}_user_button1').disable(); //按钮不可用
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
var prj_project_result_ds = $(ds_id);
var records = prj_project_result_ds.getSelected();
......@@ -41,12 +44,12 @@
Leaf.showMessage('${l:PROMPT}', '${l:HLS.SELECT_RECORD}');
return;
}
Leaf.showConfirm('特别注意', '<font color="">该操作将导致合同在变更期间无法进行后续操作,请谨慎操作!!!如果需要取消变更,请一定点击取消变更按钮!!!</font>', function () {
Leaf.showConfirm('特别注意', '<span style="color: #ff0000; ">该操作将导致合同在变更期间无法进行后续操作,请谨慎操作!!!如果需要取消变更,请一定点击取消变更按钮!!!</span>', function () {
var record = records[0];
var head_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract_change_req');
var head_record = $(head_ds_id).getAt(0);
if ($(head_ds_id).validate()) {
if ($(head_ds_id).validate($('${/parameter/@layout_code}_user_button1').enable())) {
var contract = record.get('contract_id');
var ccr_document_type = head_record.get('ccr_document_type');
var req_date = head_record.get('req_date');
......@@ -54,7 +57,7 @@
var ref_v01 = head_record.get('ref_v01');
Leaf.Masker.mask(Ext.getBody());
Leaf.request({
url: $('con731_create_change_link').getUrl(),
url: $('con733_create_change_link').getUrl(),
para: {
simulation_flag: 'N',
contract_id: record.get('contract_id'),
......@@ -64,21 +67,35 @@
ref_v01: ref_v01
},
success: function (res) {
$('${/parameter/@layout_code}_user_button1').enable(); //按钮启用
var param = record.data;
param['change_req_id'] = res.result.change_req_id;
param['source_contract_id'] = record.get('contract_id');//變更前源合同id
param['contract_id'] = res.result.change_req_id;
param['function_code'] = 'CON732D';
param['url_title'] = '变更申请-合同变更';
param['function_usage'] = 'MODIFY';
param['maintain_type'] = 'UPDATE';
param['document_type'] = ccr_document_type;
if(ccr_document_type == 'CUT_CHAG'){//租金計劃變更
param['function_code'] = 'CON733CF';
param['url_title'] = '变更申请-合同租金计划变更';
param['winid'] = 'con733_cf_change_detail_winid';
}else if(ccr_document_type == 'LEASE_CHAG'){//承租人變更
param['function_code'] = 'CON733BPT';
param['url_title'] = '变更申请-合同承租人变更';
param['winid'] = 'con733_bpt_change_detail_winid';
}else if(ccr_document_type == 'ACC_CHAG'){//回款賬戶變更
param['function_code'] = 'CON733BPB';
param['url_title'] = '变更申请-合同回款账户变更';
param['winid'] = 'con733_bpb_change_detail_winid';
}
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_change_link', ds_id);
},
failure: function () {
$('${/parameter/@layout_code}_user_button1').enable(); //按钮启用
Leaf.Masker.unmask(Ext.getBody());
},
error: function () {
$('${/parameter/@layout_code}_user_button1').enable(); //按钮启用
Leaf.Masker.unmask(Ext.getBody());
},
scope: this
......@@ -86,23 +103,13 @@
}
}, null, 300, 150);
};
//变更申请打印单
window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function () {
var xmlTemp = '';
var fileName = '';
xmlTemp = 'con_contract_change_req_apply.xml';
fileName = '变更申请单.pdf';
var url = $('con_contract_change_req_link').getUrl() + '?xmlTemp=' + xmlTemp + '&fileName=' + fileName;
window.open(url);
};
window['${/parameter/@layout_code}_on_layout_dynamic_grid_query'] = function (ds, qpara, bp_seq) {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'con_contract');
if (ds == $(ds_id)) {
aut_authority_list_validate_query(ds, qpara);
}
// if (ds == $(ds_id)) {
// aut_authority_list_validate_query(ds, qpara);
//
// }
};
]]></script>
<a:screen-include
......
......@@ -6,7 +6,7 @@
<a:init-procedure/>
<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_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_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"/>
......@@ -60,6 +60,7 @@
};
window['${/parameter/@layout_code}_submit_approval_layout_dynamic_click'] = function() {
$('${/parameter/@layout_code}_submit_approval').disable();
var req_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'F_BASE_01', 'con_contract_change_req');
var req_record = $(req_ds_id).getAt(0);
var case_type = '';
......@@ -67,12 +68,17 @@
var calc_session_id = req_record.get('calc_session_id');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_lock_layout_dynamic_window']();
if ($(req_ds_id).validate()) {
if (req_record.dirty) {
Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
return;
}
if ($(req_ds_id).validate($('${/parameter/@layout_code}_submit_approval').enable())) {
// if (req_record.dirty) {
// Leaf.showMessage('${l:HLS.PROMPT}', '${l:HLS.EXECUTE_AFTER_SAVE}');
// window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
// return;
// }
$('${/parameter/@layout_code}_submit_approval').disable();
$('${/parameter/@layout_code}_save').disable();
$('${/parameter/@layout_code}_user_button1').disable();
$('${/parameter/@layout_code}_user_button2').disable();
$('${/parameter/@layout_code}_user_button3').disable();
setTimeout(window['${/parameter/@layout_code}_SAVE_LAYOUT_DYNAMIC_CLICK'](con_repo001_submit), 2000);
} else {
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
......@@ -89,13 +95,28 @@
layout_code: '${/parameter/@layout_code}'
},
success: function(res) {
$('${/parameter/@layout_code}_submit_approval').enable();
$('${/parameter/@layout_code}_save').enable();
$('${/parameter/@layout_code}_user_button1').enable();
$('${/parameter/@layout_code}_user_button2').enable();
$('${/parameter/@layout_code}_user_button3').enable();
$('${/parameter/@winid}').close();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
failure: function() {
$('${/parameter/@layout_code}_submit_approval').enable();
$('${/parameter/@layout_code}_save').enable();
$('${/parameter/@layout_code}_user_button1').enable();
$('${/parameter/@layout_code}_user_button2').enable();
$('${/parameter/@layout_code}_user_button3').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
error: function() {
$('${/parameter/@layout_code}_submit_approval').enable();
$('${/parameter/@layout_code}_save').enable();
$('${/parameter/@layout_code}_user_button1').enable();
$('${/parameter/@layout_code}_user_button2').enable();
$('${/parameter/@layout_code}_user_button3').enable();
window['${/parameter/@bp_seq}${/parameter/@layout_code}_unlock_layout_dynamic_window']();
},
scope: this
......@@ -112,6 +133,7 @@
if (ca_ds_id_c) {
$(ca_ds_id_c).query();
}
window['${/parameter/@layout_code}_unlock_layout_dynamic_window']();
};
//报价计算
window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function() {
......@@ -196,6 +218,23 @@
window['${/parameter/@layout_code}_on_layout_dynamic_grid_load'] = function (ds, qpara, bp_seq) {
};
//图片渲染
window['${/parameter/@bp_seq}${/parameter/@layout_code}_dynamic_pic_renderer'] = function(record, name, bp_seq) {
var result = name.match(/(.*)_pic$/);
if (result) {
var pic_value = record.get(result[1]);
if (pic_value == 'OUTFLOW') {
return '<img src="${/request/@context_path}/images/outflow.png" style="margin-top:4px"/>';
} else if (pic_value == 'INFLOW') {
return '<img src="${/request/@context_path}/images/inflow.png" style="margin-top:4px"/>';
} else if (pic_value == 'NONCASH') {
return '<img src="${/request/@context_path}/images/noncash.png" style="margin-top:4px"/>';
} else if (pic_value == 'CASH') {
return '<img src="${/request/@context_path}/images/cash.png" style="margin-top:4px"/>';
}
}
};
]]></script>
<a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/>
</a:view>
......
......@@ -28,7 +28,7 @@
var record = records[0],
contract_id = record.get('contract_id');
Leaf.showConfirm('特别注意', '<span style="color: #ff0000; ">该操作将导致合同在回购期间无法进行后续操作,请谨慎操作!!!如果需要取消提前结清,请一定点击取消按钮!!!</span>', function () {
var ccr_document_type = 'ET';
var ccr_document_type = 'ET_CHAG';
Leaf.Masker.mask(Ext.getBody());
Leaf.request({
url: $('con_et_create_change_link').getUrl(),
......@@ -133,7 +133,7 @@
<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:comboBox name="division_n" bindTarget="contractQueryScreen_paraDs" prompt="租赁物"/>
<!-- <a:textField name="received_times" bindTarget="contractQueryScreen_paraDs" prompt="已还款期数"/>-->
<!-- <a:comboBox name="contract_status_desc" bindTarget="contractQueryScreen_paraDs" prompt="合同状态"/>-->
<a:comboBox name="overdue_status_desc" bindTarget="contractQueryScreen_paraDs" prompt="是否逾期"/>
......@@ -144,7 +144,7 @@
<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="division_n" prompt="租赁物" width="120" align="left"/>
<a:column name="received_times" prompt="已还款期数" width="80" align="right"/>
<a:column name="status_desc" prompt="合同状态" width="120" align="center"/>
<a:column name="overdue_status" prompt="是否逾期" width="100" align="center"/>
......
......@@ -21,7 +21,7 @@
function contractQueryScreen_reset() {
$('contractQueryScreen_paraDs').reset();
}
function open_change_req(value,record,name){debugger
function open_change_req(value,record,name){
if(name=='change_req_number'){
var req_status = record.get('req_status');
var change_req_id = record.get('change_req_id');
......@@ -34,7 +34,7 @@
}
return value;
}
function open_change_req_detail(change_req_id,contract_id) {debugger
function open_change_req_detail(change_req_id,contract_id) {
var param = {};
param['change_req_id'] = change_req_id;
param['contract_id'] = change_req_id;
......@@ -44,7 +44,7 @@
param['url_title'] = '提前结清维护';
param['function_usage'] = 'MODIFY';
param['maintain_type'] = 'UPDATE';
param['document_type'] = 'ET';
param['document_type'] = 'ET_CHAG';
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');
}
......@@ -58,7 +58,7 @@
param['url_title'] = '提前结清明细';
param['function_usage'] = 'READONLY';
param['maintain_type'] = 'QUERY';
param['document_type'] = 'ET';
param['document_type'] = 'ET_CHAG';
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');
}
......@@ -131,7 +131,7 @@
<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: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>
......@@ -142,7 +142,7 @@
<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="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>
......
......@@ -5,7 +5,6 @@
<a:screen xmlns:a="http://www.leaf-framework.org/application" customizationEnabled="true" dynamiccreateenabled="true" trace="true">
<a:init-procedure/>
<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_repo_submit_link" model="" modelaction="execute"/>
<a:link id="con_repo001_cancel_link" model="cont.CON731.cancel_change_req" modelaction="execute"/>
<a:link id="con_repo001_calc_cashflow_link" model="cont.CON_REPO001.calc_cashflow" modelaction="execute"/>
......@@ -27,9 +26,29 @@
// $(ds_us_id).query();
// }
});
function open_contract_win(ds_id, record_id) {
var record = $(ds_id).findById(record_id);
var param = record.data;
param['function_code'] = 'CON301';
param['function_usage'] = 'QUERY';
param['download'] = 'Y';
param['maintain_type'] = 'UPDATE';
param['url_title'] = '${l:CON301.CONTRACT_DETAIL}';
hls_doc_get_layout_code('con_contract_get_layout_code_link_id', param, 'con_contract_modify_link', ds_id);
}
//新增和加载时调用form
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_form_add_and_load'] = function(ds, record, config_records, bp_seq) {
var repurchase_types = record.get('repurchase_types');
if (repurchase_types == 'ONE_TIME_REPURCHASE') {
record.getField('payment_frequency_n').setRequired(false);
record.getField('payment_frequency').setRequired(false);
record.getField('payment_period').setRequired(false);
record.getField('payment_frequency_n').setReadOnly(true);
record.getField('payment_period').setReadOnly(true);
record.set('payment_period', 1);
record.set('payment_frequency', null);
record.set('payment_frequency_n', null);
}
};
// window['${/parameter/@layout_code}_SAVE_LAYOUT_DYNAMIC_CLICK'] = function () {
// debugger;
......@@ -66,6 +85,8 @@
record.getField('payment_frequency_n').setReadOnly(true);
record.getField('payment_period').setReadOnly(true);
record.set('payment_period', 1);
record.set('payment_frequency', null);
record.set('payment_frequency_n', null);
if (name == 'ccr_due_amount') {
var due_amount = record.get('due_amount') || 0;
if (due_amount < value) {
......@@ -104,7 +125,7 @@
// sum_overdue_amount+ccr_due_amount+sum_unreceived_principal+residual_value+repurchase_service_charges+fund_possession_cost
// 回购价款计算基数 = 逾期租金 + 逾期罚息(调整后)+ 剩余本金 + 留购价
// 逾期罚息(调整后)
if(name == 'payment_period'){debugger
if(name == 'payment_period'){
if(value <= 0 || value == NaN || value == undefined){
Leaf.showMessage('${l:HLS.PROMPT}', '支付期数请填写大于0的整数!');
return;
......@@ -123,7 +144,7 @@
record.set('repurchase_count_amount', repurchase_count_amount);
}
// 手续费
if (name == 'repurchase_service_charges') {debugger
if (name == 'repurchase_service_charges') {
var repurchase_count_amount = plus(plus(plus(record.get('sum_overdue_amount') || 0, record.get('ccr_due_amount') || 0), record.get('sum_unreceived_principal') || 0)
, record.get('residual_value') || 0);
var repurchase_tatal_amount = plus(plus(repurchase_count_amount, value || 0), record.get('fund_possession_cost') || 0);
......@@ -147,7 +168,7 @@
record.set('repurchase_tatal_amount', repurchase_tatal_amount);
record.set('repurchase_count_amount', repurchase_count_amount);
}
if(name == 'sum_unreceived_principal'){debugger
if(name == 'sum_unreceived_principal'){
var repurchase_count_amount = plus(plus(plus(record.get('sum_overdue_amount') || 0, record.get('ccr_due_amount') || 0), value || 0)
, record.get('residual_value') || 0);
var repurchase_tatal_amount = plus(plus(repurchase_count_amount, record.get('repurchase_service_charges') || 0), record.get('fund_possession_cost') || 0);
......@@ -162,13 +183,14 @@
contract_id: record.get('contract_id'),
repurchase_date: value
},
success: function (res) {debugger
success: function (res) {
record.set('last_rent_due_date', res.result.last_rent_due_date);
record.set('sum_received_rent_amount', res.result.sum_received_rent_amount);
record.set('sum_unreceived_rent_amount', res.result.sum_unreceived_rent_amount);
record.set('sum_overdue_amount', res.result.sum_overdue_amount);
record.set('sum_unreceived_principal', res.result.sum_unreceived_principal);
record.set('due_amount', res.result.due_amount);
record.set('ccr_due_amount', res.result.due_amount);
},
failure: function () {
......@@ -308,6 +330,33 @@
};
window['${/parameter/@layout_code}_on_layout_dynamic_grid_load'] = function (ds, qpara, bp_seq) {
};
window['${/parameter/@layout_code}_dynamic_link_renderer'] = function(value, record, name, config_record, bp_seq) {
window['${/parameter/@layout_code}_hls_link_render_record'][record.id + '---' + name] = record;
if (name == 'contract_number' && value) {
return '<a href="javascript:open_contract_win(\'' + record.ds.id + '\',\'' + record.id + '\')">' + value + '</a>';
}else if (name == 'description') {
if (record.get('important_flag') == 'Y') {
return '<font color="RED">' + value + '</font>';
}
return value;
}
}
//图片渲染
window['${/parameter/@bp_seq}${/parameter/@layout_code}_dynamic_pic_renderer'] = function(record, name, bp_seq) {
var result = name.match(/(.*)_pic$/);
if (result) {
var pic_value = record.get(result[1]);
if (pic_value == 'OUTFLOW') {
return '<img src="${/request/@context_path}/images/outflow.png" style="margin-top:4px"/>';
} else if (pic_value == 'INFLOW') {
return '<img src="${/request/@context_path}/images/inflow.png" style="margin-top:4px"/>';
} else if (pic_value == 'NONCASH') {
return '<img src="${/request/@context_path}/images/noncash.png" style="margin-top:4px"/>';
} else if (pic_value == 'CASH') {
return '<img src="${/request/@context_path}/images/cash.png" style="margin-top:4px"/>';
}
}
};
]]></script>
<a:screen-include screen="modules/cont/CON500/con_contract_get_layout_code.lview"/>
......
......@@ -740,7 +740,7 @@
<a:columns>
<a:column name="transaction_num" prompt="CSH510.CSH_TRANSACTION.CSH_TRANSACTION_NUM" renderer="seedetail_transaction_num" width="110"/>
<a:column name="receipt_type" align="center" prompt="CSH510.CSH_TRANSACTION.RECEIPT_TYPE" width="100"/>
<a:column name="receipt_type_n" align="center" prompt="CSH510.CSH_TRANSACTION.RECEIPT_TYPE" width="100"/>
<a:column name="transaction_amount" align="right" prompt="CSH510.CSH_TRANSACTION.RECEIPT_AMOUNT" width="100" renderer="Leaf.formatMoney"/>
<a:column name="transaction_date" renderer="Leaf.formatDate" align="center"/>
<a:column name="returned_amount" prompt="CSH510.CSH_TRANSACTION.RETURN_AMOUNT" align="right" renderer="Leaf.formatMoney" />
......
......@@ -26,6 +26,7 @@
//附件上传
function upload_attachment_win() {
var record=$('csh_transaction_receipt_head_ds').getAt(0);
/* var record = $(ds_id).findById(record_id);
var mortgage_id = record.get('mortgage_id');*/
var win = new Leaf.Window({
......@@ -33,11 +34,11 @@
url: $('hn2050_upload_win_link').getUrl(),
params: {
winid: 'hn2050_upload_win',
table_name: 'hn_virtual_con_mortgage',
header_id: 1000
table_name: 'csh_transaction',
header_id: record.get('transaction_id')
},
width: 900,
hight: 400
height: 400
}).on('close', function() {
//record.ds.query();
});
......
......@@ -14,7 +14,7 @@
<a:model-query fetchAll="true" model="csh.CSH511.csh_transaction_default_exchange_rate_type" rootPath="default_exchange_rate_type_path"/>
</a:init-procedure>
<a:view>
<a:link id="hn2050_upload_win_link" url="${/request/@context_path}/uploadFile.lview"/>
<a:link id="hn2050_upload_win_link" url="${/request/@context_path}/downloadFile.lview"/>
<a:link id="csh_receipt_import_link" url="${/request/@context_path}/modules/csh/CSH511/csh_transaction_receipt_impiort.lview"/>
<a:link id="csh_transaction_receipt_id" url="${/request/@context_path}/modules/csh/CSH511/csh_transaction_receipt.lview"/>
<a:link id="get_exchange_rate_link_id" model="csh.CSH511.csh_transaction_get_exchange_rate" modelaction="query"/>
......@@ -26,6 +26,8 @@
//附件上传
function upload_attachment_win() {
var record=$('csh_transaction_receipt_head_ds').getAt(0);
/* var record = $(ds_id).findById(record_id);
var mortgage_id = record.get('mortgage_id');*/
var win = new Leaf.Window({
......@@ -33,11 +35,11 @@
url: $('hn2050_upload_win_link').getUrl(),
params: {
winid: 'hn2050_upload_win',
table_name: 'hn_virtual_con_mortgage',
header_id: 1000
table_name: 'csh_transaction',
header_id: record.get('transaction_id')
},
width: 900,
hight: 400
height: 400
}).on('close', function() {
//record.ds.query();
});
......
......@@ -728,7 +728,7 @@
<a:column name="description" prompt="CSH510.CSH_TRANSACTION.DESCRIPTION" align="center"/>
<a:column name="confirmed_flag_desc" prompt="CSH510.CSH_TRANSACTION.BILL_STATUS" align="center"/>
<a:column name="written_off_flag_desc" prompt="CSH510.CSH_TRANSACTION.WRITTEN_OFF_STATUS" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.MY_ACCOUNT" >
<a:column prompt="CSH510.CSH_TRANSACTION.MY_ACCOUNT">
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_NAME" name="bank_account_name" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_BANK" name="bank_branch_name" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_NUM" name="bank_account_num" align="center"/>
......
......@@ -29,43 +29,10 @@
if(import_flag==0){
for (var i = 0;i < records.length;i++) {
var record=records[i];
/*if (record.get('status') == 'ERROR') {
//错误的行不导入,其他行正常导入,这里不再判断cuo,在插入数据的时候
Leaf.showMessage('${l:PROMPT}', '导入的数据存在错误,请查看错误信息!');
//将该条数据从导入的ds中
//return;
}*/
//获得周期时间
/* var r_date = record.get('attribute_3');
r_date = Leaf.formatDate(r_date);
Leaf.request({
url: $('get_period_name_id').getUrl(),
para: {
p_date: r_date,
date : new Date().getMilliseconds()
},
success: function(res){
var period_name = res.result.record.period_name,
internal_period_num = res.result.record.internal_period_num;
record.set('period_name', period_name);
record.set('internal_period_num', internal_period_num);
if (period_name) {
record.set('period_name', period_name);
record.set('internal_period_num', internal_period_num);
} else {
record.set('period_name', '');
record.set('internal_period_num', '');
if (record.get('transaction_date')) {
record.set('transaction_date', '');
Leaf.showMessage('${l:PROMPT}', '${l:CSH511.PERIOD_ERROR}');
}
}
},
scope: this
});*/
if( record.get('status') == 'ERROR'){
//不将这条数据传递到数组中
continue;
}
//否则的话添加必要的字段
record.set('receipt_type','IMPORT');
record.set('bank_account_num',record.get('attribute_1'));
......@@ -82,36 +49,6 @@
record.set('write_off_flag','DISABLED');
//根据银行卡号设置我方的银行账号
/*Leaf.request({
url: $('import_csh_transaction_receipt_data_link_id').getUrl(),
para: {
bank_account_num:record.get('attribute_1'),
bp_bank_account_num:record.get('attribute_8')
},
success: function(res){
record.set('bank_account_id',res.result.bank_account_id);
//根据对方的银行卡号获取商业伙伴信息
record.set('bp_category',res.result.bp_category);
record.set('csh_bp_name',res.result.csh_bp_name);
//i. 若能找到唯一值且该商业伙伴类型为承租人,则代付字段为“否”、商业伙伴字段为匹配到的商业伙伴;
// ii. 若能找到唯一值且该商业伙伴类型为代理店,则代付字段为“是”、商业伙伴字段为匹配到的商业伙伴;
//iii. 若无法找到匹配项或匹配到多项,则代付字段为“是”、商业伙伴字段为空;
if(res.result.bp_id!=-1&&res.result.bp_category=='TENANT'){
record.set('paid_byother_flag','F');
record.set('bp_id',res.result.bp_id);
}else if(res.result.bp_id!=-1&&res.result.bp_category=='AGENCY'){
record.set('paid_byother_flag','T');
record.set('bp_id',res.result.bp_id);
}else{
record.set('paid_byother_flag','T');
record.set('bp_id',null);
}
},
scope: this
});*/
record.set('_status','insert');
saveData.push(record.data);
......@@ -119,7 +56,7 @@
//开始导入数据
Leaf.showConfirm('提示', '确定要导入信息吗,有错误信息的数据将不会被导入', function() {
Leaf.Masker.mask(Ext.getBody(), '${l:HLS.EXECUTING}');
Leaf.request({
url: $('save_import_csh_transaction_receipt_data_link_id').getUrl(),
para: saveData,
......@@ -127,12 +64,14 @@
success: function () {
import_flag = import_flag + 1;
$('tre_withdraw_subscriber_import_ds').query();
Leaf.Masker.unmask(Ext.getBody());
Leaf.SideBar.show({
msg: '操作成功',
duration: 2000
});
// backBtn();
//关闭该导入的界面
backBtn();
}
});
});
......
......@@ -15,20 +15,26 @@
<a:link id="${/parameter/@layout_code}_csh560_cdd_uploadFile_id" url="${/request/@context_path}/uploadFile.lview"/>
<a:link id="transaction_return_uploadFile_link_id" url="${/request/@context_path}/uploadFile.lview"/>
<script type="text/javascript"><![CDATA[
Leaf.onReady(function(){
// console.log('${/parameter}');
})
window['${/parameter/@bp_seq}${/parameter/@layout_code}_on_layout_dynamic_form_add_and_load'] = function(ds, record, config_records, bp_seq) {
var transaction_amount = ${/parameter/@transaction_amount}||0;
/* var transaction_amount = ${/parameter/@transaction_amount}||0;
var return_amount = ${/parameter/@returned_amount}||0;
var write_off_amount = ${/parameter/@write_off_amount}||0;
var remain_total_amount = ${/parameter/@remain_total_amount}||0;
var bank_slip_num = '${/parameter/@bank_slip_num}';
var bank_slip_num = '${/parameter/@bank_slip_num}';*/
record.set('remain_total_amount',remain_total_amount);
record.set('bank_slip_num',bank_slip_num);
};
//提交按钮
window['${/parameter/@layout_code}_user_button1_layout_dynamic_click'] = function() {
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'csh_transaction_return');
console.log($(ds_id).getAt(0));
var return_id = $(ds_id).getAt(0).get('return_id');
var transaction_amount = $(ds_id).getAt(0).get('transaction_amount');
var this_return_amount = $(ds_id).getAt(0).get('this_return_amount');
var return_amount = $(ds_id).getAt(0).get('return_amount');
......@@ -43,35 +49,40 @@
Leaf.showMessage('提示', '退款金额不能大于可退款金额!');
return;
}
var fin_amount = '${/model/fin_amount_check/record/@fin_amount}';
/* var fin_amount = '${/model/fin_amount_check/record/@fin_amount}';*/
// if(check_amount < 0.1 * fin_amount){
// Leaf.showMessage('提示','退还后保证金不足融资余额10%!');
// return;
// }
var detail_mask = $('${/parameter/@winid}').wrap;
Leaf.Masker.mask(detail_mask, '${l:HLS.EXECUTING}');
Leaf.request({
url: $('csh560_start_wfl_link').getUrl(),
para: {
return_id: return_id
},
success: function(res) {
parent.Leaf.SideBar.enable = true;
parent.Leaf.SideBar.show({
msg: '${l:HLS.SUBMIT_SUCCESS}',
duration: 2000
});
Leaf.Masker.unmask(detail_mask);
$('${/parameter/@winid}').close();
},
error: function(res) {
Leaf.Masker.unmask(detail_mask);
},
faliure: function() {
Leaf.Masker.unmask(detail_mask);
},
scope: this
});
$L.showConfirm("提示",'确认提交审批?',function(){
var detail_mask = $('${/parameter/@winid}').wrap;
Leaf.Masker.mask(detail_mask, '${l:HLS.EXECUTING}');
Leaf.request({
url: $('csh560_start_wfl_link').getUrl(),
para: {
return_id: return_id
},
success: function(res) {
parent.Leaf.SideBar.enable = true;
parent.Leaf.SideBar.show({
msg: '${l:HLS.SUBMIT_SUCCESS}',
duration: 2000
});
Leaf.Masker.unmask(detail_mask);
$('${/parameter/@winid}').close();
},
error: function(res) {
Leaf.Masker.unmask(detail_mask);
},
faliure: function() {
Leaf.Masker.unmask(detail_mask);
},
scope: this
});
})
};
//上传按钮
......
......@@ -19,6 +19,7 @@
<a:link id="csh560_check_wfl_link" model="csh.CSH560.return_workflow_start" modelaction="query"/>
<a:link id="csh515_amount_return_link" url="${/request/@context_path}/modules/csh/CSH515/csh_amount_return.lview"/>
<a:link id="csh515_get_layout_link" model="cont.CON500.con_contract_get_layout_code" modelaction="update"/>
<a:link id="csh_transaction_receipt_maintain_readonly_link" url="${/request/@context_path}/modules/csh/CSH510/csh_transaction_hand_receipt_update_readonly.lview"/>
<script type="text/javascript"><![CDATA[
function dateValidator(record, name, value) { //日期校验方法
if (name == 'transaction_date_from' || name == 'transaction_date_to') {
......@@ -76,16 +77,14 @@
location.href = $('sys_service_welcome_link').getUrl();
parent.shMenu('show');
}
function seedetail_transaction_num(value, record, name) {
if (record.get('transaction_id')) {
var url;
url = $('csh_transaction_receipt_return_maintain_link').getUrl() + '?transaction_id=' + record.get('transaction_id');
return '<a href="javascript:openWindow(\'' + url + '\');">' + value + '</a>';
}
function seedetail_transaction_num(value, record, name) {
if (record.get('transaction_id')) {
var url;
url = $('csh_transaction_receipt_maintain_readonly_link').getUrl() + '?transaction_id=' + record.get('transaction_id')+'&update_flag=false';
return '<a href="javascript:openWindow(\'' + url + '\');">' + value + '</a>';
}
}
function openWindow(url) {
new Leaf.Window({
......@@ -184,6 +183,7 @@
var returned_amount = record.get('returned_amount')||0;
var write_off_amount = record.get('write_off_amount')||0;
var transaction_amount = record.get('transaction_amount')||0;
var can_returned_amount = record.get('can_returned_amount')||0;
var bp_id = record.get('bp_id');
var remain_total_amount = record.get('remain_total_amount');
var bank_slip_num = record.get('bank_slip_num');
......@@ -202,12 +202,14 @@
return;
}
var param = record.data;
param['bank_slip_num'] = bank_slip_num;
param['function_code'] = 'CSH560R';
param['url_title'] = '收款退款';
param['bp_id'] = bp_id;
param['transaction_id'] = transaction_id;
param['write_off_amount'] = write_off_amount;
param['returned_amount'] = returned_amount;
param['can_returned_amount']=can_returned_amount;
param['transaction_amount'] = transaction_amount;
param['remain_total_amount'] = remain_total_amount;
param['winid'] = 'csh515_amount_return_winid';
......@@ -284,6 +286,72 @@
<a:map from="bank_account_code" to="bank_account_code_from"/>
</a:mapping>
</a:field>
<a:field name="bank_account_name" autoComplete="true" lovGridHeight="350" lovHeight="550" lovLabelWidth="90" lovService="csh.CSH101.csh_bank_account_lov" lovWidth="850" title="CSH511.BANK_ACCOUNT_CODE">
<a:mapping>
<a:map from="precision" to="precision"/>
<a:map from="zero_amounts_allowed" to="zero_amounts_allowed"/>
<a:map from="bank_account_id" to="bank_account_id"/>
<a:map from="bank_account_num" to="bank_account_num"/>
<a:map from="bank_account_name" to="bank_account_name"/>
<a:map from="bank_account_code" to="bank_account_code"/>
<a:map from="currency_code" to="currency_code"/>
<a:map from="currency_name" to="currency_name"/>
<a:map from="bank_account_type" to="bank_account_type"/>
<a:map from="bank_account_type_name" to="bank_account_type_name"/>
<a:map from="bank_branch_name" to="bank_branch_name"/>
</a:mapping>
</a:field>
<a:field name="bank_branch_name" autoComplete="true" lovGridHeight="350" lovHeight="550" lovLabelWidth="90" lovService="csh.CSH101.csh_bank_account_lov" lovWidth="850" title="CSH511.BANK_ACCOUNT_CODE">
<a:mapping>
<a:map from="precision" to="precision"/>
<a:map from="zero_amounts_allowed" to="zero_amounts_allowed"/>
<a:map from="bank_account_id" to="bank_account_id"/>
<a:map from="bank_account_num" to="bank_account_num"/>
<a:map from="bank_account_name" to="bank_account_name"/>
<a:map from="bank_account_code" to="bank_account_code"/>
<a:map from="currency_code" to="currency_code"/>
<a:map from="currency_name" to="currency_name"/>
<a:map from="bank_account_type" to="bank_account_type"/>
<a:map from="bank_account_type_name" to="bank_account_type_name"/>
<a:map from="bank_branch_name" to="bank_branch_name"/>
</a:mapping>
</a:field>
<a:field name="bank_account_num" autoComplete="true" lovGridHeight="350" lovHeight="550" lovLabelWidth="90" lovService="csh.CSH101.csh_bank_account_lov" lovWidth="850" title="CSH511.BANK_ACCOUNT_CODE">
<a:mapping>
<a:map from="precision" to="precision"/>
<a:map from="zero_amounts_allowed" to="zero_amounts_allowed"/>
<a:map from="bank_account_id" to="bank_account_id"/>
<a:map from="bank_account_num" to="bank_account_num"/>
<a:map from="bank_account_name" to="bank_account_name"/>
<a:map from="bank_account_code" to="bank_account_code"/>
<a:map from="currency_code" to="currency_code"/>
<a:map from="currency_name" to="currency_name"/>
<a:map from="bank_account_type" to="bank_account_type"/>
<a:map from="bank_account_type_name" to="bank_account_type_name"/>
<a:map from="bank_branch_name" to="bank_branch_name"/>
</a:mapping>
</a:field>
<a:field name="bp_bank_account_name" lovGridHeight="350" lovHeight="550" lovService="csh.CSH510.csh_transaction_for_lov" lovLabelWidth="90" lovWidth="580" title="对方账户信息">
<a:mapping>
<a:map from="bp_bank_account_name" to="bp_bank_account_name"/>
<a:map from="opposite_band_na" to="opposite_band_na"/>
<a:map from="bp_bank_account_num" to="bp_bank_account_num"/>
</a:mapping>
</a:field>
<a:field name="opposite_band_na" lovGridHeight="350" lovHeight="550" lovService="csh.CSH510.csh_transaction_for_lov" lovLabelWidth="90" lovWidth="580" title="对方账户信息">
<a:mapping>
<a:map from="bp_bank_account_name" to="bp_bank_account_name"/>
<a:map from="opposite_band_na" to="opposite_band_na"/>
<a:map from="bp_bank_account_num" to="bp_bank_account_num"/>
</a:mapping>
</a:field>
<a:field name="bp_bank_account_num" lovGridHeight="350" lovHeight="550" lovService="csh.CSH510.csh_transaction_for_lov" lovLabelWidth="90" lovWidth="580" title="对方账户信息">
<a:mapping>
<a:map from="bp_bank_account_name" to="bp_bank_account_name"/>
<a:map from="opposite_band_na" to="opposite_band_na"/>
<a:map from="bp_bank_account_num" to="bp_bank_account_num"/>
</a:mapping>
</a:field>
<a:field name="bank_account_from_id"/>
<a:field name="bank_account_code_to" autoComplete="true" autoCompleteField="bank_account_num" lovGridHeight="350" lovHeight="550" lovLabelWidth="90" lovService="csh.CSH101.csh_bank_account_lov" lovWidth="580" title="CSH511.BANK_ACCOUNT_CODE">
<a:mapping>
......@@ -355,47 +423,66 @@
<a:gridButton click="csh510_receipt_quit" text="HLS.EXIT"/> -->
<a:gridButton click="csh510_receipt_query" text="HLS.QUERY"/>
<a:gridButton click="csh510_receipt_reset" text="HLS.RESET"/>
<a:gridButton click="csh515_receipt_return" text="CSH515.CSH_REFUND"/>
<a:gridButton click="csh515_receipt_return" text="CSH515.CSH_REFUND" id="csh515_receipt_return"/>
<a:gridButton click="csh515_receipt_return_list" text="CSH515.CSH_REFUND_DETAILS"/>
</a:screenTopToolbar>
<a:form bindTarget="csh_transaction_receipt_maintain_query_ds" column="3" labelWidth="130" marginWidth="35" title="CSH515.CSH_RECEIPT_REFUND">
<a:comboBox name="transaction_type_display" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_RECEIPT_CATEGORY"/>
<a:lov name="bp_name" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="HLS.BP_TITLE"/>
<a:lov name="bank_account_code_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.BANK_ACCOUNT_CODE_FROM"/>
<!--<a:lov name="bank_account_code_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.BANK_ACCOUNT_CODE_TO"/>-->
<a:textField name="transaction_num_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="现金事务编号"/>
<!--<a:textField name="transaction_num_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="现金事务编号到"/>-->
<a:numberField name="transaction_amount_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="收款金额从"/>
<a:numberField name="transaction_amount_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="收款金额到"/>
<a:datePicker name="transaction_date_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.TRANSACTION_DATE_FROM"/>
<a:datePicker name="transaction_date_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.TRANSACTION_DATE_TO"/>
<!--<a:comboBox name="payment_method_display" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="HLS.PAYMENT_METHOD"/>-->
<!--<a:comboBox name="returned_flag_display" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.RETURNED_FLAG_CHOOSE"/>-->
<a:textField name="bank_slip_num_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="银行流水号"/>
<!--<a:textField name="bank_slip_num_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="银行流水号到"/>-->
<!--<a:comboBox name="currency_name_from_display" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="HLS.CURRENCY_FROM"/>
<a:comboBox name="currency_name_to_display" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="HLS.CURRENCY_TO"/>-->
<!--<a:lov name="period_name" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="GLD_PERIODS.PERIOD_NAME"/>-->
<!--<a:lov name="user_desc" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="HLS.DOCUMENT_CREATED_BY"/>-->
<a:form bindTarget="csh_transaction_receipt_write_off_query_ds" labelWidth="120" marginWidth="80"
title="收款核销" style="margin-left:20px">
<a:hBox>
<a:fieldSet column="4" labelWidth="150" title="HLS.QUERY_TITLE">
<a:datePicker name="transaction_date_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.TRANSACTION_DATE_FROM"/>
<a:datePicker name="transaction_date_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.TRANSACTION_DATE_TO"/>
<a:numberField name="transaction_amount_from" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.TRANSACTION_AMOUNT_FROM" align="right"/>
<a:numberField name="transaction_amount_to" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.TRANSACTION_AMOUNT_TO" align="right"/>
<!--我方账户户名-->
<a:lov name="bank_account_name" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.MY_ACCOUNT_NAME"/>
<a:lov name="bank_branch_name" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.MY_BANK_NAME"/>
<a:lov name="bank_account_num" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.MY_ACCOUNT_USERNAME"/>
<!--银行流水号-->
<a:textField name="bank_slip_num" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.BANK_CASH_CODE"/>
<!--对方账户户名-->
<a:lov name="bp_bank_account_name" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.YOUR_ACCOUNT_NAME"/>
<!--对方银行名称-->
<a:lov name="opposite_band_na" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.YOUR_BANK_NAME"/>
<!--对方账户账号-->
<a:lov name="bp_bank_account_num" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.YOUR_ACCOUNT_USERNAME"/>
<a:lov name="bp_name" bindTarget="csh_transaction_receipt_maintain_query_ds" prompt="CSH510.CSH_TRANSACTION.BUSINESS_PARTNER"/>
</a:fieldSet>
</a:hBox>
</a:form>
<a:grid id="csh_transaction_receipt_maintain_grid_ds" bindTarget="csh_transaction_receipt_return_maintain_ds" marginHeight="290" marginWidth="35" navBar="true">
<a:grid id="csh_transaction_receipt_maintain_grid_ds" bindTarget="csh_transaction_receipt_return_maintain_ds" marginHeight="180" marginWidth="35" navBar="true">
<a:columns>
<a:column name="transaction_num" prompt="现金事务编号" renderer="seedetail_transaction_num" width="120"/>
<a:column name="transaction_date" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_DATE" renderer="Leaf.formatDate"/>
<a:column name="currency_name" prompt="HLS.CURRENCY"/>
<a:column name="transaction_amount" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_AMOUNT" renderer="Leaf.formatMoney"/>
<a:column name="transaction_num" prompt="现金事务编号" renderer="seedetail_transaction_num" width="120" align="center"/>
<a:column name="receipt_type_n" align="center" prompt="CSH510.CSH_TRANSACTION.RECEIPT_TYPE" width="100"/>
<a:column name="transaction_amount" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_AMOUNT" renderer="Leaf.formatMoney" align="right"/>
<a:column name="transaction_date" prompt="CSH511.CSH_TRANSACTION.TRANSACTION_DATE" renderer="Leaf.formatDate" align="center"/>
<a:column name="can_returned_amount" prompt="可退款金额" renderer="Leaf.formatMoney" align="right"/>
<a:column name="bp_name" prompt="HLS.BP_NAME" align="center"/>
<a:column name="bank_slip_num" prompt="银行流水号" align="center"/>
<a:column name="returned_amount" renderer="Leaf.formatMoney" align="right"/>
<!-- <a:column name="posted_flag" prompt="HLS.POST"/> -->
<a:column name="bank_account_code" prompt="CSH511.BANK_ACCOUNT_CODE"/>
<a:column name="bank_account_name" prompt="CSH511.BANK_ACCOUNT_NAME"/>
<!-- <a:column name="bank_account_code" prompt="CSH511.BANK_ACCOUNT_CODE"/>
<a:column name="bank_account_name" prompt="CSH511.BANK_ACCOUNT_NAME"/>-->
<!-- <a:column name="bank_account_num" prompt="CSH511.BANK_ACCOUNT_NUM"/> -->
<a:column name="bp_name" prompt="HLS.BP_NAME"/>
<!-- <a:column name="bp_category_display" prompt="CSH511.CSH_TRANSACTION.BP_CATEGORY"/> -->
<a:column name="bank_slip_num" prompt="银行流水号"/>
<a:column name="returned_amount" prompt="HLS.RETURNED_AMOUNT" renderer="Leaf.formatMoney"/>
<!-- <a:column name="returned_amount" prompt="HLS.RETURNED_AMOUNT" renderer="Leaf.formatMoney"/>
<a:column name="remain_total_amount" prompt="CSH515.CSH_CAN_REFUND_AMOUNT" renderer="Leaf.formatMoney"/>
<a:column name="write_off_amount" prompt="HLS.WRITEOFF_AMOUNT" renderer="Leaf.formatMoney"/>
<a:column name="write_off_amount" prompt="HLS.WRITEOFF_AMOUNT" renderer="Leaf.formatMoney"/>-->
<!--<a:column name="can_return_amount" prompt="CSH515.CSH_CAN_REFUND_AMOUNT" renderer="Leaf.formatMoney"/>-->
<a:column name="user_desc" prompt="HLS.DOCUMENT_CREATED_BY"/>
<!--<a:column name="user_desc" prompt="HLS.DOCUMENT_CREATED_BY"/>-->
<a:column prompt="CSH510.CSH_TRANSACTION.MY_ACCOUNT" align="center">
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_NAME" name="bank_account_name" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_BANK" name="bank_branch_name" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_NUM" name="bank_account_num" align="center"/>
</a:column>
<a:column prompt="CSH510.CSH_TRANSACTION.YOUR_ACCOUNT" align="center">
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_NAME" name="bp_bank_account_name" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_BANK" name="opposite_band_na" align="center"/>
<a:column prompt="CSH510.CSH_TRANSACTION.ACCOUNT_NUM" name="bp_bank_account_num" align="center"/>
</a:column>
</a:columns>
</a:grid>
</a:screenBody>
......
......@@ -73,18 +73,19 @@
</a:screenTopToolbar>
<a:grid bindTarget="csh_transaction_returned_list_ds" marginHeight="130" marginWidth="30" navBar="true">
<a:columns>
<a:column name="transaction_num" prompt="退款编号" renderer="returned_list_transaction" width="120"/>
<a:column name="transaction_date" prompt="退款日期" renderer="Leaf.formatDate"/>
<a:column name="currency_name" prompt="HLS.CURRENCY"/>
<a:column name="transaction_amount" prompt="退款金额" renderer="Leaf.formatMoney"/>
<a:column name="transaction_num" prompt="退款编号" width="120" align="center"/>
<a:column name="transaction_date" prompt="退款日期" renderer="Leaf.formatDate" align="center"/>
<!-- <a:column name="currency_name" prompt="HLS.CURRENCY"/>-->
<a:column name="this_return_amount" prompt="退款金额" renderer="Leaf.formatMoney" align="right"/>
<!-- <a:column name="posted_flag" prompt="HLS.POST"/> -->
<a:column name="bank_account_code" prompt="退款账户"/>
<a:column name="bank_account_name" prompt="CSH511.BANK_ACCOUNT_NAME"/>
<!--<a:column name="bank_account_code" prompt="退款账户"/>-->
<a:column name="bank_account_num" prompt="退款账户" align="center"/>
<a:column name="bank_branch_name" prompt="CSH511.BANK_ACCOUNT_NAME" align="center"/>
<!-- <a:column name="bank_account_num" prompt="CSH511.BANK_ACCOUNT_NUM"/> -->
<a:column name="bp_name" prompt="HLS.BP_NAME"/>
<a:column name="bp_category_display" prompt="CSH511.CSH_TRANSACTION.BP_CATEGORY"/>
<a:column name="bank_slip_num" prompt="CSH511.CSH_TRANSACTION.BANK_SLIP_NUM"/>
<a:column name="user_desc" prompt="HLS.DOCUMENT_CREATED_BY"/>
<a:column name="bp_name" prompt="HLS.BP_NAME" align="center"/>
<a:column name="bp_category_display" prompt="CSH511.CSH_TRANSACTION.BP_CATEGORY" align="center"/>
<a:column name="bank_slip_num" prompt="CSH511.CSH_TRANSACTION.BANK_SLIP_NUM" align="center"/>
<a:column name="user_desc" prompt="HLS.DOCUMENT_CREATED_BY" align="center"/>
<a:column align="center" prompt="附件查看" renderer="csh515_attachment_download" width="80"/>
</a:columns>
</a:grid>
......
......@@ -8,7 +8,9 @@
<a:screen xmlns:a="http://www.leaf-framework.org/application">
<a:init-procedure>
<a:model-query model="csh.CSH531N.csh_batch_status_default" rootPath="batch_status_default"/>
<a:model-query defaultWhereClause="v.code=&apos;CSH511_TRANSACTION_TYPE&apos; and v.code_value in (&apos;RECEIPT&apos;,&apos;ADVANCE_RECEIPT&apos;)" fetchAll="true" model="basic.sys_code_default_value" rootPath="sys_code_default_value_path"/>
<a:model-query
defaultWhereClause="v.code=&apos;CSH511_TRANSACTION_TYPE&apos; and v.code_value in (&apos;RECEIPT&apos;,&apos;ADVANCE_RECEIPT&apos;)"
fetchAll="true" model="basic.sys_code_default_value" rootPath="sys_code_default_value_path"/>
</a:init-procedure>
<a:view>
<a:link id="general_import_upload_link"
......@@ -20,6 +22,7 @@
<a:link id="csh_data_confirm_check_link" model="csh.CSH531N.csh_data_confirm_check" modelaction="execute"/>
<a:link id="csh_data_confirm_delete_link" model="csh.CSH531N.csh_data_confirm_check" modelaction="delete"/>
<a:link id="csh_auto_write_off_link" model="csh.CSH531N.csh_auto_write_off" modelaction="batch_update"/>
<a:link id="csh_reverse_write_off_link" model="csh.CSH531N.csh_reverse_write_off" modelaction="update"/>
<a:link id="csh_modify_info_window_link"
url="${/request/@context_path}/modules/csh/CSH531N/csh_modify_info.lview"/>
<a:link id="csh_write_off_upload_link"
......@@ -30,10 +33,12 @@
<a:link id="import_upload_link"
url="${/request/@context_path}/modules/csh/CSH531N/csh_pos_input.lview"/>
<a:link id="csh_write_off_detail_link" url="${/request/@context_path}/modules/csh/CSH301/csh_transaction_receipt_write_off_detail_query.lview"/>
<a:link id="csh_write_off_detail_link"
url="${/request/@context_path}/modules/csh/CSH301/csh_transaction_receipt_write_off_detail_query.lview"/>
<a:link id="csh_terminal_manager_link" url="${/request/@context_path}/modules/csh/CSH531N/csh_terminal_manager.lview"/>
<a:link id="csh_terminal_manager_link"
url="${/request/@context_path}/modules/csh/CSH531N/csh_terminal_manager.lview"/>
<script type="text/javascript"><![CDATA[
......@@ -46,7 +51,7 @@
Leaf.Masker.unmask(Ext.getBody());
}
function csh531_reset(){
function csh531_reset() {
$('csh_transaction_receipt_write_off_query_ds').reset();
}
......@@ -326,15 +331,19 @@
}
function csh531n_open_write_off_detail(id) {
function csh531n_open_write_off_detail(id, readOnly) {
var ds = $('csh531n_sap_bankflow_info_result_ds');
var record = ds.findById(id);
var bp_category = record.get('bp_category');
var depositDisplayFlag = 'N';
if (bp_category == 'AGENT') {
depositDisplayFlag = 'Y';
}
var win = new Leaf.Window({
id: 'csh_write_off_upload_window',
params: {
transaction_id: record.get('transaction_id'),
transaction_id: record.get('transaction_id'),
depositDisplayFlag: depositDisplayFlag,
bank_slip_num: record.get('bank_slip_num'),
company_id: record.get('company_id'),
transaction_date: Leaf.formatDate(record.get('transaction_date')),
......@@ -343,6 +352,7 @@
bp_bank_account_num: record.get('bp_bank_account_num'),
bp_bank_account_name: record.get('bp_bank_account_name'),
bp_id: record.get('bp_id'),
readOnly: readOnly,
winid: 'csh_write_off_upload_window'
},
url: $('batch_detail_link').getUrl(),
......@@ -356,12 +366,22 @@
}
function csh531n_detail_renderer(value, record, name) {
return '<a href="Javascript:csh531n_open_write_off_detail(' + record.id + ')">明细</a>';
var text = '';
var status = record.get('status');
var write_off_flag = record.get('write_off_flag');
var readOnly = 'Y';
if ((status == 'NEW' || status == 'RETURN') && write_off_flag == 'NOT') {
readOnly = 'N';
}
if (name == 'csh531n_detail') {
return '<a href="Javascript:csh531n_open_write_off_detail(' + record.id + ',\'' + readOnly + '\')">明细</a>';
} else if (name == 'transaction_num') {
return '<a href="Javascript:csh531n_open_write_off_detail(' + record.id + ',\'' + readOnly + '\')">' + value + '</a>';
}
}
function csh531_post_input(){
function csh531_post_input() {
new Leaf.Window({
id: 'upload_window_winid',
url: $('import_upload_link').getUrl(),
......@@ -371,9 +391,10 @@
height: 300
});
}
function seedetail_write_off(value, record, name) {
var return_value = value||0;
return '<a href="javascript:openWindow_writeoff('+record.id+');">' + Leaf.formatMoney(return_value) + '</a>';
var return_value = value || 0;
return '<a href="javascript:openWindow_writeoff(' + record.id + ');">' + Leaf.formatMoney(return_value) + '</a>';
}
......@@ -394,8 +415,8 @@
}
function csh531_terminal_manager(){
var url = $('csh_terminal_manager_link').getUrl();
function csh531_terminal_manager() {
var url = $('csh_terminal_manager_link').getUrl();
new Leaf.Window({
id: 'csh_terminal_manager_id',
params: {
......@@ -403,71 +424,100 @@
},
url: url,
title: '终端号管理',
width:1100,
height:600
width: 1100,
height: 600
});
}
function csh531n_export() {
$('csh_transaction_receipt_write_off_grid_ds')._export(null,'收款核销流水');
$('csh_transaction_receipt_write_off_grid_ds')._export(null, '收款核销流水');
}
function csh531_new_write_off() {
var record = $('csh531n_sap_bankflow_info_result_ds').getSelected()[0];
if (record) {
var write_off_flag = record.get('write_off_flag');
var readOnly = 'Y';
if (write_off_flag == 'NOT') {
readOnly = 'N';
}
csh531n_open_write_off_detail(record.id, readOnly);
} else {
Leaf.showErrorMessage('提示', '请先选择一条数据');
}
}
function csh531_new_reverse_write_off() {
var record = $('csh531n_sap_bankflow_info_result_ds').getSelected()[0];
if (record && record.get('write_off_flag') == 'FULL') {
Leaf.showConfirm("提示", "您确定反冲现金事务<span style='color:red'>" + record.get('transaction_num') + "</span>吗", function () {
Leaf.request({
url: $('csh_reverse_write_off_link').getUrl(),
para: record.data,
success: function () {
csh531n_unlock_current_window();
$('csh531n_sap_bankflow_info_result_ds').query();
}, failure: function () {
csh531n_unlock_current_window();
},
error: function () {
csh531n_unlock_current_window();
},
scope: this
});
});
} else {
Leaf.showInfoMessage("提示", "只能反冲已经核销的现金事务");
}
}
]]></script>
<a:dataSets>
<a:dataSet id="batch_status_ds" lookupCode="CSH531_BATCH_STATUS"/>
<a:dataSet id="csh531n_ds_collection_classes_ds" lookupCode="DS_COLLECTION_CLASSES"/>
<!--<a:dataSet id="csh_trx_batch_query_ds" autoCreate="true">-->
<!--<a:fields>-->
<!--<a:field name="batch_status" defaultValue="NEW"/>-->
<!--<a:field name="batch_status_desc" defaultValue="${/model/batch_status_default/record/@code_value_name}" displayField="code_value_name" options="batch_status_ds" returnField="batch_status" valueField="code_value"/>-->
<!--<a:field name="transaction_date"/>-->
<!--</a:fields>-->
<!--</a:dataSet>-->
<!--<a:dataSet id="csh531n_sap_bankflow_info_result_ds" autoPageSize="true" autoQuery="true" model="csh.CSH531N.csh_trx_batch_interface" queryDataSet="csh_trx_batch_query_ds" selectable="true">-->
<!--<a:fields>-->
<!--<a:field name="batch_status"/>-->
<!--<a:field name="batch_status_desc" displayField="code_value_name" options="batch_status_ds" returnField="batch_status" valueField="code_value"/>-->
<!--</a:fields>-->
<!--</a:dataSet>-->
<a:dataSet id="currency_ds">
<a:datas dataSource="/model/currency"/>
</a:dataSet>
<a:dataSet id="csh_transaction_type_ds">
<a:datas dataSource="/model/sys_code_default_value_path"/>
</a:dataSet>
<a:dataSet id="status_ds" lookupCode="CSH_PAYMENT_REQ_APPROVAL_STATUS"/>
<!-- <a:dataSet id="status_ds" lookupCode="CSH_PAYMENT_REQ_APPROVAL_STATUS"/>-->
<a:dataSet id="status_ds" lookupCode="CSH_WRITE_OFF_STATUS"/>
<a:dataSet id="con_write_off_flag_ds" lookupCode="CON_WRITE_OFF_FLAG"/>
<a:dataSet id="receipt_type_ds" lookupCode="RECEIPT_TYPE"/>
<a:dataSet id="csh_transaction_receipt_write_off_query_ds" autoCreate="true">
<a:fields>
<a:field name="full_write_off_flag" checkedValue="FULL" defaultValue="N" uncheckedValue="N"/>
<a:field name="partial_write_off_flag" defaultValue="PARTIAL" checkedValue="PARTIAL"
uncheckedValue="N"/>
<a:field name="not_write_off_flag" defaultValue="NOT" checkedValue="NOT" uncheckedValue="N"/>
<a:field name="full_review_status" checkedValue="FULL" defaultValue="FULL" uncheckedValue="N"/>
<a:field name="partial_review_status" checkedValue="PARTIAL" defaultValue="PARTIAL"
uncheckedValue="N"/>
<a:field name="not_review_status" checkedValue="NOT" defaultValue="NOT" uncheckedValue="N"/>
<a:field name="posted_flag" defaultValue="Y"/>
<a:field name="reversed_flag" defaultValue="N"/>
<a:field name="label1" defaultValue="核销状态:"/>
<a:field name="label2" defaultValue="分配状态:"/>
<a:field name="collection_classes_desc" options="csh531n_ds_collection_classes_ds" displayField="code_value_name" returnField="collection_classes" valueField="code_value"/>
<a:field name="transaction_type" defaultValue="RECEIPT" />
<a:field name="transaction_type_desc" options="csh_transaction_type_ds" returnField="transaction_type" valueField="code_value" displayField="code_value_name" defaultValue="收款"/>
<a:field name="write_off_flag" />
<a:field name="write_off_flag_desc" displayField="code_value_name" options="con_write_off_flag_ds"
returnField="write_off_flag" valueField="code_value"/>
<a:field name="status" displayField="code_value_name" options="status_ds"
returnField="status" valueField="code_value"/>
<a:field name="collection_classes_desc" options="csh531n_ds_collection_classes_ds"
displayField="code_value_name" returnField="collection_classes" valueField="code_value"/>
<a:field name="transaction_type"/>
<a:field name="transaction_type_desc" options="csh_transaction_type_ds"
returnField="transaction_type" valueField="code_value" displayField="code_value_name"
defaultValue="收款"/>
<a:field name="bp_name" lovGridHeight="350" lovHeight="550" lovLabelWidth="50" lovWidth="550"
lovService="basic.hls_bp_master_v_for_lov" title="HLS.BP_TITLE">
<a:mapping>
<a:map from="bp_id" to="bp_id"/>
<a:map from="bp_name" to="bp_name"/>
</a:mapping>
</a:field>
<a:field name="receipt_type_desc" options="receipt_type_ds" valueField="code_value"
defaultValue="code_value_name" returnField="receipt_type"/>
</a:fields>
<a:events>
<a:event name="update" handler="csh513_receipt_write_off_update"/>
</a:events>
</a:dataSet>
<a:dataSet id="csh531n_sap_bankflow_info_result_ds" autoPageSize="true" autoQuery="false"
<a:dataSet id="csh531n_sap_bankflow_info_result_ds" autoPageSize="true" autoQuery="true"
model="csh.CSH531N.csh_transaction_query"
queryDataSet="csh_transaction_receipt_write_off_query_ds" selectable="true">
queryDataSet="csh_transaction_receipt_write_off_query_ds" selectable="true"
selectionModel="single">
<a:fields>
<a:field name="auto_filt_penalty" checkedValue="Y" uncheckedValue="N"/>
<a:field name="auto_filt_prinicipal_interest" checkedValue="Y" uncheckedValue="N"/>
......@@ -477,131 +527,108 @@
</a:dataSet>
<a:dataSet id="auto_write_off_ds" autoCreate="true">
<a:fields>
<a:field name="bank_account_num" checkedValue="Y" uncheckedValue="N"/>
<a:field name="bp_bank_account_num" checkedValue="Y" defaultValue="Y" uncheckedValue="N"/>
<a:field name="bp_bank_account_name" checkedValue="Y" defaultValue="Y" uncheckedValue="N"/>
<a:field name="trx_amount" checkedValue="Y" uncheckedValue="N"/>
</a:fields>
<!--<a:events>-->
<!--<a:event name="update" handler="csh_para_check"/>-->
<!--</a:events>-->
</a:dataSet>
</a:dataSets>
<a:screenBody>
<a:screenTopToolbar>
<a:screenTitle/>
<!--<a:gridButton click="csh531_data_confirm" text="CSH531.DATA_VALIDATION"/>-->
<!-- <a:gridButton click="csh531_error_info" text="CSH531.SHOW_ERROR"/> -->
<a:gridButton click="csh531_query" text="HLS.QUERY"/>
<a:gridButton click="csh531_new_write_off" text="新增核销"/>
<a:gridButton click="csh531_new_reverse_write_off" text="新增反冲"/>
<a:gridButton click="csh531_reset" text="重置"/>
<!--<a:gridButton click="csh531_delete" text="HLS.REMOVE"/>chenlingfeng-->
</a:screenTopToolbar>
<a:form bindTarget="csh_transaction_receipt_write_off_query_ds" labelWidth="120" marginWidth="30"
>
<a:hBox>
<a:fieldSet labelWidth="150" title="HLS.QUERY_TITLE">
<a:box column="4">
<a:label name="label1" bindTarget="csh_transaction_receipt_write_off_query_ds" style="margin-left:10px;color: #888;padding-left: 5px; padding-right: 5px;padding-top: 7px;"/>
<!--<a:checkBox name="full_write_off_flag" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="全部核销"/>-->
<a:checkBox name="partial_write_off_flag" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="部分核销"/>
<a:checkBox name="not_write_off_flag" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="未核销"/>
</a:box>
<a:box column="4">
<a:label name="label2" bindTarget="csh_transaction_receipt_write_off_query_ds" style="margin-left:10px;color: #888;padding-left: 5px; padding-right: 5px;padding-top: 7px;"/>
<a:checkBox name="full_review_status" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="完全分配"/>
<a:checkBox name="partial_review_status" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="部分分配"/>
<a:checkBox name="not_review_status" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="未分配"/>
</a:box>
<a:box column="5">
<a:textField name="bank_branch_name" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="银行名称"/>
<a:textField name="bank_slip_num" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="银行流水号"/>
<a:textField name="bp_bank_account_name" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="对方账户"/>
<a:textField name="bp_bank_account_num" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="对方账号"/>
<a:textField name="description" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="摘要"/>
</a:box>
<a:box column="5">
<a:numberField name="transaction_amount_from" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款金额从"/>
<a:numberField name="transaction_amount_to" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款金额到"/>
<a:datePicker name="transaction_date_from" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款日期从"/>
<a:datePicker name="transaction_date_to" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款日期到"/>
<a:comboBox name="transaction_type_desc" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="事务类型"/>
</a:box>
<a:box column="5">
<a:numberField name="unwrite_off_amount_from" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="可用余额从"/>
<a:numberField name="unwrite_off_amount_to" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="可用余额到"/>
<a:textField name="transaction_num" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="事务编号"/>
<a:comboBox name="collection_classes_desc" bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="款项分类"/>
</a:box>
</a:fieldSet>
<a:fieldSet labelWidth="150" column="1" title="CSH531.AUTO_WRITE_OFF_PARA" width="350">
<a:checkBox name="bp_bank_account_name" bindTarget="auto_write_off_ds" prompt="汇款账户名"/>
<a:checkBox name="bp_bank_account_num" bindTarget="auto_write_off_ds" prompt="汇款账户清单"/>
<!--<a:checkBox name="trx_amount" bindTarget="auto_write_off_ds" prompt="CSH531.TRX_AMOUNT"/>-->
</a:fieldSet>
</a:hBox>
<a:form bindTarget="csh_transaction_receipt_write_off_query_ds" style="background:#f7f7f8" labelWidth="250">
<a:fieldSet labelWidth="250" title="HLS.QUERY_TITLE">
<a:box column="4">
<a:datePicker name="transaction_date_from"
bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款日期从"/>
<a:datePicker name="transaction_date_to"
bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款日期到"/>
<a:numberField name="transaction_amount_from"
bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款金额从"/>
<a:numberField name="transaction_amount_to"
bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="收款金额到"/>
</a:box>
<!-- <a:box column="4">-->
<!-- <a:textField name="bank_branch_name" bindTarget="csh_transaction_receipt_write_off_query_ds"-->
<!-- prompt="我方账户户名"/>-->
<!-- <a:textField name="bank_branch_name" bindTarget="csh_transaction_receipt_write_off_query_ds"-->
<!-- prompt="我方银行名称"/>-->
<!-- <a:textField name="bank_branch_name" bindTarget="csh_transaction_receipt_write_off_query_ds"-->
<!-- prompt="我方账户账号"/>-->
<!-- <a:textField name="bank_slip_num" bindTarget="csh_transaction_receipt_write_off_query_ds"-->
<!-- prompt="银行流水号"/>-->
<!-- </a:box>-->
<!-- <a:box column="4">-->
<!-- <a:textField name="bp_bank_account_name"-->
<!-- bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="对方账户户名"/>-->
<!-- <a:textField name="bp_bank_account_name"-->
<!-- bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="对方银行名称"/>-->
<!-- <a:textField name="bp_bank_account_num"-->
<!-- bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="对方账户账号"/>-->
<!-- </a:box>-->
<a:box column="4">
<a:lov name="bp_name"
bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="商业伙伴"/>
<!-- <a:comboBox name="status" bindTarget="csh_transaction_receipt_write_off_query_ds"-->
<!-- prompt="单据状态"/>-->
<a:comboBox name="write_off_flag_desc" bindTarget="csh_transaction_receipt_write_off_query_ds"
prompt="核销状态"/>
<a:comboBox name="collection_classes_desc"
bindTarget="csh_transaction_receipt_write_off_query_ds" prompt="款项用途"/>
</a:box>
</a:fieldSet>
</a:form>
<a:grid id="csh_transaction_receipt_write_off_grid_ds"
bindTarget="csh531n_sap_bankflow_info_result_ds" marginHeight="305" marginWidth="30"
navBar="true">
<a:toolBar>
<a:button click="csh531_terminal_manager" text="终端号管理"/>
<a:button click="csh531_post_input" text="POS机导入"/>
<a:button type="excel" text="流水导出"/>
<a:button click="csh_auto_write_off" text="自动分配"/>
<a:button click="csh_import_write_off" text="导入分配"/>
<a:button click="csh531_data_confirm" text="审阅"/>
</a:toolBar>
<!-- <a:toolBar>-->
<!-- <a:button click="csh531_terminal_manager" text="终端号管理"/>-->
<!-- <a:button click="csh531_post_input" text="POS机导入"/>-->
<!-- <a:button type="excel" text="流水导出"/>-->
<!-- <a:button click="csh_auto_write_off" text="自动分配"/>-->
<!-- <a:button click="csh_import_write_off" text="导入分配"/>-->
<!-- <a:button click="csh531_data_confirm" text="审阅"/>-->
<!-- </a:toolBar>-->
<a:columns>
<a:column name="transaction_num" prompt="现金事务编号"/>
<a:column name="transaction_type_desc" prompt="事务类型" width="80"/>
<a:column name="transaction_num" prompt="现金事务编号" lock="true" align="left"
renderer="csh531n_detail_renderer" width="220"/>
<a:column name="transaction_type_desc" prompt="现金事务类型" lock="true" align="center" width="120"/>
<a:column name="receipt_type_desc" prompt="收款类型" align="center" lock="true" width="120"/>
<!--<a:column name="bank_name" prompt="银行名称"/>-->
<a:column name="bank_branch_name" prompt="银行名称"/>
<a:column name="bank_slip_num" prompt="银行流水号"/>
<a:column name="bank_account_num" prompt="收款账号"/>
<a:column name="transaction_amount" align="right" footerRenderer="summary_Renderer"
renderer="Leaf.formatMoney" prompt="收款金额"/>
<a:column name="transaction_date" renderer="Leaf.formatDate" prompt="收款日期" width="80"/>
<!--<a:column name="csh_bp_name" prompt="收款对象"/>-->
<a:column name="bp_bank_account_name" prompt="对方账户"/>
<a:column name="bp_bank_account_num" prompt="对方账号"/>
<a:column name="description_p" prompt="摘要+用途"/>
<a:column name="collection_classes_desc" prompt="款项分类"/>
<a:column name="write_off_amount" align="right" renderer="seedetail_write_off" prompt="已核销金额"/>
<a:column name="unwrite_off_amount" align="right" footerRenderer="summary_Renderer"
renderer="Leaf.formatMoney" prompt="未核销金额"/>
<a:column name="approving_return_amount" align="right" footerRenderer="summary_Renderer" renderer="Leaf.formatMoney" prompt="审批中退款金额"/>
<a:column name="unallocate_amount" align="right" footerRenderer="summary_Renderer"
renderer="Leaf.formatMoney" prompt="未分配金额"/>
<a:column name="write_off_flag_desc" prompt="核销状态" width="100"/>
<a:column name="review_status_desc" prompt="分配状态" width="80"/>
<a:column name="ref_v05" prompt="备注" width="100"/>
<a:column name="csh531n_detail" renderer="csh531n_detail_renderer" prompt="明细" width="50"/>
<!-- <a:column name="bank_branch_name" prompt="银行名称"/>-->
<!-- <a:column name="bank_slip_num" prompt="银行流水号"/>-->
<!-- <a:column name="bank_account_num" prompt="收款账号"/>-->
<a:column name="transaction_amount" align="right" lock="true" footerRenderer="summary_Renderer"
renderer="Leaf.formatMoney" prompt="收款金额" width="180"/>
<a:column name="transaction_date" renderer="Leaf.formatDate" align="center" lock="true"
prompt="收款日期" width="120"/>
<a:column name="collection_classes_desc" prompt="款项用途" lock="true" align="center"/>
<a:column name="bp_name" prompt="商业伙伴" align="left" width="200"/>
<a:column name="csh531n_detail" renderer="csh531n_detail_renderer" prompt="核销明细" align="center"
width="80"/>
<!-- <a:column name="bp_bank_account_name" prompt="对方账户"/>-->
<!-- <a:column name="bp_bank_account_num" prompt="对方账号"/>-->
<!-- <a:column name="description_p" prompt="摘要+用途"/>-->
<!-- <a:column name="write_off_amount" align="right" renderer="seedetail_write_off" prompt="已核销金额"/>-->
<!-- <a:column name="unwrite_off_amount" align="right" footerRenderer="summary_Renderer"-->
<!-- renderer="Leaf.formatMoney" prompt="未核销金额"/>-->
<!-- <a:column name="approving_return_amount" align="right" footerRenderer="summary_Renderer" renderer="Leaf.formatMoney" prompt="审批中退款金额"/>-->
<!-- <a:column name="unallocate_amount" align="right" footerRenderer="summary_Renderer"-->
<!-- renderer="Leaf.formatMoney" prompt="未分配金额"/>-->
<!-- <a:column name="status_desc" prompt="单据状态" width="120" align="center"/>-->
<a:column name="write_off_flag_desc" prompt="核销状态" width="120" align="center"/>
<!-- <a:column name="review_status_desc" prompt="分配状态" width="80"/>-->
<!-- <a:column name="ref_v05" prompt="备注" width="100"/>-->
<a:column name="created_user_name" prompt="制单人" width="120" align="center"/>
<a:column name="confirm_user_name" prompt="确认人" width="120" align="center"/>
</a:columns>
<a:editors>
<a:checkBox id="receipt_write_off_checkbox_id"/>
</a:editors>
</a:grid>
<!--<a:form column="2" title="HLS.QUERY_TITLE">-->
<!--<a:comboBox name="batch_status_desc" bindTarget="csh_trx_batch_query_ds" prompt="HLS.STATUS"/>-->
<!--<a:datePicker name="transaction_date" bindTarget="csh_trx_batch_query_ds" prompt="CSH531.TRANSACTION_DATE"/>-->
<!--</a:form>-->
<!--<a:grid id="csh_transfer_grid" bindTarget="csh531n_sap_bankflow_info_result_ds" marginHeight="180" marginWidth="50" navBar="true">-->
<!--<a:columns>-->
<!--<a:column name="transaction_date" prompt="CSH531.TRANSACTION_DATE" renderer="Leaf.formatDate"/>-->
<!--<a:column name="file_name" prompt="CSH531.FILE_NAME" width="250"/>-->
<!--<a:column name="description" prompt="EXP_EMPLOYEES.NOTES" width="300"/>-->
<!--<a:column name="batch_status_desc" align="center" prompt="HLS.STATUS" width="60"/>-->
<!--<a:column align="center" prompt="HAP_DETAIL" renderer="cshBatchDetail" width="60"/>-->
<!--<a:column align="center" prompt="EDIT" renderer="cshEditFun" width="60"/>-->
<!--<a:column name="created_by_n" align="left" prompt="操作人" width="60"/>-->
<!--</a:columns>-->
<!--</a:grid>-->
</a:screenBody>
</a:view>
</a:screen>
......@@ -5,12 +5,12 @@
<a:model-query fetchAll="true" model="csh.CSH531N.csh_transaction" rootPath="csh_transaction_path"/>
</a:init-procedure>
<a:view>
<a:link id="csh531n_csh_confirm_data_link" model="csh.CSH531N.csh_data_confirm" modelaction="update"/>
<a:link id="transaction_uploadFile_id" url="${/request/@context_path}/uploadFile.lview"/>
<a:link id="transaction_downloadFile_id" url="${/request/@context_path}/downloadFile.lview"/>
<script src="${/request/@context_path}/javascripts/calculate.js" type="text/javascript"/>
<script type="text/javascript"><![CDATA[
var submit_flag = 'N';
function csh531n_detail_win_close() {
$('${/parameter/@winid}').close();
}
......@@ -24,19 +24,38 @@
}
function init() {
var batch_status = '${/parameter/@batch_status}';
if (batch_status == 'SUBMIT') {
var record = $('csh_transaction_receipt_write_off_detail_ds').getCurrentRecord();
var deposit_ds = $('csh_transaction_deposit_ds');
var advanced_ds = $('csh_transaction_advanced_ds');
if (advanced_ds.getAll().length == 0) {
}
if ('${/parameter/@depositDisplayFlag}' == 'Y') {
document.getElementById('write_off_deposit').style.display = 'block';
}
if ('${/parameter/@readOnly}' == 'Y') {
$('csh_grid_add_bt').setVisible(false);
$('csh_grid_delete_bt').setVisible(false);
$('csh_grid_save_bt').setVisible(false);
// $('csh_grid_deposit_add_bt').setVisible(false);
// $('csh_grid_deposit_delete_bt').setVisible(false);
// $('csh_grid_advanced_add_bt').setVisible(false);
// $('csh_grid_advanced_delete_bt').setVisible(false);
$('csh_write_off_grid').hideColumn('left_amount');
$('csh_write_off_grid').hideColumn('left_principal');
$('csh_write_off_grid').hideColumn('left_interest');
$('csh_write_off_grid').hideColumn('unreceived_amount');
$('csh_write_off_interface_ds').setQueryUrl('${/request/@context_path}/autocrud/csh.CSH531N.csh_write_off/query?transaction_id=${/parameter/@transaction_id}');
$('csh_write_off_interface_ds').query();
if (record) {
record.getField('ref_v05').setReadOnly(true);
}
} else {
$('csh_grid_add_bt').setVisible(true);
$('csh_grid_delete_bt').setVisible(true);
$('csh_grid_save_bt').setVisible(true);
$('csh511_save_all_id').setVisible(true);
$('csh531n_write_off_btn_id').setVisible(true);
}
}
// function csh_write_off_add(){
......@@ -47,8 +66,9 @@
function csh_edit_function(record, name) {
var batch_status = '${/parameter/@batch_status}';
var readOnly = '${/parameter/@readOnly}';
var write_off_type = record.get('write_off_type');
if (batch_status == 'SUBMIT') {
if (batch_status == 'SUBMIT' || readOnly == 'Y') {
return;
} else {
if (name == 'contract_number') {
......@@ -68,7 +88,7 @@
return 'csh_write_off_grid_lv';
}
}
if (name == 'write_off_amount' || name == 'write_off_principal' || name == 'write_off_interest') {
if (name == 'write_off_amount' || name == 'write_off_principal' || name == 'write_off_interest' || name == 'write_off_penalty') {
return 'csh_write_off_grid_nf';
}
if (name == 'write_off_date' || name == 'journal_date') {
......@@ -125,28 +145,26 @@
var left_interest = record.get('left_interest');
var x_amount;
if (value) {
if (value <= left_interest) {
if (left_interest > 0) {
record.set('write_off_interest', value);
}else{
} else {
record.set('write_off_interest', null);
}
record.set('write_off_principal', null);
} else if (value > left_interest) {
if (left_interest > 0) {
record.set('write_off_interest', left_interest);
}else{
} else {
record.set('write_off_interest', null);
}
x_amount = value - left_interest;
if (left_principal > 0) {
record.set('write_off_principal', x_amount);
}else{
} else {
record.set('write_off_principal', null);
}
}
} else {
record.set('write_off_interest', null);
record.set('write_off_principal', null);
......@@ -248,8 +266,8 @@
return true;
} else {
if (record.get('write_off_type') == 'RECEIPT_CREDIT') {
if (value > record.get('left_amount')) {
return '分配金额不能大于剩余金额';
if (value != record.get('left_amount')) {
return '分配金额与剩余金额不等!';
}
}
}
......@@ -261,28 +279,35 @@
}
function csh531n_write_off() {
var record = $('csh_transaction_receipt_write_off_detail_ds').getCurrentRecord();
if (checkAmount('WRITE_OFF')) {
if(submit_flag == 'Y'){
var record = $('csh_transaction_receipt_write_off_detail_ds').getCurrentRecord();
if (record) {
csh531d_lock_current_window();
var transaction_id = record.get('transaction_id');
Leaf.request({
url: $('csh531n_csh_confirm_data_link').getUrl(),
para: {
transaction_id: '${/parameter/@transaction_id}',
_status: 'update'
},
success: function () {
csh531d_unlock_current_window();
csh531n_detail_win_close();
}, failure: function () {
csh531d_unlock_current_window();
},
error: function () {
csh531d_unlock_current_window();
},
scope: this
});
}
}else{
Leaf.showInfoMessage("提示","请先保存");
}
if (record) {
csh531d_lock_current_window();
var transaction_id = record.get('transaction_id');
Leaf.request({
url: $('csh531n_csh_confirm_data_link').getUrl(),
para: {
transaction_id: '${/parameter/@transaction_id}',
_status: 'update'
},
success: function () {
csh531d_unlock_current_window();
csh531n_detail_win_close();
}, failure: function () {
csh531d_unlock_current_window();
},
error: function () {
csh531d_unlock_current_window();
},
scope: this
});
}
}
......@@ -296,12 +321,9 @@
total = plus(total, records[i].get('write_off_amount'))
}
if (total > unwrite_off_amount) {
Leaf.showMessage('${l:PROMPT}', '分配金额不能超过剩余可核销金额!');
Leaf.showMessage('${l:PROMPT}', '核销金额不能大于可核销金额!');
return false;
}
return true;
}
......@@ -313,9 +335,14 @@
}
function csh531_submitsuccess(ds) {
submit_flag = 'Y';
ds.query();
}
function csh531_submitfailed(ds){
submit_flag = 'N';
}
function compareDate(start, end) {
if (start > end) {
return false;
......@@ -326,7 +353,7 @@
function write_off_date_validator(record, name, value) {
if (name == 'write_off_date') {
if (value) {
var head_record = $('csh_transaction_receipt_write_off_detail_ds').getCurrentRecord()
var head_record = $('csh_transaction_receipt_write_off_detail_ds').getCurrentRecord();
var start_date = Leaf.formatDate(value);
var end_date = Leaf.formatDate(new Date());//Leaf.formatDate(head_record.get('transaction_date'));
......@@ -347,11 +374,11 @@
// record = ds.getCurrentRecord();
// var header_id = record.get('transaction_id');
var header_id = '${/parameter/@transaction_id}';
var url = $('transaction_uploadFile_id').getUrl() + '?table_name=CSH_TRANSACTION&header_id=' + header_id;
var url = $('transaction_downFile_id').getUrl() + '?table_name=CSH_TRANSACTION&header_id=' + header_id;
var win = new Leaf.Window({
url: url,
title: '${l:HLS.SUPPORTING_DOCUMENT}',
id: 'transaction_uploadFile_winid',
id: 'transaction_downFile_winid',
width: 850,
height: 400
});
......@@ -366,11 +393,58 @@
}
}
function attachment_rendered() {
return '<a href="javascript:attachment_upload()"><span style="color:red;">附件上传</span></a>';
}
function csh531_add_fun(ds, record, index) {
record.getField('contract_number').setRequired(true);
record.getField('write_off_times').setReadOnly(false);
record.getField('write_off_times').setRequired(true);
}
function csh511_save_all() {
if (checkAmount()) {
$('csh_write_off_interface_ds').submit();
$('csh_transaction_deposit_ds').submit();
$('csh_transaction_advanced_ds').submit();
}
}
function checkAmount(type) {
var sum = 0;
var write_off_recs = $('csh_write_off_interface_ds').getAll();
for (var i = 0; i < write_off_recs.length; i++) {
var t = parseFloat(write_off_recs[i].get('write_off_amount'));
if (!isNaN(t)) {
sum += t;
}
}
var deposit_recs = $('csh_transaction_deposit_ds').getAll();
for (var i = 0; i < deposit_recs.length; i++) {
var t = parseFloat(deposit_recs[i].get('write_off_amount'));
if (!isNaN(t)) {
sum += t;
}
}
var advanced_recs = $('csh_transaction_advanced_ds').getAll();
for (var i = 0; i < advanced_recs.length; i++) {
var t = parseFloat(advanced_recs[i].get('write_off_amount'));
if (!isNaN(t)) {
sum += t;
}
}
var header_rec = $('csh_transaction_receipt_write_off_detail_ds').getCurrentRecord();
if (sum > header_rec.get('transaction_amount')) {
Leaf.showInfoMessage('提示', '核销总金额不能大于可核销金额');
return false;
}
if (type == 'WRITE_OFF') {
if (sum != header_rec.get('transaction_amount')) {
Leaf.showInfoMessage('提示', '核销总金额不等于可核销金额');
return false;
}
}
return true;
}
]]></script>
......@@ -384,6 +458,7 @@
<a:fields>
<!-- <a:field name="write_off_date" defaultValue="${/model/sys_default_value/record/@now_time}" required="true"/> -->
<a:field name="write_off_date" readOnly="true"/>
<a:field name="paid_byother_flag_n" readOnly="true"/>
<a:field name="ref_contract_num" readOnly="true"/>
<a:field name="bank_slip_num" readOnly="true"/>
<a:field name="bp_code" readOnly="true"/>
......@@ -398,35 +473,44 @@
<a:field name="unwrite_off_amount" readOnly="true"/>
<a:field name="csh_bp_name" readOnly="true"/>
<a:field name="bank_account_name" readOnly="true"/>
<a:fidld name="transaction_date" readOnly="true"/>
<a:field name="transaction_date" readOnly="true"/>
<a:field name="bp_bank_account_name" readOnly="true"/>
<a:field name="bp_bank_account_num" readOnly="true"/>
<a:field name="write_off_flag_desc" readOnly="true"/>
<a:field name="review_status_desc" readOnly="true"/>
<a:field name="bank_account_num" readOnly="true"/>
<a:field name="collection_classes_desc" readOnly="true" options="ds_collection_classes_ds" displayField="code_value_name" returnField="collection_classes" valueField="code_value"/>
<a:field name="collection_classes_desc" readOnly="true" options="ds_collection_classes_ds"
displayField="code_value_name" returnField="collection_classes" valueField="code_value"/>
<a:field name="ref_v01"/>
<a:field name="approving_return_amount" readOnly="true"/>
</a:fields>
</a:dataSet>
<a:dataSet id="csh_write_off_interface_ds" autoQuery="true" fetchAll="true" model="csh.CSH531N.csh_write_off_interface" queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_write_off_interface/query?trx_interface_id=${/parameter/@transaction_id}" selectable="true">
<a:dataSet id="csh_write_off_interface_ds" autoQuery="true" fetchAll="true"
model="csh.CSH531N.csh_write_off_interface"
queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_write_off_interface/query?trx_interface_id=${/parameter/@transaction_id}"
selectable="true">
<a:fields>
<a:field name="company_id" defaultValue="${/parameter/@company_id}"/>
<a:field name="write_off_date" validator="write_off_date_validator" required="true" defaultValue="${/parameter/@transaction_date}"/>
<a:field name="journal_date" required="true" defaultValue="${/model/sys_default_time/record/@now_date}"/>
<a:field name="write_off_date" validator="write_off_date_validator" required="true"
defaultValue="${/parameter/@transaction_date}"/>
<a:field name="journal_date" required="true"
defaultValue="${/model/sys_default_time/record/@now_date}"/>
<a:field name="write_off_period_name" defaultValue="${/parameter/@period_name}"/>
<a:field name="write_off_period_num" defaultValue="${/parameter/@internal_period_num}"/>
<a:field name="check_flag" defaultValue="Y"/>
<a:field name="record_type" defaultValue="MANUAL"/>
<a:field name="write_off_times"/>
<a:field name="write_off_amount" required="true" validator="csh531_wf_amount_validate"/>
<a:field name="write_off_times" readOnly="true"/>
<a:field name="write_off_amount" required="true"/>
<a:field name="due_date"/>
<a:field name="unreceived_amount"/>
<a:field name="write_off_cashflow_id"/>
<a:field name="contract_id"/>
<a:field name="trx_interface_id" defaultValue="${/parameter/@transaction_id}"/>
<a:field name="contract_number" prompt="合同编号" autoComplete="true" lovAutoQuery="true" lovGridHeight="300" lovHeight="480" lovService="csh.CSH531N.csh_con_contract_lov" lovWidth="800" title="合同号选择">
<a:field name="contract_number" prompt="合同编号" autoComplete="true" lovAutoQuery="true"
lovHeight="880"
lovUrl="${/request/@context_path}/modules/csh/CSH531N/csh_write_off_ref_contract.lview"
lovWidth="1350" title="合同号选择">
<a:mapping>
<a:map from="contract_number" to="contract_number"/>
<a:map from="contract_name" to="contract_name"/>
......@@ -436,123 +520,281 @@
<a:map from="contract_status_desc" to="contract_status_desc"/>
</a:mapping>
</a:field>
<a:field name="write_off_times" prompt="期数" lovHeight="780" lovUrl="${/request/@context_path}/modules/csh/CSH531N/csh_write_off_ref_contract.lview" lovWidth="900" title="合同选择">
<a:mapping>
<!--<a:map from="contract_id" to="contract_id"/>-->
<!--<a:map from="contract_number" to="contract_number"/>-->
<!--<a:map from="contract_name" to="contract_name"/>-->
<a:map from="times" to="write_off_times"/>
<a:map from="cf_item" to="write_off_cf_item"/>
<a:map from="cf_item_desc" to="write_off_cf_item_desc"/>
<a:map from="left_amount" to="write_off_amount"/>
<a:map from="due_date" to="due_date"/>
<!-- <a:map from="unreceived_amount" to="unreceived_amount"/> -->
<a:map from="cashflow_id" to="write_off_cashflow_id"/>
<a:map from="left_principal" to="write_off_principal"/>
<a:map from="left_interest" to="write_off_interest"/>
<a:map from="left_amount" to="left_amount"/>
<a:map from="left_principal" to="left_principal"/>
<a:map from="left_interest" to="left_interest"/>
</a:mapping>
</a:field>
<a:field name="batch_id" defaultValue="${/parameter/@batch_id}"/>
<a:field name="write_off_type" defaultValue="RECEIPT_CREDIT"/>
<a:field name="write_off_type_desc" defaultValue="收款核销债权" prompt="核销类型" required="true" displayField="code_value_name" options="write_off_type_ds" returnField="write_off_type" valueField="code_value"/>
<a:field name="write_off_type_desc" defaultValue="收款核销债权" prompt="核销类型" required="true"
displayField="code_value_name" options="write_off_type_ds" returnField="write_off_type"
valueField="code_value"/>
<a:field name="write_off_bp_id"/>
<!--<a:field name="write_off_bp_name" autoComplete="true" autoCompleteField="true" lovAutoQuery="true" lovGridHeight="300" lovHeight="450" lovService="csh.CSH531N.hls_bp_master" lovWidth="500" title="分配对象选择">-->
<!--<a:mapping>-->
<!--<a:map from="bp_id" to="write_off_bp_id"/>-->
<!--<a:map from="bp_name" to="write_off_bp_name"/>-->
<!--</a:mapping>-->
<!--</a:field>-->
<a:field name="write_off_classification_desc" prompt="核销分类" required="true" options="ds_csh_write_off_classification_ds" returnField="write_off_classification" valueField="code_value" displayField="code_value_name"/>
<a:field name="write_off_classification_desc" prompt="核销分类"
options="ds_csh_write_off_classification_ds" returnField="write_off_classification"
valueField="code_value" displayField="code_value_name"/>
<a:field name="write_off_cf_item" readOnly="true"/>
<a:field name="write_off_cf_item_desc" displayField="cf_item_desc" options="write_off_cf_item_ds" returnField="write_off_cf_item" valueField="cf_item"/>
<a:field name="write_off_cf_item_desc" readOnly="true" displayField="cf_item_desc"
options="write_off_cf_item_ds"
returnField="write_off_cf_item" valueField="cf_item"/>
</a:fields>
<a:events>
<a:event name="update" handler="csh531_update_fun"/>
<a:event name="beforesubmit" handler="csh531_beforesubmit_fun"/>
<a:event name="load" handler="csh531_load_fun"/>
<a:event name="submitsuccess" handler="csh531_submitsuccess"/>
<a:event name="submitfailed" handler="csh531_submitfailed"/>
<a:event name="add" handler="csh531_add_fun"/>
</a:events>
</a:dataSet>
<a:dataSet id="csh_transaction_deposit_ds" model="csh.CSH531N.csh_transaction_plan_query" fetchAll="true"
autoQuery="true"
queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_transaction_plan_query/query?transaction_id=${/parameter/@transaction_id}&amp;write_off_type=RECEIPT_DEPOSIT_POOL"
selectable="true">
<a:fields>
<a:field name="bp_agent_name" lovGridHeight="350" lovHeight="550" lovLabelWidth="50" lovWidth="550"
required="true" readOnly="true" autoComplete="true" autoCompleteField="bp_agent_name"
lovService="basic.hls_bp_master_v_for_lov?bp_category=AGENT&amp;bp_id=${/parameter/@bp_id}"
title="HLS.BP_TITLE">
<a:mapping>
<a:map from="bp_id" to="bp_id"/>
<a:map from="bp_name" to="bp_agent_name"/>
</a:mapping>
</a:field>
<a:field name="bp_id" defaultValue="${/parameter/@bp_id}"/>
<a:field name="transaction_id" defaultValue="${/parameter/@transaction_id}"/>
<a:field name="write_off_type" defaultValue="RECEIPT_DEPOSIT_POOL"/>
<a:field name="company_id" defaultValue="${/session/@company_id}"/>
<a:field name="write_off_amount"/>
<a:field name="write_off_date" validator="write_off_date_validator" required="true" readOnly="true"
defaultValue="${/parameter/@transaction_date}"/>
</a:fields>
</a:dataSet>
<a:dataSet id="csh_transaction_advanced_ds" model="csh.CSH531N.csh_transaction_plan_query" fetchAll="true"
autoQuery="true"
queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_transaction_plan_query/query?transaction_id=${/parameter/@transaction_id}&amp;write_off_type=RECEIPT_ADVANCE_RECEIPT"
selectable="true">
<a:fields>
<a:field name="bp_name" readOnly="true" autoComplete="true" lovGridHeight="350" lovHeight="550"
lovLabelWidth="50"
lovWidth="550"
required="true"
lovService="basic.hls_bp_master_v_for_lov?bp_id=${/parameter/@bp_id}" title="HLS.BP_TITLE">
<a:mapping>
<a:map from="bp_id" to="bp_id"/>
<a:map from="bp_name" to="bp_name"/>
</a:mapping>
</a:field>
<a:field name="bp_id" defaultValue="${/parameter/@bp_id}"/>
<a:field name="transaction_id" defaultValue="${/parameter/@transaction_id}"/>
<a:field name="write_off_type" defaultValue="RECEIPT_ADVANCE_RECEIPT"/>
<a:field name="company_id" defaultValue="${/session/@company_id}"/>
<a:field name="write_off_amount"/>
<a:field name="write_off_date" validator="write_off_date_validator" required="true" readOnly="true"
defaultValue="${/parameter/@transaction_date}"/>
</a:fields>
</a:dataSet>
</a:dataSets>
<a:screenBody>
<a:screenTopToolbar>
<a:gridButton id="csh511_receipt_upload_id" click="attachment_upload" text="附件上传"/>
<a:gridButton id="csh511_save_all_id" click="csh511_save_all" style="margin-left:20px;display:none"
text="暂存"/>
<a:gridButton id="csh531n_write_off_btn_id" click="csh531n_write_off"
style="margin-left:10px;display:none" text="核销"/>
</a:screenTopToolbar>
<a:form title="CSH513.RECEIPT_WRITE_OFF" marginWidth="350">
<a:box column="4" labelWidth="100">
<a:textField name="transaction_num" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="bank_account_name" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="bank_slip_num" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="银行流水号"/>
<a:textField name="bank_account_num" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
</a:box>
<a:box column="4" labelWidth="100">
<a:numberField name="transaction_amount" allowFormat="true" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:numberField name="returned_amount" allowFormat="true" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="HLS.RETURNED_AMOUNT"/>
<a:numberField name="write_off_amount" allowFormat="true" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="HLS.WRITEOFF_AMOUNT"/>
<a:numberField name="unwrite_off_amount" allowFormat="true" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="CSH513.REMAINING_WRITEOFF_AMOUNT"/>
</a:box>
<a:box column="4" labelWidth="100">
<a:datePicker name="transaction_date" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="bp_bank_account_name" prompt="对方账户" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="bp_bank_account_num" prompt="对方账号" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="write_off_flag_desc" prompt="核销状态" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
</a:box>
<a:box column="4" labelWidth="100">
<a:textField name="review_status_desc" prompt="分配状态" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="purpose" prompt="用途" readOnly="true" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="description" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="摘要" readOnly="true"/>
<a:numberField name="approving_return_amount" allowFormat="true" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="审批中退款金额"/>
</a:box>
<a:box column="4" labelWidth="100">
<a:comboBox name="collection_classes_desc" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="款项分类"/>
<a:textArea colspan="2" name="ref_v05" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="备注" width="370"/>
<a:gridButton click="csh531n_save" text="HLS.SAVE"/>
</a:box>
<!--<a:box column="2" labelWidth="100">-->
<!--<a:textArea name="description" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="摘要" readOnly="true" width="405"/>-->
<!--</a:box>-->
<a:form style="margin-left:20px;">
<a:fieldSet labelWidth="250" title="收款单详情">
<a:box column="3" labelWidth="100">
<a:datePicker name="transaction_date" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:numberField name="transaction_amount" allowFormat="true"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<!-- <a:textField name="transaction_num" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>-->
<!-- <a:textField name="bank_account_name" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>-->
<a:textField name="bank_slip_num" bindTarget="csh_transaction_receipt_write_off_detail_ds"
prompt="银行流水号"/>
<!-- <a:textField name="bank_account_num" bindTarget="csh_transaction_receipt_write_off_detail_ds"/>-->
</a:box>
<a:box column="3" labelWidth="100">
<a:textField name="paid_byother_flag_n" prompt="代付"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="bp_name" prompt="商业伙伴"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="collection_classes_desc" prompt="款项用途"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<!-- <a:numberField name="returned_amount" allowFormat="true"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds"-->
<!-- prompt="HLS.RETURNED_AMOUNT"/>-->
<!-- <a:numberField name="write_off_amount" allowFormat="true"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds"-->
<!-- prompt="HLS.WRITEOFF_AMOUNT"/>-->
<!-- <a:numberField name="unwrite_off_amount" allowFormat="true"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds"-->
<!-- prompt="CSH513.REMAINING_WRITEOFF_AMOUNT"/>-->
</a:box>
<a:box column="2" labelWidth="100">
<a:textField name="description" bindTarget="csh_transaction_receipt_write_off_detail_ds"
prompt="摘要"
readOnly="true" colspan="2" width="370"/>
</a:box>
<a:box column="2" labelWidth="100">
<a:textField colspan="2" name="ref_v05" bindTarget="csh_transaction_receipt_write_off_detail_ds"
prompt="备注" width="370" readOnly="true"/>
</a:box>
<a:box column="2" labelWidth="100">
<a:label prompt="附件上传" bindTarget="csh_transaction_receipt_write_off_detail_ds"
renderer="attachment_rendered"/>
</a:box>
<!-- <a:box column="4" labelWidth="100">-->
<!-- <a:textField name="review_status_desc" prompt="分配状态"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds"/>-->
<!-- <a:textField name="purpose" prompt="用途" readOnly="true"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds"/>-->
<!-- <a:numberField name="approving_return_amount" allowFormat="true"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="审批中退款金额"/>-->
<!-- </a:box>-->
<!-- <a:box column="4" labelWidth="100">-->
<!-- <a:comboBox name="collection_classes_desc"-->
<!-- bindTarget="csh_transaction_receipt_write_off_detail_ds"-->
<!-- prompt="款项分类"/>-->
<!-- <a:gridButton click="csh531n_save" text="HLS.SAVE"/>-->
<!-- </a:box>-->
<!--<a:box column="2" labelWidth="100">-->
<!--<a:textArea name="description" bindTarget="csh_transaction_receipt_write_off_detail_ds" prompt="摘要" readOnly="true" width="405"/>-->
<!--</a:box>-->
</a:fieldSet>
<a:fieldSet labelWidth="250" title="账户信息">
<a:box column="2" labelWidth="100">
<a:textField name="bp_bank_account_name" prompt="对方账户"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="bp_bank_account_num" prompt="对方账号"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
<a:textField name="write_off_flag_desc" prompt="核销状态"
bindTarget="csh_transaction_receipt_write_off_detail_ds"/>
</a:box>
</a:fieldSet>
</a:form>
<a:grid id="csh_write_off_grid" bindTarget="csh_write_off_interface_ds" height="370"
marginWidth="50">
<a:toolBar>
<a:button id="csh_grid_add_bt" type="add"/>
<a:button id="csh_grid_delete_bt" type="delete"/>
<a:button id="csh_grid_save_bt" type="save"/>
<a:button click="csh531n_write_off" text="审阅"/>
</a:toolBar>
<a:columns>
<!--<a:column name="csh_bank_slip_num" footerRenderer="summaryRenderer" prompt="CSH531.BANK_SLIP_NUM" width="120"/>-->
<a:column name="write_off_type_desc" editorFunction="csh_edit_function" prompt="HLS.WRITE_OFF_TYPE" width="100"/>
<a:column name="contract_number" editorFunction="csh_edit_function" prompt="HLS.CONTRACT_NUMBER" width="120"/>
<a:column name="contract_status_desc" editorFunction="csh_edit_function" prompt="合同状态" width="120"/>
<a:column name="write_off_bp_name" editorFunction="csh_edit_function" prompt="CSH531.WRITE_OFF_BP_NAME" width="100"/>
<a:column name="write_off_times" editorFunction="csh_edit_function" prompt="HLS.TIMES" width="80"/>
<a:column name="write_off_cf_item_desc" editorFunction="csh_edit_function" prompt="CSH531.CF_ITEM" width="80"/>
<a:column name="due_date" editorFunction="csh_edit_function" prompt="CSH531.WRITE_OFF_DATE" renderer="Leaf.formatDate" width="80"/>
<a:column name="left_amount" align="right" footerRenderer="summaryRenderer" prompt="剩余金额" renderer="Leaf.formatMoney" width="120"/>
<!--<a:column name="left_principal" align="right" footerRenderer="summaryRenderer" prompt="剩余本金" renderer="Leaf.formatMoney" width="120"/>-->
<!--<a:column name="left_interest" align="right" footerRenderer="summaryRenderer" prompt="剩余利息" renderer="Leaf.formatMoney" width="120"/>-->
<a:column name="write_off_classification_desc" editorFunction="csh_edit_function" prompt="核销分类"/>
<a:column name="write_off_date" align="center" editorFunction="csh_edit_function" renderer="Leaf.formatDate" prompt="核销基准日期" width="120"/>
<a:column name="journal_date" align="center" editorFunction="csh_edit_function" renderer="Leaf.formatDate" prompt="凭证日期" width="120"/>
<a:column name="write_off_amount" align="right" editorFunction="csh_edit_function" footerRenderer="summaryRenderer" prompt="CSH531.AMOUNT" renderer="Leaf.formatMoney" width="120"/>
<a:column name="write_off_principal" align="right" prompt="分配本金" renderer="Leaf.formatMoney" width="120"/>
<a:column name="write_off_interest" align="right" prompt="分配利息" renderer="Leaf.formatMoney" width="120"/>
<!--<a:column name="agent_id_desc" editorFunction="csh_edit_function" prompt="代理商"/>-->
</a:columns>
<a:editors>
<a:textField id="csh_write_off_grid_tf"/>
<a:numberField id="csh_write_off_grid_nf" allowNegative="false"/>
<a:datePicker id="csh_write_off_grid_dp"/>
<a:comboBox id="csh_write_off_grid_cb"/>
<a:lov id="csh_write_off_grid_lv"/>
</a:editors>
</a:grid>
<a:tabPanel height="450" marginWidth="30" style="margin-left:20px;">
<a:tabs>
<a:tab prompt="核销债权" width="120" id="write_off_rental">
<a:grid id="csh_write_off_grid" bindTarget="csh_write_off_interface_ds" height="370"
marginWidth="10" navBar="true">
<a:toolBar>
<a:button id="csh_grid_add_bt" type="add"/>
<a:button id="csh_grid_delete_bt" type="delete"/>
</a:toolBar>
<a:columns>
<!--<a:column name="csh_bank_slip_num" footerRenderer="summaryRenderer" prompt="CSH531.BANK_SLIP_NUM" width="120"/>-->
<!-- <a:column name="write_off_type_desc" editorFunction="csh_edit_function"-->
<!-- prompt="HLS.WRITE_OFF_TYPE"-->
<!-- width="100"/>-->
<a:column name="contract_number" editorFunction="csh_edit_function" align="center"
prompt="HLS.CONTRACT_NUMBER"
width="120"/>
<a:column name="bp_tenant_name" prompt="承租人" width="120"/>
<a:column name="write_off_cf_item_desc" editorFunction="csh_edit_function"
align="center"
prompt="CSH531.CF_ITEM"
width="80"/>
<a:column name="write_off_times" prompt="HLS.TIMES" align="center"
width="80"/>
<a:column prompt="营业">
<a:column name="left_principal" renderer="Leaf.formatMoney" prompt="未收本金"
width="120" align="right"/>
<a:column name="left_interest" renderer="Leaf.formatMoney" prompt="未收利息"
width="120"
align="right"/>
<a:column name="left_amount" renderer="Leaf.formatMoney" prompt="未收租金"
width="120"
align="right"/>
</a:column>
<!-- <a:column name="write_off_bp_name" editorFunction="csh_edit_function"-->
<!-- prompt="CSH531.WRITE_OFF_BP_NAME" width="100"/>-->
<!-- <a:column name="left_amount" align="right" footerRenderer="summaryRenderer"-->
<!-- prompt="剩余金额"-->
<!-- renderer="Leaf.formatMoney" width="120"/>-->
<!--<a:column name="left_principal" align="right" footerRenderer="summaryRenderer" prompt="剩余本金" renderer="Leaf.formatMoney" width="120"/>-->
<!--<a:column name="left_interest" align="right" footerRenderer="summaryRenderer" prompt="剩余利息" renderer="Leaf.formatMoney" width="120"/>-->
<!-- <a:column name="write_off_classification_desc" editorFunction="csh_edit_function"-->
<!-- prompt="核销分类"/>-->
<!-- <a:column name="write_off_date" align="center" editorFunction="csh_edit_function"-->
<!-- renderer="Leaf.formatDate" prompt="核销基准日期" width="120"/>-->
<!-- <a:column name="journal_date" align="center" editorFunction="csh_edit_function"-->
<!-- renderer="Leaf.formatDate" prompt="凭证日期" width="120"/>-->
<a:column name="unreceived_amount" align="right" editorFunction="csh_edit_function"
footerRenderer="summaryRenderer" prompt="未收金额"
renderer="Leaf.formatMoney"
width="120"/>
<a:column name="write_off_amount" align="right" editorFunction="csh_edit_function"
footerRenderer="summaryRenderer" prompt="核销金额"
renderer="Leaf.formatMoney"
width="120"/>
<a:column name="write_off_date"
prompt="核销日期"
renderer="Leaf.formatDate" width="80"/>
<!--<a:column name="agent_id_desc" editorFunction="csh_edit_function" prompt="代理商"/>-->
</a:columns>
<a:editors>
<a:textField id="csh_write_off_grid_tf"/>
<a:numberField id="csh_write_off_grid_nf" allowNegative="false"/>
<a:datePicker id="csh_write_off_grid_dp"/>
<a:comboBox id="csh_write_off_grid_cb"/>
<a:lov id="csh_write_off_grid_lv"/>
</a:editors>
</a:grid>
</a:tab>
<a:tab id="write_off_deposit" tabStyle="display:none" prompt="核销为租金保证金" width="150">
<a:grid id="csh_transaction_deposit_grid" navBar="true"
bindTarget="csh_transaction_deposit_ds"
height="370"
marginWidth="10">
<!-- <a:toolBar>-->
<!-- <a:button id="csh_grid_deposit_add_bt" type="add"/>-->
<!-- <a:button id="csh_grid_deposit_delete_bt" type="delete"/>-->
<!-- </a:toolBar>-->
<a:columns>
<a:column name="bp_agent_name" prompt="代理店" width="180" align="center"
editor="csh_transaction_deposit_grid_lv"/>
<a:column name="write_off_amount" prompt="核销金额" renderer="Leaf.formatMoney"
width="180"
align="right" editor="csh_transaction_deposit_grid_nf"
footerRenderer="summaryRenderer"/>
<a:column name="write_off_date" prompt="核销日期" width="180" align="center"
renderer="Leaf.formatDate" editor="csh_transaction_deposit_grid_dp"/>
</a:columns>
<a:editors>
<a:lov id="csh_transaction_deposit_grid_lv"/>
<a:numberField id="csh_transaction_deposit_grid_nf" allowNegative="false"/>
<a:datePicker id="csh_transaction_deposit_grid_dp"/>
</a:editors>
</a:grid>
</a:tab>
<a:tab id="write_off_advance" prompt="核销为预收款" width="150">
<a:grid id="csh_transaction_advanced_grid" navBar="true"
bindTarget="csh_transaction_advanced_ds" height="370"
marginWidth="10">
<!-- <a:toolBar>-->
<!-- <a:button id="csh_grid_advanced_add_bt" type="add"/>-->
<!-- <a:button id="csh_grid_advanced_delete_bt" type="delete"/>-->
<!-- </a:toolBar>-->
<a:columns>
<a:column name="bp_name" prompt="商业伙伴" width="180" align="center"
editor="csh_transaction_advanced_grid_lv"/>
<a:column name="write_off_amount" prompt="核销金额" renderer="Leaf.formatMoney"
width="180"
align="right" editor="csh_transaction_advanced_grid_nf"
footerRenderer="summaryRenderer"/>
<a:column name="write_off_date" prompt="核销日期" width="180" align="center"
renderer="Leaf.formatDate" editor="csh_transaction_advanced_grid_dp"/>
</a:columns>
<a:editors>
<a:lov id="csh_transaction_advanced_grid_lv"/>
<a:numberField id="csh_transaction_advanced_grid_nf" allowNegative="false"/>
<a:datePicker id="csh_transaction_advanced_grid_dp"/>
</a:editors>
</a:grid>
</a:tab>
</a:tabs>
</a:tabPanel>
</a:screenBody>
<script type="text/javascript"><![CDATA[
Leaf.onReady(init);
......
......@@ -2,88 +2,163 @@
<a:screen xmlns:a="http://www.leaf-framework.org/application" trace="true">
<a:view>
<script type="text/javascript"><![CDATA[
function csh_write_off_query(){
$('csh_write_off_lov_ds').query();
}
function csh_write_off_reset(){
$('csh_lov_query_ds').reset();
}
function griddbclick(grid, record, row, name) {
$('${/parameter/@lovid}').commit(record);
function csh_write_off_query() {
$('csh_lov_con_contract_ds').query();
$('csh_write_off_lov_ds').query();
}
function csh_write_off_reset() {
$('csh_query_con_ds').reset();
$('csh_query_cf_ds').reset();
}
function griddbclick(grid, record, row, name) {
$('${/parameter/@lovid}').commit(record);
}
function csh_write_off_confirmed() {
var ds = $('csh_write_off_interface_ds');
var con_rec = $('csh_lov_con_contract_ds').getCurrentRecord();
var cf_recs = $('csh_write_off_lov_ds').getSelected();
if (cf_recs.length == 0) {
Leaf.showInfoMessage("提示", "请选择要核销的现金流!");
return;
}
function setBankAccount(){
//
var record = $('csh_lov_query_ds').getAll();
var bp_id = "${/parameter/@csh_bp_id}";
var dd_bank_account_num = "${/parameter/@csh_bp_bank_account_num}";
if((bp_id != 'undefined') && (bp_id != '')){
record[0].set('bp_id',bp_id);
}
if((dd_bank_account_num != 'undefined') && (dd_bank_account_num != '')){
record[0].set('dd_bank_account_num',dd_bank_account_num);
}
}
]]></script>
var rec = ds.getCurrentRecord();
rec.set('contract_id', con_rec.get('contract_id'));
rec.set('contract_number', con_rec.get('contract_number'));
rec.set('bp_tenant_name', con_rec.get('bp_name'));
rec.set('write_off_bp_name', con_rec.get('bp_name'));
rec.set('write_off_bp_id', con_rec.get('bp_id_tenant'));
rec.set('bp_id_tenant', con_rec.get('bp_id_tenant'));
rec.set('write_off_cf_item_desc', cf_recs[0].get('cf_item_desc'));
rec.set('write_off_cashflow_id', cf_recs[0].get('cashflow_id'));
rec.set('write_off_cf_item', cf_recs[0].get('cf_item'));
rec.set('write_off_times', cf_recs[0].get('times'));
rec.set('left_principal', cf_recs[0].get('unreceived_principal'));
rec.set('left_interest', cf_recs[0].get('unreceived_interest'));
rec.set('left_amount', cf_recs[0].get('unreceived_rental'));
rec.set('write_off_principal', cf_recs[0].get('unreceived_principal'));
rec.set('write_off_interest', cf_recs[0].get('unreceived_interest'));
rec.set('unreceived_amount', cf_recs[0].get('unreceived_amount'));
rec.set('write_off_amount',cf_recs[0].get('unreceived_amount'));
for (var i = 1; i < cf_recs.length; i++) {
//copy...
debugger;
var newRecord = new Leaf.Record({...rec.data});
newRecord.ds = rec.ds;
newRecord.set('write_off_cf_item_desc', cf_recs[i].get('cf_item_desc'));
newRecord.set('write_off_cf_item', cf_recs[i].get('cf_item'));
newRecord.set('write_off_times', cf_recs[i].get('times'));
newRecord.set('write_off_cashflow_id',cf_recs[i].get('cashflow_id'));
newRecord.set('unreceived_amount', cf_recs[i].get('unreceived_amount'));
newRecord.set('left_principal', cf_recs[i].get('unreceived_principal'));
newRecord.set('left_interest', cf_recs[i].get('unreceived_interest'));
newRecord.set('left_amount', cf_recs[i].get('unreceived_rental'));
newRecord.set('write_off_principal', cf_recs[i].get('unreceived_principal'));
newRecord.set('write_off_interest', cf_recs[i].get('unreceived_interest'));
newRecord.set('write_off_amount',cf_recs[i].get('unreceived_amount'));
ds.add(newRecord);
}
$('${/parameter/@lovid}').win.close();
}
function setBankAccount() {
var record = $('csh_lov_query_ds').getAll();
var bp_id = "${/parameter/@csh_bp_id}";
var dd_bank_account_num = "${/parameter/@csh_bp_bank_account_num}";
if ((bp_id != 'undefined') && (bp_id != '')) {
record[0].set('bp_id', bp_id);
}
if ((dd_bank_account_num != 'undefined') && (dd_bank_account_num != '')) {
record[0].set('dd_bank_account_num', dd_bank_account_num);
}
}
]]></script>
<a:dataSets>
<a:dataSet id="csh_lov_cf_item_ds" autoQuery="true" model="csh.CSH531N.hls_cashflow_item_v"/>
<a:dataSet id="csh_lov_query_ds" autoCreate="true">
<a:dataSet id="csh_query_con_ds" autoCreate="true">
<a:fields>
<a:field name="dd_bank_account_num"/>
<a:field name="dd_bank_account_name"/>
<a:field name="bp_id"/>
<a:field name="contract_id" defaultValue="${/parameter/@contract_id}"/>
<!--<a:field name="contract_number" autoComplete="true" lovAutoQuery="true" lovGridHeight="300" lovHeight="450" lovService="csh.CSH531N.csh_con_contract_lov" lovWidth="450" title="合同号选择">-->
<!--<a:mapping>-->
<!--<a:map from="contract_number" to="contract_number"/>-->
<!--<a:map from="contract_name" to="contract_name"/>-->
<!--</a:mapping>-->
<!--</a:field>-->
<a:field name="cf_item"/>
<a:field name="cf_item_desc" displayField="cf_item_desc" options="csh_lov_cf_item_ds" returnField="cf_item" valueField="cf_item"/>
<a:field name="contract_number"/>
<a:field name="bp_name"/>
</a:fields>
</a:dataSet>
<a:dataSet id="csh_query_cf_ds" autoCreate="true">
<a:fields>
<a:field name="cf_item_desc" displayField="cf_item_desc" options="csh_lov_cf_item_ds"
returnField="cf_item" valueField="cf_item"/>
<a:field name="due_date_from"/>
<a:field name="due_date_to"/>
</a:fields>
</a:dataSet>
<a:dataSet id="csh_write_off_lov_ds" fetchAll="true" autoQuery="true" model="csh.CSH531N.con_contract" queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.con_contract/query?contract_id=${/parameter/@contract_id}" queryDataSet="csh_lov_query_ds">
<a:dataSet id="csh_lov_con_contract_ds" selectable="true" autoQuery="true" selectionModel="single"
model="csh.CSH531N.con_contract" queryDataSet="csh_query_con_ds"/>
<a:dataSet id="csh_write_off_lov_ds" fetchAll="true" bindTarget="csh_lov_con_contract_ds"
bindName="csh_con_cf" selectable="true" selectionModel="multiple"
model="csh.CSH531N.csh_con_contract_cashflow" queryDataSet="csh_query_cf_ds"
queryUrl="${/request/@context_path}/autocrud/csh.CSH531N.csh_con_contract_cashflow/query">
<a:fields>
<a:field name="contract_id"/>
<a:field name="cashflow_id"/>
<a:field name="cf_item"/>
<a:field name="cf_item_desc" displayField="cf_item_desc" options="csh_lov_cf_item_ds" returnField="cf_item" valueField="cf_item"/>
<a:field name="cf_item_desc"/>
</a:fields>
</a:dataSet>
</a:dataSets>
<a:screenBody>
<a:screenTopToolbar>
<a:gridButton click="csh_write_off_confirmed" text="确认"/>
<a:gridButton click="csh_write_off_query" text="HLS.QUERY"/>
<a:gridButton click="csh_write_off_reset" text="HLS.RESET"/>
</a:screenTopToolbar>
<a:form column="3" width="800" title="HLS.QUERY_TITLE">
<!--<a:lov name="contract_number" bindTarget="csh_lov_query_ds" prompt="HLS.CONTRACT_NUMBER"/>-->
<a:datePicker name="due_date_from" bindTarget="csh_lov_query_ds" prompt="CSH531.DATE_FROM"/>
<a:datePicker name="due_date_to" bindTarget="csh_lov_query_ds" prompt="CSH531.DATE_TO"/>
<a:comboBox name="cf_item_desc" bindTarget="csh_lov_query_ds" prompt="CSH531.CF_ITEM"/>
<a:numberField name="due_amount_from" bindTarget="csh_lov_query_ds" prompt="CSH531.AMOUNT_FROM"/>
<a:numberField name="due_amount_to" bindTarget="csh_lov_query_ds" prompt="CSH531.AMOUNT_TO"/>
<a:form column="5" labelWidth="180" width="1100" title="HLS.QUERY_TITLE">
<a:textField name="contract_number" bindTarget="csh_query_con_ds" prompt="HLS.CONTRACT_NUMBER"/>
<a:textField name="bp_name" bindTarget="csh_query_con_ds" prompt="客户名"/>
<a:datePicker name="due_date_from" bindTarget="csh_query_cf_ds" prompt="CSH531.DATE_FROM"/>
<a:datePicker name="due_date_to" bindTarget="csh_query_cf_ds" prompt="CSH531.DATE_TO"/>
<a:comboBox name="cf_item_desc" bindTarget="csh_query_cf_ds" prompt="CSH531.CF_ITEM"/>
</a:form>
<a:grid bindTarget="csh_write_off_lov_ds" marginHeight="300" width="800" navBar="true">
<a:columns>
<a:column name="contract_number" prompt="HLS.CONTRACT_NUMBER" width="120"/>
<a:column name="contract_name" prompt="CSH531.CONTRACT_NAME" width="150"/>
<a:column name="times" prompt="HLS.TIMES" width="60"/>
<a:column name="cf_item_desc" prompt="HLS.CF_ITEM_DESC" width="80"/>
<a:column name="due_amount" align="right" prompt="CSH531.AMOUNT" width="100"/>
<a:column name="unreceived_amount" align="right" prompt="CSH531.UNRECEIVED_TOTAL_AMOUNT" width="100"/>
<a:column name="due_date" prompt="CSH531.WRITE_OFF_DATE" renderer="Leaf.formatDate" width="80"/>
</a:columns>
<a:events>
<a:event name="dblclick" handler="griddbclick"/>
</a:events>
</a:grid>
<a:hBox>
<a:vBox>
<a:grid bindTarget="csh_lov_con_contract_ds" width="450" id="csh_con_contract_ds" marginHeight="300"
navBar="true">
<a:columns>
<a:column name="contract_number" align="center" prompt="HLS.CONTRACT_NUMBER" width="120"/>
<a:column name="contract_status_desc" prompt="合同状态" align="center" width="100"/>
<a:column name="bp_name" prompt="客户名" width="180"/>
</a:columns>
</a:grid>
</a:vBox>
<a:vBox>
<a:grid bindTarget="csh_write_off_lov_ds" marginHeight="300" id="csh_con_contract_cashflow_ds"
width="800" navBar="true">
<a:columns>
<a:column name="times" prompt="HLS.TIMES" align="center" width="60"/>
<a:column name="cf_item_desc" prompt="HLS.CF_ITEM_DESC" align="center" width="80"/>
<a:column name="due_date" prompt="还款日" renderer="Leaf.formatDate" width="80" align="center"/>
<a:column name="due_amount" align="right" prompt="应还金额" renderer="Leaf.formatMoney"
width="120"/>
<a:column prompt="营业">
<a:column name="unreceived_principal" prompt="未收本金" align="right"
renderer="Leaf.formatMoney" width="120"/>
<a:column name="unreceived_interest" prompt="未收利息" align="right"
renderer="Leaf.formatMoney" width="120"/>
<a:column name="unreceived_rental" prompt="未收租金" align="right"
renderer="Leaf.formatMoney" width="120"/>
</a:column>
</a:columns>
<!-- <a:events>-->
<!-- <a:event name="dblclick" handler="griddbclick"/>-->
<!-- </a:events>-->
</a:grid>
</a:vBox>
</a:hBox>
</a:screenBody>
<script type="text/javascript"><![CDATA[
Leaf.onReady(setBankAccount);
]]></script>
// Leaf.onReady(setBankAccount);
]]></script>
</a:view>
</a:screen>
......@@ -66,7 +66,7 @@ $Purpose: 商业伙伴授信维护
//设置为可以修改
//datas[0].getField('credit_total_amount').setReadOnly(false);
}
//1. 营业内勤/营业担当勾选授信状态为“启用”或“审批冻结
//1. 营业内勤/营业担当勾选授信状态为“启用”或“停用
window['${/parameter/@layout_code}_user_button2_layout_dynamic_click'] = function() {
//授信额度变更
var credit_ds=get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'hls_bp_master_credit_hd');
......@@ -77,8 +77,8 @@ $Purpose: 商业伙伴授信维护
}
//启用和审批冻结判断
var credit_status=datas[0].data.credit_status;
if(credit_status!='ENABLE'&&credit_status!='FREZZING'){
$L.showInfoMessage("提示",'请选择状态为启用和审批冻结的数据!',null,null)
if(credit_status!='ENABLE'&&credit_status!='DISABLE'){
$L.showInfoMessage("提示",'请选择状态为启用和停用的数据!',null,null)
return;
}
//角色判断 00215 营业内勤
......
......@@ -78,13 +78,13 @@
Leaf.Masker.mask(document.documentElement, '${l:HLS.LOADING}');
function hls_hls500_save(nextStep, source_procedure) {
Leaf.request({
url: $('prj_check_prj_record_link_id').getUrl(),
para: {
'project_id': '${/parameter/@document_id}'
},
success: function(res) {
var secondary_lease = res.result.secondary_lease;
var payment_deduction = res.result.payment_deduction;
var price_list = res.result.price_list;
......@@ -106,33 +106,37 @@
return;
}
}
if(price_list=='DS_PRICE_10'){
if(payment_deduction!='TRADE_IN'){
var record = $('hls_fin_calculator_hd_ds').getAll();
for (var i = 0;i < temp_head_records.length;i++) {
if(record[i].get('column_code')=='H109') {
record[i].set('column_value',0);
record[i].set('column_value_c',0);
var a= document.getElementById('hls_fin_calculator_hd_grid_id_column_value_'+record[i].id);
console.log(a);
document.getElementById('hls_fin_calculator_hd_grid_id_column_value_'+record[i].id).innerHTML=0;
document.getElementById('hls_fin_calculator_hd_grid_id_column_value_'+record[i].id).title=0;
}
}
}else{
var temp_head_records = $('hls_fin_calculator_hd_ds').getAll();
for (var i = 0;i < temp_head_records.length;i++) {
var H16;
if(temp_head_records[i].get('column_code')=='H16'){
H16=temp_head_records[i].get('column_value');
}
if(price_list=='DS_PRICE_10'){
if(payment_deduction!='TRADE_IN'){
var temp_head_records = $('hls_fin_calculator_hd_ds').getAll();
for (var i = 0;i < temp_head_records.length;i++) {
if(temp_head_records[i].get('column_code')=='H109') {
temp_head_records[i].set('column_value',0);
// temp_head_records[i].set('column_value_c',0);
}
}
}else{
var temp_head_records = $('hls_fin_calculator_hd_ds').getAll();
for (var i = 0;i < temp_head_records.length;i++) {
var H16;
if(temp_head_records[i].get('column_code')=='H16'){
H16=temp_head_records[i].get('column_value');
}
if(temp_head_records[i].get('column_code')=='H109') {
if(temp_head_records[i].get('column_code')=='H109') {
temp_head_records[i].set('column_value',H16);
// temp_head_records[i].set('column_value_c',0);
}
}
}
temp_head_records[i].set('column_value',H16);
// temp_head_records[i].set('column_value_c',0);
}
}
}
}
lock_calc_current_window('${l:HLS.SAVING}');
if (!$('hls_fin_calculator_hd_ds').validate() || !$('hls_fin_calculator_ln_ds').validate()) {
unlock_calc_current_window();
......@@ -230,6 +234,7 @@
}
function calc_execute(source_procedure) {
var final_recreate_H_formula, final_recreate_L_formula;
if (source_procedure == 'RE_CALC') {
final_recreate_H_formula = 'Y';
......@@ -629,7 +634,6 @@
}
function do_hls500_head_update(ds, record, name, value, old_value) {
if (record.get('column_code') == 'H54' ) {
var sum=record.get('column_value')-4.75
if(sum<0){
......
......@@ -41,7 +41,7 @@
<a:link id="prj_approval_link_id" model="prj.PRJ501N.project_approval" modelaction="update"/>
<a:link id="check_prj_lease_item_link_id" model="prj.PRJ501N.project_approval" modelaction="execute"/>
<script type="text/javascript"><![CDATA[
alert('${/parameter/@division}')
// alert('${/parameter/@division}')
//add by zhuxianfei
window['${/parameter/@layout_code}_quote_layout_dynamic_click'] = function () {
......@@ -361,8 +361,8 @@
window['${/parameter/@layout_code}_lock_layout_dynamic_window']();
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
var bp_ds_ids = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'F_BASIC_INFO_1','prj_project');
var bp_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'G_BP','prj_project_bp');
var prj_project_lease_item_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'G_LEASE_HEAD_CAR','prj_project_lease_item');
var tenant_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'T_HISTORY_INGO', 'hls_bp_master');
var cdd_item_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_cdd_item_doc_ref');
var virtual_ds_id = '${/parameter/@layout_code}_virtual_ds';
......@@ -370,6 +370,7 @@
$(cdd_item_ds_id).query();
$(bp_ds_id).query();
$(tenant_ds_id).query();
$(prj_project_lease_item_ds_id).query();
}
......
......@@ -189,6 +189,7 @@
fullScreen: true,
draggable: true
});
win.on('close', function () {
$(quotation_ds_id).query();
$(history_ds_id).query();
......@@ -233,6 +234,7 @@
draggable: true
});
win.on('close', function () {
debugger;
$(quotation_ds_id).query();
$(history_ds_id).query();
});
......@@ -283,6 +285,7 @@
draggable: true
});
win.on('close', function () {
$(quotation_ds_id).query();
$(history_ds_id).query();
......@@ -439,7 +442,7 @@ function prj501n_contract_number_renderer(id, name, query_only){
window['${/parameter/@layout_code}_lock_layout_dynamic_window']();
var ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_project');
var bp_ds_ids = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'F_BASIC_INFO_1','prj_project');
var prj_project_lease_item_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'G_LEASE_HEAD_CAR','prj_project_lease_item');
var bp_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'G_BP','prj_project_bp');
var tenant_ds_id = get_dsid_by_tabcode_basetable(window['${/parameter/@layout_code}_layoutDataSetList'],'T_HISTORY_INGO', 'hls_bp_master');
var cdd_item_ds_id = get_dsid_by_basetable(window['${/parameter/@layout_code}_layoutDataSetList'], 'prj_cdd_item_doc_ref');
......@@ -448,6 +451,7 @@ function prj501n_contract_number_renderer(id, name, query_only){
$(cdd_item_ds_id).query();
$(bp_ds_id).query();
$(tenant_ds_id).query();
$(prj_project_lease_item_ds_id).query();
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment