DBA Data[Home] [Help]

APPS.QA_PLANS_PUB dependencies on QA_PLANS

Line 1: PACKAGE BODY qa_plans_pub AS

1: PACKAGE BODY qa_plans_pub AS
2: /* $Header: qltpplnb.plb 120.9.12010000.2 2010/04/30 10:16:02 ntungare ship $ */
3:
4:
5: -- Start of comments

Line 6: -- API name : qa_plans_pub

2: /* $Header: qltpplnb.plb 120.9.12010000.2 2010/04/30 10:16:02 ntungare ship $ */
3:
4:
5: -- Start of comments
6: -- API name : qa_plans_pub
7: -- Type : Public
8: -- End of comments
9:
10:

Line 17: g_pkg_name CONSTANT VARCHAR2(30) := 'qa_plans_pub';

13:
14: -- global variables section
15:
16:
17: g_pkg_name CONSTANT VARCHAR2(30) := 'qa_plans_pub';
18: g_max_char_columns CONSTANT NUMBER := qltninrb.res_char_columns;
19:
20: --
21: -- Safe globals.

Line 169: RETURN nvl(qa_plans_api.plan_id(p_name), -1);

165: -- the plan ID, if not return -1.
166: --
167: BEGIN
168:
169: RETURN nvl(qa_plans_api.plan_id(p_name), -1);
170:
171: END plan_exists;
172:
173:

Line 1063: l_plan_name qa_plans.name%TYPE;

1059: p_to_org_id IN NUMBER,
1060: p_user_id IN NUMBER)
1061: RETURN NUMBER IS
1062:
1063: l_plan_name qa_plans.name%TYPE;
1064: l_plan_view qa_plans.view_name%TYPE;
1065: l_import_view qa_plans.import_view_name%TYPE;
1066: l_to_plan_id NUMBER;
1067:

Line 1064: l_plan_view qa_plans.view_name%TYPE;

1060: p_user_id IN NUMBER)
1061: RETURN NUMBER IS
1062:
1063: l_plan_name qa_plans.name%TYPE;
1064: l_plan_view qa_plans.view_name%TYPE;
1065: l_import_view qa_plans.import_view_name%TYPE;
1066: l_to_plan_id NUMBER;
1067:
1068: BEGIN

Line 1065: l_import_view qa_plans.import_view_name%TYPE;

1061: RETURN NUMBER IS
1062:
1063: l_plan_name qa_plans.name%TYPE;
1064: l_plan_view qa_plans.view_name%TYPE;
1065: l_import_view qa_plans.import_view_name%TYPE;
1066: l_to_plan_id NUMBER;
1067:
1068: BEGIN
1069:

Line 1078: -- Create a new plan header in qa_plans table.

1074: l_to_plan_id := plan_exists(l_plan_name);
1075:
1076: IF l_to_plan_id = -1 THEN
1077: --
1078: -- Create a new plan header in qa_plans table.
1079: --
1080: SELECT qa_plans_s.nextval INTO l_to_plan_id FROM dual;
1081:
1082: l_plan_view := get_plan_view_name(l_plan_name);

Line 1080: SELECT qa_plans_s.nextval INTO l_to_plan_id FROM dual;

1076: IF l_to_plan_id = -1 THEN
1077: --
1078: -- Create a new plan header in qa_plans table.
1079: --
1080: SELECT qa_plans_s.nextval INTO l_to_plan_id FROM dual;
1081:
1082: l_plan_view := get_plan_view_name(l_plan_name);
1083: l_import_view := get_import_view_name(l_plan_name);
1084:

Line 1105: INSERT INTO qa_plans(

1101: -- bug 9562325
1102: -- Added new parameters to set the DFF attributes
1103: -- on the plan header level
1104: --
1105: INSERT INTO qa_plans(
1106: plan_id,
1107: organization_id,
1108: last_update_date,
1109: last_updated_by,

Line 1177: FROM qa_plans

1173: attribute12,
1174: attribute13,
1175: attribute14,
1176: attribute15
1177: FROM qa_plans
1178: WHERE plan_id = p_from_plan_id;
1179:
1180: END IF;
1181:

Line 2533: DELETE FROM qa_plans

2529: PROCEDURE delete_plan_header(p_plan_id IN NUMBER) IS
2530:
2531: BEGIN
2532:
2533: DELETE FROM qa_plans
2534: WHERE plan_id = p_plan_id;
2535:
2536: END delete_plan_header;
2537:

Line 2633: p_spec_assignment_type IN NUMBER := qa_plans_pub.g_spec_type_none,

2629: p_plan_type IN VARCHAR2,
2630: p_description IN VARCHAR2 := NULL,
2631: p_effective_from IN DATE := sysdate,
2632: p_effective_to IN DATE := NULL,
2633: p_spec_assignment_type IN NUMBER := qa_plans_pub.g_spec_type_none,
2634: p_multirow_flag IN NUMBER := 2,
2635: x_plan_id OUT NOCOPY NUMBER,
2636: x_msg_count OUT NOCOPY NUMBER,
2637: x_msg_data OUT NOCOPY VARCHAR2,

Line 2662: l_plan_name qa_plans.name%TYPE;

2658:
2659: l_org_id NUMBER;
2660: l_user_id NUMBER;
2661: l_plan_type_code VARCHAR2(30);
2662: l_plan_name qa_plans.name%TYPE;
2663: l_plan_view qa_plans.view_name%TYPE;
2664: l_import_view qa_plans.import_view_name%TYPE;
2665:
2666: BEGIN

Line 2663: l_plan_view qa_plans.view_name%TYPE;

2659: l_org_id NUMBER;
2660: l_user_id NUMBER;
2661: l_plan_type_code VARCHAR2(30);
2662: l_plan_name qa_plans.name%TYPE;
2663: l_plan_view qa_plans.view_name%TYPE;
2664: l_import_view qa_plans.import_view_name%TYPE;
2665:
2666: BEGIN
2667:

Line 2664: l_import_view qa_plans.import_view_name%TYPE;

2660: l_user_id NUMBER;
2661: l_plan_type_code VARCHAR2(30);
2662: l_plan_name qa_plans.name%TYPE;
2663: l_plan_view qa_plans.view_name%TYPE;
2664: l_import_view qa_plans.import_view_name%TYPE;
2665:
2666: BEGIN
2667:
2668: -- Standard Start of API savepoint

Line 2710: l_org_id := qa_plans_api.get_org_id(p_organization_code);

2706: fnd_msg_pub.add();
2707: raise fnd_api.g_exc_error;
2708: END IF;
2709:
2710: l_org_id := qa_plans_api.get_org_id(p_organization_code);
2711: IF (l_org_id IS NULL) THEN
2712: fnd_message.set_name('QA', 'QA_API_INVALID_ORG_CODE');
2713: fnd_msg_pub.add();
2714: raise fnd_api.g_exc_error;

Line 2744: SELECT qa_plans_s.nextval INTO x_plan_id FROM dual;

2740:
2741: l_plan_view := get_plan_view_name(l_plan_name);
2742: l_import_view := get_import_view_name(l_plan_name);
2743:
2744: SELECT qa_plans_s.nextval INTO x_plan_id FROM dual;
2745:
2746: --
2747: -- bug 9562325
2748: -- Added new parameters to set the DFF attributes

Line 2751: INSERT INTO qa_plans(

2747: -- bug 9562325
2748: -- Added new parameters to set the DFF attributes
2749: -- on the plan header level
2750: --
2751: INSERT INTO qa_plans(
2752: plan_id,
2753: organization_id,
2754: last_update_date,
2755: last_updated_by,

Line 2966: l_plan_id := qa_plans_api.plan_id(upper(p_plan_name));

2962: fnd_msg_pub.add();
2963: raise fnd_api.g_exc_error;
2964: END IF;
2965:
2966: l_plan_id := qa_plans_api.plan_id(upper(p_plan_name));
2967: IF (l_plan_id IS NULL) THEN
2968: fnd_message.set_name('QA', 'QA_API_INVALID_PLAN');
2969: fnd_msg_pub.add();
2970: raise fnd_api.g_exc_error;

Line 3239: l_plan_name qa_plans.name%TYPE;

3235: l_api_version CONSTANT NUMBER := 1.0;
3236:
3237: l_user_id NUMBER;
3238: l_plan_id NUMBER;
3239: l_plan_name qa_plans.name%TYPE;
3240:
3241: BEGIN
3242:
3243: -- Standard Start of API savepoint

Line 3271: l_plan_id := qa_plans_api.plan_id(l_plan_name);

3267: raise fnd_api.g_exc_error;
3268: END IF;
3269:
3270: l_plan_name := upper(p_plan_name);
3271: l_plan_id := qa_plans_api.plan_id(l_plan_name);
3272: IF (l_plan_id IS NULL) THEN
3273: fnd_message.set_name('QA', 'QA_API_INVALID_PLAN');
3274: fnd_msg_pub.add();
3275: raise fnd_api.g_exc_error;

Line 3346: l_to_plan_name qa_plans.name%TYPE;

3342: l_api_version CONSTANT NUMBER := 1.0;
3343:
3344: l_user_id NUMBER;
3345: l_from_plan_id NUMBER;
3346: l_to_plan_name qa_plans.name%TYPE;
3347: l_to_org_id NUMBER;
3348:
3349: BEGIN
3350:

Line 3383: l_from_plan_id := qa_plans_api.plan_id(p_plan_name);

3379: -- An unusual case for copy plan. The template plans have
3380: -- mixed case, but all regular plans have upper case. So,
3381: -- try them both.
3382: --
3383: l_from_plan_id := qa_plans_api.plan_id(p_plan_name);
3384: IF (l_from_plan_id IS NULL) THEN
3385: l_from_plan_id := qa_plans_api.plan_id(upper(p_plan_name));
3386: IF (l_from_plan_id IS NULL) THEN
3387: fnd_message.set_name('QA', 'QA_API_INVALID_PLAN');

Line 3385: l_from_plan_id := qa_plans_api.plan_id(upper(p_plan_name));

3381: -- try them both.
3382: --
3383: l_from_plan_id := qa_plans_api.plan_id(p_plan_name);
3384: IF (l_from_plan_id IS NULL) THEN
3385: l_from_plan_id := qa_plans_api.plan_id(upper(p_plan_name));
3386: IF (l_from_plan_id IS NULL) THEN
3387: fnd_message.set_name('QA', 'QA_API_INVALID_PLAN');
3388: fnd_msg_pub.add();
3389: raise fnd_api.g_exc_error;

Line 3400: l_to_org_id := qa_plans_api.get_org_id(p_to_organization_code);

3396: fnd_msg_pub.add();
3397: raise fnd_api.g_exc_error;
3398: END IF;
3399:
3400: l_to_org_id := qa_plans_api.get_org_id(p_to_organization_code);
3401: IF (l_to_org_id IS NULL) THEN
3402: fnd_message.set_name('QA', 'QA_API_INVALID_ORG_CODE');
3403: fnd_msg_pub.add();
3404: raise fnd_api.g_exc_error;

Line 3505: l_plan_name qa_plans.name%TYPE;

3501: l_user_id NUMBER;
3502: l_plan_id NUMBER;
3503: l_element_id NUMBER;
3504: l_org_id NUMBER;
3505: l_plan_name qa_plans.name%TYPE;
3506:
3507:
3508: BEGIN
3509:

Line 3538: l_plan_id := qa_plans_api.plan_id(l_plan_name);

3534: raise fnd_api.g_exc_error;
3535: END IF;
3536:
3537: l_plan_name := upper(p_plan_name);
3538: l_plan_id := qa_plans_api.plan_id(l_plan_name);
3539: IF (l_plan_id IS NULL) THEN
3540: fnd_message.set_name('QA', 'QA_API_INVALID_PLAN');
3541: fnd_msg_pub.add();
3542: RAISE fnd_api.g_exc_error;

Line 3625: l_plan_name qa_plans.name%TYPE;

3621:
3622: l_user_id NUMBER;
3623: l_plan_id NUMBER;
3624: l_org_id NUMBER;
3625: l_plan_name qa_plans.name%TYPE;
3626:
3627: BEGIN
3628:
3629: -- Standard Start of API savepoint

Line 3658: l_plan_id := qa_plans_api.plan_id(l_plan_name);

3654: raise fnd_api.g_exc_error;
3655: END IF;
3656:
3657: l_plan_name := upper(p_plan_name);
3658: l_plan_id := qa_plans_api.plan_id(l_plan_name);
3659: IF l_plan_id IS NULL THEN
3660: fnd_message.set_name('QA', 'QA_API_INVALID_PLAN');
3661: fnd_msg_pub.add();
3662: raise fnd_api.g_exc_error;

Line 3736: END qa_plans_pub;

3732: RETURN ret_val;
3733:
3734: END get_plan_type;
3735:
3736: END qa_plans_pub;
3737: