[Home] [Help]
206: -- it is not under CO Required. If it is CO required, the implementation
207: -- should fail.
208:
209: --BIS_COLLECTION_UTILITIES.log('Before Validation');
210: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Checking for floating revision');
211: Validate_floating_revision (
212: p_api_version => 1
213: ,p_change_id => p_change_id
214: ,p_rev_item_seq_id => p_entity_id
215: , x_return_status => l_return_status
216: , x_msg_count => l_msg_count
217: , x_msg_data => l_msg_data
218: );
219: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Completed validation');
220: --BIS_COLLECTION_UTILITIES.log('After Validation');
221: --In C cursor l_created_by was getting selected.that was causing un-expected error.
222: FOR REL_CHANGES IN C LOOP
223:
227: -- if action = 'DELETE' then the record will be deleted
228: -- If action = 'CHANGE_REVISION' then the revision id will be modified
229: -- for that related document
230: -- added assocaition id for dom changes.
231: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Creating record in DOM tables');
232: DOM_ASSOCIATIONS_UTIL.Implement_Pending_Association(
233: p_ASSOCIATION_ID => REL_CHANGES.association_id,
234: P_ACTION => REL_CHANGES.action,
235: P_FROM_ENTITY_NAME => REL_CHANGES.from_entity_name,
280: x_return_status := FND_API.G_RET_STS_ERROR;
281: x_msg_count := 1;
282: x_msg_data := 'Error: This Change Order has documents with floating revision that are under change required change policy. Such CO cannot be implemented';
283: -- BIS_COLLECTION_UTILITIES.log('In exception'|| x_msg_data);
284: FND_FILE.PUT_LINE(FND_FILE.LOG, l_msg_data);
285: WHEN duplicate_related_doc THEN
286: ROLLBACK TO Implement_Relationship_Changes;
287: x_return_status := FND_API.G_RET_STS_ERROR;
288: x_msg_count := 1;
286: ROLLBACK TO Implement_Relationship_Changes;
287: x_return_status := FND_API.G_RET_STS_ERROR;
288: x_msg_count := 1;
289: x_msg_data := 'Error: Duplicate operation on same related document of item . ';
290: FND_FILE.PUT_LINE(FND_FILE.LOG, l_msg_data);
291: WHEN FND_API.G_EXC_ERROR THEN
292: ROLLBACK TO Implement_Relationship_Changes;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: FND_MSG_PUB.Count_And_Get
294: FND_MSG_PUB.Count_And_Get
295: ( p_count => l_msg_count
296: ,p_data => l_msg_data );
297: --BIS_COLLECTION_UTILITIES.log('In exception'|| l_msg_data);
298: FND_FILE.PUT_LINE(FND_FILE.LOG, l_msg_data);
299: IF g_debug_flag THEN
300: Write_Debug('Error Msg ' || l_msg_data);
301: Write_Debug('Rollback and Finish with expected error.') ;
302: Close_Debug_Session ;
306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
307: FND_MSG_PUB.Count_And_Get
308: ( p_count => l_msg_count
309: ,p_data => l_msg_data );
310: FND_FILE.PUT_LINE(FND_FILE.LOG, l_msg_data);
311: IF g_debug_flag THEN
312: Write_Debug('Error Msg ' || l_msg_data);
313: Write_Debug('Rollback and Finish with unexpected error.') ;
314: Close_Debug_Session ;
322: END IF;
323: FND_MSG_PUB.Count_And_Get
324: ( p_count => l_msg_count
325: ,p_data => l_msg_data );
326: FND_FILE.PUT_LINE(FND_FILE.LOG, l_msg_data);
327: IF g_debug_flag THEN
328: Write_Debug('Error Msg ' || l_msg_data);
329: Write_Debug('Rollback and Finish with other error.') ;
330: Close_Debug_Session ;
372:
373: l_change_id := p_change_id;
374: l_revised_item_seq_id := p_rev_item_seq_id;
375:
376: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Validating floating revision');
377:
378: FOR c2 in get_floating_revisions(l_change_id, l_revised_item_seq_id)
379: LOOP
380:
420:
421: IF l_change_policy = 'CHANGE_ORDER_REQUIRED' THEN
422: RAISE change_policy_defined;
423: ROLLBACK TO Implement_Relationship_Changes;
424: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Change policy required exception');
425: END IF;
426:
427: EXCEPTION
428: WHEN NO_DATA_FOUND THEN -- no data found means there are no change