DBA Data[Home] [Help]

APPS.CLN_SYNCITEM_PKG dependencies on CLN_SYNCITEM_PKG

Line 1: PACKAGE BODY CLN_SYNCITEM_PKG AS

1: PACKAGE BODY CLN_SYNCITEM_PKG AS
2: /* $Header: CLNSYITB.pls 120.4 2006/11/02 10:56:05 slattupa noship $ */
3: l_debug_level NUMBER := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
4: g_party_id VARCHAR2(40);
5:

Line 7: -- CLN_SYNCITEM_PKG

3: l_debug_level NUMBER := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
4: g_party_id VARCHAR2(40);
5:
6: -- Package
7: -- CLN_SYNCITEM_PKG
8: --
9: -- Purpose
10: -- Body of package CLN_SYNCITEM_PKG.
11: --

Line 10: -- Body of package CLN_SYNCITEM_PKG.

6: -- Package
7: -- CLN_SYNCITEM_PKG
8: --
9: -- Purpose
10: -- Body of package CLN_SYNCITEM_PKG.
11: --
12: -- History
13: -- July-21-2003 Rahul Krishan Created
14:

Line 56: WHERE hca.party_id = CLN_SYNCITEM_PKG.GET_PARTY_ID();

52:
53: SELECT hca.cust_account_id cust_account_id
54: INTO l_cust_acct_id
55: FROM hz_cust_accounts hca
56: WHERE hca.party_id = CLN_SYNCITEM_PKG.GET_PARTY_ID();
57:
58: IF (l_Debug_Level <= 2) THEN
59: cln_debug_pub.Add('Customer Account ID '||l_cust_acct_id,2);
60: cln_debug_pub.Add('----- Entering GET_CUST_ACCT_ID API ------- ',2);

Line 320: mci.customer_id(+) = cln_syncitem_pkg.get_cust_acct_id () AND

316: AR_LOOKUPS ARL
317: WHERE mcix.customer_item_id = mci.customer_item_id AND
318: mcix.inventory_item_id(+)= msib.inventory_item_id AND
319: mcix.master_organization_id =msib.organization_id AND
320: mci.customer_id(+) = cln_syncitem_pkg.get_cust_acct_id () AND
321: -- msib.inventory_item_id = mir.inventory_item_id(+) AND
322: -- msib.organization_id = mir.organization_id(+) AND
323: MCI.CUSTOMER_CATEGORY_CODE = ARL.LOOKUP_CODE(+) AND
324: msib.service_item_flag = 'N' AND

Line 726: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Entered Procedure';

722: l_create_cln_event := 'oracle.apps.cln.ch.collaboration.create';
723: l_send_syit_parameter_list := wf_parameter_list_t();
724: l_create_cln_parameter_list := wf_parameter_list_t();
725:
726: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Entered Procedure';
727: if (l_debug_level <= 1) then
728: cln_debug_pub.Add('Failure point ' || x_progress, 1);
729: end if;
730:

Line 756: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Initialized procedure parameters';

752: into party_id, party_site_id
753: from ecx_tp_headers eth
754: where eth.tp_header_id = l_tp_header_id;
755:
756: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Initialized procedure parameters';
757: if (l_debug_level <= 1) then
758: cln_debug_pub.Add('Failure point ' || x_progress, 1);
759: end if;
760:

Line 771: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : XML Setup Check Done';

767: resultout => result,
768: retcode => return_code,
769: errmsg => errmsg);
770:
771: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : XML Setup Check Done';
772: if (l_debug_level <= 1) then
773: cln_debug_pub.Add('Failure point ' || x_progress, 1);
774: end if;
775:

Line 779: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : XML Setup does not exist';

775:
776: -- Decision on action depending on XML Setup Check
777: if NOT(result) then -- XML not setup
778:
779: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : XML Setup does not exist';
780: if (l_debug_level <= 1) then
781: cln_debug_pub.Add('Failure point ' || x_progress, 1);
782: end if;
783: else

Line 784: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : XML Setup exists';

780: if (l_debug_level <= 1) then
781: cln_debug_pub.Add('Failure point ' || x_progress, 1);
782: end if;
783: else
784: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : XML Setup exists';
785: if (l_debug_level <= 1) then
786: cln_debug_pub.Add('Failure point ' || x_progress, 1);
787: end if;
788:

Line 796: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Unique key created';

792:
793: SELECT sysdate into l_date from dual;
794: l_canonical_date := FND_DATE.DATE_TO_CANONICAL(l_date);
795:
796: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Unique key created';
797: if (l_debug_level <= 1) then
798: cln_debug_pub.Add('Failure point ' || x_progress, 1);
799: end if;
800:

Line 833: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Create Event Parameters Setup';

829: wf_event.AddParameterToList(p_name => 'DOCUMENT_CREATION_DATE',
830: p_value => l_canonical_date,
831: p_parameterlist => l_create_cln_parameter_list);
832:
833: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Create Event Parameters Setup';
834: if (l_debug_level <= 1) then
835: cln_debug_pub.Add('Failure point ' || x_progress, 1);
836: end if;
837:

Line 843: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Create Event Raised';

839: wf_event.raise(p_event_name => l_create_cln_event,
840: p_event_key => l_event_key,
841: p_parameters => l_create_cln_parameter_list);
842:
843: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Create Event Raised';
844: if (l_debug_level <= 1) then
845: cln_debug_pub.Add('Failure point ' || x_progress, 1);
846: end if;
847:

Line 922: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Initialize Send Document Parameters';

918: wf_event.AddParameterToList(p_name => 'DOCUMENT_CREATION_DATE',
919: p_value => l_canonical_date,
920: p_parameterlist => l_send_syit_parameter_list);
921:
922: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Initialize Send Document Parameters';
923: if (l_debug_level <= 1) then
924: cln_debug_pub.Add('Failure point ' || x_progress, 1);
925: end if;
926:

Line 932: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Send Document Event Raised';

928: wf_event.raise(p_event_name => l_send_shsp_event,
929: p_event_key => l_event_key,
930: p_parameters => l_send_syit_parameter_list);
931:
932: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Send Document Event Raised';
933: if (l_debug_level <= 1) then
934: cln_debug_pub.Add('Failure point ' || x_progress, 1);
935: end if;
936: end if;

Line 944: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Exiting Procedure';

940: -- close cursor when done
941: CLOSE c_TradingPartners;
942:
943: -- Reached Here. Successful execution.
944: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : Exiting Procedure';
945: if (l_debug_level <= 1) then
946: cln_debug_pub.Add('Failure point ' || x_progress, 1);
947: end if;
948:

Line 958: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : ERROR';

954: if (l_debug_level <= 1) then
955: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
956: end if;
957:
958: x_progress := 'CLN_SYNCITEM_PKG.Send_Syncitem_Delete : ERROR';
959: if (l_debug_level <= 1) then
960: cln_debug_pub.Add('Failure point ' || x_progress, 1);
961: end if;
962: END Send_Syncitem_Delete;

Line 1011: x_progress := 'CLN_SYNCITEM_PKG.Archive_Deleted_Items : Entered Procedure';

1007:
1008:
1009: resultout := 'COMPLETE:T';
1010: l_debug_level := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
1011: x_progress := 'CLN_SYNCITEM_PKG.Archive_Deleted_Items : Entered Procedure';
1012: if (l_debug_level <= 1) then
1013: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1014: end if;
1015:

Line 1030: x_progress := 'CLN_SYNCITEM_PKG.Archive_Deleted_Items : Exiting Procedure';

1026: END LOOP;
1027:
1028:
1029: -- Reached Here. Successful execution.
1030: x_progress := 'CLN_SYNCITEM_PKG.Archive_Deleted_Items : Exiting Procedure';
1031: if (l_debug_level <= 1) then
1032: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1033: end if;
1034:

Line 1044: x_progress := 'CLN_SYNCITEM_PKG.Archive_Deleted_Items : ERROR';

1040: if (l_debug_level <= 1) then
1041: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
1042: end if;
1043:
1044: x_progress := 'CLN_SYNCITEM_PKG.Archive_Deleted_Items : ERROR';
1045: if (l_debug_level <= 1) then
1046: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1047: end if;
1048: resultout := 'COMPLETE:F';

Line 1080: x_progress := 'CLN_SYNCITEM_PKG.Delete_Archived_Items : Entered Procedure';

1076: BEGIN
1077: /* Commented the code for deletion for fixing bug 3875383*/
1078: /******
1079: l_debug_level := to_number(nvl(fnd_profile.value('CLN_DEBUG_LEVEL'), '5'));
1080: x_progress := 'CLN_SYNCITEM_PKG.Delete_Archived_Items : Entered Procedure';
1081: if (l_debug_level <= 1) then
1082: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1083: end if;
1084:

Line 1093: x_progress := 'CLN_SYNCITEM_PKG.Delete_Archived_Items : Exiting Procedure';

1089: DELETE FROM cln_itemmst_deleted_items
1090: WHERE inventory_item_id = p_inventory_item_id AND organization_id = p_org_id;
1091:
1092: -- Reached Here. Successful execution.
1093: x_progress := 'CLN_SYNCITEM_PKG.Delete_Archived_Items : Exiting Procedure';
1094: if (l_debug_level <= 1) then
1095: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1096: end if;
1097: ******/

Line 1107: x_progress := 'CLN_SYNCITEM_PKG.Delete_Archived_Items : ERROR';

1103: if (l_debug_level <= 1) then
1104: cln_debug_pub.Add('Exception ' || ':' || l_error_code || ':' || l_error_msg, 1);
1105: end if;
1106:
1107: x_progress := 'CLN_SYNCITEM_PKG.Delete_Archived_Items : ERROR';
1108: if (l_debug_level <= 1) then
1109: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1110: end if;
1111: END Delete_Archived_Items;

Line 1113: END CLN_SYNCITEM_PKG;

1109: cln_debug_pub.Add('Failure point ' || x_progress, 1);
1110: end if;
1111: END Delete_Archived_Items;
1112:
1113: END CLN_SYNCITEM_PKG;