1: PACKAGE BODY PO_LINES_PKG_SL as
2: /* $Header: POXPIL2B.pls 120.2 2005/06/27 04:45:46 sjadhav noship $ */
3:
4: PROCEDURE Lock_Row(X_Rowid VARCHAR2,
5: X_Po_Line_Id NUMBER,
118: --
119: ) IS
120: CURSOR C IS
121: SELECT *
122: FROM PO_LINES
123: WHERE rowid = X_Rowid
124: FOR UPDATE of Po_Line_Id NOWAIT;
125: Recinfo C%ROWTYPE;
126: BEGIN
465: end if;
466:
467: END Lock_Row;
468:
469: END PO_LINES_PKG_SL;