[Home] [Help]
104: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
105: l_token_str := '';
106: SAVEPOINT insert_wr_items_sp;
107:
108: x_return_status := fnd_api.g_ret_sts_success;
109:
110: -- Check for API Version
111:
112: IF NOT fnd_api.compatible_api_call (
108: x_return_status := fnd_api.g_ret_sts_success;
109:
110: -- Check for API Version
111:
112: IF NOT fnd_api.compatible_api_call (
113: l_api_version,
114: p_api_version,
115: l_api_name,
116: g_pkg_name
115: l_api_name,
116: g_pkg_name
117: )
118: THEN
119: RAISE fnd_api.g_exc_unexpected_error;
120: END IF;
121:
122: -- Initialize Message list
123:
120: END IF;
121:
122: -- Initialize Message list
123:
124: IF fnd_api.to_boolean(p_init_msg_list)
125: THEN
126: FND_MSG_PUB.INITIALIZE;
127: END IF;
128:
127: END IF;
128:
129: -- Check for NOT NULL columns
130:
131: IF ((p_workitem_obj_code = FND_API.G_MISS_CHAR) or
132: (p_workitem_obj_code is null))
133: THEN
134: l_miss_param_flag := 1;
135: l_token_str := l_token_str || ' WORKITEM_OBJECT_CODE ';
133: THEN
134: l_miss_param_flag := 1;
135: l_token_str := l_token_str || ' WORKITEM_OBJECT_CODE ';
136: END IF;
137: IF ((p_workitem_pk_id = FND_API.G_MISS_NUM) or
138: (p_workitem_pk_id is null))
139: THEN
140: l_miss_param_flag := 1;
141: l_token_str := l_token_str || ' WORKITEM_PK_ID ';
139: THEN
140: l_miss_param_flag := 1;
141: l_token_str := l_token_str || ' WORKITEM_PK_ID ';
142: END IF;
143: IF ((p_work_item_number = FND_API.G_MISS_CHAR) or
144: (p_work_item_number is null))
145: THEN
146: l_miss_param_flag := 1;
147: l_token_str := l_token_str || ' WORK_ITEM_NUMBER ';
145: THEN
146: l_miss_param_flag := 1;
147: l_token_str := l_token_str || ' WORK_ITEM_NUMBER ';
148: END IF;
149: IF ((p_title = FND_API.G_MISS_CHAR) or
150: (p_title is null))
151: THEN
152: l_miss_param_flag := 1;
153: l_token_str := l_token_str || ' TITLE ';
151: THEN
152: l_miss_param_flag := 1;
153: l_token_str := l_token_str || ' TITLE ';
154: END IF;
155: IF ((p_priority_code = FND_API.G_MISS_CHAR) or
156: (p_priority_code is null))
157: THEN
158: l_miss_param_flag := 1;
159: l_token_str := l_token_str || ' PRIORITY_CODE ';
157: THEN
158: l_miss_param_flag := 1;
159: l_token_str := l_token_str || ' PRIORITY_CODE ';
160: END IF;
161: IF ((p_work_item_status = FND_API.G_MISS_CHAR) or
162: (p_work_item_status is null))
163: THEN
164: l_miss_param_flag := 1;
165: l_token_str := l_token_str || ' WORK_ITEM_STATUS ';
163: THEN
164: l_miss_param_flag := 1;
165: l_token_str := l_token_str || ' WORK_ITEM_STATUS ';
166: END IF;
167: IF ((p_ieu_enum_type_uuid = FND_API.G_MISS_CHAR) or
168: (p_ieu_enum_type_uuid is null))
169: THEN
170: l_miss_param_flag := 1;
171: l_token_str := l_token_str || ' ENUM_TYPE_UUID ';
169: THEN
170: l_miss_param_flag := 1;
171: l_token_str := l_token_str || ' ENUM_TYPE_UUID ';
172: END IF;
173: IF ((p_application_id = FND_API.G_MISS_NUM) or
174: (p_application_id is null))
175: THEN
176: l_miss_param_flag := 1;
177: l_token_str := l_token_str || ' APPLICATION_ID ';
175: THEN
176: l_miss_param_flag := 1;
177: l_token_str := l_token_str || ' APPLICATION_ID ';
178: END IF;
179: IF ((p_user_id = FND_API.G_MISS_NUM) or
180: (p_user_id is null))
181: THEN
182: l_miss_param_flag := 1;
183: l_token_str := l_token_str || ' USER_ID ';
195: p_count => x_msg_count,
196: p_data => x_msg_data
197: );
198:
199: x_return_status := fnd_api.g_ret_sts_error;
200: RAISE fnd_api.g_exc_error;
201:
202: END IF;
203:
196: p_data => x_msg_data
197: );
198:
199: x_return_status := fnd_api.g_ret_sts_error;
200: RAISE fnd_api.g_exc_error;
201:
202: END IF;
203:
204: -- Validate object Code, owner_id, owner_type, assignee_id, assignee_type
238: p_count => x_msg_count,
239: p_data => x_msg_data
240: );
241:
242: RAISE fnd_api.g_exc_error;
243:
244: END IF;
245:
246: END IF;
277: p_count => x_msg_count,
278: p_data => x_msg_data
279: );
280:
281: RAISE fnd_api.g_exc_error;
282:
283: END IF;
284:
285: END IF;
309: p_count => x_msg_count,
310: p_data => x_msg_data
311: );
312:
313: RAISE fnd_api.g_exc_error;
314:
315: END IF;
316:
317:
328: p_count => x_msg_count,
329: p_data => x_msg_data
330: );
331:
332: RAISE fnd_api.g_exc_error;
333:
334: END IF;
335:
336: -- If OWNER_TYPE or ASSIGNEE_TYPE is not RS_GROUP then set it to RS_INDIVIDUAL
400: p_count => x_msg_count,
401: p_data => x_msg_data
402: );
403:
404: RAISE fnd_api.g_exc_error;
405: end if;
406:
407: -- Check Source_Object_type_code, Source_Object_id
408: /*
468: p_count => x_msg_count,
469: p_data => x_msg_data
470: );
471:
472: RAISE fnd_api.g_exc_error;
473:
474: END;
475:
476: if (p_source_object_type_code is not null)
548: p_count => x_msg_count,
549: p_data => x_msg_data
550: );
551:
552: RAISE fnd_api.g_exc_error;
553: END;
554: l_dist_from := 'GROUP_OWNED';
555: l_dist_to := 'INDIVIDUAL_ASSIGNED';
556:
580: p_count => x_msg_count,
581: p_data => x_msg_data
582: );
583:
584: RAISE fnd_api.g_exc_error;
585: END;
586: */
587: end if;
588:
745: x_return_status
746: );
747:
748:
749: IF (x_return_status = fnd_api.g_ret_sts_success)
750: THEN
751:
752: -- Set the Distribution Status of Child Work Items which are on-hold
753: -- If it is a primary Work Source with Dependent Items
792: x_return_status => x_return_status);
793:
794: if (x_return_status <> 'S')
795: then
796: x_return_status := fnd_api.g_ret_sts_error;
797: l_token_str := l_msg_data;
798:
799: FND_MESSAGE.SET_NAME('IEU', 'IEU_CREATE_WR_ITEM_FAILED');
800: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.CREATE_WR_ITEM');
806: p_count => x_msg_count,
807: p_data => x_msg_data
808: );
809:
810: RAISE fnd_api.g_exc_error;
811: end if; /* x_return_status */
812: end if; /* l_wr_item_list.count */
813:
814: end if; /*l_ws_code is not null */
814: end if; /*l_ws_code is not null */
815:
816: end if; /* association_ws_id is null */
817:
818: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
819: THEN
820:
821: x_return_status := fnd_api.g_ret_sts_error;
822: l_token_str := l_msg_data;
817:
818: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
819: THEN
820:
821: x_return_status := fnd_api.g_ret_sts_error;
822: l_token_str := l_msg_data;
823:
824: FND_MESSAGE.SET_NAME('IEU', 'IEU_CREATE_WR_ITEM_FAILED');
825: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.CREATE_WR_ITEM');
831: p_count => x_msg_count,
832: p_data => x_msg_data
833: );
834:
835: RAISE fnd_api.g_exc_error;
836: END IF;
837:
838: IF FND_API.TO_BOOLEAN( p_commit )
839: THEN
834:
835: RAISE fnd_api.g_exc_error;
836: END IF;
837:
838: IF FND_API.TO_BOOLEAN( p_commit )
839: THEN
840: COMMIT WORK;
841: END IF;
842:
842:
843:
844: EXCEPTION
845:
846: WHEN fnd_api.g_exc_error THEN
847:
848: ROLLBACK TO insert_wr_items_sp;
849: x_return_status := fnd_api.g_ret_sts_error;
850:
845:
846: WHEN fnd_api.g_exc_error THEN
847:
848: ROLLBACK TO insert_wr_items_sp;
849: x_return_status := fnd_api.g_ret_sts_error;
850:
851: fnd_msg_pub.Count_and_Get
852: (
853: p_count => x_msg_count,
853: p_count => x_msg_count,
854: p_data => x_msg_data
855: );
856:
857: WHEN fnd_api.g_exc_unexpected_error THEN
858:
859: ROLLBACK TO insert_wr_items_sp;
860: x_return_status := fnd_api.g_ret_sts_unexp_error;
861:
856:
857: WHEN fnd_api.g_exc_unexpected_error THEN
858:
859: ROLLBACK TO insert_wr_items_sp;
860: x_return_status := fnd_api.g_ret_sts_unexp_error;
861:
862: fnd_msg_pub.Count_and_Get
863: (
864: p_count => x_msg_count,
868:
869: WHEN OTHERS THEN
870:
871: ROLLBACK TO insert_wr_items_sp;
872: x_return_status := fnd_api.g_ret_sts_unexp_error;
873:
874: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
875: THEN
876:
981: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
982: l_api_name := 'UPDATE_WR_ITEM';
983: l_token_str := '';
984: SAVEPOINT update_wr_items_sp;
985: x_return_status := fnd_api.g_ret_sts_success;
986:
987: IF NOT fnd_api.compatible_api_call (
988: l_api_version,
989: p_api_version,
983: l_token_str := '';
984: SAVEPOINT update_wr_items_sp;
985: x_return_status := fnd_api.g_ret_sts_success;
986:
987: IF NOT fnd_api.compatible_api_call (
988: l_api_version,
989: p_api_version,
990: l_api_name,
991: g_pkg_name
990: l_api_name,
991: g_pkg_name
992: )
993: THEN
994: RAISE fnd_api.g_exc_unexpected_error;
995: END IF;
996:
997: -- Initialize Message list
998:
995: END IF;
996:
997: -- Initialize Message list
998:
999: IF fnd_api.to_boolean(p_init_msg_list)
1000: THEN
1001: FND_MSG_PUB.INITIALIZE;
1002: END IF;
1003:
1051: p_count => x_msg_count,
1052: p_data => x_msg_data
1053: );
1054:
1055: x_return_status := fnd_api.g_ret_sts_error;
1056: RAISE fnd_api.g_exc_error;
1057:
1058: END IF;
1059:
1052: p_data => x_msg_data
1053: );
1054:
1055: x_return_status := fnd_api.g_ret_sts_error;
1056: RAISE fnd_api.g_exc_error;
1057:
1058: END IF;
1059:
1060: ---- validate if FND_API.G_MISS is passed
1056: RAISE fnd_api.g_exc_error;
1057:
1058: END IF;
1059:
1060: ---- validate if FND_API.G_MISS is passed
1061:
1062: /***************
1063: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1059:
1060: ---- validate if FND_API.G_MISS is passed
1061:
1062: /***************
1063: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1060: ---- validate if FND_API.G_MISS is passed
1061:
1062: /***************
1063: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1061:
1062: /***************
1063: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1062: /***************
1063: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1063: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1071: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
1064: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1071: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
1072: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
1065: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1071: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
1072: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
1073: into m_title,
1066: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1071: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
1072: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
1073: into m_title,
1074: m_party_id,
1067: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1071: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
1072: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
1073: into m_title,
1074: m_party_id,
1075: m_due_date,
1068: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
1069: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
1070: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
1071: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
1072: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
1073: into m_title,
1074: m_party_id,
1075: m_due_date,
1076: m_owner_id,
1124: p_count => x_msg_count,
1125: p_data => x_msg_data
1126: );
1127:
1128: RAISE fnd_api.g_exc_error;
1129: END;
1130:
1131: IF ((p_title <> FND_API.G_MISS_CHAR))
1132: THEN
1127:
1128: RAISE fnd_api.g_exc_error;
1129: END;
1130:
1131: IF ((p_title <> FND_API.G_MISS_CHAR))
1132: THEN
1133: m_title := p_title;
1134: END IF;
1135: IF ((nvl(p_party_id, -9999) <> FND_API.G_MISS_NUM) )
1131: IF ((p_title <> FND_API.G_MISS_CHAR))
1132: THEN
1133: m_title := p_title;
1134: END IF;
1135: IF ((nvl(p_party_id, -9999) <> FND_API.G_MISS_NUM) )
1136: THEN
1137: m_party_id := p_party_id;
1138: END IF;
1139: IF ((nvl(p_due_date, sysdate) <> FND_API.G_MISS_DATE) )
1135: IF ((nvl(p_party_id, -9999) <> FND_API.G_MISS_NUM) )
1136: THEN
1137: m_party_id := p_party_id;
1138: END IF;
1139: IF ((nvl(p_due_date, sysdate) <> FND_API.G_MISS_DATE) )
1140: THEN
1141: m_due_date := p_due_date;
1142: END IF;
1143: IF ((nvl(p_owner_id, -9999) <> FND_API.G_MISS_NUM ))
1139: IF ((nvl(p_due_date, sysdate) <> FND_API.G_MISS_DATE) )
1140: THEN
1141: m_due_date := p_due_date;
1142: END IF;
1143: IF ((nvl(p_owner_id, -9999) <> FND_API.G_MISS_NUM ))
1144: THEN
1145: m_owner_id := p_owner_id;
1146: END IF;
1147: IF ((nvl(p_owner_type, 'NULL') <> FND_API.G_MISS_CHAR ))
1143: IF ((nvl(p_owner_id, -9999) <> FND_API.G_MISS_NUM ))
1144: THEN
1145: m_owner_id := p_owner_id;
1146: END IF;
1147: IF ((nvl(p_owner_type, 'NULL') <> FND_API.G_MISS_CHAR ))
1148: then
1149: m_owner_type := p_owner_type;
1150: END IF;
1151: IF ( (nvl( p_assignee_id, -9999) <> FND_API.G_MISS_NUM ))
1147: IF ((nvl(p_owner_type, 'NULL') <> FND_API.G_MISS_CHAR ))
1148: then
1149: m_owner_type := p_owner_type;
1150: END IF;
1151: IF ( (nvl( p_assignee_id, -9999) <> FND_API.G_MISS_NUM ))
1152: THEN
1153: m_assignee_id := p_assignee_id;
1154: END IF;
1155: IF ( (nvl(p_assignee_type, 'NULL') <> FND_API.G_MISS_CHAR ))
1151: IF ( (nvl( p_assignee_id, -9999) <> FND_API.G_MISS_NUM ))
1152: THEN
1153: m_assignee_id := p_assignee_id;
1154: END IF;
1155: IF ( (nvl(p_assignee_type, 'NULL') <> FND_API.G_MISS_CHAR ))
1156: THEN
1157: m_assignee_type := p_assignee_type;
1158: END IF;
1159: IF ((p_application_id <> FND_API.G_MISS_NUM) )
1155: IF ( (nvl(p_assignee_type, 'NULL') <> FND_API.G_MISS_CHAR ))
1156: THEN
1157: m_assignee_type := p_assignee_type;
1158: END IF;
1159: IF ((p_application_id <> FND_API.G_MISS_NUM) )
1160: THEN
1161: m_application_id := p_application_id;
1162: END IF;
1163: IF ((nvl(p_source_object_id, -9999) <> FND_API.G_MISS_NUM) )
1159: IF ((p_application_id <> FND_API.G_MISS_NUM) )
1160: THEN
1161: m_application_id := p_application_id;
1162: END IF;
1163: IF ((nvl(p_source_object_id, -9999) <> FND_API.G_MISS_NUM) )
1164: THEN
1165: m_source_object_id := p_source_object_id;
1166: END IF;
1167: IF ((nvl(p_source_object_type_code, 'NULL') <> FND_API.G_MISS_CHAR) )
1163: IF ((nvl(p_source_object_id, -9999) <> FND_API.G_MISS_NUM) )
1164: THEN
1165: m_source_object_id := p_source_object_id;
1166: END IF;
1167: IF ((nvl(p_source_object_type_code, 'NULL') <> FND_API.G_MISS_CHAR) )
1168: THEN
1169: m_source_object_type_code := p_source_object_type_code;
1170: END IF;
1171:
1169: m_source_object_type_code := p_source_object_type_code;
1170: END IF;
1171:
1172: BEGIN
1173: select decode(p_priority_code, FND_API.G_MISS_CHAR, b.priority_code, p_priority_code) priority_code
1174: into m_priority_code
1175: from ieu_uwqm_items a, ieu_uwqm_priorities_b b
1176: where a.priority_id = b.priority_id
1177: and a.priority_level = b.priority_level
1191: p_count => x_msg_count,
1192: p_data => x_msg_data
1193: );
1194:
1195: RAISE fnd_api.g_exc_error;
1196:
1197: END;
1198:
1199: BEGIN
1196:
1197: END;
1198:
1199: BEGIN
1200: select decode(p_work_item_status, FND_API.G_MISS_CHAR, decode(status_id, 0, 'OPEN', 3, 'CLOSE', 4, 'DELETE', 5, 'SLEEP'), p_work_item_status) status_id
1201: into m_work_item_status
1202: from ieu_uwqm_items
1203: where workitem_obj_code = p_workitem_obj_code
1204: and workitem_pk_id = p_workitem_pk_id;
1215: p_count => x_msg_count,
1216: p_data => x_msg_data
1217: );
1218:
1219: RAISE fnd_api.g_exc_error;
1220:
1221:
1222:
1223: END;
1220:
1221:
1222:
1223: END;
1224: -------- end of FND_API.G_MISS changes
1225:
1226:
1227: -- Validate object Code
1228:
1261: p_count => x_msg_count,
1262: p_data => x_msg_data
1263: );
1264:
1265: RAISE fnd_api.g_exc_error;
1266:
1267: END IF;
1268:
1269: END IF;
1300: p_count => x_msg_count,
1301: p_data => x_msg_data
1302: );
1303:
1304: RAISE fnd_api.g_exc_error;
1305:
1306: END IF;
1307:
1308: END IF;
1330: p_count => x_msg_count,
1331: p_data => x_msg_data
1332: );
1333:
1334: RAISE fnd_api.g_exc_error;
1335:
1336: END IF;
1337:
1338: IF (length(m_title) > l_title_len)
1348: p_count => x_msg_count,
1349: p_data => x_msg_data
1350: );
1351:
1352: RAISE fnd_api.g_exc_error;
1353:
1354: END IF;
1355:
1356: -- If OWNER_TYPE or ASSIGNEE_TYPE is not RS_GROUP then set it to RS_INDIVIDUAL
1420: p_count => x_msg_count,
1421: p_data => x_msg_data
1422: );
1423:
1424: RAISE fnd_api.g_exc_error;
1425: end if;
1426: -- Check Source_Object_type_code, Source_Object_id
1427: /*
1428: IF (p_source_object_type_code is null)
1486: p_count => x_msg_count,
1487: p_data => x_msg_data
1488: );
1489:
1490: RAISE fnd_api.g_exc_error;
1491:
1492: END;
1493:
1494: if (m_source_object_type_code is not null)
1566: p_count => x_msg_count,
1567: p_data => x_msg_data
1568: );
1569:
1570: RAISE fnd_api.g_exc_error;
1571: END;
1572: l_dist_from := 'GROUP_OWNED';
1573: l_dist_to := 'INDIVIDUAL_ASSIGNED';
1574: else
1597: p_count => x_msg_count,
1598: p_data => x_msg_data
1599: );
1600:
1601: RAISE fnd_api.g_exc_error;
1602: END;
1603: */
1604: end if;
1605:
1756: l_msg_data,
1757: x_return_status
1758: );
1759:
1760: IF (x_return_status = fnd_api.g_ret_sts_success)
1761: THEN
1762:
1763: -- Set the Distribution Status of Child Work Items which are on-hold
1764: -- If it is a primary Work Source with Dependent Items
1803: x_return_status => x_return_status);
1804:
1805: if (x_return_status <> 'S')
1806: then
1807: x_return_status := fnd_api.g_ret_sts_error;
1808: l_token_str := l_msg_data;
1809:
1810: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_WR_ITEM_FAILED');
1811: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.UPDATE_WR_ITEM');
1817: p_count => x_msg_count,
1818: p_data => x_msg_data
1819: );
1820:
1821: RAISE fnd_api.g_exc_error;
1822: end if;
1823: end if;
1824:
1825: end if; /*l_ws_id is not null */
1825: end if; /*l_ws_id is not null */
1826:
1827: else
1828:
1829: x_return_status := fnd_api.g_ret_sts_success;
1830:
1831: end if; /* association_ws_id is null */
1832:
1833: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
1829: x_return_status := fnd_api.g_ret_sts_success;
1830:
1831: end if; /* association_ws_id is null */
1832:
1833: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
1834: THEN
1835:
1836: x_return_status := fnd_api.g_ret_sts_error;
1837: l_token_str := l_msg_data;
1832:
1833: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
1834: THEN
1835:
1836: x_return_status := fnd_api.g_ret_sts_error;
1837: l_token_str := l_msg_data;
1838:
1839: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_WR_ITEM_FAILED');
1840: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.UPDATE_WR_ITEM');
1846: p_count => x_msg_count,
1847: p_data => x_msg_data
1848: );
1849:
1850: RAISE fnd_api.g_exc_error;
1851: END IF;
1852:
1853:
1854: IF FND_API.TO_BOOLEAN( p_commit )
1850: RAISE fnd_api.g_exc_error;
1851: END IF;
1852:
1853:
1854: IF FND_API.TO_BOOLEAN( p_commit )
1855: THEN
1856: COMMIT WORK;
1857: END iF;
1858:
1857: END iF;
1858:
1859: EXCEPTION
1860:
1861: WHEN fnd_api.g_exc_error THEN
1862:
1863: ROLLBACK TO update_wr_items_sp;
1864: x_return_status := fnd_api.g_ret_sts_error;
1865:
1860:
1861: WHEN fnd_api.g_exc_error THEN
1862:
1863: ROLLBACK TO update_wr_items_sp;
1864: x_return_status := fnd_api.g_ret_sts_error;
1865:
1866: fnd_msg_pub.Count_and_Get
1867: (
1868: p_count => x_msg_count,
1868: p_count => x_msg_count,
1869: p_data => x_msg_data
1870: );
1871:
1872: WHEN fnd_api.g_exc_unexpected_error THEN
1873:
1874: ROLLBACK TO update_wr_items_sp;
1875: x_return_status := fnd_api.g_ret_sts_unexp_error;
1876:
1871:
1872: WHEN fnd_api.g_exc_unexpected_error THEN
1873:
1874: ROLLBACK TO update_wr_items_sp;
1875: x_return_status := fnd_api.g_ret_sts_unexp_error;
1876:
1877: fnd_msg_pub.Count_and_Get
1878: (
1879: p_count => x_msg_count,
1883:
1884: WHEN OTHERS THEN
1885:
1886: ROLLBACK TO update_wr_items_sp;
1887: x_return_status := fnd_api.g_ret_sts_unexp_error;
1888:
1889: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1890: THEN
1891:
2034: l_array_size := 2000;
2035:
2036: SAVEPOINT sync_ws_details_sp;
2037:
2038: x_return_status := fnd_api.g_ret_sts_success;
2039:
2040: -- Check for API Version
2041:
2042: IF NOT fnd_api.compatible_api_call (
2038: x_return_status := fnd_api.g_ret_sts_success;
2039:
2040: -- Check for API Version
2041:
2042: IF NOT fnd_api.compatible_api_call (
2043: l_api_version,
2044: p_api_version,
2045: l_api_name,
2046: g_pkg_name
2045: l_api_name,
2046: g_pkg_name
2047: )
2048: THEN
2049: RAISE fnd_api.g_exc_unexpected_error;
2050: END IF;
2051:
2052: -- Initialize Message list
2053:
2050: END IF;
2051:
2052: -- Initialize Message list
2053:
2054: IF fnd_api.to_boolean(p_init_msg_list)
2055: THEN
2056: FND_MSG_PUB.INITIALIZE;
2057: END IF;
2058:
2084: p_count => x_msg_count,
2085: p_data => x_msg_data
2086: );
2087:
2088: RAISE fnd_api.g_exc_error;
2089:
2090: END;
2091:
2092: if (l_ws_type = 'PRIMARY')
2104: p_count => x_msg_count,
2105: p_data => x_msg_data
2106: );
2107:
2108: RAISE fnd_api.g_exc_error;
2109:
2110:
2111: elsif (l_ws_type = 'ASSOCIATION')
2112: then
2131: p_count => x_msg_count,
2132: p_data => x_msg_data
2133: );
2134:
2135: RAISE fnd_api.g_exc_error;
2136:
2137: END;
2138:
2139: BEGIN
2159: p_count => x_msg_count,
2160: p_data => x_msg_data
2161: );
2162:
2163: RAISE fnd_api.g_exc_error;
2164:
2165: END;
2166:
2167: BEGIN
2187: p_count => x_msg_count,
2188: p_data => x_msg_data
2189: );
2190:
2191: RAISE fnd_api.g_exc_error;
2192:
2193: END;
2194:
2195:
2320: p_count => x_msg_count,
2321: p_data => x_msg_data
2322: );
2323:
2324: RAISE fnd_api.g_exc_error;
2325: end;
2326:
2327: begin
2328: l_workitem_obj_code_1 := 'TASK';
2561: p_data => x_msg_data
2562: );
2563: END LOOP;
2564:
2565: RAISE fnd_api.g_exc_error;
2566: END;
2567:
2568: COMMIT;
2569:
2579: end if;
2580:
2581: EXCEPTION
2582:
2583: WHEN fnd_api.g_exc_error THEN
2584:
2585: ROLLBACK TO sync_ws_details_sp;
2586: x_return_status := fnd_api.g_ret_sts_error;
2587: x_msg_data := SQLCODE||' - '||SQLERRM;
2582:
2583: WHEN fnd_api.g_exc_error THEN
2584:
2585: ROLLBACK TO sync_ws_details_sp;
2586: x_return_status := fnd_api.g_ret_sts_error;
2587: x_msg_data := SQLCODE||' - '||SQLERRM;
2588:
2589: fnd_msg_pub.Count_and_Get
2590: (
2591: p_count => x_msg_count,
2592: p_data => x_msg_data
2593: );
2594:
2595: WHEN fnd_api.g_exc_unexpected_error THEN
2596:
2597: ROLLBACK TO sync_ws_details_sp;
2598: x_return_status := fnd_api.g_ret_sts_unexp_error;
2599: x_msg_data := SQLCODE||' - '||SQLERRM;
2594:
2595: WHEN fnd_api.g_exc_unexpected_error THEN
2596:
2597: ROLLBACK TO sync_ws_details_sp;
2598: x_return_status := fnd_api.g_ret_sts_unexp_error;
2599: x_msg_data := SQLCODE||' - '||SQLERRM;
2600:
2601: fnd_msg_pub.Count_and_Get
2602: (
2607:
2608: WHEN OTHERS THEN
2609:
2610: ROLLBACK TO sync_ws_details_sp;
2611: x_return_status := fnd_api.g_ret_sts_unexp_error;
2612: x_msg_data := SQLCODE||' - '||SQLERRM;
2613:
2614: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2615: THEN
2660: l_dist_from := 'GROUP_OWNED';
2661: l_dist_to := 'INDIVIDUAL_ASSIGNED';
2662: SAVEPOINT next_work_for_apps;
2663:
2664: x_return_status := fnd_api.g_ret_sts_success;
2665:
2666: -- Check for API Version
2667:
2668: IF NOT fnd_api.compatible_api_call (
2664: x_return_status := fnd_api.g_ret_sts_success;
2665:
2666: -- Check for API Version
2667:
2668: IF NOT fnd_api.compatible_api_call (
2669: l_api_version,
2670: p_api_version,
2671: l_api_name,
2672: g_pkg_name
2671: l_api_name,
2672: g_pkg_name
2673: )
2674: THEN
2675: RAISE fnd_api.g_exc_unexpected_error;
2676: END IF;
2677:
2678: -- Initialize Message list
2679:
2676: END IF;
2677:
2678: -- Initialize Message list
2679:
2680: IF fnd_api.to_boolean(p_init_msg_list)
2681: THEN
2682: FND_MSG_PUB.INITIALIZE;
2683: END IF;
2684:
2710: p_count => x_msg_count,
2711: p_data => x_msg_data
2712: );
2713:
2714: RAISE fnd_api.g_exc_error;
2715:
2716: END;
2717:
2718: end loop;
2747:
2748: --dbms_output.put_line('executed proc: '||x_return_status);
2749: EXCEPTION
2750:
2751: WHEN fnd_api.g_exc_error THEN
2752:
2753: ROLLBACK TO next_work_for_apps;
2754: x_return_status := fnd_api.g_ret_sts_error;
2755:
2750:
2751: WHEN fnd_api.g_exc_error THEN
2752:
2753: ROLLBACK TO next_work_for_apps;
2754: x_return_status := fnd_api.g_ret_sts_error;
2755:
2756: fnd_msg_pub.Count_and_Get
2757: (
2758: p_count => x_msg_count,
2758: p_count => x_msg_count,
2759: p_data => x_msg_data
2760: );
2761:
2762: WHEN fnd_api.g_exc_unexpected_error THEN
2763:
2764: ROLLBACK TO next_work_for_apps;
2765: x_return_status := fnd_api.g_ret_sts_unexp_error;
2766:
2761:
2762: WHEN fnd_api.g_exc_unexpected_error THEN
2763:
2764: ROLLBACK TO next_work_for_apps;
2765: x_return_status := fnd_api.g_ret_sts_unexp_error;
2766:
2767: fnd_msg_pub.Count_and_Get
2768: (
2769: p_count => x_msg_count,
2773:
2774: WHEN OTHERS THEN
2775:
2776: ROLLBACK TO next_work_for_apps;
2777: x_return_status := fnd_api.g_ret_sts_unexp_error;
2778:
2779: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2780: THEN
2781:
2832: l_dist_from := 'GROUP_OWNED';
2833: l_dist_to := 'INDIVIDUAL_ASSIGNED';
2834: SAVEPOINT sync_dependent_wr_items_sp;
2835:
2836: x_return_status := fnd_api.g_ret_sts_success;
2837:
2838: -- Check for API Version
2839:
2840: IF NOT fnd_api.compatible_api_call (
2836: x_return_status := fnd_api.g_ret_sts_success;
2837:
2838: -- Check for API Version
2839:
2840: IF NOT fnd_api.compatible_api_call (
2841: l_api_version,
2842: p_api_version,
2843: l_api_name,
2844: g_pkg_name
2843: l_api_name,
2844: g_pkg_name
2845: )
2846: THEN
2847: RAISE fnd_api.g_exc_unexpected_error;
2848: END IF;
2849:
2850: -- Initialize Message list
2851:
2848: END IF;
2849:
2850: -- Initialize Message list
2851:
2852: IF fnd_api.to_boolean(p_init_msg_list)
2853: THEN
2854: FND_MSG_PUB.INITIALIZE;
2855: END IF;
2856:
2872:
2873: EXCEPTION
2874: WHEN OTHERS THEN
2875:
2876: x_return_status := fnd_api.g_ret_sts_error;
2877:
2878: l_token_str := p_wr_item_list(i).workitem_obj_code ||' WORKITEM_PK_ID : '|| p_wr_item_list(i).workitem_pk_id ||' - '||l_msg_data;
2879:
2880: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_UWQM_ITEM_FAILED');
2887: p_count => x_msg_count,
2888: p_data => x_msg_data
2889: );
2890:
2891: RAISE fnd_api.g_exc_error;
2892:
2893: END;
2894:
2895:
2916: p_count => x_msg_count,
2917: p_data => x_msg_data
2918: );
2919:
2920: RAISE fnd_api.g_exc_error;
2921:
2922: END;
2923:
2924:
2945: p_count => x_msg_count,
2946: p_data => x_msg_data
2947: );
2948:
2949: RAISE fnd_api.g_exc_error;
2950:
2951: END;
2952:
2953: end if;/* ws_type */
3081: set distribution_status_id = l_distribution_status_id
3082: where workitem_pk_id = p_wr_item_list(i).workitem_pk_id
3083: and workitem_obj_code = p_wr_item_list(i).workitem_obj_code;
3084:
3085: IF FND_API.TO_BOOLEAN( p_commit )
3086: THEN
3087: COMMIT WORK;
3088: END iF;
3089:
3091: end loop; /* p_wr_item_list */
3092:
3093: EXCEPTION
3094:
3095: WHEN fnd_api.g_exc_error THEN
3096:
3097: ROLLBACK TO sync_dependent_wr_items_sp;
3098: x_return_status := fnd_api.g_ret_sts_error;
3099:
3094:
3095: WHEN fnd_api.g_exc_error THEN
3096:
3097: ROLLBACK TO sync_dependent_wr_items_sp;
3098: x_return_status := fnd_api.g_ret_sts_error;
3099:
3100: fnd_msg_pub.Count_and_Get
3101: (
3102: p_count => x_msg_count,
3102: p_count => x_msg_count,
3103: p_data => x_msg_data
3104: );
3105:
3106: WHEN fnd_api.g_exc_unexpected_error THEN
3107:
3108: ROLLBACK TO sync_dependent_wr_items_sp;
3109: x_return_status := fnd_api.g_ret_sts_unexp_error;
3110:
3105:
3106: WHEN fnd_api.g_exc_unexpected_error THEN
3107:
3108: ROLLBACK TO sync_dependent_wr_items_sp;
3109: x_return_status := fnd_api.g_ret_sts_unexp_error;
3110:
3111: fnd_msg_pub.Count_and_Get
3112: (
3113: p_count => x_msg_count,
3117:
3118: WHEN OTHERS THEN
3119:
3120: ROLLBACK TO sync_dependent_wr_items_sp;
3121: x_return_status := fnd_api.g_ret_sts_unexp_error;
3122:
3123: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3124: THEN
3125:
3261: l_token_str := '';
3262: SAVEPOINT insert_wr_items_sp;
3263: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
3264:
3265: x_return_status := fnd_api.g_ret_sts_success;
3266:
3267: -- Check for API Version
3268:
3269: IF NOT fnd_api.compatible_api_call (
3265: x_return_status := fnd_api.g_ret_sts_success;
3266:
3267: -- Check for API Version
3268:
3269: IF NOT fnd_api.compatible_api_call (
3270: l_api_version,
3271: p_api_version,
3272: l_api_name,
3273: g_pkg_name
3272: l_api_name,
3273: g_pkg_name
3274: )
3275: THEN
3276: RAISE fnd_api.g_exc_unexpected_error;
3277: END IF;
3278:
3279: -- Initialize Message list
3280:
3277: END IF;
3278:
3279: -- Initialize Message list
3280:
3281: IF fnd_api.to_boolean(p_init_msg_list)
3282: THEN
3283: FND_MSG_PUB.INITIALIZE;
3284: END IF;
3285:
3284: END IF;
3285:
3286: -- Check for NOT NULL columns
3287:
3288: IF ((p_workitem_obj_code = FND_API.G_MISS_CHAR) or
3289: (p_workitem_obj_code is null))
3290: THEN
3291: l_miss_param_flag := 1;
3292: l_token_str := l_token_str || ' WORKITEM_OBJECT_CODE ';
3290: THEN
3291: l_miss_param_flag := 1;
3292: l_token_str := l_token_str || ' WORKITEM_OBJECT_CODE ';
3293: END IF;
3294: IF ((p_workitem_pk_id = FND_API.G_MISS_NUM) or
3295: (p_workitem_pk_id is null))
3296: THEN
3297: l_miss_param_flag := 1;
3298: l_token_str := l_token_str || ' WORKITEM_PK_ID ';
3296: THEN
3297: l_miss_param_flag := 1;
3298: l_token_str := l_token_str || ' WORKITEM_PK_ID ';
3299: END IF;
3300: IF ((p_work_item_number = FND_API.G_MISS_CHAR) or
3301: (p_work_item_number is null))
3302: THEN
3303: l_miss_param_flag := 1;
3304: l_token_str := l_token_str || ' WORK_ITEM_NUMBER ';
3302: THEN
3303: l_miss_param_flag := 1;
3304: l_token_str := l_token_str || ' WORK_ITEM_NUMBER ';
3305: END IF;
3306: IF ((p_title = FND_API.G_MISS_CHAR) or
3307: (p_title is null))
3308: THEN
3309: l_miss_param_flag := 1;
3310: l_token_str := l_token_str || ' TITLE ';
3308: THEN
3309: l_miss_param_flag := 1;
3310: l_token_str := l_token_str || ' TITLE ';
3311: END IF;
3312: IF ((p_priority_code = FND_API.G_MISS_CHAR) or
3313: (p_priority_code is null))
3314: THEN
3315: l_miss_param_flag := 1;
3316: l_token_str := l_token_str || ' PRIORITY_CODE ';
3314: THEN
3315: l_miss_param_flag := 1;
3316: l_token_str := l_token_str || ' PRIORITY_CODE ';
3317: END IF;
3318: IF ((p_work_item_status = FND_API.G_MISS_CHAR) or
3319: (p_work_item_status is null))
3320: THEN
3321: l_miss_param_flag := 1;
3322: l_token_str := l_token_str || ' WORK_ITEM_STATUS ';
3320: THEN
3321: l_miss_param_flag := 1;
3322: l_token_str := l_token_str || ' WORK_ITEM_STATUS ';
3323: END IF;
3324: IF ((p_ieu_enum_type_uuid = FND_API.G_MISS_CHAR) or
3325: (p_ieu_enum_type_uuid is null))
3326: THEN
3327: l_miss_param_flag := 1;
3328: l_token_str := l_token_str || ' ENUM_TYPE_UUID ';
3326: THEN
3327: l_miss_param_flag := 1;
3328: l_token_str := l_token_str || ' ENUM_TYPE_UUID ';
3329: END IF;
3330: IF ((p_application_id = FND_API.G_MISS_NUM) or
3331: (p_application_id is null))
3332: THEN
3333: l_miss_param_flag := 1;
3334: l_token_str := l_token_str || ' APPLICATION_ID ';
3332: THEN
3333: l_miss_param_flag := 1;
3334: l_token_str := l_token_str || ' APPLICATION_ID ';
3335: END IF;
3336: IF ((p_user_id = FND_API.G_MISS_NUM) or
3337: (p_user_id is null))
3338: THEN
3339: l_miss_param_flag := 1;
3340: l_token_str := l_token_str || ' USER_ID ';
3352: p_count => x_msg_count,
3353: p_data => x_msg_data
3354: );
3355:
3356: x_return_status := fnd_api.g_ret_sts_error;
3357: RAISE fnd_api.g_exc_error;
3358:
3359: END IF;
3360:
3353: p_data => x_msg_data
3354: );
3355:
3356: x_return_status := fnd_api.g_ret_sts_error;
3357: RAISE fnd_api.g_exc_error;
3358:
3359: END IF;
3360:
3361: -- Validate object Code, owner_id, owner_type, assignee_id, assignee_type
3395: p_count => x_msg_count,
3396: p_data => x_msg_data
3397: );
3398:
3399: RAISE fnd_api.g_exc_error;
3400:
3401: END IF;
3402:
3403: END IF;
3434: p_count => x_msg_count,
3435: p_data => x_msg_data
3436: );
3437:
3438: RAISE fnd_api.g_exc_error;
3439:
3440: END IF;
3441:
3442: END IF;
3466: p_count => x_msg_count,
3467: p_data => x_msg_data
3468: );
3469:
3470: RAISE fnd_api.g_exc_error;
3471:
3472: END IF;
3473:
3474:
3485: p_count => x_msg_count,
3486: p_data => x_msg_data
3487: );
3488:
3489: RAISE fnd_api.g_exc_error;
3490:
3491: END IF;
3492:
3493: -- If OWNER_TYPE or ASSIGNEE_TYPE is not RS_GROUP then set it to RS_INDIVIDUAL
3558: p_count => x_msg_count,
3559: p_data => x_msg_data
3560: );
3561:
3562: RAISE fnd_api.g_exc_error;
3563: end if;
3564:
3565: -- Check Source_Object_type_code, Source_Object_id
3566: /*
3626: p_count => x_msg_count,
3627: p_data => x_msg_data
3628: );
3629:
3630: RAISE fnd_api.g_exc_error;
3631:
3632: END;
3633:
3634: if (p_source_object_type_code is not null)
3707: p_count => x_msg_count,
3708: p_data => x_msg_data
3709: );
3710:
3711: RAISE fnd_api.g_exc_error;
3712: END;
3713: l_dist_from := 'GROUP_OWNED';
3714: l_dist_to := 'INDIVIDUAL_ASSIGNED';
3715:
3740: p_count => x_msg_count,
3741: p_data => x_msg_data
3742: );
3743:
3744: RAISE fnd_api.g_exc_error;
3745: END;
3746: */
3747: end if;
3748:
4084: X_RETURN_STATUS => l_return_status);
4085:
4086: end if;
4087: --dbms_output.put_line('insert audit rec..ret sts: '||x_return_status);
4088: IF (x_return_status = fnd_api.g_ret_sts_success)
4089: THEN
4090:
4091: -- Set the Distribution Status of Child Work Items which are on-hold
4092: -- If it is a primary Work Source with Dependent Items
4148: x_return_status => x_return_status);
4149:
4150: if (x_return_status <> 'S')
4151: then
4152: x_return_status := fnd_api.g_ret_sts_error;
4153: l_token_str := l_msg_data;
4154:
4155: FND_MESSAGE.SET_NAME('IEU', 'IEU_CREATE_WR_ITEM_FAILED');
4156: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.CREATE_WR_ITEM');
4162: p_count => x_msg_count,
4163: p_data => x_msg_data
4164: );
4165:
4166: RAISE fnd_api.g_exc_error;
4167: end if; /* x_return_status */
4168: end if; /* l_wr_item_list.count */
4169:
4170: end if; /*l_ws_code is not null */
4170: end if; /*l_ws_code is not null */
4171:
4172: end if; /* association_ws_id is null */
4173:
4174: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
4175: THEN
4176:
4177: x_return_status := fnd_api.g_ret_sts_error;
4178: l_token_str := l_msg_data;
4173:
4174: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
4175: THEN
4176:
4177: x_return_status := fnd_api.g_ret_sts_error;
4178: l_token_str := l_msg_data;
4179:
4180: FND_MESSAGE.SET_NAME('IEU', 'IEU_CREATE_WR_ITEM_FAILED');
4181: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.CREATE_WR_ITEM');
4187: p_count => x_msg_count,
4188: p_data => x_msg_data
4189: );
4190:
4191: RAISE fnd_api.g_exc_error;
4192: END IF;
4193:
4194: IF FND_API.TO_BOOLEAN( p_commit )
4195: THEN
4190:
4191: RAISE fnd_api.g_exc_error;
4192: END IF;
4193:
4194: IF FND_API.TO_BOOLEAN( p_commit )
4195: THEN
4196: COMMIT WORK;
4197: END IF;
4198:
4198:
4199:
4200: EXCEPTION
4201:
4202: WHEN fnd_api.g_exc_error THEN
4203:
4204: ROLLBACK TO insert_wr_items_sp;
4205: x_return_status := fnd_api.g_ret_sts_error;
4206:
4201:
4202: WHEN fnd_api.g_exc_error THEN
4203:
4204: ROLLBACK TO insert_wr_items_sp;
4205: x_return_status := fnd_api.g_ret_sts_error;
4206:
4207: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
4208: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_CREATION')) )
4209: then
4277: p_count => x_msg_count,
4278: p_data => x_msg_data
4279: );
4280:
4281: WHEN fnd_api.g_exc_unexpected_error THEN
4282:
4283: ROLLBACK TO insert_wr_items_sp;
4284: x_return_status := fnd_api.g_ret_sts_unexp_error;
4285:
4280:
4281: WHEN fnd_api.g_exc_unexpected_error THEN
4282:
4283: ROLLBACK TO insert_wr_items_sp;
4284: x_return_status := fnd_api.g_ret_sts_unexp_error;
4285:
4286: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
4287: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_CREATION')) )
4288: then
4360:
4361: WHEN OTHERS THEN
4362:
4363: ROLLBACK TO insert_wr_items_sp;
4364: x_return_status := fnd_api.g_ret_sts_unexp_error;
4365:
4366: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
4367: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_CREATION')) )
4368: then
4579: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
4580: l_api_name := 'UPDATE_WR_ITEM';
4581: l_token_str := '';
4582: SAVEPOINT update_wr_items_sp;
4583: x_return_status := fnd_api.g_ret_sts_success;
4584:
4585: IF NOT fnd_api.compatible_api_call (
4586: l_api_version,
4587: p_api_version,
4581: l_token_str := '';
4582: SAVEPOINT update_wr_items_sp;
4583: x_return_status := fnd_api.g_ret_sts_success;
4584:
4585: IF NOT fnd_api.compatible_api_call (
4586: l_api_version,
4587: p_api_version,
4588: l_api_name,
4589: g_pkg_name
4588: l_api_name,
4589: g_pkg_name
4590: )
4591: THEN
4592: RAISE fnd_api.g_exc_unexpected_error;
4593: END IF;
4594:
4595: -- Initialize Message list
4596:
4593: END IF;
4594:
4595: -- Initialize Message list
4596:
4597: IF fnd_api.to_boolean(p_init_msg_list)
4598: THEN
4599: FND_MSG_PUB.INITIALIZE;
4600: END IF;
4601:
4649: p_count => x_msg_count,
4650: p_data => x_msg_data
4651: );
4652:
4653: x_return_status := fnd_api.g_ret_sts_error;
4654: RAISE fnd_api.g_exc_error;
4655:
4656: END IF;
4657:
4650: p_data => x_msg_data
4651: );
4652:
4653: x_return_status := fnd_api.g_ret_sts_error;
4654: RAISE fnd_api.g_exc_error;
4655:
4656: END IF;
4657:
4658: ---- validate if FND_API.G_MISS is passed
4654: RAISE fnd_api.g_exc_error;
4655:
4656: END IF;
4657:
4658: ---- validate if FND_API.G_MISS is passed
4659: /*******************
4660: BEGIN
4661:
4662: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
4658: ---- validate if FND_API.G_MISS is passed
4659: /*******************
4660: BEGIN
4661:
4662: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
4663: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4659: /*******************
4660: BEGIN
4661:
4662: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
4663: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4660: BEGIN
4661:
4662: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
4663: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4661:
4662: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
4663: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4662: select decode(p_title, FND_API.G_MISS_CHAR, title, p_title) title,
4663: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4670: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
4663: decode(p_party_id, FND_API.G_MISS_NUM, party_id, p_party_id) party_id,
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4670: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
4671: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
4664: decode(p_due_date, FND_API.G_MISS_DATE, due_date, p_due_date) due_date,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4670: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
4671: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
4672: into m_title,
4665: decode(p_owner_id, FND_API.G_MISS_NUM, owner_id, p_owner_id) owner_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4670: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
4671: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
4672: into m_title,
4673: m_party_id,
4666: decode(p_owner_type, FND_API.G_MISS_CHAR, owner_type_actual, p_owner_type) owner_type_actual,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4670: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
4671: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
4672: into m_title,
4673: m_party_id,
4674: m_due_date,
4667: decode(p_assignee_id, FND_API.G_MISS_NUM, assignee_id, p_assignee_id) assignee_id,
4668: decode(p_assignee_type, FND_API.G_MISS_CHAR, assignee_type_actual, p_assignee_type) assignee_type_actual,
4669: decode(p_source_object_id, FND_API.G_MISS_NUM, source_object_id, p_source_object_id) source_object_id,
4670: decode(p_source_object_type_code, FND_API.G_MISS_CHAR, source_object_type_code, p_source_object_type_code) source_object_type_code,
4671: decode(p_application_id, FND_API.G_MISS_NUM, application_id, p_application_id) application_id
4672: into m_title,
4673: m_party_id,
4674: m_due_date,
4675: m_owner_id,
4697: p_count => x_msg_count,
4698: p_data => x_msg_data
4699: );
4700:
4701: RAISE fnd_api.g_exc_error;
4702:
4703: END;
4704:
4705: ********************/
4743: p_count => x_msg_count,
4744: p_data => x_msg_data
4745: );
4746:
4747: RAISE fnd_api.g_exc_error;
4748: END;
4749:
4750: -- insert into p_temp(msg) values('b4 asg: '||p_assignee_id||' '||p_assignee_type);
4751:
4748: END;
4749:
4750: -- insert into p_temp(msg) values('b4 asg: '||p_assignee_id||' '||p_assignee_type);
4751:
4752: IF ((p_title <> FND_API.G_MISS_CHAR))
4753: THEN
4754: m_title := p_title;
4755: END IF;
4756: IF ((nvl(p_party_id, -9999) <> FND_API.G_MISS_NUM) )
4752: IF ((p_title <> FND_API.G_MISS_CHAR))
4753: THEN
4754: m_title := p_title;
4755: END IF;
4756: IF ((nvl(p_party_id, -9999) <> FND_API.G_MISS_NUM) )
4757: THEN
4758: m_party_id := p_party_id;
4759: END IF;
4760: IF ((nvl(p_due_date, sysdate) <> FND_API.G_MISS_DATE) )
4756: IF ((nvl(p_party_id, -9999) <> FND_API.G_MISS_NUM) )
4757: THEN
4758: m_party_id := p_party_id;
4759: END IF;
4760: IF ((nvl(p_due_date, sysdate) <> FND_API.G_MISS_DATE) )
4761: THEN
4762: m_due_date := p_due_date;
4763: END IF;
4764: IF ((nvl(p_owner_id, -9999) <> FND_API.G_MISS_NUM ))
4760: IF ((nvl(p_due_date, sysdate) <> FND_API.G_MISS_DATE) )
4761: THEN
4762: m_due_date := p_due_date;
4763: END IF;
4764: IF ((nvl(p_owner_id, -9999) <> FND_API.G_MISS_NUM ))
4765: THEN
4766: m_owner_id := p_owner_id;
4767: END IF;
4768: IF ((nvl(p_owner_type, 'NULL') <> FND_API.G_MISS_CHAR ))
4764: IF ((nvl(p_owner_id, -9999) <> FND_API.G_MISS_NUM ))
4765: THEN
4766: m_owner_id := p_owner_id;
4767: END IF;
4768: IF ((nvl(p_owner_type, 'NULL') <> FND_API.G_MISS_CHAR ))
4769: then
4770: m_owner_type := p_owner_type;
4771: END IF;
4772: IF ( (nvl( p_assignee_id, -9999) <> FND_API.G_MISS_NUM ))
4768: IF ((nvl(p_owner_type, 'NULL') <> FND_API.G_MISS_CHAR ))
4769: then
4770: m_owner_type := p_owner_type;
4771: END IF;
4772: IF ( (nvl( p_assignee_id, -9999) <> FND_API.G_MISS_NUM ))
4773: THEN
4774: m_assignee_id := p_assignee_id;
4775: END IF;
4776: IF ( (nvl(p_assignee_type, 'NULL') <> FND_API.G_MISS_CHAR ))
4772: IF ( (nvl( p_assignee_id, -9999) <> FND_API.G_MISS_NUM ))
4773: THEN
4774: m_assignee_id := p_assignee_id;
4775: END IF;
4776: IF ( (nvl(p_assignee_type, 'NULL') <> FND_API.G_MISS_CHAR ))
4777: THEN
4778: m_assignee_type := p_assignee_type;
4779: END IF;
4780: IF ((p_application_id <> FND_API.G_MISS_NUM) )
4776: IF ( (nvl(p_assignee_type, 'NULL') <> FND_API.G_MISS_CHAR ))
4777: THEN
4778: m_assignee_type := p_assignee_type;
4779: END IF;
4780: IF ((p_application_id <> FND_API.G_MISS_NUM) )
4781: THEN
4782: m_application_id := p_application_id;
4783: END IF;
4784: IF ((nvl(p_source_object_id, -9999) <> FND_API.G_MISS_NUM) )
4780: IF ((p_application_id <> FND_API.G_MISS_NUM) )
4781: THEN
4782: m_application_id := p_application_id;
4783: END IF;
4784: IF ((nvl(p_source_object_id, -9999) <> FND_API.G_MISS_NUM) )
4785: THEN
4786: m_source_object_id := p_source_object_id;
4787: END IF;
4788: IF ((nvl(p_source_object_type_code, 'NULL') <> FND_API.G_MISS_CHAR) )
4784: IF ((nvl(p_source_object_id, -9999) <> FND_API.G_MISS_NUM) )
4785: THEN
4786: m_source_object_id := p_source_object_id;
4787: END IF;
4788: IF ((nvl(p_source_object_type_code, 'NULL') <> FND_API.G_MISS_CHAR) )
4789: THEN
4790: m_source_object_type_code := p_source_object_type_code;
4791: END IF;
4792: -- insert into p_temp(msg) values('after asg: '||p_assignee_id||' '||p_assignee_type||
4793: -- 'm val: '||m_assignee_id||' '||m_assignee_type);
4794:
4795:
4796: BEGIN
4797: select decode(p_priority_code, FND_API.G_MISS_CHAR, b.priority_code, p_priority_code) priority_code
4798: into m_priority_code
4799: from ieu_uwqm_items a, ieu_uwqm_priorities_b b
4800: where a.priority_id = b.priority_id
4801: and a.priority_level = b.priority_level
4815: p_count => x_msg_count,
4816: p_data => x_msg_data
4817: );
4818:
4819: RAISE fnd_api.g_exc_error;
4820:
4821: END;
4822:
4823: BEGIN
4821: END;
4822:
4823: BEGIN
4824:
4825: select decode(p_work_item_status, FND_API.G_MISS_CHAR, decode(status_id, 0, 'OPEN', 3, 'CLOSE', 4, 'DELETE', 5, 'SLEEP'), p_work_item_status) status_id
4826: into m_work_item_status
4827: from ieu_uwqm_items
4828: where workitem_obj_code = p_workitem_obj_code
4829: and workitem_pk_id = p_workitem_pk_id;
4840: p_count => x_msg_count,
4841: p_data => x_msg_data
4842: );
4843:
4844: RAISE fnd_api.g_exc_error;
4845:
4846:
4847:
4848: END;
4847:
4848: END;
4849:
4850:
4851: -------- end of FND_API.G_MISS changes
4852:
4853:
4854: -- Validate object Code
4855:
4888: p_count => x_msg_count,
4889: p_data => x_msg_data
4890: );
4891:
4892: RAISE fnd_api.g_exc_error;
4893:
4894: END IF;
4895:
4896: END IF;
4927: p_count => x_msg_count,
4928: p_data => x_msg_data
4929: );
4930:
4931: RAISE fnd_api.g_exc_error;
4932:
4933: END IF;
4934:
4935: END IF;
4957: p_count => x_msg_count,
4958: p_data => x_msg_data
4959: );
4960:
4961: RAISE fnd_api.g_exc_error;
4962:
4963: END IF;
4964:
4965: IF (length(m_title) > l_title_len)
4975: p_count => x_msg_count,
4976: p_data => x_msg_data
4977: );
4978:
4979: RAISE fnd_api.g_exc_error;
4980:
4981: END IF;
4982:
4983: -- If OWNER_TYPE or ASSIGNEE_TYPE is not RS_GROUP then set it to RS_INDIVIDUAL
5047: p_count => x_msg_count,
5048: p_data => x_msg_data
5049: );
5050:
5051: RAISE fnd_api.g_exc_error;
5052: end if;
5053: -- Check Source_Object_type_code, Source_Object_id
5054: /*
5055: IF (p_source_object_type_code is null)
5113: p_count => x_msg_count,
5114: p_data => x_msg_data
5115: );
5116:
5117: RAISE fnd_api.g_exc_error;
5118:
5119: END;
5120:
5121: if (m_source_object_type_code is not null)
5194: p_count => x_msg_count,
5195: p_data => x_msg_data
5196: );
5197:
5198: RAISE fnd_api.g_exc_error;
5199: END;
5200: l_dist_from := 'GROUP_OWNED';
5201: l_dist_to := 'INDIVIDUAL_ASSIGNED';
5202: else
5226: p_count => x_msg_count,
5227: p_data => x_msg_data
5228: );
5229:
5230: RAISE fnd_api.g_exc_error;
5231: END;
5232: */
5233: end if;
5234:
5639: X_RETURN_STATUS => l_return_status);
5640:
5641: end if;
5642: -- dbms_output.put_line('ret sts: '||x_return_status);
5643: IF (x_return_status = fnd_api.g_ret_sts_success)
5644: THEN
5645:
5646: -- Set the Distribution Status of Child Work Items which are on-hold
5647: -- If it is a primary Work Source with Dependent Items
5727: x_return_status => x_return_status);
5728: --dbms_output.put_line('ret sts from sync: '||x_return_status);
5729: if (x_return_status <> 'S')
5730: then
5731: x_return_status := fnd_api.g_ret_sts_error;
5732: l_token_str := l_msg_data;
5733:
5734: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_WR_ITEM_FAILED');
5735: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.UPDATE_WR_ITEM');
5741: p_count => x_msg_count,
5742: p_data => x_msg_data
5743: );
5744:
5745: RAISE fnd_api.g_exc_error;
5746: end if;
5747: end if;
5748:
5749: end if; /*l_ws_id is not null */
5749: end if; /*l_ws_id is not null */
5750:
5751: else
5752:
5753: x_return_status := fnd_api.g_ret_sts_success;
5754:
5755: end if; /* association_ws_id is null */
5756:
5757: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
5753: x_return_status := fnd_api.g_ret_sts_success;
5754:
5755: end if; /* association_ws_id is null */
5756:
5757: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
5758: THEN
5759:
5760: x_return_status := fnd_api.g_ret_sts_error;
5761: l_token_str := l_msg_data;
5756:
5757: ELSIF (x_return_status <> fnd_api.g_ret_sts_success)
5758: THEN
5759:
5760: x_return_status := fnd_api.g_ret_sts_error;
5761: l_token_str := l_msg_data;
5762:
5763: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_WR_ITEM_FAILED');
5764: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.UPDATE_WR_ITEM');
5770: p_count => x_msg_count,
5771: p_data => x_msg_data
5772: );
5773:
5774: RAISE fnd_api.g_exc_error;
5775: END IF;
5776:
5777:
5778: IF FND_API.TO_BOOLEAN( p_commit )
5774: RAISE fnd_api.g_exc_error;
5775: END IF;
5776:
5777:
5778: IF FND_API.TO_BOOLEAN( p_commit )
5779: THEN
5780: COMMIT WORK;
5781: END iF;
5782:
5781: END iF;
5782:
5783: EXCEPTION
5784:
5785: WHEN fnd_api.g_exc_error THEN
5786:
5787: ROLLBACK TO update_wr_items_sp;
5788: x_return_status := fnd_api.g_ret_sts_error;
5789:
5784:
5785: WHEN fnd_api.g_exc_error THEN
5786:
5787: ROLLBACK TO update_wr_items_sp;
5788: x_return_status := fnd_api.g_ret_sts_error;
5789:
5790: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
5791: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_CREATION')) )
5792: then
5863: p_count => x_msg_count,
5864: p_data => x_msg_data
5865: );
5866:
5867: WHEN fnd_api.g_exc_unexpected_error THEN
5868:
5869: ROLLBACK TO update_wr_items_sp;
5870: x_return_status := fnd_api.g_ret_sts_unexp_error;
5871:
5866:
5867: WHEN fnd_api.g_exc_unexpected_error THEN
5868:
5869: ROLLBACK TO update_wr_items_sp;
5870: x_return_status := fnd_api.g_ret_sts_unexp_error;
5871:
5872: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
5873: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_CREATION')) )
5874: then
5949:
5950: WHEN OTHERS THEN
5951:
5952: ROLLBACK TO update_wr_items_sp;
5953: x_return_status := fnd_api.g_ret_sts_unexp_error;
5954:
5955: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
5956: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_CREATION')) )
5957: then
6121: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
6122: l_token_str := '';
6123:
6124: SAVEPOINT reschedule_uwqm_items_sp;
6125: x_return_status := fnd_api.g_ret_sts_success;
6126:
6127: IF NOT fnd_api.compatible_api_call (
6128: l_api_version,
6129: p_api_version,
6123:
6124: SAVEPOINT reschedule_uwqm_items_sp;
6125: x_return_status := fnd_api.g_ret_sts_success;
6126:
6127: IF NOT fnd_api.compatible_api_call (
6128: l_api_version,
6129: p_api_version,
6130: l_api_name,
6131: g_pkg_name
6130: l_api_name,
6131: g_pkg_name
6132: )
6133: THEN
6134: RAISE fnd_api.g_exc_unexpected_error;
6135: END IF;
6136:
6137: -- Initialize Message list
6138:
6135: END IF;
6136:
6137: -- Initialize Message list
6138:
6139: IF fnd_api.to_boolean(p_init_msg_list)
6140: THEN
6141: FND_MSG_PUB.INITIALIZE;
6142: END IF;
6143:
6195: p_count => x_msg_count,
6196: p_data => x_msg_data
6197: );
6198:
6199: x_return_status := fnd_api.g_ret_sts_error;
6200: RAISE fnd_api.g_exc_error;
6201:
6202: END IF;
6203:
6196: p_data => x_msg_data
6197: );
6198:
6199: x_return_status := fnd_api.g_ret_sts_error;
6200: RAISE fnd_api.g_exc_error;
6201:
6202: END IF;
6203:
6204: IF (l_miss_workitem_obj_code_flag <> 1)
6230: p_count => x_msg_count,
6231: p_data => x_msg_data
6232: );
6233:
6234: x_return_status := fnd_api.g_ret_sts_error;
6235: RAISE fnd_api.g_exc_error;
6236:
6237: END IF;
6238:
6231: p_data => x_msg_data
6232: );
6233:
6234: x_return_status := fnd_api.g_ret_sts_error;
6235: RAISE fnd_api.g_exc_error;
6236:
6237: END IF;
6238:
6239: END IF;
6281: p_count => x_msg_count,
6282: p_data => x_msg_data
6283: );
6284:
6285: RAISE fnd_api.g_exc_error;
6286:
6287: END IF;
6288:
6289: END IF;
6418: P_WORKITEM_COMMENT_CODE2 => l_workitem_comment_code2,
6419: P_WORKITEM_COMMENT_CODE3 => l_workitem_comment_code3,
6420: P_WORKITEM_COMMENT_CODE4 => l_workitem_comment_code4,
6421: P_WORKITEM_COMMENT_CODE5 => l_workitem_comment_code5,
6422: P_STATUS => fnd_api.g_ret_sts_success,
6423: P_ERROR_CODE => l_msg_data,
6424: X_AUDIT_LOG_ID => l_audit_log_id,
6425: X_MSG_DATA => l_msg_data,
6426: X_RETURN_STATUS => l_return_status);
6426: X_RETURN_STATUS => l_return_status);
6427:
6428: end if;
6429:
6430: IF (x_return_status <> fnd_api.g_ret_sts_success)
6431: THEN
6432:
6433: x_return_status := fnd_api.g_ret_sts_error;
6434:
6429:
6430: IF (x_return_status <> fnd_api.g_ret_sts_success)
6431: THEN
6432:
6433: x_return_status := fnd_api.g_ret_sts_error;
6434:
6435: l_token_str := 'WORKITEM_OBJ_CODE : '||p_workitem_obj_code||
6436: ' WORKITEM_PK_ID : '||p_workitem_pk_id;
6437: FND_MESSAGE.SET_NAME('IEU', 'IEU_SUSPEND_UWQM_ITEM_FAILED');
6443: p_count => x_msg_count,
6444: p_data => x_msg_data
6445: );
6446:
6447: RAISE fnd_api.g_exc_error;
6448: END IF;
6449:
6450:
6451: IF FND_API.TO_BOOLEAN( p_commit )
6447: RAISE fnd_api.g_exc_error;
6448: END IF;
6449:
6450:
6451: IF FND_API.TO_BOOLEAN( p_commit )
6452: THEN
6453: COMMIT WORK;
6454: END iF;
6455:
6454: END iF;
6455:
6456: EXCEPTION
6457:
6458: WHEN fnd_api.g_exc_error THEN
6459:
6460: ROLLBACK TO reschedule_uwqm_items_sp;
6461: x_return_status := fnd_api.g_ret_sts_error;
6462:
6457:
6458: WHEN fnd_api.g_exc_error THEN
6459:
6460: ROLLBACK TO reschedule_uwqm_items_sp;
6461: x_return_status := fnd_api.g_ret_sts_error;
6462:
6463: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
6464: then
6465: l_action_key := 'RESCHEDULE';
6532: p_count => x_msg_count,
6533: p_data => x_msg_data
6534: );
6535:
6536: WHEN fnd_api.g_exc_unexpected_error THEN
6537:
6538: ROLLBACK TO reschedule_uwqm_items_sp;
6539: x_return_status := fnd_api.g_ret_sts_unexp_error;
6540:
6535:
6536: WHEN fnd_api.g_exc_unexpected_error THEN
6537:
6538: ROLLBACK TO reschedule_uwqm_items_sp;
6539: x_return_status := fnd_api.g_ret_sts_unexp_error;
6540:
6541: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
6542: then
6543:
6614:
6615: WHEN OTHERS THEN
6616:
6617: ROLLBACK TO reschedule_uwqm_items_sp;
6618: x_return_status := fnd_api.g_ret_sts_unexp_error;
6619:
6620: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
6621: then
6622:
6871: l_array_size := 2000;
6872:
6873: SAVEPOINT sync_ws_details_sp;
6874:
6875: x_return_status := fnd_api.g_ret_sts_success;
6876:
6877: -- Check for API Version
6878:
6879: IF NOT fnd_api.compatible_api_call (
6875: x_return_status := fnd_api.g_ret_sts_success;
6876:
6877: -- Check for API Version
6878:
6879: IF NOT fnd_api.compatible_api_call (
6880: l_api_version,
6881: p_api_version,
6882: l_api_name,
6883: g_pkg_name
6882: l_api_name,
6883: g_pkg_name
6884: )
6885: THEN
6886: RAISE fnd_api.g_exc_unexpected_error;
6887: END IF;
6888:
6889: -- Initialize Message list
6890:
6887: END IF;
6888:
6889: -- Initialize Message list
6890:
6891: IF fnd_api.to_boolean(p_init_msg_list)
6892: THEN
6893: FND_MSG_PUB.INITIALIZE;
6894: END IF;
6895:
6921: p_count => x_msg_count,
6922: p_data => x_msg_data
6923: );
6924:
6925: RAISE fnd_api.g_exc_error;
6926:
6927: END;
6928:
6929: if (l_ws_type = 'PRIMARY')
6941: p_count => x_msg_count,
6942: p_data => x_msg_data
6943: );
6944:
6945: RAISE fnd_api.g_exc_error;
6946:
6947:
6948: elsif (l_ws_type = 'ASSOCIATION')
6949: then
6968: p_count => x_msg_count,
6969: p_data => x_msg_data
6970: );
6971:
6972: RAISE fnd_api.g_exc_error;
6973:
6974: END;
6975:
6976: BEGIN
6996: p_count => x_msg_count,
6997: p_data => x_msg_data
6998: );
6999:
7000: RAISE fnd_api.g_exc_error;
7001:
7002: END;
7003:
7004: BEGIN
7024: p_count => x_msg_count,
7025: p_data => x_msg_data
7026: );
7027:
7028: RAISE fnd_api.g_exc_error;
7029:
7030: END;
7031:
7032:
7195: p_count => x_msg_count,
7196: p_data => x_msg_data
7197: );
7198:
7199: RAISE fnd_api.g_exc_error;
7200: end;
7201:
7202: begin
7203: l_workitem_obj_code_1 := 'TASK';
7565: p_count => x_msg_count,
7566: p_data => x_msg_data
7567: );
7568: END LOOP;
7569: RAISE fnd_api.g_exc_error;
7570: END;
7571:
7572: l_task_status_rec.l_task_id_list.DELETE;
7573: l_task_status_rec.l_status_id_list.DELETE;
7579: close c_task_status;
7580:
7581: end if;
7582:
7583: IF FND_API.TO_BOOLEAN( p_commit )
7584: THEN
7585: COMMIT WORK;
7586: END IF;
7587:
7587:
7588:
7589: EXCEPTION
7590:
7591: WHEN fnd_api.g_exc_error THEN
7592:
7593: ROLLBACK TO sync_ws_details_sp;
7594: x_return_status := fnd_api.g_ret_sts_error;
7595:
7590:
7591: WHEN fnd_api.g_exc_error THEN
7592:
7593: ROLLBACK TO sync_ws_details_sp;
7594: x_return_status := fnd_api.g_ret_sts_error;
7595:
7596: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
7597: then
7598:
7657: p_count => x_msg_count,
7658: p_data => x_msg_data
7659: );
7660:
7661: WHEN fnd_api.g_exc_unexpected_error THEN
7662:
7663: ROLLBACK TO sync_ws_details_sp;
7664: x_return_status := fnd_api.g_ret_sts_unexp_error;
7665:
7660:
7661: WHEN fnd_api.g_exc_unexpected_error THEN
7662:
7663: ROLLBACK TO sync_ws_details_sp;
7664: x_return_status := fnd_api.g_ret_sts_unexp_error;
7665:
7666:
7667: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
7668: then
7732:
7733: WHEN OTHERS THEN
7734:
7735: ROLLBACK TO sync_ws_details_sp;
7736: x_return_status := fnd_api.g_ret_sts_unexp_error;
7737:
7738:
7739: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
7740: then
7898: l_dist_from := 'GROUP_OWNED';
7899: l_dist_to := 'INDIVIDUAL_ASSIGNED';
7900: SAVEPOINT next_work_for_apps;
7901:
7902: x_return_status := fnd_api.g_ret_sts_success;
7903:
7904: -- Check for API Version
7905:
7906: IF NOT fnd_api.compatible_api_call (
7902: x_return_status := fnd_api.g_ret_sts_success;
7903:
7904: -- Check for API Version
7905:
7906: IF NOT fnd_api.compatible_api_call (
7907: l_api_version,
7908: p_api_version,
7909: l_api_name,
7910: g_pkg_name
7909: l_api_name,
7910: g_pkg_name
7911: )
7912: THEN
7913: RAISE fnd_api.g_exc_unexpected_error;
7914: END IF;
7915:
7916: -- Initialize Message list
7917:
7914: END IF;
7915:
7916: -- Initialize Message list
7917:
7918: IF fnd_api.to_boolean(p_init_msg_list)
7919: THEN
7920: FND_MSG_PUB.INITIALIZE;
7921: END IF;
7922:
7948: p_count => x_msg_count,
7949: p_data => x_msg_data
7950: );
7951:
7952: RAISE fnd_api.g_exc_error;
7953:
7954: END;
7955:
7956: end loop;
8145: commit;
8146: --insert into p_temp(msg) values ('audit log2'); commit;
8147: end if;
8148: -- insert into p_temp(msg) values ('commit work'); commit;
8149: IF FND_API.TO_BOOLEAN( p_commit )
8150: THEN
8151: COMMIT WORK;
8152: END IF;
8153:
8152: END IF;
8153:
8154: EXCEPTION
8155:
8156: WHEN fnd_api.g_exc_error THEN
8157:
8158: ROLLBACK TO next_work_for_apps;
8159: x_return_status := fnd_api.g_ret_sts_error;
8160:
8155:
8156: WHEN fnd_api.g_exc_error THEN
8157:
8158: ROLLBACK TO next_work_for_apps;
8159: x_return_status := fnd_api.g_ret_sts_error;
8160:
8161: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
8162: then
8163:
8226: p_count => x_msg_count,
8227: p_data => x_msg_data
8228: );
8229:
8230: WHEN fnd_api.g_exc_unexpected_error THEN
8231:
8232: ROLLBACK TO next_work_for_apps;
8233: x_return_status := fnd_api.g_ret_sts_unexp_error;
8234:
8229:
8230: WHEN fnd_api.g_exc_unexpected_error THEN
8231:
8232: ROLLBACK TO next_work_for_apps;
8233: x_return_status := fnd_api.g_ret_sts_unexp_error;
8234:
8235: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
8236: then
8237:
8305:
8306: WHEN OTHERS THEN
8307:
8308: ROLLBACK TO next_work_for_apps;
8309: x_return_status := fnd_api.g_ret_sts_unexp_error;
8310:
8311: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') OR (l_audit_log_val = 'MINIMAL') )
8312: then
8313:
8475: l_dist_from := 'GROUP_OWNED';
8476: l_dist_to := 'INDIVIDUAL_ASSIGNED';
8477: SAVEPOINT sync_dependent_wr_items_sp;
8478:
8479: x_return_status := fnd_api.g_ret_sts_success;
8480:
8481: -- Check for API Version
8482:
8483: IF NOT fnd_api.compatible_api_call (
8479: x_return_status := fnd_api.g_ret_sts_success;
8480:
8481: -- Check for API Version
8482:
8483: IF NOT fnd_api.compatible_api_call (
8484: l_api_version,
8485: p_api_version,
8486: l_api_name,
8487: g_pkg_name
8486: l_api_name,
8487: g_pkg_name
8488: )
8489: THEN
8490: RAISE fnd_api.g_exc_unexpected_error;
8491: END IF;
8492:
8493: -- Initialize Message list
8494:
8491: END IF;
8492:
8493: -- Initialize Message list
8494:
8495: IF fnd_api.to_boolean(p_init_msg_list)
8496: THEN
8497: FND_MSG_PUB.INITIALIZE;
8498: END IF;
8499:
8519:
8520: EXCEPTION
8521: WHEN OTHERS THEN
8522:
8523: x_return_status := fnd_api.g_ret_sts_error;
8524:
8525: l_token_str := p_wr_item_list(i).workitem_obj_code ||' WORKITEM_PK_ID : '|| p_wr_item_list(i).workitem_pk_id ||' - '||l_msg_data;
8526:
8527: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_UWQM_ITEM_FAILED');
8534: p_count => x_msg_count,
8535: p_data => x_msg_data
8536: );
8537:
8538: RAISE fnd_api.g_exc_error;
8539:
8540: END;
8541:
8542: -- some additional info like Dist from and to are retrieved for Audit Log
8564: p_count => x_msg_count,
8565: p_data => x_msg_data
8566: );
8567:
8568: RAISE fnd_api.g_exc_error;
8569:
8570: END;
8571:
8572: if (l_ws_type = 'ASSOCIATION')
8592: p_count => x_msg_count,
8593: p_data => x_msg_data
8594: );
8595:
8596: RAISE fnd_api.g_exc_error;
8597:
8598: END;
8599:
8600: end if;/* ws_type */
8732: if (sql%notfound)
8733: then
8734: l_return_status := 'E';
8735: l_msg_data := SQLERRM;
8736: raise fnd_api.g_exc_error;
8737: else
8738: l_return_status := 'S';
8739: end if;
8740:
8886: X_RETURN_STATUS => l_return_status);
8887:
8888: end if;
8889:
8890: IF FND_API.TO_BOOLEAN( p_commit )
8891: THEN
8892: COMMIT WORK;
8893: END iF;
8894:
8895: end loop; /* p_wr_item_list */
8896:
8897: EXCEPTION
8898:
8899: WHEN fnd_api.g_exc_error THEN
8900:
8901: ROLLBACK TO sync_dependent_wr_items_sp;
8902: x_return_status := fnd_api.g_ret_sts_error;
8903:
8898:
8899: WHEN fnd_api.g_exc_error THEN
8900:
8901: ROLLBACK TO sync_dependent_wr_items_sp;
8902: x_return_status := fnd_api.g_ret_sts_error;
8903:
8904: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') )
8905: then
8906:
8987: p_count => x_msg_count,
8988: p_data => x_msg_data
8989: );
8990:
8991: WHEN fnd_api.g_exc_unexpected_error THEN
8992:
8993: ROLLBACK TO sync_dependent_wr_items_sp;
8994: x_return_status := fnd_api.g_ret_sts_unexp_error;
8995:
8990:
8991: WHEN fnd_api.g_exc_unexpected_error THEN
8992:
8993: ROLLBACK TO sync_dependent_wr_items_sp;
8994: x_return_status := fnd_api.g_ret_sts_unexp_error;
8995:
8996: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') )
8997: then
8998:
9065: P_WORKITEM_COMMENT_CODE2 => l_workitem_comment_code2,
9066: P_WORKITEM_COMMENT_CODE3 => l_workitem_comment_code3,
9067: P_WORKITEM_COMMENT_CODE4 => l_workitem_comment_code4,
9068: P_WORKITEM_COMMENT_CODE5 => l_workitem_comment_code5,
9069: P_STATUS => fnd_api.g_ret_sts_unexp_error,
9070: P_ERROR_CODE => l_msg_data,
9071: X_AUDIT_LOG_ID => l_audit_log_id,
9072: X_MSG_DATA => l_msg_data,
9073: X_RETURN_STATUS => l_return_status);
9083:
9084: WHEN OTHERS THEN
9085:
9086: ROLLBACK TO sync_dependent_wr_items_sp;
9087: x_return_status := fnd_api.g_ret_sts_unexp_error;
9088:
9089: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') )
9090: then
9091:
9158: P_WORKITEM_COMMENT_CODE2 => l_workitem_comment_code2,
9159: P_WORKITEM_COMMENT_CODE3 => l_workitem_comment_code3,
9160: P_WORKITEM_COMMENT_CODE4 => l_workitem_comment_code4,
9161: P_WORKITEM_COMMENT_CODE5 => l_workitem_comment_code5,
9162: P_STATUS => fnd_api.g_ret_sts_unexp_error,
9163: P_ERROR_CODE => l_msg_data,
9164: X_AUDIT_LOG_ID => l_audit_log_id,
9165: X_MSG_DATA => l_msg_data,
9166: X_RETURN_STATUS => l_return_status);
9200:
9201: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
9202: l_token_str := '';
9203: SAVEPOINT activate_ws_sp;
9204: x_return_status := fnd_api.g_ret_sts_success;
9205:
9206: IF NOT fnd_api.compatible_api_call (
9207: l_api_version,
9208: p_api_version,
9202: l_token_str := '';
9203: SAVEPOINT activate_ws_sp;
9204: x_return_status := fnd_api.g_ret_sts_success;
9205:
9206: IF NOT fnd_api.compatible_api_call (
9207: l_api_version,
9208: p_api_version,
9209: l_api_name,
9210: g_pkg_name
9209: l_api_name,
9210: g_pkg_name
9211: )
9212: THEN
9213: RAISE fnd_api.g_exc_unexpected_error;
9214: END IF;
9215:
9216: -- Initialize Message list
9217:
9214: END IF;
9215:
9216: -- Initialize Message list
9217:
9218: IF fnd_api.to_boolean(p_init_msg_list)
9219: THEN
9220: FND_MSG_PUB.INITIALIZE;
9221: END IF;
9222:
9240: p_count => x_msg_count,
9241: p_data => x_msg_data
9242: );
9243:
9244: x_return_status := fnd_api.g_ret_sts_error;
9245: RAISE fnd_api.g_exc_error;
9246:
9247: END IF;
9248:
9241: p_data => x_msg_data
9242: );
9243:
9244: x_return_status := fnd_api.g_ret_sts_error;
9245: RAISE fnd_api.g_exc_error;
9246:
9247: END IF;
9248:
9249: IF p_ws_code is not null
9274: p_count => x_msg_count,
9275: p_data => x_msg_data
9276: );
9277:
9278: x_return_status := fnd_api.g_ret_sts_error;
9279: RAISE fnd_api.g_exc_error;
9280:
9281: ELSIF p_ws_code = l_ws_code
9282: THEN
9275: p_data => x_msg_data
9276: );
9277:
9278: x_return_status := fnd_api.g_ret_sts_error;
9279: RAISE fnd_api.g_exc_error;
9280:
9281: ELSIF p_ws_code = l_ws_code
9282: THEN
9283: l_active_flag := 'Y';
9287: END IF;
9288:
9289: END IF;
9290:
9291: IF FND_API.TO_BOOLEAN(p_commit)
9292: THEN
9293: COMMIT WORK;
9294: END IF;
9295:
9294: END IF;
9295:
9296: EXCEPTION
9297:
9298: WHEN fnd_api.g_exc_error THEN
9299:
9300: ROLLBACK TO activate_ws_sp;
9301: x_return_status := fnd_api.g_ret_sts_error;
9302:
9297:
9298: WHEN fnd_api.g_exc_error THEN
9299:
9300: ROLLBACK TO activate_ws_sp;
9301: x_return_status := fnd_api.g_ret_sts_error;
9302:
9303: fnd_msg_pub.Count_and_Get
9304: (
9305: p_count => x_msg_count,
9305: p_count => x_msg_count,
9306: p_data => x_msg_data
9307: );
9308:
9309: WHEN fnd_api.g_exc_unexpected_error THEN
9310:
9311: ROLLBACK TO activate_ws_sp;
9312: x_return_status := fnd_api.g_ret_sts_unexp_error;
9313:
9308:
9309: WHEN fnd_api.g_exc_unexpected_error THEN
9310:
9311: ROLLBACK TO activate_ws_sp;
9312: x_return_status := fnd_api.g_ret_sts_unexp_error;
9313:
9314: fnd_msg_pub.Count_and_Get
9315: (
9316: p_count => x_msg_count,
9319:
9320: WHEN OTHERS THEN
9321:
9322: ROLLBACK TO activate_ws_sp;
9323: x_return_status := fnd_api.g_ret_sts_unexp_error;
9324:
9325: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9326: THEN
9327:
9358:
9359: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
9360: l_token_str := '';
9361: SAVEPOINT check_ws_activation_status_sp;
9362: x_return_status := fnd_api.g_ret_sts_success;
9363:
9364: IF NOT fnd_api.compatible_api_call (
9365: l_api_version,
9366: p_api_version,
9360: l_token_str := '';
9361: SAVEPOINT check_ws_activation_status_sp;
9362: x_return_status := fnd_api.g_ret_sts_success;
9363:
9364: IF NOT fnd_api.compatible_api_call (
9365: l_api_version,
9366: p_api_version,
9367: l_api_name,
9368: g_pkg_name
9367: l_api_name,
9368: g_pkg_name
9369: )
9370: THEN
9371: RAISE fnd_api.g_exc_unexpected_error;
9372: END IF;
9373:
9374: -- Initialize Message list
9375:
9372: END IF;
9373:
9374: -- Initialize Message list
9375:
9376: IF fnd_api.to_boolean(p_init_msg_list)
9377: THEN
9378: FND_MSG_PUB.INITIALIZE;
9379: END IF;
9380:
9398: p_count => x_msg_count,
9399: p_data => x_msg_data
9400: );
9401:
9402: x_return_status := fnd_api.g_ret_sts_error;
9403: RAISE fnd_api.g_exc_error;
9404:
9405: END IF;
9406:
9399: p_data => x_msg_data
9400: );
9401:
9402: x_return_status := fnd_api.g_ret_sts_error;
9403: RAISE fnd_api.g_exc_error;
9404:
9405: END IF;
9406:
9407: IF p_ws_code is not null
9432: p_count => x_msg_count,
9433: p_data => x_msg_data
9434: );
9435:
9436: x_return_status := fnd_api.g_ret_sts_error;
9437: RAISE fnd_api.g_exc_error;
9438:
9439: END IF;
9440:
9433: p_data => x_msg_data
9434: );
9435:
9436: x_return_status := fnd_api.g_ret_sts_error;
9437: RAISE fnd_api.g_exc_error;
9438:
9439: END IF;
9440:
9441: x_ws_activation_status := l_ws_activation_status;
9443: END IF;
9444:
9445: EXCEPTION
9446:
9447: WHEN fnd_api.g_exc_error THEN
9448:
9449: ROLLBACK TO check_ws_activation_status_sp;
9450: x_return_status := fnd_api.g_ret_sts_error;
9451:
9446:
9447: WHEN fnd_api.g_exc_error THEN
9448:
9449: ROLLBACK TO check_ws_activation_status_sp;
9450: x_return_status := fnd_api.g_ret_sts_error;
9451:
9452: fnd_msg_pub.Count_and_Get
9453: (
9454: p_count => x_msg_count,
9454: p_count => x_msg_count,
9455: p_data => x_msg_data
9456: );
9457:
9458: WHEN fnd_api.g_exc_unexpected_error THEN
9459:
9460: ROLLBACK TO check_ws_activation_status_sp;
9461: x_return_status := fnd_api.g_ret_sts_unexp_error;
9462:
9457:
9458: WHEN fnd_api.g_exc_unexpected_error THEN
9459:
9460: ROLLBACK TO check_ws_activation_status_sp;
9461: x_return_status := fnd_api.g_ret_sts_unexp_error;
9462:
9463: fnd_msg_pub.Count_and_Get
9464: (
9465: p_count => x_msg_count,
9468:
9469: WHEN OTHERS THEN
9470:
9471: ROLLBACK TO check_ws_activation_status_sp;
9472: x_return_status := fnd_api.g_ret_sts_unexp_error;
9473:
9474: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9475: THEN
9476:
9508:
9509: BEGIN
9510:
9511: -- Initialize Message list
9512: IF fnd_api.to_boolean(p_init_msg_list)
9513: THEN
9514: FND_MSG_PUB.INITIALIZE;
9515: END IF;
9516:
9539: p_count => x_msg_count,
9540: p_data => x_msg_data
9541: );
9542:
9543: x_return_status := fnd_api.g_ret_sts_error;
9544: RAISE fnd_api.g_exc_error;
9545:
9546: END IF;
9547:
9540: p_data => x_msg_data
9541: );
9542:
9543: x_return_status := fnd_api.g_ret_sts_error;
9544: RAISE fnd_api.g_exc_error;
9545:
9546: END IF;
9547:
9548: -- Validate object Code
9582: p_count => x_msg_count,
9583: p_data => x_msg_data
9584: );
9585:
9586: RAISE fnd_api.g_exc_error;
9587:
9588: END IF;
9589:
9590: END IF;
9608:
9609: l_row_count := SQL%ROWCOUNT;
9610: fnd_file.put_line(FND_FILE.LOG, 'After deleting data from table IEU_UWQM_ITEMS ' || l_row_count || ' rows');
9611:
9612: x_return_status := fnd_api.g_ret_sts_success;
9613:
9614: fnd_file.put_line(FND_FILE.LOG, 'Completed work in ' || 'IEU_WR_PUB.PURGE_WR_ITEM' || ' with return status ' || x_return_status);
9615: fnd_file.put_line(FND_FILE.LOG, '--------------------------------------------------------------------------------');
9616:
9613:
9614: fnd_file.put_line(FND_FILE.LOG, 'Completed work in ' || 'IEU_WR_PUB.PURGE_WR_ITEM' || ' with return status ' || x_return_status);
9615: fnd_file.put_line(FND_FILE.LOG, '--------------------------------------------------------------------------------');
9616:
9617: IF (x_return_status <> fnd_api.g_ret_sts_success)
9618: THEN
9619:
9620: x_return_status := fnd_api.g_ret_sts_error;
9621: l_token_str := l_msg_data;
9616:
9617: IF (x_return_status <> fnd_api.g_ret_sts_success)
9618: THEN
9619:
9620: x_return_status := fnd_api.g_ret_sts_error;
9621: l_token_str := l_msg_data;
9622:
9623: FND_MESSAGE.SET_NAME('IEU', 'IEU_PURGE_WR_ITEM_FAILED');
9624: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.PURGE_WR_ITEM');
9630: p_count => x_msg_count,
9631: p_data => x_msg_data
9632: );
9633:
9634: RAISE fnd_api.g_exc_error;
9635: END IF;
9636:
9637: IF FND_API.TO_BOOLEAN( p_commit )
9638: THEN
9633:
9634: RAISE fnd_api.g_exc_error;
9635: END IF;
9636:
9637: IF FND_API.TO_BOOLEAN( p_commit )
9638: THEN
9639: COMMIT WORK;
9640: END iF;
9641:
9640: END iF;
9641:
9642: EXCEPTION
9643:
9644: WHEN fnd_api.g_exc_error THEN
9645:
9646: x_return_status := fnd_api.g_ret_sts_error;
9647: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN FND_API.G_EXC_ERROR of ' || 'IEU_WR_PUB.PURGE_WR_ITEM');
9648:
9642: EXCEPTION
9643:
9644: WHEN fnd_api.g_exc_error THEN
9645:
9646: x_return_status := fnd_api.g_ret_sts_error;
9647: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN FND_API.G_EXC_ERROR of ' || 'IEU_WR_PUB.PURGE_WR_ITEM');
9648:
9649: fnd_msg_pub.Count_and_Get
9650: (
9643:
9644: WHEN fnd_api.g_exc_error THEN
9645:
9646: x_return_status := fnd_api.g_ret_sts_error;
9647: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN FND_API.G_EXC_ERROR of ' || 'IEU_WR_PUB.PURGE_WR_ITEM');
9648:
9649: fnd_msg_pub.Count_and_Get
9650: (
9651: p_count => x_msg_count,
9651: p_count => x_msg_count,
9652: p_data => x_msg_data
9653: );
9654:
9655: WHEN fnd_api.g_exc_unexpected_error THEN
9656:
9657: x_return_status := fnd_api.g_ret_sts_unexp_error;
9658: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || 'IEU_WR_PUB.PURGE_WR_ITEM');
9659:
9653: );
9654:
9655: WHEN fnd_api.g_exc_unexpected_error THEN
9656:
9657: x_return_status := fnd_api.g_ret_sts_unexp_error;
9658: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || 'IEU_WR_PUB.PURGE_WR_ITEM');
9659:
9660: fnd_msg_pub.Count_and_Get
9661: (
9654:
9655: WHEN fnd_api.g_exc_unexpected_error THEN
9656:
9657: x_return_status := fnd_api.g_ret_sts_unexp_error;
9658: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || 'IEU_WR_PUB.PURGE_WR_ITEM');
9659:
9660: fnd_msg_pub.Count_and_Get
9661: (
9662: p_count => x_msg_count,
9664: );
9665:
9666: WHEN OTHERS THEN
9667:
9668: x_return_status := fnd_api.g_ret_sts_unexp_error;
9669: l_sqlerrm := SQLERRM;
9670:
9671: fnd_file.put_line(FND_FILE.LOG, 'Inside WHEN OTHERS of ' || 'IEU_WR_PUB.PURGE_WR_ITEM' || '. Oracle Error was:');
9672: fnd_file.put_line(FND_FILE.LOG, l_sqlerrm);
9776: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
9777: l_api_name := 'PURGE_WR_ITEM';
9778: l_token_str := '';
9779: SAVEPOINT purge_wr_items_sp;
9780: x_return_status := fnd_api.g_ret_sts_success;
9781:
9782: IF NOT fnd_api.compatible_api_call (
9783: l_api_version,
9784: p_api_version,
9778: l_token_str := '';
9779: SAVEPOINT purge_wr_items_sp;
9780: x_return_status := fnd_api.g_ret_sts_success;
9781:
9782: IF NOT fnd_api.compatible_api_call (
9783: l_api_version,
9784: p_api_version,
9785: l_api_name,
9786: g_pkg_name
9785: l_api_name,
9786: g_pkg_name
9787: )
9788: THEN
9789: RAISE fnd_api.g_exc_unexpected_error;
9790: END IF;
9791:
9792: -- Initialize Message list
9793:
9790: END IF;
9791:
9792: -- Initialize Message list
9793:
9794: IF fnd_api.to_boolean(p_init_msg_list)
9795: THEN
9796: FND_MSG_PUB.INITIALIZE;
9797: END IF;
9798:
9821: p_count => x_msg_count,
9822: p_data => x_msg_data
9823: );
9824:
9825: x_return_status := fnd_api.g_ret_sts_error;
9826: RAISE fnd_api.g_exc_error;
9827:
9828: END IF;
9829:
9822: p_data => x_msg_data
9823: );
9824:
9825: x_return_status := fnd_api.g_ret_sts_error;
9826: RAISE fnd_api.g_exc_error;
9827:
9828: END IF;
9829:
9830: -- Validate object Code
9864: p_count => x_msg_count,
9865: p_data => x_msg_data
9866: );
9867:
9868: RAISE fnd_api.g_exc_error;
9869:
9870: END IF;
9871:
9872: END IF;
10016: X_RETURN_STATUS => l_return_status);
10017:
10018: end if;
10019:
10020: x_return_status := fnd_api.g_ret_sts_success;
10021:
10022: IF (x_return_status <> fnd_api.g_ret_sts_success)
10023: THEN
10024:
10018: end if;
10019:
10020: x_return_status := fnd_api.g_ret_sts_success;
10021:
10022: IF (x_return_status <> fnd_api.g_ret_sts_success)
10023: THEN
10024:
10025: x_return_status := fnd_api.g_ret_sts_error;
10026: l_token_str := l_msg_data;
10021:
10022: IF (x_return_status <> fnd_api.g_ret_sts_success)
10023: THEN
10024:
10025: x_return_status := fnd_api.g_ret_sts_error;
10026: l_token_str := l_msg_data;
10027:
10028: FND_MESSAGE.SET_NAME('IEU', 'IEU_PURGE_WR_ITEM_FAILED');
10029: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','IEU_WR_PUB.PURGE_WR_ITEM');
10035: p_count => x_msg_count,
10036: p_data => x_msg_data
10037: );
10038:
10039: RAISE fnd_api.g_exc_error;
10040: END IF;
10041:
10042: IF FND_API.TO_BOOLEAN( p_commit )
10043: THEN
10038:
10039: RAISE fnd_api.g_exc_error;
10040: END IF;
10041:
10042: IF FND_API.TO_BOOLEAN( p_commit )
10043: THEN
10044: COMMIT WORK;
10045: END iF;
10046:
10045: END iF;
10046:
10047: EXCEPTION
10048:
10049: WHEN fnd_api.g_exc_error THEN
10050:
10051: ROLLBACK TO purge_wr_items_sp;
10052: x_return_status := fnd_api.g_ret_sts_error;
10053:
10048:
10049: WHEN fnd_api.g_exc_error THEN
10050:
10051: ROLLBACK TO purge_wr_items_sp;
10052: x_return_status := fnd_api.g_ret_sts_error;
10053:
10054: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
10055: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_PURGE')) )
10056: then
10113: p_count => x_msg_count,
10114: p_data => x_msg_data
10115: );
10116:
10117: WHEN fnd_api.g_exc_unexpected_error THEN
10118:
10119: ROLLBACK TO purge_wr_items_sp;
10120: x_return_status := fnd_api.g_ret_sts_unexp_error;
10121:
10116:
10117: WHEN fnd_api.g_exc_unexpected_error THEN
10118:
10119: ROLLBACK TO purge_wr_items_sp;
10120: x_return_status := fnd_api.g_ret_sts_unexp_error;
10121:
10122: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
10123: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_PURGE')) )
10124: then
10184:
10185: WHEN OTHERS THEN
10186:
10187: ROLLBACK TO purge_wr_items_sp;
10188: x_return_status := fnd_api.g_ret_sts_unexp_error;
10189:
10190: if ( (l_audit_log_val = 'FULL') OR (l_audit_log_val = 'DETAILED') ) OR
10191: ( (l_audit_log_val = 'MINIMAL') AND ( (l_action_key is NULL) OR (l_action_key = 'WORKITEM_PURGE')) )
10192: then
10316:
10317: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
10318: l_token_str := '';
10319: SAVEPOINT deactivate_ws_sp;
10320: x_return_status := fnd_api.g_ret_sts_success;
10321:
10322: IF NOT fnd_api.compatible_api_call (
10323: l_api_version,
10324: p_api_version,
10318: l_token_str := '';
10319: SAVEPOINT deactivate_ws_sp;
10320: x_return_status := fnd_api.g_ret_sts_success;
10321:
10322: IF NOT fnd_api.compatible_api_call (
10323: l_api_version,
10324: p_api_version,
10325: l_api_name,
10326: g_pkg_name
10325: l_api_name,
10326: g_pkg_name
10327: )
10328: THEN
10329: RAISE fnd_api.g_exc_unexpected_error;
10330: END IF;
10331:
10332: -- Initialize Message list
10333:
10330: END IF;
10331:
10332: -- Initialize Message list
10333:
10334: IF fnd_api.to_boolean(p_init_msg_list)
10335: THEN
10336: FND_MSG_PUB.INITIALIZE;
10337: END IF;
10338:
10356: p_count => x_msg_count,
10357: p_data => x_msg_data
10358: );
10359:
10360: x_return_status := fnd_api.g_ret_sts_error;
10361: RAISE fnd_api.g_exc_error;
10362:
10363: END IF;
10364:
10357: p_data => x_msg_data
10358: );
10359:
10360: x_return_status := fnd_api.g_ret_sts_error;
10361: RAISE fnd_api.g_exc_error;
10362:
10363: END IF;
10364:
10365: IF p_ws_code is not null
10391: p_count => x_msg_count,
10392: p_data => x_msg_data
10393: );
10394:
10395: x_return_status := fnd_api.g_ret_sts_error;
10396: RAISE fnd_api.g_exc_error;
10397:
10398: ELSIF p_ws_code = l_ws_code
10399: THEN
10392: p_data => x_msg_data
10393: );
10394:
10395: x_return_status := fnd_api.g_ret_sts_error;
10396: RAISE fnd_api.g_exc_error;
10397:
10398: ELSIF p_ws_code = l_ws_code
10399: THEN
10400: l_active_flag := 'N';
10412: END IF;
10413:
10414: END IF;
10415:
10416: IF FND_API.TO_BOOLEAN(p_commit)
10417: THEN
10418: COMMIT WORK;
10419: END IF;
10420:
10419: END IF;
10420:
10421: EXCEPTION
10422:
10423: WHEN fnd_api.g_exc_error THEN
10424:
10425: ROLLBACK TO deactivate_ws_sp;
10426: x_return_status := fnd_api.g_ret_sts_error;
10427:
10422:
10423: WHEN fnd_api.g_exc_error THEN
10424:
10425: ROLLBACK TO deactivate_ws_sp;
10426: x_return_status := fnd_api.g_ret_sts_error;
10427:
10428: fnd_msg_pub.Count_and_Get
10429: (
10430: p_count => x_msg_count,
10430: p_count => x_msg_count,
10431: p_data => x_msg_data
10432: );
10433:
10434: WHEN fnd_api.g_exc_unexpected_error THEN
10435:
10436: ROLLBACK TO deactivate_ws_sp;
10437: x_return_status := fnd_api.g_ret_sts_unexp_error;
10438:
10433:
10434: WHEN fnd_api.g_exc_unexpected_error THEN
10435:
10436: ROLLBACK TO deactivate_ws_sp;
10437: x_return_status := fnd_api.g_ret_sts_unexp_error;
10438:
10439: fnd_msg_pub.Count_and_Get
10440: (
10441: p_count => x_msg_count,
10444:
10445: WHEN OTHERS THEN
10446:
10447: ROLLBACK TO deactivate_ws_sp;
10448: x_return_status := fnd_api.g_ret_sts_unexp_error;
10449:
10450: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10451: THEN
10452:
10534: l_not_valid_flag := 'N';
10535: errors := 0;
10536: err_flag := 'N';
10537: l_miss_param_flag := 0;
10538: L_MISS_NUM := FND_API.G_MISS_NUM;
10539:
10540: SAVEPOINT sync_wr_items_sp;
10541: x_return_status := fnd_api.g_ret_sts_success;
10542:
10537: l_miss_param_flag := 0;
10538: L_MISS_NUM := FND_API.G_MISS_NUM;
10539:
10540: SAVEPOINT sync_wr_items_sp;
10541: x_return_status := fnd_api.g_ret_sts_success;
10542:
10543:
10544: -- Check for API Version
10545:
10542:
10543:
10544: -- Check for API Version
10545:
10546: IF NOT fnd_api.compatible_api_call (
10547: l_api_version,
10548: p_api_version,
10549: l_api_name,
10550: g_pkg_name
10549: l_api_name,
10550: g_pkg_name
10551: )
10552: THEN
10553: RAISE fnd_api.g_exc_unexpected_error;
10554: END IF;
10555:
10556:
10557: -- Initialize Message list
10555:
10556:
10557: -- Initialize Message list
10558:
10559: IF fnd_api.to_boolean(p_init_msg_list)
10560: THEN
10561: FND_MSG_PUB.INITIALIZE;
10562: END IF;
10563:
10594: p_count => x_msg_count,
10595: p_data => x_msg_data
10596: );
10597:
10598: x_return_status := fnd_api.g_ret_sts_error;
10599: RAISE fnd_api.g_exc_error;
10600:
10601: END IF;
10602:
10595: p_data => x_msg_data
10596: );
10597:
10598: x_return_status := fnd_api.g_ret_sts_error;
10599: RAISE fnd_api.g_exc_error;
10600:
10601: END IF;
10602:
10603: -- Validate Work Item Status
10643: p_count => x_msg_count,
10644: p_data => x_msg_data
10645: );
10646:
10647: x_return_status := fnd_api.g_ret_sts_error;
10648: RAISE fnd_api.g_exc_error;
10649:
10650: END IF;
10651:
10644: p_data => x_msg_data
10645: );
10646:
10647: x_return_status := fnd_api.g_ret_sts_error;
10648: RAISE fnd_api.g_exc_error;
10649:
10650: END IF;
10651:
10652:
10699: p_count => x_msg_count,
10700: p_data => x_msg_data
10701: );
10702:
10703: x_return_status := fnd_api.g_ret_sts_error;
10704: RAISE fnd_api.g_exc_error;
10705:
10706: END IF;
10707:
10700: p_data => x_msg_data
10701: );
10702:
10703: x_return_status := fnd_api.g_ret_sts_error;
10704: RAISE fnd_api.g_exc_error;
10705:
10706: END IF;
10707:
10708:
10754: p_count => x_msg_count,
10755: p_data => x_msg_data
10756: );
10757:
10758: x_return_status := fnd_api.g_ret_sts_error;
10759: RAISE fnd_api.g_exc_error;
10760:
10761: END IF;
10762:
10755: p_data => x_msg_data
10756: );
10757:
10758: x_return_status := fnd_api.g_ret_sts_error;
10759: RAISE fnd_api.g_exc_error;
10760:
10761: END IF;
10762:
10763:
10817: p_count => x_msg_count,
10818: p_data => x_msg_data
10819: );
10820:
10821: x_return_status := fnd_api.g_ret_sts_error;
10822: RAISE fnd_api.g_exc_error;
10823:
10824: END IF;
10825:
10818: p_data => x_msg_data
10819: );
10820:
10821: x_return_status := fnd_api.g_ret_sts_error;
10822: RAISE fnd_api.g_exc_error;
10823:
10824: END IF;
10825:
10826:
10895: p_count => x_msg_count,
10896: p_data => x_msg_data
10897: );
10898:
10899: x_return_status := fnd_api.g_ret_sts_error;
10900: RAISE fnd_api.g_exc_error;
10901: END;
10902:
10903:
10896: p_data => x_msg_data
10897: );
10898:
10899: x_return_status := fnd_api.g_ret_sts_error;
10900: RAISE fnd_api.g_exc_error;
10901: END;
10902:
10903:
10904: -- All validations are successful and continue to set the required values
10983: WHERE PROCESSING_SET_ID = P_PROCESSING_SET_ID;
10984:
10985:
10986: BEGIN
10987: x_return_status := fnd_api.g_ret_sts_success;
10988: l_wr_items_rec.WORKITEM_OBJ_CODE_LST.delete;
10989: l_wr_items_rec.WORKITEM_PK_ID_LST.delete;
10990: l_wr_items_rec.STATUS_ID_LIST.delete;
10991: l_wr_items_rec.PRIORITY_ID_LIST.delete;
11146: END IF;
11147: END LOOP;
11148:
11149: IF err_flag = 'Y' THEN
11150: x_return_status := fnd_api.g_ret_sts_error;
11151: RAISE fnd_api.g_exc_error;
11152: END IF;
11153:
11154: if (errors > 0) then
11147: END LOOP;
11148:
11149: IF err_flag = 'Y' THEN
11150: x_return_status := fnd_api.g_ret_sts_error;
11151: RAISE fnd_api.g_exc_error;
11152: END IF;
11153:
11154: if (errors > 0) then
11155: BEGIN
11205: p_data => x_msg_data
11206: );
11207: END LOOP;
11208:
11209: x_return_status := fnd_api.g_ret_sts_error;
11210: RAISE fnd_api.g_exc_error;
11211: END;
11212: end if;
11213:
11206: );
11207: END LOOP;
11208:
11209: x_return_status := fnd_api.g_ret_sts_error;
11210: RAISE fnd_api.g_exc_error;
11211: END;
11212: end if;
11213:
11214: l_wr_items_rec.WORKITEM_OBJ_CODE_LST.delete;
11233: l_wr_items_rec.WS_ID_LIST.delete;
11234: l_wr_items_rec.DISTRIBUTION_STATUS_ID_LIST.delete;
11235: END;
11236:
11237: IF FND_API.TO_BOOLEAN( p_commit ) THEN
11238: COMMIT WORK;
11239: END IF;
11240:
11241:
11240:
11241:
11242: EXCEPTION
11243:
11244: WHEN fnd_api.g_exc_error THEN
11245:
11246: ROLLBACK TO sync_wr_items_sp;
11247: x_return_status := fnd_api.g_ret_sts_error;
11248:
11243:
11244: WHEN fnd_api.g_exc_error THEN
11245:
11246: ROLLBACK TO sync_wr_items_sp;
11247: x_return_status := fnd_api.g_ret_sts_error;
11248:
11249: fnd_msg_pub.Count_and_Get
11250: (
11251: p_count => x_msg_count,
11251: p_count => x_msg_count,
11252: p_data => x_msg_data
11253: );
11254:
11255: WHEN fnd_api.g_exc_unexpected_error THEN
11256:
11257: ROLLBACK TO sync_wr_items_sp;
11258: x_return_status := fnd_api.g_ret_sts_unexp_error;
11259:
11254:
11255: WHEN fnd_api.g_exc_unexpected_error THEN
11256:
11257: ROLLBACK TO sync_wr_items_sp;
11258: x_return_status := fnd_api.g_ret_sts_unexp_error;
11259:
11260: fnd_msg_pub.Count_and_Get
11261: (
11262: p_count => x_msg_count,
11266: WHEN OTHERS THEN
11267: x_msg_data := sqlcode||' '||sqlerrm;
11268:
11269: ROLLBACK TO sync_wr_items_sp;
11270: x_return_status := fnd_api.g_ret_sts_unexp_error;
11271:
11272: FND_FILE.PUT_LINE(FND_FILE.LOG, x_msg_data);
11273: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11274: THEN
11417: l_limit := 2000;
11418:
11419: SAVEPOINT sync_assct_task_wr_items_sp;
11420:
11421: x_return_status := fnd_api.g_ret_sts_success;
11422:
11423: -- Check for API Version
11424:
11425: IF NOT fnd_api.compatible_api_call (
11421: x_return_status := fnd_api.g_ret_sts_success;
11422:
11423: -- Check for API Version
11424:
11425: IF NOT fnd_api.compatible_api_call (
11426: l_api_version,
11427: p_api_version,
11428: l_api_name,
11429: g_pkg_name
11428: l_api_name,
11429: g_pkg_name
11430: )
11431: THEN
11432: RAISE fnd_api.g_exc_unexpected_error;
11433: END IF;
11434:
11435: -- Initialize Message list
11436:
11433: END IF;
11434:
11435: -- Initialize Message list
11436:
11437: IF fnd_api.to_boolean(p_init_msg_list)
11438: THEN
11439: FND_MSG_PUB.INITIALIZE;
11440: END IF;
11441:
11470: p_count => x_msg_count,
11471: p_data => x_msg_data
11472: );
11473:
11474: RAISE fnd_api.g_exc_error;
11475:
11476: END;
11477:
11478: if (l_ws_type = 'PRIMARY')
11494: p_count => x_msg_count,
11495: p_data => x_msg_data
11496: );
11497:
11498: RAISE fnd_api.g_exc_error;
11499:
11500:
11501: elsif (l_ws_type = 'ASSOCIATION')
11502: then
11525: p_count => x_msg_count,
11526: p_data => x_msg_data
11527: );
11528:
11529: RAISE fnd_api.g_exc_error;
11530:
11531: END;
11532:
11533: BEGIN
11561: p_count => x_msg_count,
11562: p_data => x_msg_data
11563: );
11564:
11565: RAISE fnd_api.g_exc_error;
11566: END;
11567:
11568: BEGIN
11569: SELECT ws_name
11587: p_count => x_msg_count,
11588: p_data => x_msg_data
11589: );
11590:
11591: RAISE fnd_api.g_exc_error;
11592: END;
11593:
11594:
11595: -- The Sync script works only if Parent Work Source is ACTIVE
11608: p_count => x_msg_count,
11609: p_data => x_msg_data
11610: );
11611:
11612: RAISE fnd_api.g_exc_error;
11613:
11614: END IF;
11615: EXCEPTION
11616: WHEN NO_DATA_FOUND THEN
11630: p_count => x_msg_count,
11631: p_data => x_msg_data
11632: );
11633:
11634: RAISE fnd_api.g_exc_error;
11635:
11636: END;
11637:
11638: BEGIN
11661: p_count => x_msg_count,
11662: p_data => x_msg_data
11663: );
11664:
11665: RAISE fnd_api.g_exc_error;
11666:
11667: END;
11668:
11669: end if;
11813: p_count => x_msg_count,
11814: p_data => x_msg_data
11815: );
11816:
11817: RAISE fnd_api.g_exc_error;
11818: END IF;
11819: fnd_file.new_line(FND_FILE.LOG, 1);
11820: FND_MESSAGE.SET_NAME('IEU', 'IEU_UWQ_SYNC_WR_INSERT_FAILED');
11821: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME', 'IEU_WR_PUB.SYNC_ASSCT_TASK_WR_ITEMS');
11831: p_data => x_msg_data
11832: );
11833: END LOOP;
11834:
11835: -- RAISE fnd_api.g_exc_error;
11836: END;
11837: END IF;
11838:
11839: l_msg_count := '';
11862: p_count => x_msg_count,
11863: p_data => x_msg_data
11864: );
11865:
11866: RAISE fnd_api.g_exc_error;
11867: END;
11868:
11869:
11870: if l_tasks_rules_func is not null
11932: p_count => x_msg_count,
11933: p_data => x_msg_data
11934: );
11935:
11936: RAISE fnd_api.g_exc_error;
11937: END IF;
11938:
11939: fnd_file.new_line(FND_FILE.LOG, 1);
11940: FND_MESSAGE.SET_NAME('IEU', 'IEU_UPDATE_UWQM_ITEM_FAILED');
11949: p_count => x_msg_count,
11950: p_data => x_msg_data
11951: );
11952: END LOOP;
11953: -- RAISE fnd_api.g_exc_error;
11954: END;
11955:
11956: l_task_status_rec.l_task_id_list.DELETE;
11957: l_task_status_rec.l_status_id_list.DELETE;
11964:
11965: end if;
11966:
11967: IF l_return_status = 'E' THEN
11968: RAISE fnd_api.g_exc_error;
11969: ELSIF l_return_status = 'U' THEN
11970: RAISE fnd_api.g_exc_unexpected_error;
11971: END IF;
11972:
11966:
11967: IF l_return_status = 'E' THEN
11968: RAISE fnd_api.g_exc_error;
11969: ELSIF l_return_status = 'U' THEN
11970: RAISE fnd_api.g_exc_unexpected_error;
11971: END IF;
11972:
11973: IF FND_API.TO_BOOLEAN( p_commit ) THEN
11974: COMMIT WORK;
11969: ELSIF l_return_status = 'U' THEN
11970: RAISE fnd_api.g_exc_unexpected_error;
11971: END IF;
11972:
11973: IF FND_API.TO_BOOLEAN( p_commit ) THEN
11974: COMMIT WORK;
11975: END IF;
11976:
11977: EXCEPTION
11975: END IF;
11976:
11977: EXCEPTION
11978:
11979: WHEN fnd_api.g_exc_error THEN
11980:
11981: ROLLBACK TO sync_assct_task_wr_items_sp;
11982: x_return_status := fnd_api.g_ret_sts_error;
11983:
11978:
11979: WHEN fnd_api.g_exc_error THEN
11980:
11981: ROLLBACK TO sync_assct_task_wr_items_sp;
11982: x_return_status := fnd_api.g_ret_sts_error;
11983:
11984: fnd_msg_pub.Count_and_Get
11985: (
11986: p_count => x_msg_count,
11986: p_count => x_msg_count,
11987: p_data => x_msg_data
11988: );
11989:
11990: WHEN fnd_api.g_exc_unexpected_error THEN
11991:
11992: ROLLBACK TO sync_assct_task_wr_items_sp;
11993: x_return_status := fnd_api.g_ret_sts_unexp_error;
11994:
11989:
11990: WHEN fnd_api.g_exc_unexpected_error THEN
11991:
11992: ROLLBACK TO sync_assct_task_wr_items_sp;
11993: x_return_status := fnd_api.g_ret_sts_unexp_error;
11994:
11995: fnd_msg_pub.Count_and_Get
11996: (
11997: p_count => x_msg_count,
12002: WHEN OTHERS THEN
12003: x_msg_data := sqlcode||' '||sqlerrm;
12004:
12005: ROLLBACK TO sync_assct_task_wr_items_sp;
12006: x_return_status := fnd_api.g_ret_sts_unexp_error;
12007:
12008: FND_FILE.PUT_LINE(FND_FILE.LOG, x_msg_data);
12009: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12010: THEN
12076: BEGIN
12077: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
12078:
12079: errors := 0;
12080: l_return_status := FND_API.G_RET_STS_SUCCESS;
12081:
12082: open c_task_asg (p_processing_set_id);
12083:
12084: FETCH c_task_asg
12114: p_data => x_msg_data
12115: );
12116: END LOOP;
12117:
12118: x_return_status := fnd_api.g_ret_sts_error;
12119: RAISE fnd_api.g_exc_error;
12120: END;
12121:
12122: l_task_asg_rec.l_asg_id_list.DELETE;
12115: );
12116: END LOOP;
12117:
12118: x_return_status := fnd_api.g_ret_sts_error;
12119: RAISE fnd_api.g_exc_error;
12120: END;
12121:
12122: l_task_asg_rec.l_asg_id_list.DELETE;
12123: l_task_asg_rec.l_asg_task_id_list.DELETE;
12130: l_return_status := null;
12131:
12132: IEU_WR_PUB.SYNC_WR_ITEMS (
12133: p_api_version => 1.0,
12134: p_init_msg_list => FND_API.G_TRUE,
12135: p_commit => FND_API.G_FALSE,
12136: p_processing_set_id => P_PROCESSING_SET_ID,
12137: p_user_id => FND_GLOBAL.USER_ID,
12138: p_login_id => FND_GLOBAL.LOGIN_ID,
12131:
12132: IEU_WR_PUB.SYNC_WR_ITEMS (
12133: p_api_version => 1.0,
12134: p_init_msg_list => FND_API.G_TRUE,
12135: p_commit => FND_API.G_FALSE,
12136: p_processing_set_id => P_PROCESSING_SET_ID,
12137: p_user_id => FND_GLOBAL.USER_ID,
12138: p_login_id => FND_GLOBAL.LOGIN_ID,
12139: x_msg_count => l_msg_count,
12260: (
12261: p_count => x_msg_count,
12262: p_data => x_msg_data
12263: );
12264: RAISE fnd_api.g_exc_error;
12265: END;
12266:
12267: -- If the return status is Success or if the OUT param l_uwqm_workitem_data
12268: -- has values. Then retrieve the first row and get the incident_id
12303:
12304: -- insert into p_Temp(msg) values (x_workitem_pk_id||' '||x_workitem_obj_code||' '||x_source_obj_id||' '||x_source_obj_type_code);
12305: Exception
12306:
12307: WHEN fnd_api.g_exc_error THEN
12308: x_return_status := 'E';
12309: fnd_msg_pub.Count_and_Get
12310: (
12311: p_count => x_msg_count,
12311: p_count => x_msg_count,
12312: p_data => x_msg_data
12313: );
12314:
12315: WHEN fnd_api.g_exc_unexpected_error THEN
12316: x_return_status := 'U';
12317: fnd_msg_pub.Count_and_Get
12318: (
12319: p_count => x_msg_count,
12371: BEGIN
12372: l_audit_log_val := FND_PROFILE.VALUE('IEU_WR_DIST_AUDIT_LOG');
12373: l_token_str := '';
12374: l_not_valid_flag := 'N';
12375: L_MISS_NUM := FND_API.G_MISS_NUM;
12376:
12377: SAVEPOINT SYNC_WR_ITEM_STATUS_SP;
12378: x_return_status := fnd_api.g_ret_sts_success;
12379:
12374: l_not_valid_flag := 'N';
12375: L_MISS_NUM := FND_API.G_MISS_NUM;
12376:
12377: SAVEPOINT SYNC_WR_ITEM_STATUS_SP;
12378: x_return_status := fnd_api.g_ret_sts_success;
12379:
12380:
12381: -- Check for API Version
12382:
12379:
12380:
12381: -- Check for API Version
12382:
12383: IF NOT fnd_api.compatible_api_call (
12384: l_api_version,
12385: p_api_version,
12386: l_api_name,
12387: g_pkg_name
12386: l_api_name,
12387: g_pkg_name
12388: )
12389: THEN
12390: RAISE fnd_api.g_exc_unexpected_error;
12391: END IF;
12392:
12393:
12394: -- Initialize Message list
12392:
12393:
12394: -- Initialize Message list
12395:
12396: IF fnd_api.to_boolean(p_init_msg_list)
12397: THEN
12398: FND_MSG_PUB.INITIALIZE;
12399: END IF;
12400:
12418: p_count => x_msg_count,
12419: p_data => x_msg_data
12420: );
12421:
12422: RAISE fnd_api.g_exc_error;
12423:
12424: END IF;
12425:
12426: -- Get the Work_source_id
12451: p_count => x_msg_count,
12452: p_data => x_msg_data
12453: );
12454:
12455: RAISE fnd_api.g_exc_error;
12456:
12457: END;
12458:
12459: if (l_ws_type = 'PRIMARY')
12505: p_count => x_msg_count,
12506: p_data => x_msg_data
12507: );
12508:
12509: RAISE fnd_api.g_exc_error;
12510:
12511: END IF;
12512:
12513: elsif (l_ws_type = 'ASSOCIATION')
12536: p_count => x_msg_count,
12537: p_data => x_msg_data
12538: );
12539:
12540: RAISE fnd_api.g_exc_error;
12541:
12542: END;
12543:
12544: BEGIN
12565: p_count => x_msg_count,
12566: p_data => x_msg_data
12567: );
12568:
12569: RAISE fnd_api.g_exc_error;
12570:
12571: END;
12572:
12573: BEGIN
12594: p_count => x_msg_count,
12595: p_data => x_msg_data
12596: );
12597:
12598: RAISE fnd_api.g_exc_error;
12599:
12600: END;
12601:
12602: -- Validate object Code
12645: p_count => x_msg_count,
12646: p_data => x_msg_data
12647: );
12648:
12649: RAISE fnd_api.g_exc_error;
12650:
12651: END IF;
12652:
12653: end if;
12695: p_count => x_msg_count,
12696: p_data => x_msg_data
12697: );
12698:
12699: RAISE fnd_api.g_exc_error;
12700:
12701: END IF;
12702:
12703:
12700:
12701: END IF;
12702:
12703:
12704: x_return_status := fnd_api.g_ret_sts_success;
12705: l_wr_item_status_rec.WORKITEM_OBJ_CODE_LST.delete;
12706: l_wr_item_status_rec.WORKITEM_PK_ID_LST.delete;
12707: l_wr_item_status_rec.STATUS_ID_LIST.delete;
12708:
12748: p_data => x_msg_data
12749: );
12750: END LOOP;
12751:
12752: RAISE fnd_api.g_exc_error;
12753: END;
12754: END IF;
12755:
12756: l_wr_item_status_rec.WORKITEM_OBJ_CODE_LST.delete;
12756: l_wr_item_status_rec.WORKITEM_OBJ_CODE_LST.delete;
12757: l_wr_item_status_rec.WORKITEM_PK_ID_LST.delete;
12758: l_wr_item_status_rec.STATUS_ID_LIST.delete;
12759:
12760: IF FND_API.TO_BOOLEAN( p_commit ) THEN
12761: COMMIT WORK;
12762: END IF;
12763:
12764: EXCEPTION
12762: END IF;
12763:
12764: EXCEPTION
12765:
12766: WHEN fnd_api.g_exc_error THEN
12767:
12768: ROLLBACK TO SYNC_WR_ITEM_STATUS_SP;
12769: x_return_status := fnd_api.g_ret_sts_error;
12770:
12765:
12766: WHEN fnd_api.g_exc_error THEN
12767:
12768: ROLLBACK TO SYNC_WR_ITEM_STATUS_SP;
12769: x_return_status := fnd_api.g_ret_sts_error;
12770:
12771: fnd_msg_pub.Count_and_Get
12772: (
12773: p_count => x_msg_count,
12773: p_count => x_msg_count,
12774: p_data => x_msg_data
12775: );
12776:
12777: WHEN fnd_api.g_exc_unexpected_error THEN
12778:
12779: ROLLBACK TO SYNC_WR_ITEM_STATUS_SP;
12780: x_return_status := fnd_api.g_ret_sts_unexp_error;
12781:
12776:
12777: WHEN fnd_api.g_exc_unexpected_error THEN
12778:
12779: ROLLBACK TO SYNC_WR_ITEM_STATUS_SP;
12780: x_return_status := fnd_api.g_ret_sts_unexp_error;
12781:
12782: fnd_msg_pub.Count_and_Get
12783: (
12784: p_count => x_msg_count,
12788: WHEN OTHERS THEN
12789: x_msg_data := sqlcode||' '||sqlerrm;
12790:
12791: ROLLBACK TO SYNC_WR_ITEM_STATUS_SP;
12792: x_return_status := fnd_api.g_ret_sts_unexp_error;
12793:
12794: FND_FILE.PUT_LINE(FND_FILE.LOG, x_msg_data);
12795: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
12796: THEN
12851: l_not_valid_flag := 'N';
12852: l_array_size := 2000;
12853:
12854: SAVEPOINT UPDATE_WR_ITEM_STATUS_SP;
12855: x_return_status := fnd_api.g_ret_sts_success;
12856:
12857:
12858: -- Check for API Version
12859:
12856:
12857:
12858: -- Check for API Version
12859:
12860: IF NOT fnd_api.compatible_api_call (
12861: l_api_version,
12862: p_api_version,
12863: l_api_name,
12864: g_pkg_name
12863: l_api_name,
12864: g_pkg_name
12865: )
12866: THEN
12867: RAISE fnd_api.g_exc_unexpected_error;
12868: END IF;
12869:
12870:
12871: -- Initialize Message list
12869:
12870:
12871: -- Initialize Message list
12872:
12873: IF fnd_api.to_boolean(p_init_msg_list)
12874: THEN
12875: FND_MSG_PUB.INITIALIZE;
12876: END IF;
12877:
12904: p_count => x_msg_count,
12905: p_data => x_msg_data
12906: );
12907:
12908: RAISE fnd_api.g_exc_error;
12909:
12910: END;
12911:
12912:
12909:
12910: END;
12911:
12912:
12913: x_return_status := fnd_api.g_ret_sts_success;
12914: l_wr_item_status_rec.WORK_ITEM_ID_LIST.delete;
12915:
12916: open c_status (l_ws_id);
12917: loop
12953: p_data => x_msg_data
12954: );
12955: END LOOP;
12956:
12957: RAISE fnd_api.g_exc_error;
12958: END;
12959:
12960: IF FND_API.TO_BOOLEAN( p_commit ) THEN
12961: COMMIT WORK;
12956:
12957: RAISE fnd_api.g_exc_error;
12958: END;
12959:
12960: IF FND_API.TO_BOOLEAN( p_commit ) THEN
12961: COMMIT WORK;
12962: END IF;
12963:
12964: l_wr_item_status_rec.WORK_ITEM_ID_LIST.DELETE;
12970: close c_status;
12971:
12972: EXCEPTION
12973:
12974: WHEN fnd_api.g_exc_error THEN
12975:
12976: ROLLBACK TO UPDATE_WR_ITEM_STATUS_SP;
12977: x_return_status := fnd_api.g_ret_sts_error;
12978:
12973:
12974: WHEN fnd_api.g_exc_error THEN
12975:
12976: ROLLBACK TO UPDATE_WR_ITEM_STATUS_SP;
12977: x_return_status := fnd_api.g_ret_sts_error;
12978:
12979: fnd_msg_pub.Count_and_Get
12980: (
12981: p_count => x_msg_count,
12981: p_count => x_msg_count,
12982: p_data => x_msg_data
12983: );
12984:
12985: WHEN fnd_api.g_exc_unexpected_error THEN
12986:
12987: ROLLBACK TO UPDATE_WR_ITEM_STATUS_SP;
12988: x_return_status := fnd_api.g_ret_sts_unexp_error;
12989:
12984:
12985: WHEN fnd_api.g_exc_unexpected_error THEN
12986:
12987: ROLLBACK TO UPDATE_WR_ITEM_STATUS_SP;
12988: x_return_status := fnd_api.g_ret_sts_unexp_error;
12989:
12990: fnd_msg_pub.Count_and_Get
12991: (
12992: p_count => x_msg_count,
12996: WHEN OTHERS THEN
12997: x_msg_data := sqlcode||' '||sqlerrm;
12998:
12999: ROLLBACK TO UPDATE_WR_ITEM_STATUS_SP;
13000: x_return_status := fnd_api.g_ret_sts_unexp_error;
13001:
13002: FND_FILE.PUT_LINE(FND_FILE.LOG, x_msg_data);
13003: IF FND_MSG_PUB.Check_msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
13004: THEN