1 PACKAGE BODY WSH_ITM_CUSTOM_PROCESS AS
2 /* $Header: WSHITPPB.pls 120.0 2005/05/26 18:38:49 appldev noship $ */
3
4 G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_ITM_CUSTOM_PROCESS';
5
6 /*===========================================================================+
7 | PROCEDURE |
8 | PRE_PROCESS_REQUEST |
9 | |
10 | DESCRIPTION |
11 | This procedure is called from Submit Deleiveries for |
12 | Screening concurrent program which populates the interface |
13 | table. |
14 | Customers are given the flexibilty of adding additional |
15 | attributes to the Interface table/Additional Logic |
16 | in the code as per their Requirements through THIS procedure |
17 | |
18 +===========================================================================*/
19
20 PROCEDURE PRE_PROCESS_WSH_REQUEST (
21 p_request_control_id IN NUMBER
22 )IS
23
24 l_debug_on BOOLEAN;
25 --
26 l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'PRE_PROCESS_WSH_REQUEST';
27 --
28 BEGIN
29 --
30 l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
31 --
32 IF l_debug_on IS NULL
33 THEN
34 l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
35 END IF;
36 --
37 -- Debug Statements
38 --
39 IF l_debug_on THEN
40 WSH_DEBUG_SV.push('Entering' || l_module_name);
41 END IF;
42
43 --
44 -- Debug Statements
45 --
46 IF l_debug_on THEN
47 WSH_DEBUG_SV.pop('Exiting' || l_module_name);
48 END IF;
49 --
50
51 END PRE_PROCESS_WSH_REQUEST;
52
53
54 /*===========================================================================+
55 | PROCEDURE |
56 | POST_PROCESS_REQUEST |
57 | |
58 | DESCRIPTION |
59 | This procedure is called when response is sent for Delivery |
60 | Screening request and is called via XML gateway. |
61 | Customers are given the flexibilty of adding Additional |
62 | Logic in the code as per their Requirements through THIS |
63 | procedure |
64 +===========================================================================*/
65
66 PROCEDURE POST_PROCESS_WSH_REQUEST (
67 p_request_control_id IN NUMBER
68 )IS
69
70 --
71 l_debug_on BOOLEAN;
72 --
73 l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'POST_PROCESS_WSH_REQUEST';
74 --
75 BEGIN
76 --
77 l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
78 --
79 IF l_debug_on IS NULL
80 THEN
81 l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
82 END IF;
83 --
84 -- Debug Statements
85 --
86 IF l_debug_on THEN
87 WSH_DEBUG_SV.push(' Entering ' || l_module_name);
88 END IF;
89
90 --
91 -- Debug Statements
92 --
93 IF l_debug_on THEN
94 WSH_DEBUG_SV.pop('Exiting' || l_module_name);
95 END IF;
96 --
97
98 END POST_PROCESS_WSH_REQUEST;
99
100
101 /*===========================================================================+
102 | PROCEDURE |
103 | PRE_PROCESS_ONT_REQUEST |
104 | Parameters : IN p_request_control_id |
105 | IN p_line_id |
106 | DESCRIPTION |
107 | This procedure is called at the time of Booking Order |
108 | with ITM check included in the Workflow |
109 | table. |
110 | Customers are given the flexibilty of adding additional |
111 | attributes to the Interface table/Additional Logic |
112 | in the code as per their Requirements through THIS procedure |
113 | |
114 +===========================================================================*/
115
116 PROCEDURE PRE_PROCESS_ONT_REQUEST(
117 p_request_control_id IN NUMBER,
118 p_line_id IN NUMBER
119 ) IS
120
121 --
122 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
123 --
124 BEGIN
125
126 IF l_debug_level > 0 THEN
127 oe_debug_pub.add('Entering WSH_ITM_CUSTOM_PROCESS.PRE_PROCESS_ONT_REQUEST....' , 4 ) ;
128 END IF;
129
130
131 IF l_debug_level > 0 THEN
132 oe_debug_pub.add('Exiting WSH_ITM_CUSTOM_PROCESS.PRE_PROCESS_ONT_REQUEST....',4);
133 END IF;
134
135 Exception
136 WHEN NO_DATA_FOUND THEN
137 NULL;
138 END PRE_PROCESS_ONT_REQUEST;
139
140
141
142 /*===========================================================================+
143 | PROCEDURE |
144 | POST_PROCESS_ONT_REQUEST |
145 | Parameters : IN p_request_control_id |
146 | IN p_line_id |
147 | DESCRIPTION |
148 | This procedure is called when response is sent for |
149 | Order/DP screening |
150 | Customers are given the flexibilty of adding additional |
151 | attributes to the Interface table/Additional Logic |
152 | in the code as per their Requirements through THIS procedure |
153 | |
154 +===========================================================================*/
155
156 PROCEDURE POST_PROCESS_ONT_REQUEST(
157 p_request_control_id IN NUMBER
158 ) IS
159
160 --
161 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
162 --
163 BEGIN
164
165 IF l_debug_level > 0 THEN
166 oe_debug_pub.add('Entering WSH_ITM_CUSTOM_PROCESS.POST_PROCESS_ONT_REQUEST....' , 4 ) ;
167 END IF;
168
169 IF l_debug_level > 0 THEN
170 oe_debug_pub.add('Exiting WSH_ITM_CUSTOM_PROCESS.POST_PROCESS_ONT_REQUEST....',4);
171 END IF;
172
173 Exception
174 WHEN NO_DATA_FOUND THEN
175 NULL;
176 END POST_PROCESS_ONT_REQUEST;
177
178
179
180
181
182 END WSH_ITM_CUSTOM_PROCESS;