305:
306: --this would get the messages on the error stack set by
307: --the rule function and add to the api error stack
308:
309: l_mesg_text := fnd_message.get();
310:
311: FND_MSG_PUB.Add_Exc_Msg
312: ( G_PKG_NAME ,
313: l_api_name ,
364: x_return_status := FND_API.G_RET_STS_ERROR;
365: x_event.event_status := EDR_CONSTANTS_GRP.g_error_status;
366: x_event.erecord_id := null;
367:
368: l_mesg_text := fnd_message.get_string('EDR','EDR_EVENT_RAISE_ERROR');
369:
370: FND_MSG_PUB.Add_Exc_Msg
371: ( G_PKG_NAME ,
372: l_api_name ,
393: --This exception would be thrown when the parent e-record ID is invalid.
394: WHEN PARENT_ERECORD_ID_ERROR THEN
395: x_return_status := FND_API.G_RET_STS_ERROR ;
396:
397: fnd_message.set_name('EDR','EDR_VAL_INVALID_PARENT_ID');
398: fnd_message.set_token('ERECORD_ID', l_parent_erecord_id);
399: fnd_message.set_token('EVENT_NAME', x_event.event_name);
400: fnd_message.set_token('EVENT_KEY', x_event.event_key);
401: l_mesg_text := fnd_message.get();
394: WHEN PARENT_ERECORD_ID_ERROR THEN
395: x_return_status := FND_API.G_RET_STS_ERROR ;
396:
397: fnd_message.set_name('EDR','EDR_VAL_INVALID_PARENT_ID');
398: fnd_message.set_token('ERECORD_ID', l_parent_erecord_id);
399: fnd_message.set_token('EVENT_NAME', x_event.event_name);
400: fnd_message.set_token('EVENT_KEY', x_event.event_key);
401: l_mesg_text := fnd_message.get();
402: FND_MSG_PUB.Add_Exc_Msg
395: x_return_status := FND_API.G_RET_STS_ERROR ;
396:
397: fnd_message.set_name('EDR','EDR_VAL_INVALID_PARENT_ID');
398: fnd_message.set_token('ERECORD_ID', l_parent_erecord_id);
399: fnd_message.set_token('EVENT_NAME', x_event.event_name);
400: fnd_message.set_token('EVENT_KEY', x_event.event_key);
401: l_mesg_text := fnd_message.get();
402: FND_MSG_PUB.Add_Exc_Msg
403: (G_PKG_NAME,
396:
397: fnd_message.set_name('EDR','EDR_VAL_INVALID_PARENT_ID');
398: fnd_message.set_token('ERECORD_ID', l_parent_erecord_id);
399: fnd_message.set_token('EVENT_NAME', x_event.event_name);
400: fnd_message.set_token('EVENT_KEY', x_event.event_key);
401: l_mesg_text := fnd_message.get();
402: FND_MSG_PUB.Add_Exc_Msg
403: (G_PKG_NAME,
404: l_api_name,
397: fnd_message.set_name('EDR','EDR_VAL_INVALID_PARENT_ID');
398: fnd_message.set_token('ERECORD_ID', l_parent_erecord_id);
399: fnd_message.set_token('EVENT_NAME', x_event.event_name);
400: fnd_message.set_token('EVENT_KEY', x_event.event_key);
401: l_mesg_text := fnd_message.get();
402: FND_MSG_PUB.Add_Exc_Msg
403: (G_PKG_NAME,
404: l_api_name,
405: l_mesg_text
782: p_data => x_msg_data
783: );
784: WHEN MULTIPLE_ERES_SUBSCRIPTIONS THEN
785: x_return_status := FND_API.G_RET_STS_ERROR;
786: FND_MESSAGE.SET_NAME('EDR','EDR_MULTI_ERES_SUBSCRP_ERR');
787: fnd_message.set_token( 'EVENT', p_event_NAME);
788: fnd_msg_pub.Add;
789: -- this would pass on the validation errors to the calling
790: -- routine
783: );
784: WHEN MULTIPLE_ERES_SUBSCRIPTIONS THEN
785: x_return_status := FND_API.G_RET_STS_ERROR;
786: FND_MESSAGE.SET_NAME('EDR','EDR_MULTI_ERES_SUBSCRP_ERR');
787: fnd_message.set_token( 'EVENT', p_event_NAME);
788: fnd_msg_pub.Add;
789: -- this would pass on the validation errors to the calling
790: -- routine
791: FND_MSG_PUB.Count_And_Get
921: ) and params.parent_type = 'ERESMANAGER';
922: --Bug 3893101: End
923:
924: delete from EDR_ERESMANAGER_T where CREATION_DATE <= L_TEMP_DATE;
925: fnd_message.set_name('EDR', 'EDR_TEMP_ERESMANAGER_CLEANUP');
926: fnd_message.set_token( 'CLN_ERESMANAGER', SQL%ROWCOUNT);
927: fnd_file.put_line(fnd_file.output, fnd_message.get);
928:
929: delete from EDR_PROCESS_ERECORDS_T where CREATION_DATE <= L_TEMP_DATE;
922: --Bug 3893101: End
923:
924: delete from EDR_ERESMANAGER_T where CREATION_DATE <= L_TEMP_DATE;
925: fnd_message.set_name('EDR', 'EDR_TEMP_ERESMANAGER_CLEANUP');
926: fnd_message.set_token( 'CLN_ERESMANAGER', SQL%ROWCOUNT);
927: fnd_file.put_line(fnd_file.output, fnd_message.get);
928:
929: delete from EDR_PROCESS_ERECORDS_T where CREATION_DATE <= L_TEMP_DATE;
930: fnd_message.set_name('EDR', 'EDR_TEMP_ERECORDS_CLEANUP');
923:
924: delete from EDR_ERESMANAGER_T where CREATION_DATE <= L_TEMP_DATE;
925: fnd_message.set_name('EDR', 'EDR_TEMP_ERESMANAGER_CLEANUP');
926: fnd_message.set_token( 'CLN_ERESMANAGER', SQL%ROWCOUNT);
927: fnd_file.put_line(fnd_file.output, fnd_message.get);
928:
929: delete from EDR_PROCESS_ERECORDS_T where CREATION_DATE <= L_TEMP_DATE;
930: fnd_message.set_name('EDR', 'EDR_TEMP_ERECORDS_CLEANUP');
931: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
926: fnd_message.set_token( 'CLN_ERESMANAGER', SQL%ROWCOUNT);
927: fnd_file.put_line(fnd_file.output, fnd_message.get);
928:
929: delete from EDR_PROCESS_ERECORDS_T where CREATION_DATE <= L_TEMP_DATE;
930: fnd_message.set_name('EDR', 'EDR_TEMP_ERECORDS_CLEANUP');
931: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
932: fnd_file.put_line(fnd_file.output, fnd_message.get);
933:
934: --Bug 3621309 : Start
927: fnd_file.put_line(fnd_file.output, fnd_message.get);
928:
929: delete from EDR_PROCESS_ERECORDS_T where CREATION_DATE <= L_TEMP_DATE;
930: fnd_message.set_name('EDR', 'EDR_TEMP_ERECORDS_CLEANUP');
931: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
932: fnd_file.put_line(fnd_file.output, fnd_message.get);
933:
934: --Bug 3621309 : Start
935: delete from EDR_RAW_XML_T where CREATION_DATE <= L_TEMP_DATE;
928:
929: delete from EDR_PROCESS_ERECORDS_T where CREATION_DATE <= L_TEMP_DATE;
930: fnd_message.set_name('EDR', 'EDR_TEMP_ERECORDS_CLEANUP');
931: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
932: fnd_file.put_line(fnd_file.output, fnd_message.get);
933:
934: --Bug 3621309 : Start
935: delete from EDR_RAW_XML_T where CREATION_DATE <= L_TEMP_DATE;
936: fnd_message.set_name('EDR', 'EDR_VALIDATE_TEMP_DATA_CLEANUP');
932: fnd_file.put_line(fnd_file.output, fnd_message.get);
933:
934: --Bug 3621309 : Start
935: delete from EDR_RAW_XML_T where CREATION_DATE <= L_TEMP_DATE;
936: fnd_message.set_name('EDR', 'EDR_VALIDATE_TEMP_DATA_CLEANUP');
937: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
938: fnd_file.put_line(fnd_file.output, fnd_message.get);
939: --Bug 3621309 : End
940:
933:
934: --Bug 3621309 : Start
935: delete from EDR_RAW_XML_T where CREATION_DATE <= L_TEMP_DATE;
936: fnd_message.set_name('EDR', 'EDR_VALIDATE_TEMP_DATA_CLEANUP');
937: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
938: fnd_file.put_line(fnd_file.output, fnd_message.get);
939: --Bug 3621309 : End
940:
941: end if;
934: --Bug 3621309 : Start
935: delete from EDR_RAW_XML_T where CREATION_DATE <= L_TEMP_DATE;
936: fnd_message.set_name('EDR', 'EDR_VALIDATE_TEMP_DATA_CLEANUP');
937: fnd_message.set_token( 'CLN_ERECORDS', SQL%ROWCOUNT);
938: fnd_file.put_line(fnd_file.output, fnd_message.get);
939: --Bug 3621309 : End
940:
941: end if;
942: end if;
943:
944: exception
945:
946: when VALUE_ERROR then
947: fnd_file.put_line(fnd_file.output, fnd_message.get_string('EDR', 'EDR_INVALID_PROFILE_VALUE'));
948:
949: END DELETE_ERECORDS;
950:
951: --Bug 3667036: End