51:
52: BEGIN
53:
54: -- debug message
55: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
57: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.begin',
58: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.process_match');
59: END IF;
52: BEGIN
53:
54: -- debug message
55: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
57: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.begin',
58: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.process_match');
59: END IF;
60:
94: RAISE;
95: END;
96:
97: -- debug message
98: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
99: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
100: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.matching_sql',
101: substr(l_matching_sql, 1, 4000));
102: END IF;
95: END;
96:
97: -- debug message
98: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
99: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
100: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.matching_sql',
101: substr(l_matching_sql, 1, 4000));
102: END IF;
103:
106: DELETE jtf_terr_results_gt_mt;
107: EXECUTE IMMEDIATE l_matching_sql;
108:
109: -- debug message
110: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
111: SELECT COUNT(*)
112: INTO l_match_no_of_records
113: FROM jtf_terr_results_gt_mt;
114:
111: SELECT COUNT(*)
112: INTO l_match_no_of_records
113: FROM jtf_terr_results_gt_mt;
114:
115: FND_LOG.string(FND_LOG.LEVEL_EVENT,
116: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.match_data',
117: 'Number of records inserted into jtf_terr_results_gt_mt table : ' || l_match_no_of_records);
118: END IF;
119:
117: 'Number of records inserted into jtf_terr_results_gt_mt table : ' || l_match_no_of_records);
118: END IF;
119:
120: -- debug message
121: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
122: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
123: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.end',
124: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.process_match');
125: END IF;
118: END IF;
119:
120: -- debug message
121: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
122: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
123: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.end',
124: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.process_match');
125: END IF;
126:
129: WHEN NO_MATCH_SQL_ERROR THEN
130: x_return_status := FND_API.G_RET_STS_SUCCESS;
131: x_msg_data := 'No matching SQL exist for this usage, transaction type and program name';
132: x_msg_count := 1;
133: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
135: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.mo_match_sql_error',
136: x_msg_data);
137: END IF;
130: x_return_status := FND_API.G_RET_STS_SUCCESS;
131: x_msg_data := 'No matching SQL exist for this usage, transaction type and program name';
132: x_msg_count := 1;
133: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
135: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.mo_match_sql_error',
136: x_msg_data);
137: END IF;
138:
139: WHEN NO_TERR_ERROR THEN
140: x_return_status := FND_API.G_RET_STS_SUCCESS;
141: x_msg_data := 'No active territories exist for this usage and transaction type';
142: x_msg_count := 1;
143: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
145: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.no_terr_error',
146: x_msg_data);
147: END IF;
140: x_return_status := FND_API.G_RET_STS_SUCCESS;
141: x_msg_data := 'No active territories exist for this usage and transaction type';
142: x_msg_count := 1;
143: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
145: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.no_terr_error',
146: x_msg_data);
147: END IF;
148:
149: WHEN OTHERS THEN
150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
151: x_msg_data := SQLCODE || ' : ' || SQLERRM;
152: x_msg_count := 1;
153: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
155: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.other',
156: substr(x_msg_data, 1, 4000));
157: END IF;
150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
151: x_msg_data := SQLCODE || ' : ' || SQLERRM;
152: x_msg_count := 1;
153: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
155: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_match.other',
156: substr(x_msg_data, 1, 4000));
157: END IF;
158:
176:
177: BEGIN
178:
179: -- debug message
180: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
181: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
182: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.begin',
183: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.single_level_winning_process');
184: END IF;
177: BEGIN
178:
179: -- debug message
180: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
181: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
182: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.begin',
183: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.single_level_winning_process');
184: END IF;
185:
822: x_winners_rec.trans_id := p_trans_id;
823: END IF;
824:
825: -- debug message
826: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
827: FND_LOG.string(FND_LOG.LEVEL_EVENT,
828: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.winners',
829: 'Number of winning territories : ' || x_winners_rec.trans_object_id.COUNT);
830: END IF;
823: END IF;
824:
825: -- debug message
826: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
827: FND_LOG.string(FND_LOG.LEVEL_EVENT,
828: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.winners',
829: 'Number of winning territories : ' || x_winners_rec.trans_object_id.COUNT);
830: END IF;
831:
829: 'Number of winning territories : ' || x_winners_rec.trans_object_id.COUNT);
830: END IF;
831:
832: -- debug message
833: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
834: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
835: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.end',
836: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.single_level_winning_process');
837: END IF;
830: END IF;
831:
832: -- debug message
833: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
834: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
835: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.end',
836: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.single_level_winning_process');
837: END IF;
838:
841: WHEN OTHERS THEN
842: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
843: x_msg_data := SQLCODE || ' : ' || SQLERRM;
844: x_msg_count := 1;
845: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
846: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
847: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.other',
848: substr(x_msg_data, 1, 4000));
849: END IF;
842: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
843: x_msg_data := SQLCODE || ' : ' || SQLERRM;
844: x_msg_count := 1;
845: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
846: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
847: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.single_level_winning_process.other',
848: substr(x_msg_data, 1, 4000));
849: END IF;
850:
878:
879: BEGIN
880:
881: -- debug message
882: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
883: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
884: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.begin',
885: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process');
886: END IF;
879: BEGIN
880:
881: -- debug message
882: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
883: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
884: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.begin',
885: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process');
886: END IF;
887:
924: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
925: -- debug message
926: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 1';
927: x_msg_count := 1;
928: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
930: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l1',
931: x_msg_data);
932: END IF;
925: -- debug message
926: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 1';
927: x_msg_count := 1;
928: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
930: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l1',
931: x_msg_data);
932: END IF;
933:
934: RAISE FND_API.G_EXC_ERROR;
935: END IF;
936:
937: -- debug message
938: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
939: SELECT COUNT(*)
940: INTO l_winner_no_of_records
941: FROM jtf_terr_results_gt_l1;
942:
939: SELECT COUNT(*)
940: INTO l_winner_no_of_records
941: FROM jtf_terr_results_gt_l1;
942:
943: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
944: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l1',
945: 'Number of records inserted into jtf_terr_results_gt_l1 table : ' || l_winner_no_of_records);
946: END IF;
947:
961: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
962: -- debug message
963: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 2';
964: x_msg_count := 1;
965: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
966: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
967: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l2',
968: x_msg_data);
969: END IF;
962: -- debug message
963: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 2';
964: x_msg_count := 1;
965: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
966: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
967: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l2',
968: x_msg_data);
969: END IF;
970:
971: RAISE FND_API.G_EXC_ERROR;
972: END IF;
973:
974: -- debug message
975: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
976: SELECT COUNT(*)
977: INTO l_winner_no_of_records
978: FROM jtf_terr_results_gt_l2;
979:
976: SELECT COUNT(*)
977: INTO l_winner_no_of_records
978: FROM jtf_terr_results_gt_l2;
979:
980: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
981: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l2',
982: 'Number of records inserted into jtf_terr_results_gt_l2 table : ' || l_winner_no_of_records);
983: END IF;
984:
998: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
999: -- debug message
1000: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 3';
1001: x_msg_count := 1;
1002: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1003: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1004: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l3',
1005: x_msg_data);
1006: END IF;
999: -- debug message
1000: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 3';
1001: x_msg_count := 1;
1002: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1003: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1004: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l3',
1005: x_msg_data);
1006: END IF;
1007:
1008: RAISE FND_API.G_EXC_ERROR;
1009: END IF;
1010:
1011: -- debug message
1012: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1013: SELECT COUNT(*)
1014: INTO l_winner_no_of_records
1015: FROM jtf_terr_results_gt_l3;
1016:
1013: SELECT COUNT(*)
1014: INTO l_winner_no_of_records
1015: FROM jtf_terr_results_gt_l3;
1016:
1017: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
1018: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l3',
1019: 'Number of records inserted into jtf_terr_results_gt_l3 table : ' || l_winner_no_of_records);
1020: END IF;
1021:
1035: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1036: -- debug message
1037: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 4';
1038: x_msg_count := 1;
1039: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1040: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1041: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l4',
1042: x_msg_data);
1043: END IF;
1036: -- debug message
1037: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 4';
1038: x_msg_count := 1;
1039: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1040: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1041: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l4',
1042: x_msg_data);
1043: END IF;
1044:
1045: RAISE FND_API.G_EXC_ERROR;
1046: END IF;
1047:
1048: -- debug message
1049: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1050: SELECT COUNT(*)
1051: INTO l_winner_no_of_records
1052: FROM jtf_terr_results_gt_l4;
1053:
1050: SELECT COUNT(*)
1051: INTO l_winner_no_of_records
1052: FROM jtf_terr_results_gt_l4;
1053:
1054: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
1055: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l4',
1056: 'Number of records inserted into jtf_terr_results_gt_l4 table : ' || l_winner_no_of_records);
1057: END IF;
1058:
1072: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1073: -- debug message
1074: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 5';
1075: x_msg_count := 1;
1076: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1077: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1078: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l5',
1079: x_msg_data);
1080: END IF;
1073: -- debug message
1074: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Level_Winners has failed for level 5';
1075: x_msg_count := 1;
1076: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1077: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1078: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l5',
1079: x_msg_data);
1080: END IF;
1081:
1082: RAISE FND_API.G_EXC_ERROR;
1083: END IF;
1084:
1085: -- debug message
1086: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1087: SELECT COUNT(*)
1088: INTO l_winner_no_of_records
1089: FROM jtf_terr_results_gt_l5;
1090:
1087: SELECT COUNT(*)
1088: INTO l_winner_no_of_records
1089: FROM jtf_terr_results_gt_l5;
1090:
1091: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
1092: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.l5',
1093: 'Number of records inserted into jtf_terr_results_gt_l5 table : ' || l_winner_no_of_records);
1094: END IF;
1095:
1107: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1108: -- debug message
1109: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Final_Level_Winners has failed';
1110: x_msg_count := 1;
1111: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1112: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1113: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.wt',
1114: x_msg_data);
1115: END IF;
1108: -- debug message
1109: x_msg_data := 'API JTY_ASSIGN_BULK_PUB.Process_Final_Level_Winners has failed';
1110: x_msg_count := 1;
1111: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1112: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1113: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.wt',
1114: x_msg_data);
1115: END IF;
1116:
1117: RAISE FND_API.G_EXC_ERROR;
1118: END IF;
1119:
1120: -- debug message
1121: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1122: SELECT COUNT(*)
1123: INTO l_winner_no_of_records
1124: FROM jtf_terr_results_gt_wt;
1125:
1122: SELECT COUNT(*)
1123: INTO l_winner_no_of_records
1124: FROM jtf_terr_results_gt_wt;
1125:
1126: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
1127: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.wt',
1128: 'Number of records inserted into jtf_terr_results_gt_wt table : ' || l_winner_no_of_records);
1129: END IF;
1130:
1899: x_winners_rec.trans_id := p_trans_id;
1900: END IF;
1901:
1902: -- debug message
1903: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1904: FND_LOG.string(FND_LOG.LEVEL_EVENT,
1905: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.winners',
1906: 'Number of winning territories : ' || x_winners_rec.trans_object_id.COUNT);
1907: END IF;
1900: END IF;
1901:
1902: -- debug message
1903: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1904: FND_LOG.string(FND_LOG.LEVEL_EVENT,
1905: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.winners',
1906: 'Number of winning territories : ' || x_winners_rec.trans_object_id.COUNT);
1907: END IF;
1908:
1906: 'Number of winning territories : ' || x_winners_rec.trans_object_id.COUNT);
1907: END IF;
1908:
1909: -- debug message
1910: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1911: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
1912: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.end',
1913: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process');
1914: END IF;
1907: END IF;
1908:
1909: -- debug message
1910: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1911: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
1912: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.end',
1913: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process');
1914: END IF;
1915:
1915:
1916: EXCEPTION
1917:
1918: WHEN FND_API.G_EXC_ERROR THEN
1919: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1920: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1921: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.other',
1922: substr(x_msg_data, 1, 4000));
1923: END IF;
1916: EXCEPTION
1917:
1918: WHEN FND_API.G_EXC_ERROR THEN
1919: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1920: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1921: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.other',
1922: substr(x_msg_data, 1, 4000));
1923: END IF;
1924:
1925: WHEN OTHERS THEN
1926: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1927: x_msg_data := SQLCODE || ' : ' || SQLERRM;
1928: x_msg_count := 1;
1929: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1930: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1931: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.other',
1932: substr(x_msg_data, 1, 4000));
1933: END IF;
1926: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1927: x_msg_data := SQLCODE || ' : ' || SQLERRM;
1928: x_msg_count := 1;
1929: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1930: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
1931: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.multi_level_winning_process.other',
1932: substr(x_msg_data, 1, 4000));
1933: END IF;
1934: END multi_level_winning_process;
1954:
1955: BEGIN
1956:
1957: -- debug message
1958: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1959: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
1960: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.begin',
1961: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.process_winners');
1962: END IF;
1955: BEGIN
1956:
1957: -- debug message
1958: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1959: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
1960: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.begin',
1961: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.process_winners');
1962: END IF;
1963:
1972: AND tup.trans_type_id = p_trans_id
1973: AND tup.program_name = p_program_name;
1974:
1975: -- debug message
1976: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1977: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
1978: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.winning_flag',
1979: 'Value of multi level winning flag : ' || l_multi_level_winning_flag);
1980: END IF;
1973: AND tup.program_name = p_program_name;
1974:
1975: -- debug message
1976: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1977: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
1978: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.winning_flag',
1979: 'Value of multi level winning flag : ' || l_multi_level_winning_flag);
1980: END IF;
1981:
2006: END IF;
2007:
2008: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2009: -- debug message
2010: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2011: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2012: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.winning_process',
2013: 'JTY_ASSIGN_REALTIME_PUB.winning_process API has failed');
2014: END IF;
2007:
2008: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2009: -- debug message
2010: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2011: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2012: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.winning_process',
2013: 'JTY_ASSIGN_REALTIME_PUB.winning_process API has failed');
2014: END IF;
2015:
2016: RAISE FND_API.G_EXC_ERROR;
2017: END IF;
2018:
2019: -- debug message
2020: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2021: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
2022: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.end',
2023: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.process_winners');
2024: END IF;
2017: END IF;
2018:
2019: -- debug message
2020: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2021: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
2022: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.end',
2023: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.process_winners');
2024: END IF;
2025:
2025:
2026: EXCEPTION
2027:
2028: WHEN FND_API.G_EXC_ERROR THEN
2029: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2030: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2031: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.g_exc_error',
2032: x_msg_data);
2033: END IF;
2026: EXCEPTION
2027:
2028: WHEN FND_API.G_EXC_ERROR THEN
2029: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2030: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2031: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.g_exc_error',
2032: x_msg_data);
2033: END IF;
2034:
2036: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2037: x_msg_data := 'No record in the table jty_trans_usg_pgm_details for the usage : ' || p_source_id ||
2038: ', transaction type : ' || p_trans_id || ' and program name : ' || p_program_name;
2039: x_msg_count := 1;
2040: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2041: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2042: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.no_data_found_error',
2043: x_msg_data);
2044: END IF;
2037: x_msg_data := 'No record in the table jty_trans_usg_pgm_details for the usage : ' || p_source_id ||
2038: ', transaction type : ' || p_trans_id || ' and program name : ' || p_program_name;
2039: x_msg_count := 1;
2040: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2041: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2042: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.no_data_found_error',
2043: x_msg_data);
2044: END IF;
2045:
2046: WHEN OTHERS THEN
2047: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2048: x_msg_data := SQLCODE || ' : ' || SQLERRM;
2049: x_msg_count := 1;
2050: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2051: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2052: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.other',
2053: substr(x_msg_data, 1, 4000));
2054: END IF;
2047: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2048: x_msg_data := SQLCODE || ' : ' || SQLERRM;
2049: x_msg_count := 1;
2050: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2051: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2052: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.process_winners.other',
2053: substr(x_msg_data, 1, 4000));
2054: END IF;
2055: End process_winners;
2093:
2094: BEGIN
2095:
2096: -- debug message
2097: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2098: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
2099: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.begin',
2100: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.get_winners');
2101: END IF;
2094: BEGIN
2095:
2096: -- debug message
2097: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2098: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
2099: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.begin',
2100: 'Start of the procedure JTY_ASSIGN_REALTIME_PUB.get_winners');
2101: END IF;
2102:
2128: l_nvp_records := p_name_value_pair.attribute_name.COUNT();
2129: END IF;
2130:
2131: -- debug message
2132: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2133: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2134: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2135: 'Source : ' || p_source_id || ' Transaction Type : ' || p_trans_id || ' Program Name : ' || p_program_name ||
2136: ' Mode : ' || p_mode || ' Parameter passing Mechanism : ' || p_param_passing_mechanism ||
2129: END IF;
2130:
2131: -- debug message
2132: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2133: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2134: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2135: 'Source : ' || p_source_id || ' Transaction Type : ' || p_trans_id || ' Program Name : ' || p_program_name ||
2136: ' Mode : ' || p_mode || ' Parameter passing Mechanism : ' || p_param_passing_mechanism ||
2137: ' Role : ' || p_role || ' Resource Type : ' || p_resource_type);
2138:
2139: IF (p_mode = 'PBR') THEN
2140: IF (l_trans_rec_records > 0) THEN
2141: FOR i IN p_trans_rec.trans_object_id1.FIRST .. p_trans_rec.trans_object_id1.LAST LOOP
2142: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2143: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2144: 'PK1 : ' || p_trans_rec.trans_object_id1(i) || ' PK2 : ' || p_trans_rec.trans_object_id2(i) ||
2145: ' PK3 : ' || p_trans_rec.trans_object_id3(i) || ' PK4 : ' || p_trans_rec.trans_object_id4(i) ||
2146: ' PK5 : ' || p_trans_rec.trans_object_id5(i) || ' Txn Date : ' || p_trans_rec.txn_date(i));
2145: ' PK3 : ' || p_trans_rec.trans_object_id3(i) || ' PK4 : ' || p_trans_rec.trans_object_id4(i) ||
2146: ' PK5 : ' || p_trans_rec.trans_object_id5(i) || ' Txn Date : ' || p_trans_rec.txn_date(i));
2147: END LOOP;
2148: ELSE
2149: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2150: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2151: 'No transaction object passed');
2152: END IF; /* end IF (l_trans_rec_records > 0) */
2153: ELSE
2152: END IF; /* end IF (l_trans_rec_records > 0) */
2153: ELSE
2154: IF (l_nvp_records > 0) THEN
2155: FOR i IN p_name_value_pair.attribute_name.FIRST .. p_name_value_pair.attribute_name.LAST LOOP
2156: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2157: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2158: 'Attribute Name : ' || p_name_value_pair.attribute_name(i) || ' NumberValue : ' || p_name_value_pair.num_value(i)
2159: || ' Char Value : ' || p_name_value_pair.char_value(i) || ' Date Value : ' || p_name_value_pair.date_value(i));
2160: END LOOP;
2158: 'Attribute Name : ' || p_name_value_pair.attribute_name(i) || ' NumberValue : ' || p_name_value_pair.num_value(i)
2159: || ' Char Value : ' || p_name_value_pair.char_value(i) || ' Date Value : ' || p_name_value_pair.date_value(i));
2160: END LOOP;
2161: ELSE
2162: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2163: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2164: 'No attribute name value pair passed');
2165: END IF; /* end IF (l_nvp_records > 0) */
2166: END IF; /* end IF (p_mode = 'PBR') */
2163: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.parameters',
2164: 'No attribute name value pair passed');
2165: END IF; /* end IF (l_nvp_records > 0) */
2166: END IF; /* end IF (p_mode = 'PBR') */
2167: END IF; /* end IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) */
2168:
2169: /* Get the real time trans table corresponding */
2170: /* to the usage, transaction type and program name */
2171: BEGIN
2187: RAISE;
2188: END;
2189:
2190: -- debug message
2191: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2192: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2193: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.real_time_trans_table',
2194: 'Real Time Trans Table for the usage, transaction type and program: ' || l_real_time_trans_table_name);
2195: END IF;
2188: END;
2189:
2190: -- debug message
2191: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2192: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2193: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.real_time_trans_table',
2194: 'Real Time Trans Table for the usage, transaction type and program: ' || l_real_time_trans_table_name);
2195: END IF;
2196:
2214: RAISE NO_TXN_SQL_ERROR;
2215: END IF;
2216:
2217: -- debug message
2218: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2219: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2220: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.transaction_type_sql',
2221: substr(l_insert_stmt, 1, 4000));
2222: END IF;
2215: END IF;
2216:
2217: -- debug message
2218: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2219: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2220: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.transaction_type_sql',
2221: substr(l_insert_stmt, 1, 4000));
2222: END IF;
2223:
2266: END LOOP;
2267: END IF;
2268:
2269: -- debug message
2270: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2271: l_debug_stmt := 'SELECT COUNT(*) FROM ' || l_real_time_trans_table_name;
2272: EXECUTE IMMEDIATE l_debug_stmt INTO l_trans_no_of_records;
2273:
2274: FND_LOG.string(FND_LOG.LEVEL_EVENT,
2270: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2271: l_debug_stmt := 'SELECT COUNT(*) FROM ' || l_real_time_trans_table_name;
2272: EXECUTE IMMEDIATE l_debug_stmt INTO l_trans_no_of_records;
2273:
2274: FND_LOG.string(FND_LOG.LEVEL_EVENT,
2275: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.insert_trans_data_pbr',
2276: 'Number of records inserted into TRANS table : ' || l_trans_no_of_records);
2277: END IF;
2278:
2298: ,p_name_value_pair.num_value(i)
2299: ,p_name_value_pair.date_value(i));
2300:
2301: -- debug message
2302: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2303: SELECT COUNT(*)
2304: INTO l_trans_no_of_records
2305: FROM jty_terr_nvp_trans_gt;
2306:
2303: SELECT COUNT(*)
2304: INTO l_trans_no_of_records
2305: FROM jty_terr_nvp_trans_gt;
2306:
2307: FND_LOG.string(FND_LOG.LEVEL_EVENT,
2308: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.insert_trans_data_pbv',
2309: 'Number of records inserted into TRANS table : ' || l_trans_no_of_records);
2310: END IF;
2311:
2325: );
2326:
2327: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2328: -- debug message
2329: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2330: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2331: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_match',
2332: 'JTY_ASSIGN_REALTIME_PUB.process_match API has failed');
2333: END IF;
2326:
2327: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2328: -- debug message
2329: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2330: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2331: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_match',
2332: 'JTY_ASSIGN_REALTIME_PUB.process_match API has failed');
2333: END IF;
2334:
2335: RAISE FND_API.G_EXC_ERROR;
2336: END IF;
2337:
2338: -- debug message
2339: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2340: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2341: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_match',
2342: 'Finish calling procedure process_match');
2343: END IF;
2336: END IF;
2337:
2338: -- debug message
2339: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2340: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2341: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_match',
2342: 'Finish calling procedure process_match');
2343: END IF;
2344:
2357: );
2358:
2359: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2360: -- debug message
2361: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2362: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2363: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_winners',
2364: 'JTY_ASSIGN_REALTIME_PUB.process_winners API has failed');
2365: END IF;
2358:
2359: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2360: -- debug message
2361: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2362: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2363: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_winners',
2364: 'JTY_ASSIGN_REALTIME_PUB.process_winners API has failed');
2365: END IF;
2366:
2367: RAISE FND_API.G_EXC_ERROR;
2368: END IF;
2369:
2370: -- debug message
2371: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2372: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2373: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_winners',
2374: 'Finish calling procedure process_winners');
2375: END IF;
2368: END IF;
2369:
2370: -- debug message
2371: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2372: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
2373: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.process_winners',
2374: 'Finish calling procedure process_winners');
2375: END IF;
2376:
2374: 'Finish calling procedure process_winners');
2375: END IF;
2376:
2377: -- debug message
2378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2379: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
2380: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.end',
2381: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.get_winners');
2382: END IF;
2375: END IF;
2376:
2377: -- debug message
2378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2379: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE,
2380: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.end',
2381: 'End of the procedure JTY_ASSIGN_REALTIME_PUB.get_winners');
2382: END IF;
2383:
2382: END IF;
2383:
2384: EXCEPTION
2385: WHEN FND_API.G_EXC_ERROR THEN
2386: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2387: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2388: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.g_exc_error',
2389: x_msg_data);
2390: END IF;
2383:
2384: EXCEPTION
2385: WHEN FND_API.G_EXC_ERROR THEN
2386: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2387: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2388: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.g_exc_error',
2389: x_msg_data);
2390: END IF;
2391:
2393: WHEN INVALID_PRM_PSS_MCH THEN
2394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2395: x_msg_data := 'Invalid Parameter Passing Mechanism : valid values are PBR and PBV';
2396: x_msg_count := 1;
2397: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2398: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2399: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.invalid_prm_pss_mch',
2400: x_msg_data);
2401: END IF;
2394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2395: x_msg_data := 'Invalid Parameter Passing Mechanism : valid values are PBR and PBV';
2396: x_msg_count := 1;
2397: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2398: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2399: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.invalid_prm_pss_mch',
2400: x_msg_data);
2401: END IF;
2402:
2405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2406: x_msg_data := 'Invalid real time transaction SQL for usage : ' || p_source_id ||
2407: ', transaction type : ' || p_trans_id || ' and program name : ' || p_program_name;
2408: x_msg_count := 1;
2409: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2410: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2411: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.no_txn_sql_error',
2412: x_msg_data);
2413: END IF;
2406: x_msg_data := 'Invalid real time transaction SQL for usage : ' || p_source_id ||
2407: ', transaction type : ' || p_trans_id || ' and program name : ' || p_program_name;
2408: x_msg_count := 1;
2409: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2410: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2411: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.no_txn_sql_error',
2412: x_msg_data);
2413: END IF;
2414:
2416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2417: x_msg_data := 'Invalid real time trans table for usage : ' || p_source_id ||
2418: ', transaction type : ' || p_trans_id || ' and program name : ' || p_program_name;
2419: x_msg_count := 1;
2420: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2421: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2422: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.no_trans_table_error',
2423: x_msg_data);
2424: END IF;
2417: x_msg_data := 'Invalid real time trans table for usage : ' || p_source_id ||
2418: ', transaction type : ' || p_trans_id || ' and program name : ' || p_program_name;
2419: x_msg_count := 1;
2420: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2421: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2422: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.no_trans_table_error',
2423: x_msg_data);
2424: END IF;
2425:
2426: WHEN OTHERS THEN
2427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2428: x_msg_data := SQLCODE || ' : ' || SQLERRM;
2429: x_msg_count := 1;
2430: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2431: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2432: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.other',
2433: substr(x_msg_data, 1, 4000));
2434: END IF;
2427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2428: x_msg_data := SQLCODE || ' : ' || SQLERRM;
2429: x_msg_count := 1;
2430: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2431: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION,
2432: 'jtf.plsql.JTY_ASSIGN_REALTIME_PUB.get_winners.other',
2433: substr(x_msg_data, 1, 4000));
2434: END IF;
2435: