EBS价目表设置导入功能（1）-价目表题头

   使用ORACLE EBS请求API开发价目表的导入功能：

    1.价目表列表（qp_interface_list_headers）

 

    1.1查询价目表题头信息：

 

Sql代码  

1. --2.1.查询价目表题头信息  
2. lt_headers                     := null;  
3. lt_headers.list_type_code      := 'PRL';  
4. lt_headers.active_flag         := 'Y';  
5. lt_headers.rounding_factor     := -2;  
6. lt_headers.source_lang         := 'ZHS';  
7. lt_headers.language            := 'ZHS';  
8. lt_headers.process_flag        := 'Y';  
9. lt_headers.process_status_flag := 'P';  
10. begin  
11.     select qlh.list_header_id,  
12.            qlh.name,  
13.            qlh.description,  
14.            qlh.currency_code,  
15.            to_char(qlh.start_date_active, 'YYYY-MM-DD'),  
16.            to_char(qlh.end_date_active, 'YYYY-MM-DD'),  
17.            qlh.version_no,  
18.            qlh.orig_system_header_ref  
19.       into lt_headers.list_header_id,  
20.            lt_headers.name,  
21.            lt_headers.description,  
22.            lt_headers.currency_code,  
23.            lt_headers.start_date_active,  
24.            lt_headers.end_date_active,  
25.            lt_headers.version_no,  
26.            lt_headers.orig_sys_header_ref  
27.       from qp_list_headers qlh  
28.      where 1 = 1  
29.        and qlh.list_type_code = 'PRL'  
30.        and qlh.name like '%外贸%'  
31.        and qlh.end_date_active is null  
32.        and qlh.active_flag = 'Y'  
33.        and qlh.currency_code = c_wm_header.transactional_curr_code  
34.        and rownum < 2;  
35.     lt_headers.interface_action_code := g_update; --更新  
36. exception  
37.     when no_data_found then  
38.                   
39.         lt_headers.interface_action_code := g_insert; --新建  
40.     when others then  
41.         raise e_exception;  
42. end;  

 

 

    1.2插入价目表题头信息：

 

Sql代码  

1. insert into qp_interface_list_headers  
2.             (orig_sys_header_ref, --1.原始价目表ID  
3.              list_type_code, --2.价目表类型  
4.              name, --3.价目表名称  
5.              description, --4.价目表说明  
6.              active_flag, --5.是否启用  
7.              currency_code, --6.币种  
8.              currency_header, --7.  
9.              rounding_factor, --8.舍入位数  
10.              source_lang, --9.语言环境  
11.              language, --10.语言  
12.              start_date_active, --11.有效日期起始  
13.              end_date_active, --12.有效日期截止  
14.              interface_action_code, --13.操作方式  
15.              process_flag, --14.处理标志  
16.              process_status_flag, --15.处理状态  
17.              list_header_id,  
18.              version_no)  
19.         values  
20.             (prm_header.orig_sys_header_ref, --1.原始价目表ID  
21.              prm_header.list_type_code, --2.价目表类型  
22.              prm_header.name, --3.价目表名称  
23.              prm_header.description, --4.价目表说明  
24.              prm_header.active_flag, --5.是否启用  
25.              prm_header.currency_code, --6.币种  
26.              prm_header.currency_header, --7.  
27.              prm_header.rounding_factor, --8.舍入位数  
28.              prm_header.source_lang, --9.语言环境  
29.              prm_header.language, --10.语言  
30.              prm_header.start_date_active, --11.有效日期起始  
31.              prm_header.end_date_active, --12.有效日期截止  
32.              prm_header.interface_action_code, --13.操作方式  
33.              prm_header.process_flag, --14.处理标志  
34.              prm_header.process_status_flag, --15.处理状态  
35.              prm_header.list_header_id,  
36.              to_char(to_number(nvl(prm_header.version_no, 0)) + 1));