182: l_progress := 'PO_SOURCING_GRP: 002';
183: IF g_debug_stmt THEN
184: PO_DEBUG.debug_stmt(p_log_head => g_log_head||l_api_name,
185: p_token => l_progress,
186: p_message => 'Before calling po_sourcing_pvt.create_cpa');
187: END IF;
188:
189: PO_SOURCING_PVT.create_cpa (
190: x_return_status => x_return_status,
185: p_token => l_progress,
186: p_message => 'Before calling po_sourcing_pvt.create_cpa');
187: END IF;
188:
189: PO_SOURCING_PVT.create_cpa (
190: x_return_status => x_return_status,
191: x_msg_count => x_msg_count,
192: x_msg_data => x_msg_data,
193: p_interface_header_id => p_interface_header_id,
203: l_progress := 'PO_SOURCING_GRP: 003';
204: IF g_debug_stmt THEN
205: PO_DEBUG.debug_stmt(p_log_head => g_log_head||l_api_name,
206: p_token => l_progress,
207: p_message => 'After calling po_sourcing_pvt.create_cpa');
208: END IF;
209:
210: l_progress := 'PO_SOURCING_GRP: 004';
211: IF g_debug_stmt THEN
210: l_progress := 'PO_SOURCING_GRP: 004';
211: IF g_debug_stmt THEN
212: PO_DEBUG.debug_stmt(p_log_head => g_log_head||l_api_name,
213: p_token => l_progress,
214: p_message => 'PO_SOURCING_GRP: After calling PO_SOURCING_PVT.create_cpa');
215: PO_DEBUG.debug_var (p_log_head => g_log_head||l_api_name,
216: p_progress => l_progress,
217: p_name => 'x_document_id',
218: p_value => x_document_id);
359: l_progress := 'PO_SOURCING_GRP.DELETE_INTERFACE_HEADER: 002';
360: IF g_debug_stmt THEN
361: PO_DEBUG.debug_stmt(p_log_head => g_log_head||l_api_name,
362: p_token => l_progress,
363: p_message => 'Before calling po_sourcing_pvt.delete_interface_header');
364: END IF;
365:
366: PO_SOURCING_PVT.DELETE_INTERFACE_HEADER (
367: x_return_status => x_return_status,
362: p_token => l_progress,
363: p_message => 'Before calling po_sourcing_pvt.delete_interface_header');
364: END IF;
365:
366: PO_SOURCING_PVT.DELETE_INTERFACE_HEADER (
367: x_return_status => x_return_status,
368: p_interface_header_id => p_interface_header_id
369: );
370:
371: l_progress := 'PO_SOURCING_GRP.DELETE_INTERFACE_HEADER: 003';
372: IF g_debug_stmt THEN
373: PO_DEBUG.debug_stmt(p_log_head => g_log_head||l_api_name,
374: p_token => l_progress,
375: p_message => 'After calling po_sourcing_pvt.delete_interface_header');
376: END IF;
377:
378: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
379: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN