50: )
51: IS
52: CURSOR c IS
53: SELECT ROWID
54: FROM pn_lease_milestones_all
55: WHERE lease_milestone_id = x_lease_milestone_id;
56:
57: CURSOR org_cur IS
58: SELECT org_id
82: FROM DUAL;
83:
84: END IF;
85:
86: INSERT INTO pn_lease_milestones_all
87: (
88: LEASE_CHANGE_ID,
89: MILESTONE_TYPE_CODE,
90: OPTION_ID,
210: )
211: IS
212: CURSOR c1 IS
213: SELECT *
214: FROM pn_lease_milestones_all
215: WHERE lease_milestone_id = x_lease_milestone_id
216: FOR UPDATE OF lease_milestone_id NOWAIT;
217:
218: tlinfo c1%ROWTYPE;
415: )
416: IS
417: BEGIN
418:
419: UPDATE pn_lease_milestones_all
420: SET LEASE_CHANGE_ID = X_LEASE_CHANGE_ID,
421: MILESTONE_TYPE_CODE = X_MILESTONE_TYPE_CODE,
422: OPTION_ID = X_OPTION_ID,
423: INSURANCE_REQUIREMENT_ID = X_INSURANCE_REQUIREMENT_ID,
471: )
472: IS
473: BEGIN
474:
475: DELETE FROM pn_lease_milestones_all
476: WHERE lease_milestone_id = x_lease_milestone_id;
477:
478: IF (SQL%NOTFOUND) THEN
479: RAISE NO_DATA_FOUND;