PACKAGE BODY: APPS.CE_SQLLDR_ERRORS_PKG

Source

1 PACKAGE BODY CE_SQLLDR_ERRORS_PKG AS
2 /* $Header: ceslerrb.pls 120.0 2002/08/24 02:37:45 appldev noship $ */
3 PROCEDURE Insert_Row(   X_statement_number	VARCHAR2,
4 			X_bank_account_num	VARCHAR2,
5 			X_rec_no		NUMBER,
6 			X_message_text	        VARCHAR2,
7 			X_status		VARCHAR2 DEFAULT 'W') IS
8    BEGIN
9      INSERT INTO CE_SQLLDR_ERRORS(
10                 statement_number,
11 		bank_account_num,
12 		rec_no,
13 		message_text,
14 		status,
15 		creation_date,
16 		created_by)
17               VALUES (
18 		X_statement_number,
19 		X_bank_account_num,
20 		X_rec_no,
21 		X_message_text,
22 		X_status,
23 		sysdate,
24 		NVL(FND_GLOBAL.user_id,-1));
25   END Insert_Row;
26 
27   PROCEDURE Delete_Row IS
28   BEGIN
29     DELETE FROM CE_SQLLDR_ERRORS;
30   END Delete_Row;
31 
32 
33 END CE_SQLLDR_ERRORS_PKG;