24: x_party c%rowtype;
25:
26: begin
27: select pa_project_parties_s.nextval into x_project_party_id
28: from dual;
29:
30: insert into PA_PROJECT_PARTIES (
31: PROJECT_PARTY_ID,
32: OBJECT_ID,
64: X_CREATED_BY,
65: sysdate,
66: X_LAST_UPDATED_BY,
67: X_LAST_UPDATE_LOGIN
68: from dual;
69:
70: open c;
71: fetch c into X_PARTY;
72: if (c%notfound) then