--Created by Tony Liu.




CREATE TABLE APPS.BXJ_WEBADI_EMPLOYEES 
(
EMPLOYEE_ID NUMBER,
EMPLOYEE_NUM VARCHAR2(100),
EMPLOYEE_NAME VARCHAR2(100),
EMPLOYEE_COUNTRY VARCHAR2(100),
EMPLOYEE_ADDRESS VARCHAR2(500),
EMPLOYEE_TYPE VARCHAR2(10),
DESCRIPTION VARCHAR2(500),
MANAGER_ID NUMBER,
DEPARTMENT_ID NUMBER,
SALARY NUMBER,
HIRE_DATE DATE,
JOB_ID NUMBER,
LAST_UPDATE_DATE DATE NOT NULL ENABLE,
LAST_UPDATED_BY NUMBER(15,0) NOT NULL ENABLE,
LAST_UPDATE_LOGIN NUMBER(15,0),
CREATED_BY NUMBER(15,0) NOT NULL ENABLE,
CREATION_DATE DATE NOT NULL ENABLE
);





CREATE OR REPLACE PACKAGE bxj_webadi_emp_pkg AS
PROCEDURE create_employee(p_employee_id number,
p_employee_num varchar2(100),
p_employee_name varchar2(100),
p_employee_country varchar2(100),
p_employee_address varchar2(500),
p_employee_type varchar2(100),
p_description varchar2(500),
p_manager_id number,
p_department_id number,
p_salary number,
p_hire_date date,
p_job_id number,
p_last_update_date date,
p_last_updated_by number,
p_last_update_login number,
p_created_by number,
p_creation_date date);
END bxj_webadi_emp_pkg;





CREATE OR REPLACE PACKAGE BODY bxj_webadi_emp_pkg AS
PROCEDURE create_employee(p_employee_id number,
p_employee_num varchar2(100),
p_employee_name varchar2(100),
p_employee_country varchar2(100),
p_employee_address varchar2(500),
p_employee_type varchar2(100),
p_description varchar2(500),
p_manager_id number,
p_department_id number,
p_salary number,
p_hire_date date,
p_job_id number,
p_last_update_date date,
p_last_updated_by number,
p_last_update_login number,
p_created_by number,
p_creation_date date) IS
BEGIN
INSERT INTO apps.bxj_webadi_employees
VALUES
(p_employee_id,
p_employee_num,
p_employee_name,
p_employee_country,
p_employee_address,
p_employee_type,
p_description,
p_manager_id,
p_department_id,
p_salary,
p_hire_date,
p_job_id,
p_last_update_date,
p_last_updated_by,
p_last_update_login,
p_created_by,
p_creation_date);
COMMIT;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE(errcode || errmsg);
END;
END bxj_webadi_emp_pkg;




WebADI_案例实施02_开发一个基于R12.1.3的复杂WebADI Desktop_desktop



WebADI_案例实施02_开发一个基于R12.1.3的复杂WebADI Desktop_desktop_02


这两天做了一个R12 WEBADI的开发任务,任务描述如下:


1.  根据用户的data file, 导入数据至XLA, 生成Journals, 然后再调用标准请求,生成GL Journals


2.  建立staging table, 用来存放WEBADI导入的数据, 表名为c_xla_je_load_staging


3.  调用API 来生成XLA Journals


      xla_journal_entries_pub_pkg.create_journal_entry_header    生成Journal header


      xla_journal_entries_pub_pkg.create_journal_entry_line   生成Journal lines


4.  调用标准请求生成GL Journals


5.  建立Package :c_xla_je_load_pkg, 完成数据校验/数据导入到XLA/调用标准请求


6.  注册请求CUST XLA Journal Entry Load,调用上述package.


7.  在WEBADI 中调用上述请求.


如果上述工作在11i里做的话,估计得把我做吐血,因为11i的WEBADI还不是很完备,很多功能ORACLE没有提供开放的接口,只能用insert table来做。但是现在在R12中,做起来就简单多了。


R12 WEBADI比11i的强大了许多,反映在如下几方面:

1. 多了一个新的职责: Desktop integration manager, 在此职责下可完成所有的WEBADI的开发工作。

2. 现在可以在Excel 模板中定义Lov值验证

3. 增加了Interface 的定义,可以灵活定义Layout的数据源。

4. Layout中的定义多了一些选项,使得Layout的定义更加完善。

5. 增加了uploader的定义,可以灵活定义导入参数

6. 增加了importer的定义,可以灵活定义数据导入后的工作。

7. FNDLOAD 更加完善,可通过bneintegrator.lct 导出大多数的WEBADI定义。


所以这个Task 还真没花多少时间,就完成了。


---------------------------------以下是WEBADI 定义-----------------------------------

Navigater: Desktop Integration Manager/Manager Integrators


1. Integrator


   Name: CUST XLA Journal Entry Load


   Code: C_XLA_JE_LOAD


   Application:  Custom Application


   Enabled: Y


   Display in Create Document Page: Y


   Security ruls:  function: C_XLA_JE_LOAD


2. Interfaces


   Name: C_XLA_JE_LOAD_STAGING


   Type: Table


   Entity name: C_XLA_JE_LOAD_STAGING (实际表名,注意,需在数据库中注册此表,否则找不到)


   无任何default value and LOV validation


3. Contents


   此步根据需要设置,如果希望用户导出的是空的模板文件,则无需设置,如果希望用户在导出的同时把数据文件加进去,则需设置,我这里设了一下:


   Name: C_XLA_JE_LOAD_CONTENT


   Type: TEXT


   Reporting: N


   做了这个设置后,后面还要做Mapping的设置,设置数据文件列与Interface列的对应关系


4. Uploader


   Select " Copy from Template "


   Uplaoder name: do not change


   Title: do not change


   Header: do not change


   修改bne: import (用来启动后面的importer 的运行)的定义


   Description: Automatically Submit CUST XLA Journal Import


   Prompt left: Automatically Submit CUST XLA Journal Import


   Default value : Y


   Enabled: N (必选且用户无法修改,因为如用户不选的话,后面的Request无法调用,需要人为手工调用)


5. Importer


   Importer type: Asynchronous concurrent request (导步请求,WEBADI无需等待请求执行结果)


   Importer name: C_XLA_JE_LOAD_IMPORTER


   Concurrent Program Request Submission: Program: CUST XLA Journal Entry Load (注意: 使用此WEBADI的职责需要能够调用此请求)


   Success Message Definition: CUST XLA Journal Import Request ID $import$.requestid


保存生成Integrator


----------------以下是Layout (必须)  及 Mapping(不必须) 的定义-------------------


最后需要定义Layout 及 Mapping (如无Contents定义,无需定义Mapping)


1. Layout


   Layout name: C_XLA_JE_LOAD_LAYOUT


   Set all columns to LINES


   Protect sheet: Y (Excel模板是否保护)


   Style. sheet: Default


   Apply filter: Y


   Data entry rows: 2000(此项是很大的一个改进,可以定义模板的初始行数,不再受10行的困扰了)


   定义字段顺序(此项定义本人觉得设计的很垃圾,直接用sequence number就行了,非要搞两个按钮去点,麻烦死了)


   定义显示宽度(此项也是很好的一个改进,增加了用户体验)


Mapping 定义略。


FNDLOAD  DOWNLOAD:


FNDLOAD apps/apps 0 Y DOWNLOAD bneintegrator.lct C_XLA_JE_LOAD.ldt

BNE_INTEGRATORS INTEGRATOR_ASN=C_APPS

INTEGRATOR_CODE=C_XLA_JE_LOAD_XINTG



http://blog.itpub.net/10359218/viewspace-682043/

http://blog.itpub.net/10359218/viewspace-702819/