[Home] [Help]
12: n number;
13: BEGIN
14: select count(*)
15: into n
16: from amw_control_objectives
17: where control_rev_id = P_CONTROL_REV_ID
18: and objective_code = P_OBJECTIVE_CODE;
19:
20: if n > 0 then
31: no varchar2(80);
32: BEGIN
33: select count(*)
34: into n
35: from amw_control_objectives
36: where control_rev_id = P_CONTROL_REV_ID
37: and objective_code = P_OBJECTIVE_CODE;
38:
39: select meaning
83: BEGIN
84: BEGIN
85: SELECT 'Y'
86: INTO N
87: FROM AMW_CONTROL_OBJECTIVES
88: WHERE CONTROL_REV_ID=P_CONTROL_REV_ID
89: AND OBJECTIVE_CODE IN (SELECT LOOKUP_CODE
90: FROM AMW_LOOKUPS
91: WHERE LOOKUP_TYPE='AMW_CONTROL_OBJECTIVES'
87: FROM AMW_CONTROL_OBJECTIVES
88: WHERE CONTROL_REV_ID=P_CONTROL_REV_ID
89: AND OBJECTIVE_CODE IN (SELECT LOOKUP_CODE
90: FROM AMW_LOOKUPS
91: WHERE LOOKUP_TYPE='AMW_CONTROL_OBJECTIVES'
92: AND TAG=P_TAG_NUM);
93: RETURN N;
94: EXCEPTION
95: WHEN NO_DATA_FOUND THEN
400: -- initialize return status to success
401: x_return_status := fnd_api.g_ret_sts_success;
402:
403:
404: delete from amw_control_objectives
405: where control_rev_id = p_control_rev_id
406: and objective_code = p_objective_code;
407:
408:
413: l_last_update_date := SYSDATE;
414: l_last_updated_by := FND_GLOBAL.USER_ID;
415: l_last_update_login := FND_GLOBAL.USER_ID;
416:
417: select amw_control_objectives_s.nextval into l_control_objective_id from dual;
418:
419: insert into amw_control_objectives (control_objective_id,
420: control_rev_id,
421: objective_code,
415: l_last_update_login := FND_GLOBAL.USER_ID;
416:
417: select amw_control_objectives_s.nextval into l_control_objective_id from dual;
418:
419: insert into amw_control_objectives (control_objective_id,
420: control_rev_id,
421: objective_code,
422: creation_date,
423: created_by,
775: end if;
776:
777: -- initialize return status to success
778: x_return_status := fnd_api.g_ret_sts_success;
779: delete from amw_control_objectives where control_rev_id = p_control_rev_id;
780:
781: /*
782: if (sql%notfound) then
783: raise no_data_found;