1: Package Body EDW_TRD_PARTNER_M_C AS
2: /* $Header: poapptpb.pls 120.1 2005/06/13 13:16:57 sriswami noship $ */
3:
4: g_row_count Number:=0;
5: g_row_count_m Number:=0;
79: Exception When others then
80: Errbuf := sqlerrm;
81: Retcode := sqlcode;
82:
83: EDW_TRD_PARTNER_M_C.g_exception_message := Retcode || ':' || Errbuf;
84:
85: rollback;
86: raise;
87:
377: -- ---------------------------------------------------------------------------
378: -- END OF Collection , Developer Customizable Section
379: -- ---------------------------------------------------------------------------
380:
381: EDW_TRD_PARTNER_M_C.g_row_count := EDW_TRD_PARTNER_M_C.g_row_count+l_rows_inserted;
382:
383: EDW_TRD_PARTNER_M_C.g_row_count_m := l_rows_inserted;
384:
385: Exception When others then
379: -- ---------------------------------------------------------------------------
380:
381: EDW_TRD_PARTNER_M_C.g_row_count := EDW_TRD_PARTNER_M_C.g_row_count+l_rows_inserted;
382:
383: EDW_TRD_PARTNER_M_C.g_row_count_m := l_rows_inserted;
384:
385: Exception When others then
386: Errbuf := sqlerrm;
387: Retcode := sqlcode;
385: Exception When others then
386: Errbuf := sqlerrm;
387: Retcode := sqlcode;
388:
389: EDW_TRD_PARTNER_M_C.g_exception_message := Retcode || ':' || Errbuf;
390:
391: rollback;
392: raise;
393:
580: -- ---------------------------------------------------------------------------
581: -- END OF Collection , Developer Customizable Section
582: -- ---------------------------------------------------------------------------
583:
584: EDW_TRD_PARTNER_M_C.G_row_count :=EDW_TRD_PARTNER_M_C.G_row_count+l_rows_inserted;
585:
586: Exception When others then
587: Errbuf := sqlerrm;
588: Retcode := sqlcode;
585:
586: Exception When others then
587: Errbuf := sqlerrm;
588: Retcode := sqlcode;
589: EDW_TRD_PARTNER_M_C.g_exception_message := Retcode || ':' || Errbuf;
590: rollback;
591: raise;
592:
593: End Push_Trade_Partner;
703: -- ---------------------------------------------------------------------------
704: -- END OF Collection , Developer Customizable Section
705: -- ---------------------------------------------------------------------------
706:
707: EDW_TRD_PARTNER_M_C.G_row_count:=EDW_TRD_PARTNER_M_C.G_row_count+l_rows_inserted;
708:
709: Exception When others then
710: Errbuf := sqlerrm;
711: Retcode := sqlcode;
708:
709: Exception When others then
710: Errbuf := sqlerrm;
711: Retcode := sqlcode;
712: EDW_TRD_PARTNER_M_C.g_exception_message := Retcode || ':' || Errbuf;
713: rollback;
714: raise;
715:
716: End Push_P1_TPartner;
823:
824: -- ---------------------------------------------------------------------------
825: -- END OF Collection , Developer Customizable Section
826: -- ---------------------------------------------------------------------------
827: EDW_TRD_PARTNER_M_C.G_row_count:=EDW_TRD_PARTNER_M_C.G_row_count+l_rows_inserted;
828:
829: Exception When others then
830: Errbuf := sqlerrm;
831: Retcode := sqlcode;
828:
829: Exception When others then
830: Errbuf := sqlerrm;
831: Retcode := sqlcode;
832: EDW_TRD_PARTNER_M_C.g_exception_message := Retcode || ':' || Errbuf;
833: rollback;
834: raise;
835:
836:
945:
946: -- ---------------------------------------------------------------------------
947: -- END OF Collection , Developer Customizable Section
948: -- ---------------------------------------------------------------------------
949: EDW_TRD_PARTNER_M_C.G_row_count:=EDW_TRD_PARTNER_M_C.G_row_count+l_rows_inserted;
950:
951: Exception When others then
952: Errbuf := sqlerrm;
953: Retcode := sqlcode;
950:
951: Exception When others then
952: Errbuf := sqlerrm;
953: Retcode := sqlcode;
954: EDW_TRD_PARTNER_M_C.g_exception_message:=Retcode || ':' || Errbuf;
955: rollback;
956: raise;
957:
958:
1066:
1067: -- ---------------------------------------------------------------------------
1068: -- END OF Collection , Developer Customizable Section
1069: -- ---------------------------------------------------------------------------
1070: EDW_TRD_PARTNER_M_C.G_row_count:=EDW_TRD_PARTNER_M_C.G_row_count+l_rows_inserted;
1071: Exception When others then
1072: Errbuf := sqlerrm;
1073: Retcode := sqlcode;
1074: EDW_TRD_PARTNER_M_C.g_exception_message:= Retcode || ':' || Errbuf;
1070: EDW_TRD_PARTNER_M_C.G_row_count:=EDW_TRD_PARTNER_M_C.G_row_count+l_rows_inserted;
1071: Exception When others then
1072: Errbuf := sqlerrm;
1073: Retcode := sqlcode;
1074: EDW_TRD_PARTNER_M_C.g_exception_message:= Retcode || ':' || Errbuf;
1075: rollback;
1076: raise;
1077:
1078:
1113: to_char(l_push_date_range2,'MM/DD/YYYY HH24:MI:SS'));
1114: edw_log.put_line(' ');
1115:
1116:
1117: l_proc_name := 'EDW_TRD_PARTNER_M_C.populate_hierarchies';
1118: EDW_TRD_PARTNER_M_C.populate_hierarchies(L_PUSH_DATE_RANGE1,L_PUSH_DATE_RANGE2);
1119:
1120: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_TPartner_Loc';
1121: EDW_TRD_PARTNER_M_C.Push_TPartner_Loc(Errbuf,
1114: edw_log.put_line(' ');
1115:
1116:
1117: l_proc_name := 'EDW_TRD_PARTNER_M_C.populate_hierarchies';
1118: EDW_TRD_PARTNER_M_C.populate_hierarchies(L_PUSH_DATE_RANGE1,L_PUSH_DATE_RANGE2);
1119:
1120: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_TPartner_Loc';
1121: EDW_TRD_PARTNER_M_C.Push_TPartner_Loc(Errbuf,
1122: Retcode,
1116:
1117: l_proc_name := 'EDW_TRD_PARTNER_M_C.populate_hierarchies';
1118: EDW_TRD_PARTNER_M_C.populate_hierarchies(L_PUSH_DATE_RANGE1,L_PUSH_DATE_RANGE2);
1119:
1120: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_TPartner_Loc';
1121: EDW_TRD_PARTNER_M_C.Push_TPartner_Loc(Errbuf,
1122: Retcode,
1123: L_PUSH_DATE_RANGE1,
1124: L_PUSH_DATE_RANGE2);
1117: l_proc_name := 'EDW_TRD_PARTNER_M_C.populate_hierarchies';
1118: EDW_TRD_PARTNER_M_C.populate_hierarchies(L_PUSH_DATE_RANGE1,L_PUSH_DATE_RANGE2);
1119:
1120: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_TPartner_Loc';
1121: EDW_TRD_PARTNER_M_C.Push_TPartner_Loc(Errbuf,
1122: Retcode,
1123: L_PUSH_DATE_RANGE1,
1124: L_PUSH_DATE_RANGE2);
1125: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_Trade_Partner';
1121: EDW_TRD_PARTNER_M_C.Push_TPartner_Loc(Errbuf,
1122: Retcode,
1123: L_PUSH_DATE_RANGE1,
1124: L_PUSH_DATE_RANGE2);
1125: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_Trade_Partner';
1126: EDW_TRD_PARTNER_M_C.Push_Trade_Partner(Errbuf,
1127: Retcode,
1128: L_PUSH_DATE_RANGE1,
1129: L_PUSH_DATE_RANGE2);
1122: Retcode,
1123: L_PUSH_DATE_RANGE1,
1124: L_PUSH_DATE_RANGE2);
1125: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_Trade_Partner';
1126: EDW_TRD_PARTNER_M_C.Push_Trade_Partner(Errbuf,
1127: Retcode,
1128: L_PUSH_DATE_RANGE1,
1129: L_PUSH_DATE_RANGE2);
1130: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P1_TPartner';
1126: EDW_TRD_PARTNER_M_C.Push_Trade_Partner(Errbuf,
1127: Retcode,
1128: L_PUSH_DATE_RANGE1,
1129: L_PUSH_DATE_RANGE2);
1130: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P1_TPartner';
1131: EDW_TRD_PARTNER_M_C.Push_P1_TPartner(Errbuf,
1132: Retcode,
1133: L_PUSH_DATE_RANGE1,
1134: L_PUSH_DATE_RANGE2);
1127: Retcode,
1128: L_PUSH_DATE_RANGE1,
1129: L_PUSH_DATE_RANGE2);
1130: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P1_TPartner';
1131: EDW_TRD_PARTNER_M_C.Push_P1_TPartner(Errbuf,
1132: Retcode,
1133: L_PUSH_DATE_RANGE1,
1134: L_PUSH_DATE_RANGE2);
1135: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P2_TPartner';
1131: EDW_TRD_PARTNER_M_C.Push_P1_TPartner(Errbuf,
1132: Retcode,
1133: L_PUSH_DATE_RANGE1,
1134: L_PUSH_DATE_RANGE2);
1135: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P2_TPartner';
1136: EDW_TRD_PARTNER_M_C.Push_P2_TPartner(Errbuf,
1137: Retcode,
1138: L_PUSH_DATE_RANGE1,
1139: L_PUSH_DATE_RANGE2);
1132: Retcode,
1133: L_PUSH_DATE_RANGE1,
1134: L_PUSH_DATE_RANGE2);
1135: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P2_TPartner';
1136: EDW_TRD_PARTNER_M_C.Push_P2_TPartner(Errbuf,
1137: Retcode,
1138: L_PUSH_DATE_RANGE1,
1139: L_PUSH_DATE_RANGE2);
1140: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P3_TPartner';
1136: EDW_TRD_PARTNER_M_C.Push_P2_TPartner(Errbuf,
1137: Retcode,
1138: L_PUSH_DATE_RANGE1,
1139: L_PUSH_DATE_RANGE2);
1140: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P3_TPartner';
1141: EDW_TRD_PARTNER_M_C.Push_P3_TPartner(Errbuf,
1142: Retcode,
1143: L_PUSH_DATE_RANGE1,
1144: L_PUSH_DATE_RANGE2);
1137: Retcode,
1138: L_PUSH_DATE_RANGE1,
1139: L_PUSH_DATE_RANGE2);
1140: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P3_TPartner';
1141: EDW_TRD_PARTNER_M_C.Push_P3_TPartner(Errbuf,
1142: Retcode,
1143: L_PUSH_DATE_RANGE1,
1144: L_PUSH_DATE_RANGE2);
1145: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P4_TPartner';
1141: EDW_TRD_PARTNER_M_C.Push_P3_TPartner(Errbuf,
1142: Retcode,
1143: L_PUSH_DATE_RANGE1,
1144: L_PUSH_DATE_RANGE2);
1145: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P4_TPartner';
1146: EDW_TRD_PARTNER_M_C.Push_P4_TPartner(Errbuf,
1147: Retcode,
1148: L_PUSH_DATE_RANGE1,
1149: L_PUSH_DATE_RANGE2);
1142: Retcode,
1143: L_PUSH_DATE_RANGE1,
1144: L_PUSH_DATE_RANGE2);
1145: l_proc_name := 'EDW_TRD_PARTNER_M_C.Push_P4_TPartner';
1146: EDW_TRD_PARTNER_M_C.Push_P4_TPartner(Errbuf,
1147: Retcode,
1148: L_PUSH_DATE_RANGE1,
1149: L_PUSH_DATE_RANGE2);
1150:
1147: Retcode,
1148: L_PUSH_DATE_RANGE1,
1149: L_PUSH_DATE_RANGE2);
1150:
1151: EDW_COLLECTION_UTIL.wrapup(TRUE, EDW_TRD_PARTNER_M_C.g_row_count_m,
1152: EDW_TRD_PARTNER_M_C.g_exception_message,
1153: L_PUSH_DATE_RANGE1, L_PUSH_DATE_RANGE2);
1154:
1155:
1148: L_PUSH_DATE_RANGE1,
1149: L_PUSH_DATE_RANGE2);
1150:
1151: EDW_COLLECTION_UTIL.wrapup(TRUE, EDW_TRD_PARTNER_M_C.g_row_count_m,
1152: EDW_TRD_PARTNER_M_C.g_exception_message,
1153: L_PUSH_DATE_RANGE1, L_PUSH_DATE_RANGE2);
1154:
1155:
1156: Exception When others then
1157: Errbuf := sqlerrm;
1158: Retcode := sqlcode;
1159:
1160:
1161: EDW_TRD_PARTNER_M_C.g_exception_message :=
1162: EDW_TRD_PARTNER_M_C.g_exception_message || ' <> ' || Retcode ||
1163: ' : ' || Errbuf;
1164:
1165: EDW_COLLECTION_UTIL.wrapup(FALSE,0,EDW_TRD_PARTNER_M_C.g_exception_message,
1158: Retcode := sqlcode;
1159:
1160:
1161: EDW_TRD_PARTNER_M_C.g_exception_message :=
1162: EDW_TRD_PARTNER_M_C.g_exception_message || ' <> ' || Retcode ||
1163: ' : ' || Errbuf;
1164:
1165: EDW_COLLECTION_UTIL.wrapup(FALSE,0,EDW_TRD_PARTNER_M_C.g_exception_message,
1166: l_push_date_range1, l_push_date_range2);
1161: EDW_TRD_PARTNER_M_C.g_exception_message :=
1162: EDW_TRD_PARTNER_M_C.g_exception_message || ' <> ' || Retcode ||
1163: ' : ' || Errbuf;
1164:
1165: EDW_COLLECTION_UTIL.wrapup(FALSE,0,EDW_TRD_PARTNER_M_C.g_exception_message,
1166: l_push_date_range1, l_push_date_range2);
1167:
1168: FND_FILE.PUT_LINE(FND_FILE.LOG, l_proc_name || ' failed');
1169:
1170: raise;
1171:
1172: End push;
1173:
1174: End EDW_TRD_PARTNER_M_C;