DBA Data[Home] [Help]

PACKAGE: APPS.CSI_ML_UTIL_PVT

Source


1 PACKAGE CSI_ML_UTIL_PVT AS
2 -- $Header: csimutls.pls 120.2 2007/10/30 02:34:50 anjgupta ship $
3 
4 PROCEDURE resolve_ids
5  (
6     p_txn_from_date         IN     VARCHAR2,
7     p_txn_to_date           IN     VARCHAR2,
8     p_batch_name            IN     VARCHAR2,
9     p_source_system_name    IN     VARCHAR2,
10     x_return_status         OUT NOCOPY   VARCHAR2,
11     x_error_message         OUT NOCOPY   VARCHAR2
12  );
13 
14 PROCEDURE resolve_pw_ids
15  (
16     p_txn_from_date         IN     VARCHAR2,
17     p_txn_to_date           IN     VARCHAR2,
18     p_source_system_name    IN     VARCHAR2,
19     p_worker_id             IN     NUMBER,
20     x_return_status         OUT NOCOPY   VARCHAR2,
21     x_error_message         OUT NOCOPY   VARCHAR2
22  );
23 
24 PROCEDURE resolve_update_ids
25  (
26     p_source_system_name    IN     VARCHAR2,
27     p_txn_identifier        IN     VARCHAR2,
28     x_return_status         OUT NOCOPY   VARCHAR2,
29     x_error_message         OUT NOCOPY   VARCHAR2
30  );
31 
32 
33 FUNCTION Get_Txn_Type_Id(P_Txn_Type IN VARCHAR2, P_App_Short_Name IN VARCHAR2) RETURN NUMBER;
34 
35 PRAGMA RESTRICT_REFERENCES(Get_Txn_Type_Id, WNDS);
36 
37 PROCEDURE log_create_errors
38  (
39     p_txn_from_date         IN     VARCHAR2,
40     p_txn_to_date           IN     VARCHAR2,
41     x_return_status         OUT NOCOPY   VARCHAR2,
42     x_error_message         OUT NOCOPY   VARCHAR2
43  );
44 
45 PROCEDURE log_create_pw_errors (p_txn_from_date         IN     VARCHAR2,
46                                 p_txn_to_date           IN     VARCHAR2,
47                                 p_source_system_name    IN     VARCHAR2,
48                                 p_worker_id             IN     NUMBER,
49                                 x_return_status         OUT NOCOPY   VARCHAR2,
50                                 x_error_message         OUT NOCOPY   VARCHAR2
51  );
52 
53 PROCEDURE set_pty_process_status
54  (
55     p_txn_from_date         IN     VARCHAR2,
56     p_txn_to_date           IN     VARCHAR2,
57     x_return_status         OUT NOCOPY   VARCHAR2,
58     x_error_message         OUT NOCOPY   VARCHAR2
59  );
60 
61 PROCEDURE set_ext_process_status
62  (
63     p_txn_from_date         IN     VARCHAR2,
64     p_txn_to_date           IN     VARCHAR2,
65     x_return_status         OUT NOCOPY   VARCHAR2,
66     x_error_message         OUT NOCOPY   VARCHAR2
67  );
68 
69  TYPE INST_INTERFACE_REC_TYPE IS RECORD
70 (     INST_INTERFACE_ID               NUMBER       := FND_API.G_MISS_NUM,
71       PROCESS_STATUS                  VARCHAR2(1)  := FND_API.G_MISS_CHAR
72 );
73    TYPE INST_INTERFACE_TBL_TYPE is TABLE OF INST_INTERFACE_REC_TYPE INDEX BY BINARY_INTEGER;
74 
75  TYPE PARTY_CONTACT_REC_TYPE IS RECORD
76 (     IP_INTERFACE_ID                 NUMBER        := FND_API.G_MISS_NUM,
77       INST_INTERFACE_ID               NUMBER        := FND_API.G_MISS_NUM,
78       CONTACT_PARTY_ID                NUMBER        := FND_API.G_MISS_NUM,
79       CONTACT_PARTY_NUMBER            VARCHAR2(30)  := FND_API.G_MISS_CHAR,
80       CONTACT_PARTY_NAME              VARCHAR2(250) := FND_API.G_MISS_CHAR,
81       CONTACT_PARTY_REL_TYPE          VARCHAR2(30)  := FND_API.G_MISS_CHAR,
82       PARENT_TBL_IDX                  NUMBER  := FND_API.G_MISS_NUM,
83       CONTACT_PARENT_TBL_INDEX        NUMBER  := FND_API.G_MISS_NUM
84 );
85    TYPE PARTY_CONTACT_TBL_TYPE is TABLE OF PARTY_CONTACT_REC_TYPE INDEX BY BINARY_INTEGER;
86 
87 -- The following code is added for OI enhacements
88 
89 TYPE T_DATE  IS TABLE OF DATE INDEX BY BINARY_INTEGER;
90 TYPE T_NUM   IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
91 TYPE T_V1    IS TABLE OF VARCHAR(01) INDEX BY BINARY_INTEGER;
92 TYPE T_V30   IS TABLE OF VARCHAR(30) INDEX BY BINARY_INTEGER;
93 TYPE T_V150  IS TABLE OF VARCHAR(150) INDEX BY BINARY_INTEGER;
94 
95 TYPE II_RELATIONSHIP_REC_TAB IS RECORD
96    (
97        REL_INTERFACE_ID                T_NUM,
98        RELATIONSHIP_TYPE_CODE          T_V30,
99        OBJECT_ID                       T_NUM,
100        SUBJECT_ID                      T_NUM,
101        CONFIG_ROOT_NODE                T_NUM,
102        POSITION_REFERENCE              T_V30,
103        ACTIVE_START_DATE               T_DATE,
104        ACTIVE_END_DATE                 T_DATE,
105        DISPLAY_ORDER                   T_NUM,
106        MANDATORY_FLAG                  T_V1,
107        CONTEXT                         T_V30,
108        ATTRIBUTE1                      T_V150,
109        ATTRIBUTE2                      T_V150,
110        ATTRIBUTE3                      T_V150,
111        ATTRIBUTE4                      T_V150,
112        ATTRIBUTE5                      T_V150,
113        ATTRIBUTE6                      T_V150,
114        ATTRIBUTE7                      T_V150,
115        ATTRIBUTE8                      T_V150,
116        ATTRIBUTE9                      T_V150,
117        ATTRIBUTE10                     T_V150,
118        ATTRIBUTE11                     T_V150,
119        ATTRIBUTE12                     T_V150,
120        ATTRIBUTE13                     T_V150,
121        ATTRIBUTE14                     T_V150,
122        ATTRIBUTE15                     T_V150,
123        OBJECT_VERSION_NUMBER           T_NUM
124    );
125 
126 TYPE ii_rel_interface_rec IS RECORD
127 (
128        REL_INTERFACE_ID                NUMBER,
129        RELATIONSHIP_TYPE_CODE          VARCHAR2(30),
130        OBJECT_ID                       NUMBER,
131        SUBJECT_ID                      NUMBER
132 );
133 
134 TYPE  ii_rel_interface_tbl IS TABLE OF ii_rel_interface_rec
135                                     INDEX BY BINARY_INTEGER;
136 
137 PROCEDURE resolve_rel_ids
138  (  p_source_system         IN     VARCHAR2,
139     p_txn_from_date         IN     varchar2,
140     p_txn_to_date           IN     varchar2,
141     x_return_status         OUT NOCOPY   VARCHAR2,
142     x_error_message         OUT NOCOPY   VARCHAR2);
143 
144 
145 PROCEDURE Get_Next_Level
146  (p_object_id               IN  NUMBER,
147   p_rel_tbl                 OUT NOCOPY csi_ml_util_pvt.ii_rel_interface_tbl
148  );
149 
150 PROCEDURE Get_Children
151  (p_object_id               IN  NUMBER,
152   p_rel_tbl                 OUT NOCOPY csi_ml_util_pvt.ii_rel_interface_tbl
153  );
154 
155 PROCEDURE Get_top_most_parent
156      ( p_subject_id      IN  NUMBER,
157        p_rel_type_code   IN  VARCHAR2,
158        p_process_status  IN  VARCHAR2,
159        p_object_id       OUT NOCOPY NUMBER
160      );
161 
162 PROCEDURE Validate_relationship(
163     x_msg_data                   OUT NOCOPY  VARCHAR2,
164     x_return_status              OUT NOCOPY  VARCHAR2,
165     p_mode                       IN          VARCHAR2,
166     p_worker_id                  IN          NUMBER,
167     p_txn_from_date              IN          varchar2,
168     p_txn_to_date                IN          varchar2,
169     p_source_system_name         IN          VARCHAR2
170     );
171 
172 PROCEDURE Eliminate_dup_records;
173 PROCEDURE Eliminate_dup_subject;
174 PROCEDURE check_cyclic;
175 -- End of code addition for OI enhancements
176 
177 
178 END CSI_ML_UTIL_PVT;