DBA Data[Home] [Help]

PACKAGE: APPS.AHL_PRD_LOV_SERVICE_PVT

Source


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