61: ) is
62:
63: cursor C is
64: select rowid
65: from OKE_K_FUND_ALLOCATIONS
66: where fund_allocation_id = X_fund_allocation_id;
67:
68: cursor c1 is
69: select major_version + 1
82: raise no_data_found;
83: end if;
84: close c1;
85:
86: insert into OKE_K_FUND_ALLOCATIONS(
87: fund_allocation_id,
88: funding_source_id,
89: object_id,
90: k_line_id,
310: pa_attribute7,
311: pa_attribute8,
312: pa_attribute9,
313: pa_attribute10
314: from OKE_K_FUND_ALLOCATIONS
315: where fund_allocation_id = X_Fund_Allocation_Id
316: for update of fund_allocation_id nowait;
317:
318: recinfo c%rowtype;
503: raise no_data_found;
504: end if;
505: close c1;
506:
507: update OKE_K_FUND_ALLOCATIONS
508: set
509: amount = X_Amount,
510: previous_amount = X_Previous_Amount,
511: k_line_id = X_K_Line_Id,
569: ) is
570:
571: begin
572:
573: DELETE FROM OKE_K_FUND_ALLOCATIONS
574: WHERE rowid = X_Rowid;
575:
576: if (SQL%NOTFOUND) then
577: Raise NO_DATA_FOUND;