DBA Data[Home] [Help]

APPS.XDP_ORDER_SYNC dependencies on XDP_ORDER_SYNC

Line 1: PACKAGE BODY XDP_ORDER_SYNC AS

1: PACKAGE BODY XDP_ORDER_SYNC AS
2: /* $Header: XDPSORDB.pls 120.1 2005/06/09 00:30:45 appldev $ */
3:
4: PROCEDURE Execute_LineItem_Sync(
5: p_order_id in NUMBER,

Line 213: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'XDP_ORDER_SYNC.Execute_Order_SYNC', SQLERRM);

209: );
210: EXCEPTION
211: WHEN e_exec_order_failure THEN
212: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
213: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'XDP_ORDER_SYNC.Execute_Order_SYNC', SQLERRM);
214: END IF;
215: Update_XDP_Order_Status( 'ERROR',p_Order_ID);
216:
217: WHEN OTHERS THEN

Line 219: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'XDP_ORDER_SYNC.Execute_Order_SYNC', SQLERRM);

215: Update_XDP_Order_Status( 'ERROR',p_Order_ID);
216:
217: WHEN OTHERS THEN
218: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
219: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'XDP_ORDER_SYNC.Execute_Order_SYNC', SQLERRM);
220: END IF;
221: x_return_code := SQLCODE;
222: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
223: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Order_SYNC');

Line 223: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Order_SYNC');

219: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'XDP_ORDER_SYNC.Execute_Order_SYNC', SQLERRM);
220: END IF;
221: x_return_code := SQLCODE;
222: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
223: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Order_SYNC');
224: FND_MESSAGE.SET_TOKEN('ERROR_STRING', SQLERRM);
225: x_error_description := FND_MESSAGE.GET;
226: Update_XDP_Order_Status( 'ERROR',p_Order_ID);
227:

Line 265: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_LineItem_Sync', 'Execute_Workitem_Sync '||'returns error');

261: x_error_description =>x_error_description);
262:
263: IF (x_return_code <> 0 ) THEN
264: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
265: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_LineItem_Sync', 'Execute_Workitem_Sync '||'returns error');
266: END IF;
267: RAISE e_exec_line_failure;
268: END IF;
269:

Line 295: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_LineItem_Sync', 'unexpected exception occurred.');

291: WHEN e_exec_line_failure THEN
292: UPDATE_XDP_ORDER_LINE_STATUS('ERROR',p_lineItem_id);
293: WHEN OTHERS THEN
294: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
295: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_LineItem_Sync', 'unexpected exception occurred.');
296: END IF;
297: x_return_code := -191266;
298: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
299: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_LineItem_Sync');

Line 299: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_LineItem_Sync');

295: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_LineItem_Sync', 'unexpected exception occurred.');
296: END IF;
297: x_return_code := -191266;
298: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
299: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_LineItem_Sync');
300: FND_MESSAGE.SET_TOKEN('ERROR_STRING', SQLERRM);
301: x_error_description := FND_MESSAGE.GET;
302: UPDATE_XDP_ORDER_LINE_STATUS('ERROR',p_lineItem_id);
303: END Execute_LineItem_Sync;

Line 404: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error returned '

400: p_error_description => x_error_description);
401:
402: IF x_return_code <> 0 THEN
403: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
404: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error returned '
405: ||x_return_code
406: ||' from XDP_ERRORS_PKG.Set_Message');
407: END IF;
408: RAISE e_exec_wi_failure;

Line 415: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', x_error_description);

411: FND_MESSAGE.SET_NAME('XDP', 'XDP_FA_EXEC_MAP_PROC_NOT_EXIST');
412: x_error_description := FND_MESSAGE.GET;
413: x_return_code := -191156;
414: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
415: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', x_error_description);
416: END IF;
417: RAISE e_exec_wi_failure;
418: END IF;
419: ELSIF lv_type = 'WORKFLOW_PROC' THEN

Line 425: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', x_error_description);

421: FND_MESSAGE.SET_NAME('XDP', 'XDP_WF_PROC_NOT_EXIST');
422: x_error_description := FND_MESSAGE.GET;
423: x_return_code := -191266;
424: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
425: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', x_error_description);
426: END IF;
427: RAISE e_exec_wi_failure;
428: END IF;
429:

Line 446: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '

442: P_ERROR_DESCRIPTION => x_error_description);
443:
444: IF x_return_code <> 0 THEN
445: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
446: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '
447: ||x_return_code
448: ||' returned from XDP_UTILITIES.CallWIWorkflowProc');
449: END IF;
450: RAISE e_exec_wi_failure;

Line 464: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '

460: ErrStr => x_error_description);
461:
462: IF x_return_code <> 0 THEN
463: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
464: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '
465: ||x_return_code
466: ||' returned from XDPCORE.CheckNAddItemAttrNumber - LINE_ITEM_ID');
467: END IF;
468: RAISE e_exec_wi_failure;

Line 482: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '

478: ErrStr => x_error_description);
479:
480: IF x_return_code <> 0 THEN
481: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
482: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '
483: ||x_return_code
484: ||' returned from XDPCORE.CheckNAddItemAttrNumber - WORKITEM_INSTANCE_ID');
485: END IF;
486: RAISE e_exec_wi_failure;

Line 500: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '

496: ErrStr => x_error_description);
497:
498: IF x_return_code <> 0 THEN
499: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
500: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Error '
501: ||x_return_code
502: ||' returned from XDPCORE.CheckNAddItemAttrNumber - ORDER_ID');
503: END IF;
504: RAISE e_exec_wi_failure;

Line 523: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Workitem_Sync');

519: IF (lv_user_item_type IS NULL) OR
520: (lv_user_wf_process IS NULL) THEN
521:
522: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
523: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Workitem_Sync');
524: x_error_description :=
525: 'XDP_ORDER_SYNC.execute_workitem_sync. process_name or item_type not specified for a '
526: || 'defined Workflow of workitem: '
527: || lv_workitem_id ;

Line 525: 'XDP_ORDER_SYNC.execute_workitem_sync. process_name or item_type not specified for a '

521:
522: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
523: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Workitem_Sync');
524: x_error_description :=
525: 'XDP_ORDER_SYNC.execute_workitem_sync. process_name or item_type not specified for a '
526: || 'defined Workflow of workitem: '
527: || lv_workitem_id ;
528:
529: FND_MESSAGE.SET_TOKEN('ERROR_STRING', x_error_description);

Line 535: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Some required fields for WORKFLOW are null.');

531: x_return_code := -191266;
532:
533:
534: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
535: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Some required fields for WORKFLOW are null.');
536: END IF;
537: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 8' || x_return_code);
538: RAISE e_exec_wi_failure;
539: END IF;

Line 537: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 8' || x_return_code);

533:
534: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
535: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Some required fields for WORKFLOW are null.');
536: END IF;
537: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 8' || x_return_code);
538: RAISE e_exec_wi_failure;
539: END IF;
540:
541: -- Create user defined workflow process

Line 571: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync ', x_error_description);

567: FND_MESSAGE.SET_TOKEN('WORK_ITEM_NAME', lv_wi);
568: x_error_description := FND_MESSAGE.GET;
569: x_return_code := 191272;
570: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
571: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync ', x_error_description);
572: END IF;
573: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 9' || x_return_code);
574: RAISE e_exec_wi_failure;
575: END IF;

Line 573: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 9' || x_return_code);

569: x_return_code := 191272;
570: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
571: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync ', x_error_description);
572: END IF;
573: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 9' || x_return_code);
574: RAISE e_exec_wi_failure;
575: END IF;
576:
577: -- Execute all FAs

Line 586: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 10 ' || x_return_code);

582: x_error_description => x_error_description);
583: IF x_return_code <> 0 THEN
584: -- Continue even one FA fails,
585: -- but the status for this workitem will be marked as error
586: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync 10 ' || x_return_code);
587: RAISE e_exec_wi_failure;
588: NULL;
589: END IF;
590: END LOOP;

Line 605: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync ' || x_return_code);

601: UPDATE_XDP_WORKITEM_STATUS(l_status_code,p_workitem_instance_id);
602:
603: EXCEPTION
604: WHEN e_exec_wi_failure THEN
605: -- dbms_output.put_line('XDP_ORDER_SYNC.Execute_Workitem_Sync ' || x_return_code);
606: x_parameters := 'ERROR_STRING='||x_error_description||'#XDP#';
607: XDP_ERRORS_PKG.Set_Message(
608: p_object_type => 'WORKITEM',
609: p_object_key => p_workitem_instance_id,

Line 617: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Unexpected exception '||sqlcode);

613: UPDATE_XDP_WORKITEM_STATUS('ERROR',p_workitem_instance_id);
614:
615: WHEN OTHERS THEN
616: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
617: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Unexpected exception '||sqlcode);
618: END IF;
619: x_return_code := sqlcode;
620: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
621: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Workitem_Sync');

Line 621: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Workitem_Sync');

617: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_WI_Sync', 'Unexpected exception '||sqlcode);
618: END IF;
619: x_return_code := sqlcode;
620: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
621: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_Workitem_Sync');
622: FND_MESSAGE.SET_TOKEN('ERROR_STRING', SQLERRM);
623: x_error_description := FND_MESSAGE.GET ||' - '||lv_wi;
624:
625: x_parameters := 'ERROR_STRING='||x_error_description||'#XDP#';

Line 712: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Error '

708: p_error_description => x_error_description);
709:
710: IF x_return_code <> 0 THEN
711: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
712: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Error '
713: ||x_return_code
714: ||' returned when call XDP_UTILITIES.CallFERoutingProc');
715: END IF;
716: RAISE e_exec_fa_failure;

Line 787: 'XDP_ORDER_SYNC.Execute_FA_Sync',

783: x_error_description := FND_MESSAGE.GET;
784:
785: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
786: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
787: 'XDP_ORDER_SYNC.Execute_FA_Sync',
788: x_error_description);
789: END IF;
790: RAISE e_exec_fa_failure;
791: END IF;

Line 818: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Error '

814: lv_str);
815:
816: IF x_return_code <> 0 THEN
817: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
818: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Error '
819: ||x_error_description
820: ||' returned when call XDP_UTILITIES.CallFulfillmentProc.');
821: END IF;
822: RAISE e_exec_fa_failure;

Line 843: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Unexpected exception '||SQLCODE);

839: UPDATE_XDP_FA_STATUS('ERROR',p_fa_instance_id);
840:
841: WHEN OTHERS THEN
842: IF( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
843: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Unexpected exception '||SQLCODE);
844: END IF;
845: x_return_code := SQLCODE;
846: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
847: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_FA_Sync');

Line 847: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_FA_Sync');

843: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'XDP_ORDER_SYNC.Execute_FA_Sync', 'Unexpected exception '||SQLCODE);
844: END IF;
845: x_return_code := SQLCODE;
846: FND_MESSAGE.SET_NAME('XDP', 'XDP_API_WHEN_OTHERS');
847: FND_MESSAGE.SET_TOKEN('API_NAME', 'XDP_ORDER_SYNC.Execute_FA_Sync');
848: FND_MESSAGE.SET_TOKEN('ERROR_STRING', SQLERRM);
849:
850: x_error_description := FND_MESSAGE.GET ||' - '||lv_fe_name;
851:

Line 863: End XDP_ORDER_SYNC;

859: UPDATE_XDP_FA_STATUS('ERROR',p_fa_instance_id);
860:
861: END Execute_FA_Sync;
862:
863: End XDP_ORDER_SYNC;
864: