1 PACKAGE AHL_PRD_LOV_SERVICE_PVT AS
2 /* $Header: AHLVLOVS.pls 120.0.12010000.1 2008/11/30 21:15:09 sikumar noship $ */
3 -----------------------------------------------------------
4 -- PACKAGE
5 -- AHL_PRD_LOV_SERVICE_PVT
6 --
7 -- PURPOSE
8 -- This package is a Private API for providing web services
9 -- to return LOV search results for LOVs on production UI
10
11 -- Call_LOV_Services (see below for specification)
12 --
13 --
14 -- NOTES
15 --
16 --
17 -- HISTORY
18 --
19 -- Created By Yan Zhou 15-Sept-2006
20 --
21 -----------------------------------------------------------
22
23 -------------------------------------
24 -- Input: Search Criteria Rec Type
25 -------------------------------------
26
27 TYPE LovCriteria_Rec_Type IS RECORD (
28 AttributeName VARCHAR2(80) := NULL,
29 AttributeValue VARCHAR2(2000) := NULL
30 );
31
32 -- Declare Search Criteria table type for record
33 TYPE LovCriteria_Tbl_Type IS TABLE OF LovCriteria_Rec_Type
34 INDEX BY BINARY_INTEGER;
35
36 -------------------------------------
37 -- Input: LOV Input Rec Type
38 -------------------------------------
39 TYPE LOV_Input_Rec_Type IS RECORD (
40 lovID VARCHAR2(80) := NULL,
41 getMetaData VARCHAR2(1) := 'F',
42 getResults VARCHAR2(1) := 'F',
43 StartRow NUMBER := 1,
44 NumberOfRows NUMBER := 9999, -- For dropdown list box, all rows should be retrieved
45 LovCriteriaTbl LovCriteria_Tbl_Type
46 );
47
48
49
50 -------------------------------------
51 -- Output: Meta Data Rec Type
52 -------------------------------------
53
54 TYPE LovMetaAttribute_Rec_Type IS RECORD (
55 AttributeName VARCHAR2(80) := NULL,
56 Prompt VARCHAR2(40) := NULL,
57 IsDisplayed VARCHAR2(1) := 'F',
58 IsSearcheable VARCHAR2(1) := 'F',
59 DataType VARCHAR2(30) := NULL
60 );
61
62 -- Declare Meta Data table type for record
63 TYPE LovMetaAttribute_Tbl_Type IS TABLE OF LovMetaAttribute_Rec_Type
64 INDEX BY BINARY_INTEGER;
65
66 -------------------------------------
67 -- Output: LOV Meta Data Output Rec Type
68 -------------------------------------
69 TYPE LovMetaData_Rec_Type IS RECORD (
70 LovTitle VARCHAR2(80) := NULL,
71 LovMetaAttributeTbl LovMetaAttribute_Tbl_Type
72 );
73
74 -------------------------------------
75 -- Output: Search Results Attribute Rec Type
76 -------------------------------------
77
78 TYPE LovResultAttribute_Rec_Type IS RECORD (
79 AttributeName VARCHAR2(80) := NULL,
80 AttributeValue VARCHAR2(2000) := NULL
81 );
82
83 -- Declare Search Results Attribute table type for record
84 TYPE LovResultAttribute_Tbl_Type IS TABLE OF LovResultAttribute_Rec_Type
85 INDEX BY BINARY_INTEGER;
86
87 -------------------------------------
88 -- Output: Search Results Table Type
89 -------------------------------------
90
91 -- Declare Search Results table type for record
92 TYPE LovResult_Tbl_Type IS TABLE OF LovResultAttribute_Tbl_Type
93 INDEX BY BINARY_INTEGER;
94
95 -------------------------------------
96 -- Output: LOV Output Rec Type
97 -------------------------------------
98 TYPE LovOutput_Rec_Type IS RECORD (
99 StartRow NUMBER := NULL,
100 NumberOfRows NUMBER := NULL,
101 LovResultTbl LovResult_Tbl_Type
102 );
103
104
105 ---------------------------------------------------------------------
106 -- PROCEDURE
107 -- Call_LOV_Services
108 --
109 -- PURPOSE
110 --
111 -- PARAMETERS
112 --
113 -- NOTES
114 ---------------------------------------------------------------------
115
116 PROCEDURE Call_LOV_Services (
117 p_api_version IN NUMBER :=1.0,
118 p_init_msg_list IN VARCHAR2 :=Fnd_Api.g_false,
119 p_commit IN VARCHAR2 :=Fnd_Api.g_false,
120 p_validation_level IN NUMBER :=Fnd_Api.g_valid_level_full,
121 p_module_type IN VARCHAR2 :=null,
122 p_userid IN VARCHAR2 := NULL,
123 p_lov_input_rec IN LOV_Input_Rec_Type,
124 x_lov_result_output_rec OUT NOCOPY LovOutput_Rec_Type,
125 x_lov_meta_output_rec OUT NOCOPY LovMetaData_Rec_Type,
126 x_return_status OUT NOCOPY VARCHAR2,
127 x_msg_count OUT NOCOPY NUMBER,
128 x_msg_data OUT NOCOPY VARCHAR2
129 );
130
131 END AHL_PRD_LOV_SERVICE_PVT;
132