1 PACKAGE wms_assignment_pvt AUTHID CURRENT_USER AS
2 /* $Header: WMSVPPAS.pls 120.0 2005/05/24 18:12:48 appldev noship $ */
3 -- File : WMSVPPAS.pls
4 -- Content : WMS_Assignment_PVT package specification
5 -- Description : Private API functions and procedures needed for
6 -- wms strategy assignment implementation.
7 -- Notes :
8 -- Modified : 02/08/99 mzeckzer created
9 -- 11/10/99 bitang moved to wms
10 -- Local copies of fnd globals to prevent pragma violations of api functions
11 g_miss_num constant number := fnd_api.g_miss_num;
12 g_miss_char constant varchar2(1) := fnd_api.g_miss_char;
13 g_miss_date constant date := fnd_api.g_miss_date;
14 --
15 -- API name : GetObjectValueName
16 -- Type : Private
17 -- Function : Returns the current name of the business object instance a
18 -- wms strategy is assigned to.
19 -- ( Needed for forms base views of strategy assignment forms )
20 -- Input Parameters:
21 -- p_object_type_code: 1 - system defined ; 2 - user defined
22 -- p_object_id : object identifier
23 -- p_pk1_value : primary key value 1
24 -- p_pk2_value : primary key value 2
25 -- p_pk3_value : primary key value 3
26 -- p_pk4_value : primary key value 4
27 -- p_pk5_value : primary key value 5
28 --
29 -- Notes : Since it is not possible to use dynamic SQL within package
30 -- functions without violating the WNPS pragma, cursors are
31 -- hard coded instead of getting the actual SQL statement from
32 -- WMS_OBJECTS_B table ( analogous to LOV for insert in setup
33 -- form ) to be able to use function together with 'where' and
34 -- 'order by' clauses in regular SQL.
35 -- Important:
36 -- EACH AND EVERY BUSINESS OBJECT IN WMS_OBJECTS_B ENABLED
37 -- TO TIE STRATEGIES TO IT MUST BE REPRESENTED WITHIN THIS
38 -- FUNCTION APROPRIATELY IN ORDER TO BE ABLE TO RE-QUERY SET UP
39 -- STRATEGY ASSIGNMENTS !
40 -- More: The parama is no longer needed for Oracle 8i
41 FUNCTION GetObjectValueName
42 ( p_object_type_code IN NUMBER DEFAULT g_miss_num
43 ,p_object_id IN NUMBER DEFAULT g_miss_num
44 ,p_pk1_value IN VARCHAR2 DEFAULT g_miss_char
45 ,p_pk2_value IN VARCHAR2 DEFAULT NULL
46 ,p_pk3_value IN VARCHAR2 DEFAULT NULL
47 ,p_pk4_value IN VARCHAR2 DEFAULT NULL
48 ,p_pk5_value IN VARCHAR2 DEFAULT NULL
49 ) RETURN VARCHAR2;
50 --pragma definition is no longer needed
51 --pragma restrict_references(GetObjectValueName, WNDS, WNPS);
52 END wms_assignment_pvt;