39: X_Org_ID NUMBER --
40: )
41: IS
42:
43: CURSOR C IS SELECT rowid FROM PO_QUOTATION_APPROVALS
44: WHERE quotation_approval_id = X_Quotation_Approval_ID;
45:
46: CURSOR C2 IS SELECT po_quotation_approvals_s.nextval FROM sys.dual;
47:
42:
43: CURSOR C IS SELECT rowid FROM PO_QUOTATION_APPROVALS
44: WHERE quotation_approval_id = X_Quotation_Approval_ID;
45:
46: CURSOR C2 IS SELECT po_quotation_approvals_s.nextval FROM sys.dual;
47:
48: BEGIN
49: if (X_Quotation_Approval_Id is NULL) then
50: OPEN C2;
52: CLOSE C2;
53: end if;
54:
55:
56: INSERT INTO PO_QUOTATION_APPROVALS(
57: quotation_approval_id,
58: approval_type,
59: approval_reason,
60: comments,
174:
175: IS
176: CURSOR C IS
177: SELECT *
178: FROM PO_QUOTATION_APPROVALS
179: WHERE rowid = X_Rowid
180: FOR UPDATE of QUOTATION_APPROVAL_ID NOWAIT;
181: Recinfo C%ROWTYPE;
182: BEGIN
323: IS
324:
325: BEGIN
326:
327: UPDATE PO_QUOTATION_APPROVALS
328:
329: SET
330: quotation_approval_id = X_Quotation_Approval_ID,
331: approval_type = X_Approval_Type,
368: END Update_Row;
369:
370: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
371: BEGIN
372: DELETE FROM PO_QUOTATION_APPROVALS
373: WHERE rowid = X_Rowid;
374:
375: if (SQL%NOTFOUND) then
376: Raise NO_DATA_FOUND;