1 PACKAGE BODY RCV_TRX_INTERFACE_DELETE_PKG as
2 /* $Header: RCVTIR4B.pls 120.9 2011/11/04 13:03:52 sadibhat ship $ */
3
4 PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
5 BEGIN
6 DELETE FROM RCV_TRANSACTIONS_INTERFACE
7 WHERE rowid = X_Rowid;
8
9 if (SQL%NOTFOUND) then
10 Raise NO_DATA_FOUND;
11 end if;
12 END Delete_Row;
13
14 END RCV_TRX_INTERFACE_DELETE_PKG;