36: open global; fetch global into global_rec; close global;
37: if global_rec.application_id is null or
38: global_rec.responsibility_id is null or
39: global_rec.last_updated_by is null then
40: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_SBJ');
41: l_subject := fnd_message.get;
42: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_BODY');
43: fnd_message.set_token('P_ID', p_id);
44: l_sqlerrm := fnd_message.get;
37: if global_rec.application_id is null or
38: global_rec.responsibility_id is null or
39: global_rec.last_updated_by is null then
40: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_SBJ');
41: l_subject := fnd_message.get;
42: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_BODY');
43: fnd_message.set_token('P_ID', p_id);
44: l_sqlerrm := fnd_message.get;
45: ar_notification_standard.notifyToSysadmin(l_subject, l_sqlerrm);
38: global_rec.responsibility_id is null or
39: global_rec.last_updated_by is null then
40: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_SBJ');
41: l_subject := fnd_message.get;
42: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_BODY');
43: fnd_message.set_token('P_ID', p_id);
44: l_sqlerrm := fnd_message.get;
45: ar_notification_standard.notifyToSysadmin(l_subject, l_sqlerrm);
46: return;
39: global_rec.last_updated_by is null then
40: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_SBJ');
41: l_subject := fnd_message.get;
42: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_BODY');
43: fnd_message.set_token('P_ID', p_id);
44: l_sqlerrm := fnd_message.get;
45: ar_notification_standard.notifyToSysadmin(l_subject, l_sqlerrm);
46: return;
47: else
40: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_SBJ');
41: l_subject := fnd_message.get;
42: fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_BODY');
43: fnd_message.set_token('P_ID', p_id);
44: l_sqlerrm := fnd_message.get;
45: ar_notification_standard.notifyToSysadmin(l_subject, l_sqlerrm);
46: return;
47: else
48: fnd_global.initialize(l_sid, global_rec.last_updated_by, global_rec.responsibility_id,
91: p_parameters => l_parameter_list);
92: l_parameter_list.DELETE;
93:
94: else
95: fnd_message.set_name('AR', 'AR_CONF_INVALID_SBJ');
96: l_subject := fnd_message.get;
97: fnd_message.set_name('AR', 'AR_CONF_INVALID');
98: fnd_message.set_token('STATUS', p_status);
99: fnd_message.set_token('REASON_CODE', p_reason_code);
92: l_parameter_list.DELETE;
93:
94: else
95: fnd_message.set_name('AR', 'AR_CONF_INVALID_SBJ');
96: l_subject := fnd_message.get;
97: fnd_message.set_name('AR', 'AR_CONF_INVALID');
98: fnd_message.set_token('STATUS', p_status);
99: fnd_message.set_token('REASON_CODE', p_reason_code);
100: l_sqlerrm := fnd_message.get;
93:
94: else
95: fnd_message.set_name('AR', 'AR_CONF_INVALID_SBJ');
96: l_subject := fnd_message.get;
97: fnd_message.set_name('AR', 'AR_CONF_INVALID');
98: fnd_message.set_token('STATUS', p_status);
99: fnd_message.set_token('REASON_CODE', p_reason_code);
100: l_sqlerrm := fnd_message.get;
101:
94: else
95: fnd_message.set_name('AR', 'AR_CONF_INVALID_SBJ');
96: l_subject := fnd_message.get;
97: fnd_message.set_name('AR', 'AR_CONF_INVALID');
98: fnd_message.set_token('STATUS', p_status);
99: fnd_message.set_token('REASON_CODE', p_reason_code);
100: l_sqlerrm := fnd_message.get;
101:
102: l_url := 'JSP:/OA_HTML/OA.jsp?akRegionCode=CONFIRMATIONACTIONS_PG'||'&'||
95: fnd_message.set_name('AR', 'AR_CONF_INVALID_SBJ');
96: l_subject := fnd_message.get;
97: fnd_message.set_name('AR', 'AR_CONF_INVALID');
98: fnd_message.set_token('STATUS', p_status);
99: fnd_message.set_token('REASON_CODE', p_reason_code);
100: l_sqlerrm := fnd_message.get;
101:
102: l_url := 'JSP:/OA_HTML/OA.jsp?akRegionCode=CONFIRMATIONACTIONS_PG'||'&'||
103: 'akRegionApplicationId=222';
96: l_subject := fnd_message.get;
97: fnd_message.set_name('AR', 'AR_CONF_INVALID');
98: fnd_message.set_token('STATUS', p_status);
99: fnd_message.set_token('REASON_CODE', p_reason_code);
100: l_sqlerrm := fnd_message.get;
101:
102: l_url := 'JSP:/OA_HTML/OA.jsp?akRegionCode=CONFIRMATIONACTIONS_PG'||'&'||
103: 'akRegionApplicationId=222';
104: for ar_rec in ar loop
113: when others then
114: l_sqlerrm := sqlerrm || fnd_global.newline||
115: 'Location: AR_CONFIRMATION.initiate_confirmation_process()'||fnd_global.newline||
116: 'Time: '||to_char(sysdate, 'DD-MON-RRRR HH:MI:SS');
117: fnd_message.set_name('AR','AR_CONF_ERROR');
118: l_subject := fnd_message.get;
119: ar_notification_standard.notifyToSysadmin(l_subject, l_sqlerrm);
120: end;
121: end;
114: l_sqlerrm := sqlerrm || fnd_global.newline||
115: 'Location: AR_CONFIRMATION.initiate_confirmation_process()'||fnd_global.newline||
116: 'Time: '||to_char(sysdate, 'DD-MON-RRRR HH:MI:SS');
117: fnd_message.set_name('AR','AR_CONF_ERROR');
118: l_subject := fnd_message.get;
119: ar_notification_standard.notifyToSysadmin(l_subject, l_sqlerrm);
120: end;
121: end;