1: PACKAGE BODY CE_HEADER_INTERFACE_ERRORS_PKG as
2: /* $Header: cehinteb.pls 120.0 2002/08/24 02:36:36 appldev noship $ */
3:
4: FUNCTION body_revision RETURN VARCHAR2 IS
5: BEGIN
18: PROCEDURE Insert_Row( X_statement_number VARCHAR2,
19: X_bank_account_num VARCHAR2,
20: X_message_name VARCHAR2) IS
21: BEGIN
22: INSERT INTO CE_HEADER_INTERFACE_ERRORS(
23: application_short_name,
24: statement_number,
25: bank_account_num,
26: message_name,
38: X_bank_account_num VARCHAR2,
39: X_message_name VARCHAR2,
40: x_application_short_name VARCHAR2) IS
41: BEGIN
42: INSERT INTO CE_HEADER_INTERFACE_ERRORS(
43: application_short_name,
44: statement_number,
45: bank_account_num,
46: message_name,
56:
57: PROCEDURE Delete_Row(X_statement_number VARCHAR2,
58: X_bank_account_num VARCHAR2) IS
59: BEGIN
60: DELETE FROM CE_HEADER_INTERFACE_ERRORS
61: WHERE statement_number = X_statement_number AND
62: ((bank_account_num = X_bank_account_num) OR
63: (bank_account_num = 'NONE'));
64: END Delete_Row;
62: ((bank_account_num = X_bank_account_num) OR
63: (bank_account_num = 'NONE'));
64: END Delete_Row;
65:
66: END CE_HEADER_INTERFACE_ERRORS_PKG;