Oracle Integrator (WEB-Adi) – Part II
Sample code of previously used API.
Table script:-
CREATE TABLE
XX_TEST_WEBADI_T
(
ORG_ID NUMBER,
VENDOR_NAME VARCHAR2 (100),
VENDOR_SITE_CODE VARCHAR2 (100)
);
Package Specification:-
CREATE OR REPLACE PACKAGE
XX_TEST_WEBADI_PKG
IS
PROCEDURE XX_TEST_WEBADI_PRC (P_ORG_ID NUMBER,
P_VENDOR_NAME VARCHAR2,
P_VENDOR_SITE VARCHAR2);
END;
Package Body:-
CREATE OR REPLACE PACKAGE
BODY XX_TEST_WEBADI_PKG
IS
PROCEDURE XX_TEST_WEBADI_PRC (P_ORG_ID NUMBER,
P_VENDOR_NAME VARCHAR2,
P_VENDOR_SITE VARCHAR2)
AS
BEGIN
INSERT INTO XX_TEST_WEBADI_T
VALUES
(P_ORG_ID, P_VENDOR_NAME, P_VENDOR_SITE);
EXCEPTION
WHEN OTHERS
THEN
RAISE_APPLICATION_ERROR (-20001, SQLCODE
|| ' ' || SQLERRM);
END XX_TEST_WEBADI_PRC;
END XX_TEST_WEBADI_PKG;
Create functions for webadi:-
1. Enter the Function
and User function name
2. Enter Properties details, Set Type “SSWA servlet function” always.
3. Enter form details and set Parameters value as below.
bne:page=BneCreateDoc&bne:viewer=BNE:EXCEL2003&bne:reporting=N&bne:integrator=USER_NAME:XX_TEST_WEBADI&bne:noreview=Yes
4. Enter Web HTML Details and set HTML Call as “BneApplicationService”.
Save it and Assign
this function to Menu of a responsibility.
Adding LOV Validation on ORG_ID
Query used:-
select * from bne_attributes where attribute_code like 'XX_TEST%'
select * from BNE_INTERFACES_TL where interface_code like 'XX_TEST%' and language='US'
Adding LOV Validation on ORG_ID
Query used:-
select * from bne_attributes where attribute_code like 'XX_TEST%'
select * from BNE_INTERFACES_TL where interface_code like 'XX_TEST%' and language='US'
Script to add LOV on Org_id:-
declare
P_APPLICATION_ID number := 201; -- application id of Webadi application
P_INTERFACE_CODE VARCHAR2(20) := 'XX_TEST_XINTG_INTF1'; -- interface code fetch from above query.
P_INTERFACE_COL_NAME VARCHAR2(200) := 'P_ORG_ID';--parameter for lov
P_ID_COL VARCHAR2(200) := 'ORGANIZATION_ID';
P_MEAN_COL VARCHAR2(200) := 'NAME';
P_DESC_COL VARCHAR2(200) := NULL;
P_TABLE VARCHAR2(200) := 'HR_OPERATING_UNITS';
P_ADDL_W_C VARCHAR2(200) := '1=1';
P_WINDOW_CAPTION VARCHAR2(200) := 'OPERATING UNIT';
P_WINDOW_WIDTH NUMBER := 400;
P_WINDOW_HEIGHT NUMBER := 300;
P_TABLE_BLOCK_SIZE NUMBER := 10;
P_TABLE_SORT_ORDER VARCHAR2(200) := 'ascending';
P_USER_ID number := 1883; -- user id from fnd_user
P_TABLE_COLUMNS VARCHAR2(200) := NULL;
P_TABLE_SELECT_COLUMNS VARCHAR2(200) := NULL;
P_TABLE_COLUMN_ALIAS VARCHAR2(200) := NULL;
P_TABLE_HEADERS VARCHAR2(200) := NULL;
P_POPLIST_FLAG VARCHAR2(200) := 'N';
begin
apps.BNE_INTEGRATOR_UTILS.CREATE_TABLE_LOV(P_APPLICATION_ID => P_APPLICATION_ID,
P_INTERFACE_CODE => P_INTERFACE_CODE, --BNE_INTERFACE_COLS_B.INTERFACE_CODE
P_INTERFACE_COL_NAME => P_INTERFACE_COL_NAME, --BNE_INTERFACE_COLS_B.INTERFACE_COL_NAME
P_ID_COL => P_ID_COL,
P_MEAN_COL => P_MEAN_COL,
P_DESC_COL => P_DESC_COL,
P_TABLE => P_TABLE,
P_ADDL_W_C => P_ADDL_W_C,
P_WINDOW_CAPTION => P_WINDOW_CAPTION,
P_WINDOW_WIDTH => P_WINDOW_WIDTH,
P_WINDOW_HEIGHT => P_WINDOW_HEIGHT,
P_TABLE_BLOCK_SIZE => P_TABLE_BLOCK_SIZE,
P_TABLE_SORT_ORDER => P_TABLE_SORT_ORDER,
P_USER_ID => P_USER_ID,
P_TABLE_COLUMNS => P_TABLE_COLUMNS,
P_TABLE_SELECT_COLUMNS => P_TABLE_SELECT_COLUMNS,
P_TABLE_COLUMN_ALIAS => P_TABLE_COLUMN_ALIAS,
P_TABLE_HEADERS => P_TABLE_HEADERS,
P_POPLIST_FLAG => P_POPLIST_FLAG);
commit;
end;