1: PACKAGE BODY PO_REQUISITION_HEADERS_PKG1 as
2: /* $Header: POXRIH2B.pls 120.1 2005/06/02 06:47:29 appldev $ */
3:
4: /**************************************************************************/
5:
53: ) IS
54:
55: CURSOR C IS
56: SELECT *
57: FROM PO_REQUISITION_HEADERS
58: WHERE rowid = X_Rowid
59: FOR UPDATE of Requisition_Header_Id NOWAIT;
60: Recinfo C%ROWTYPE;
61: BEGIN
199: APP_EXCEPTION.RAISE_EXCEPTION;
200: end if;
201: END Lock_Row;
202:
203: END PO_REQUISITION_HEADERS_PKG1;