[Home] [Help]
73: p_msg_index_out =>l_msg_index_out
74: );
75:
76: -- ffang 042601, for bug 1751324, add 4 new columns
77: insert into as_lead_import_errors(
78: lead_import_error_id,
79: last_updated_by,
80: last_update_date ,
81: creation_date,
89: program_id,
90: program_update_date
91: )
92: values (
93: as_lead_import_errors_s.nextval,
94: nvl(FND_GLOBAL.User_id, -1),
95: sysdate,
96: sysdate,
97: nvl(FND_GLOBAL.User_id, -1),
109: --
110: if p_error_type in ('UNEXP','OTHER') then
111: l_msg_data := substr(SQLERRM,1,2000);
112: -- insert sqlerrm
113: insert into as_lead_import_errors(
114: lead_import_error_id,
115: last_updated_by,
116: last_update_date ,
117: creation_date,
125: program_id,
126: program_update_date
127: )
128: values (
129: as_lead_import_errors_s.nextval,
130: nvl(FND_GLOBAL.User_id, -1),
131: sysdate,
132: sysdate,
133: nvl(FND_GLOBAL.User_id, -1),
4819: /*** End Event Raise ***/
4820:
4821:
4822: -- ffang 082301, user use parameter p_purge_error_flag to decide if
4823: -- purge AS_LEAD_IMPORT_ERRORS
4824: IF p_purge_error_flag = 'Y' THEN
4825: OPEN c_get_schema_name('AS_LEAD_IMPORT_ERRORS');
4826: FETCH c_get_schema_name INTO l_owner;
4827: CLOSE c_get_schema_name;
4821:
4822: -- ffang 082301, user use parameter p_purge_error_flag to decide if
4823: -- purge AS_LEAD_IMPORT_ERRORS
4824: IF p_purge_error_flag = 'Y' THEN
4825: OPEN c_get_schema_name('AS_LEAD_IMPORT_ERRORS');
4826: FETCH c_get_schema_name INTO l_owner;
4827: CLOSE c_get_schema_name;
4828:
4829: EXECUTE IMMEDIATE 'TRUNCATE TABLE ' || l_owner
4826: FETCH c_get_schema_name INTO l_owner;
4827: CLOSE c_get_schema_name;
4828:
4829: EXECUTE IMMEDIATE 'TRUNCATE TABLE ' || l_owner
4830: || '.AS_LEAD_IMPORT_ERRORS';
4831: -- delete from AS_LEAD_IMPORT_ERRORS;
4832: END IF;
4833:
4834: --Get conc_request_id
4827: CLOSE c_get_schema_name;
4828:
4829: EXECUTE IMMEDIATE 'TRUNCATE TABLE ' || l_owner
4830: || '.AS_LEAD_IMPORT_ERRORS';
4831: -- delete from AS_LEAD_IMPORT_ERRORS;
4832: END IF;
4833:
4834: --Get conc_request_id
4835: l_request_id := nvl(FND_GLOBAL.conc_request_id, -1);