1 PACKAGE IEX_STRY_UTL_PUB AUTHID CURRENT_USER as
2 /* $Header: iexpsuts.pls 120.0.12000000.2 2007/04/26 09:09:32 gnramasa ship $ */
3
4
5 G_DEFAULT_NUM_REC_FETCH NUMBER := 30;
6 G_YES CONSTANT VARCHAR2(1) := 'Y';
7 G_NO CONSTANT VARCHAR2(1) := 'N';
8 G_NUMBER CONSTANT NUMBER := 1; -- data type is number
9 G_VARCHAR2 CONSTANT NUMBER := 2; -- data type is varchar2
10
11 TYPE work_item_rec_type IS RECORD (
12 template_id NUMBER,
13 work_item_template_id NUMBER,
14 order_by NUMBER,
15 STATUS VARCHAR2(100),
16 work_item_id NUMBER,
17 strategy_id NUMBER );
18
19 TYPE work_item_tab_type IS TABLE OF work_item_rec_type INDEX BY BINARY_INTEGER;
20
21 PROCEDURE GET_NEXT_WORK_ITEMS
22 (p_api_version IN NUMBER,
23 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
24 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
25 p_strategy_id IN NUMBER,
26 x_return_status OUT NOCOPY VARCHAR2,
27 x_msg_count OUT NOCOPY NUMBER,
28 x_msg_data OUT NOCOPY VARCHAR2,
29 x_work_item_tab OUT NOCOPY work_item_tab_type);
30
31
32
33 /**
34 update all the work_items status to depending on the status passed
35 update the stragey status to depending on the status passed
36 **/
37 PROCEDURE CLOSE_STRY_AND_WITEMS
38 (p_api_version IN NUMBER,
39 p_commit IN VARCHAR2 DEFAULT FND_API.G_TRUE,
40 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
41 p_strategy_id IN NUMBER,
42 p_status IN VARCHAR2,
43 x_return_status OUT NOCOPY VARCHAR2,
44 x_msg_count OUT NOCOPY NUMBER,
45 x_msg_data OUT NOCOPY VARCHAR2
46 );
47
48 /**
49 update the stragey status to depending on the status passed
50 **/
51 PROCEDURE CLOSE_STRATEGY
52 (p_api_version IN NUMBER,
53 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
54 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
55 p_strategy_id IN NUMBER,
56 p_status IN VARCHAR2,
57 x_return_status OUT NOCOPY VARCHAR2,
58 x_msg_count OUT NOCOPY NUMBER,
59 x_msg_data OUT NOCOPY VARCHAR2
60 );
61
62 /**
63 update the work_item_id;
64 **/
65 PROCEDURE UPDATE_WORK_ITEM
66 (p_api_version IN NUMBER,
67 p_commit IN VARCHAR2 DEFAULT FND_API.G_TRUE,
68 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
69 p_work_item_id IN NUMBER,
70 p_status IN VARCHAR2,
71 x_return_status OUT NOCOPY VARCHAR2,
72 x_msg_count OUT NOCOPY NUMBER,
73 x_msg_data OUT NOCOPY VARCHAR2
74 );
75
76 /**
77 update the next work_item_id in the strategy table
78 **/
79 PROCEDURE UPDATE_NEXT_WORK_ITEM
80 (p_api_version IN NUMBER,
81 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
82 p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
83 p_work_item_id IN NUMBER,
84 p_strategy_id IN NUMBER,
85 x_return_status OUT NOCOPY VARCHAR2,
86 x_msg_count OUT NOCOPY NUMBER,
87 x_msg_data OUT NOCOPY VARCHAR2
88 );
89
90
91
92 /**
93 **check all the work_items for the given strategy for status in
94 ** CANCELLED,COMPLETE.
95 ** set the return value to 0 if the all the work items are
96 ** exhausted
97 **/
98 FUNCTION CHECK_WORK_ITEM_STATUS(
99 p_strategy_id IN NUMBER
100 )RETURN NUMBER;
101
102 /** Calculate date based on the template UOM and the wait
103 */
104
105 FUNCTION get_Date (p_date IN DATE,
106 l_UOM varchar2,
107 l_unit number) return date;
108
109
110
111 /** subscription function example
112 *
113 **/
114 FUNCTION create_workitem_check
115 ( p_subscription_guid in raw,
116 p_event in out NOCOPY wf_event_t)
117 RETURN VARCHAR2;
118
119 /** subscription function example
120 * for complete work item
121 **/
122
123 FUNCTION create_workitem_complete
124 ( p_subscription_guid in raw,
125 p_event in out NOCOPY wf_event_t)
126 return varchar2;
127
128 --Begin bug#5874874 gnramasa 25-Apr-2007
129 procedure clear_uwq_str_summ(p_object_id in number,
130 p_object_type in varchar2);
131
132 procedure refresh_uwq_str_summ(p_workitem_id in number);
133 --End bug#5874874 gnramasa 25-Apr-2007
134
135 /** reassgin strategy
136 * send signal first
137 * then call create_Strategy_pub
138 * to create the new strategy
139 * the new strategy will launch the work flow*
140 **/
141 /*
142 PROCEDURE REASSIGN_STRATEGY( p_strategy_id IN NUMBER,
143 p_status IN VARCHAR2,
144 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
145 x_return_status OUT NOCOPY VARCHAR2,
146 x_msg_count OUT NOCOPY NUMBER,
147 x_msg_data OUT NOCOPY VARCHAR2);
148
149 */
150 /** update work item and call send signal
151 * if send signal fails, roolback the work item
152 **/
153
154 /*
155 PROCEDURE UPDATE_AND_SENDSIGNAL( P_strategy_work_item_Rec IN
156 iex_strategy_work_items_pvt.strategy_work_item_Rec_Type,
157 p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
158 x_return_status OUT NOCOPY VARCHAR2,
159 x_msg_count OUT NOCOPY NUMBER,
160 x_msg_data OUT NOCOPY VARCHAR2);
161
162
163 */
164
165 END IEX_STRY_UTL_PUB;