DBA Data[Home] [Help]

APPS.GMD_API_GRP dependencies on GMD_API_GRP

Line 1: PACKAGE BODY gmd_api_grp AS

1: PACKAGE BODY gmd_api_grp AS
2: /* $Header: GMDGAPIB.pls 120.35.12020000.3 2012/09/29 09:19:46 yanpewan ship $ */
3:
4:
5: l_package_name CONSTANT VARCHAR2 (30) := 'GMD_API_GRP';

Line 5: l_package_name CONSTANT VARCHAR2 (30) := 'GMD_API_GRP';

1: PACKAGE BODY gmd_api_grp AS
2: /* $Header: GMDGAPIB.pls 120.35.12020000.3 2012/09/29 09:19:46 yanpewan ship $ */
3:
4:
5: l_package_name CONSTANT VARCHAR2 (30) := 'GMD_API_GRP';
6: l_resp_id NUMBER := FND_PROFILE.VALUE('RESP_ID');
7: --Bug 3222090, NSRIVAST 20-FEB-2004, BEGIN
8: --Forward declaration.
9: FUNCTION set_debug_flag RETURN VARCHAR2;

Line 60: gmd_debug.put_line ('GMD_API_GRP.log_message: When others exception: '||SQLERRM);

56:
57: fnd_msg_pub.ADD;
58: EXCEPTION
59: WHEN OTHERS THEN
60: gmd_debug.put_line ('GMD_API_GRP.log_message: When others exception: '||SQLERRM);
61: END log_message;
62:
63: /*======================================================================
64: -- PROCEDURE :

Line 80: gmd_api_grp.login_id := TO_NUMBER (fnd_profile.VALUE ('LOGIN_ID'));

76: FUNCTION setup
77: RETURN BOOLEAN IS
78: missing_profile_option EXCEPTION;
79: BEGIN
80: gmd_api_grp.login_id := TO_NUMBER (fnd_profile.VALUE ('LOGIN_ID'));
81: gmd_api_grp.user_id := TO_NUMBER (fnd_profile.VALUE ('USER_ID'));
82: gmd_api_grp.resp_id := TO_NUMBER (fnd_profile.VALUE ('RESP_ID'));
83: /*bug 14108934, change nvl value to -1 instead of 0, 0 is the userid of seeded login SYSADMIN*/
84: IF NVL (gmd_api_grp.user_id, -1) = -1 THEN

Line 81: gmd_api_grp.user_id := TO_NUMBER (fnd_profile.VALUE ('USER_ID'));

77: RETURN BOOLEAN IS
78: missing_profile_option EXCEPTION;
79: BEGIN
80: gmd_api_grp.login_id := TO_NUMBER (fnd_profile.VALUE ('LOGIN_ID'));
81: gmd_api_grp.user_id := TO_NUMBER (fnd_profile.VALUE ('USER_ID'));
82: gmd_api_grp.resp_id := TO_NUMBER (fnd_profile.VALUE ('RESP_ID'));
83: /*bug 14108934, change nvl value to -1 instead of 0, 0 is the userid of seeded login SYSADMIN*/
84: IF NVL (gmd_api_grp.user_id, -1) = -1 THEN
85: log_message (

Line 82: gmd_api_grp.resp_id := TO_NUMBER (fnd_profile.VALUE ('RESP_ID'));

78: missing_profile_option EXCEPTION;
79: BEGIN
80: gmd_api_grp.login_id := TO_NUMBER (fnd_profile.VALUE ('LOGIN_ID'));
81: gmd_api_grp.user_id := TO_NUMBER (fnd_profile.VALUE ('USER_ID'));
82: gmd_api_grp.resp_id := TO_NUMBER (fnd_profile.VALUE ('RESP_ID'));
83: /*bug 14108934, change nvl value to -1 instead of 0, 0 is the userid of seeded login SYSADMIN*/
84: IF NVL (gmd_api_grp.user_id, -1) = -1 THEN
85: log_message (
86: 'GMD_API_INVALID_USER_ID'

Line 84: IF NVL (gmd_api_grp.user_id, -1) = -1 THEN

80: gmd_api_grp.login_id := TO_NUMBER (fnd_profile.VALUE ('LOGIN_ID'));
81: gmd_api_grp.user_id := TO_NUMBER (fnd_profile.VALUE ('USER_ID'));
82: gmd_api_grp.resp_id := TO_NUMBER (fnd_profile.VALUE ('RESP_ID'));
83: /*bug 14108934, change nvl value to -1 instead of 0, 0 is the userid of seeded login SYSADMIN*/
84: IF NVL (gmd_api_grp.user_id, -1) = -1 THEN
85: log_message (
86: 'GMD_API_INVALID_USER_ID'
87: ,'USER_ID'
88: ,gmd_api_grp.user_id);

Line 88: ,gmd_api_grp.user_id);

84: IF NVL (gmd_api_grp.user_id, -1) = -1 THEN
85: log_message (
86: 'GMD_API_INVALID_USER_ID'
87: ,'USER_ID'
88: ,gmd_api_grp.user_id);
89: RAISE missing_profile_option;
90: END IF;
91:
92: RETURN TRUE;

Line 312: gmd_api_grp.log_message (

308: END IF; /* IF p_field_name = pkg_context_column_name */
309: EXCEPTION
310: WHEN flex_not_enabled THEN
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: gmd_api_grp.log_message (
313: 'GMD_FLEX_NOT_ENABLED'
314: ,'FLEX_NAME'
315: ,p_flex_field_name);
316: WHEN context_value_required THEN

Line 317: gmd_api_grp.log_message (

313: 'GMD_FLEX_NOT_ENABLED'
314: ,'FLEX_NAME'
315: ,p_flex_field_name);
316: WHEN context_value_required THEN
317: gmd_api_grp.log_message (
318: 'GMD_CONTEXT_VALUE_REQD'
319: ,'CONTEXT_NAME'
320: ,pkg_context_column_name);
321: x_return_status := FND_API.G_RET_STS_ERROR;

Line 323: gmd_api_grp.log_message (

319: ,'CONTEXT_NAME'
320: ,pkg_context_column_name);
321: x_return_status := FND_API.G_RET_STS_ERROR;
322: WHEN context_not_existing THEN
323: gmd_api_grp.log_message (
324: 'GMD_NON_EXISTING_CONTEXT'
325: ,'CONTEXT_VALUE'
326: ,p_field_value);
327: x_return_status := FND_API.G_RET_STS_ERROR;

Line 330: gmd_api_grp.log_message (

326: ,p_field_value);
327: x_return_status := FND_API.G_RET_STS_ERROR;
328: WHEN column_not_defined THEN
329: x_return_status := FND_API.G_RET_STS_ERROR;
330: gmd_api_grp.log_message (
331: 'GMD_FLEX_COL_NOT_DEF'
332: ,'FLEX_NAME'
333: ,p_flex_field_name
334: ,'COLUMN_NAME'

Line 338: gmd_api_grp.log_message (

334: ,'COLUMN_NAME'
335: ,p_field_name);
336: WHEN field_value_required THEN
337: x_return_status := FND_API.G_RET_STS_ERROR;
338: gmd_api_grp.log_message (
339: 'GMD_FIELD_VALUE_REQUIRED'
340: ,'FIELD_NAME'
341: ,p_field_name);
342: WHEN validation_failure THEN

Line 357: p_flex_record IN gmd_api_grp.flex,

353: *************************************************************/
354:
355: PROCEDURE validate_flex_field (
356: p_table_name IN VARCHAR2 ,
357: p_flex_record IN gmd_api_grp.flex,
358: p_field_name IN VARCHAR2 ,
359: x_flex_record IN OUT NOCOPY gmd_api_grp.flex,
360: x_return_status OUT NOCOPY VARCHAR2
361: ) IS

Line 359: x_flex_record IN OUT NOCOPY gmd_api_grp.flex,

355: PROCEDURE validate_flex_field (
356: p_table_name IN VARCHAR2 ,
357: p_flex_record IN gmd_api_grp.flex,
358: p_field_name IN VARCHAR2 ,
359: x_flex_record IN OUT NOCOPY gmd_api_grp.flex,
360: x_return_status OUT NOCOPY VARCHAR2
361: ) IS
362: l_field_value VARCHAR2 (240);
363: l_storage_value VARCHAR2 (240);

Line 440: gmd_api_grp.validate_flex_field (

436: RAISE flexfield_not_found_exception;
437: END IF;
438: CLOSE get_desc_flex_name;
439:
440: gmd_api_grp.validate_flex_field (
441: p_application_short_name => l_appl_name,
442: p_flex_field_name => l_flex_name,
443: p_field_name => p_field_name,
444: p_field_value => l_field_value,

Line 538: p_flex_record IN gmd_api_grp.flex,

534: *************************************************************/
535:
536: PROCEDURE validate_flex (
537: p_table_name IN VARCHAR2 ,
538: p_flex_record IN gmd_api_grp.flex,
539: x_flex_record IN OUT NOCOPY gmd_api_grp.flex,
540: x_return_status OUT NOCOPY VARCHAR2
541: ) IS
542: validation_failure EXCEPTION;

Line 539: x_flex_record IN OUT NOCOPY gmd_api_grp.flex,

535:
536: PROCEDURE validate_flex (
537: p_table_name IN VARCHAR2 ,
538: p_flex_record IN gmd_api_grp.flex,
539: x_flex_record IN OUT NOCOPY gmd_api_grp.flex,
540: x_return_status OUT NOCOPY VARCHAR2
541: ) IS
542: validation_failure EXCEPTION;
543: BEGIN

Line 604: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN

600: WHERE a.formula_id = Entity_id
601: AND a.owner_organization_id = b.organization_id;
602:
603: /* Check if user has access to this formula orgn */
604: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN
605: FND_MESSAGE.SET_NAME('GMD','GMD_FORMULA_NOT_UPDATEABLE');
606: FND_MESSAGE.SET_TOKEN('RESP_NAME',l_resp_name);
607: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_Owner_orgn_code);
608: FND_MSG_PUB.ADD;

Line 620: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN

616: WHERE recipe_id = Entity_id
617: AND a.owner_organization_id = b.organization_id;
618:
619: /* Check if user has access to this Recipe orgn */
620: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN
621: FND_MESSAGE.SET_NAME('GMD','GMD_RECIPE_NOT_UPDATEABLE');
622: FND_MESSAGE.SET_TOKEN('RESP_NAME',l_resp_name);
623: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_Owner_orgn_code);
624: FND_MSG_PUB.ADD;

Line 639: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN

635:
636: -- Check if user has access to this Recipe orgn
637: IF (l_owner_orgn_code IS NOT NULL) THEN
638: /* Check if user resp has access to this VR orgn */
639: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN
640: FND_MESSAGE.SET_NAME('GMD','GMD_RECIPE_NOT_UPDATEABLE');
641: FND_MESSAGE.SET_TOKEN('RESP_NAME',l_resp_name);
642: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_Owner_orgn_code);
643: FND_MSG_PUB.ADD;

Line 658: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN

654: WHERE a.routing_id = Entity_id
655: AND a.owner_organization_id = b.organization_id;
656:
657: /* Check if user has access to this formula orgn */
658: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN
659: FND_MESSAGE.SET_NAME('GMD','GMD_ROUTING_NOT_UPDATEABLE');
660: FND_MESSAGE.SET_TOKEN('RESP_NAME',l_resp_name);
661: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_Owner_orgn_code);
662: FND_MSG_PUB.ADD;

Line 673: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN

669: WHERE a.oprn_id = Entity_id
670: AND a.owner_organization_id = b.organization_id;
671:
672: /* Check if user has access to this formula orgn */
673: IF NOT (gmd_api_grp.OrgnAccessible(l_orgn_id)) THEN
674: FND_MESSAGE.SET_NAME('GMD','GMD_OPERATION_NOT_UPDATEABLE');
675: FND_MESSAGE.SET_TOKEN('RESP_NAME',l_resp_name);
676: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_Owner_orgn_code);
677: FND_MSG_PUB.ADD;

Line 879: gmd_debug.put_line('In GMD_API_GRP.validate_with_dep_entities - '||

875: RETURN;
876: END IF;
877:
878: IF (l_debug = 'Y') THEN
879: gmd_debug.put_line('In GMD_API_GRP.validate_with_dep_entities - '||
880: 'v_entity_id = '||v_entity_Id||' and entity type = '||v_type);
881: END IF;
882:
883: IF (v_entity_id IS NOT NULL) THEN

Line 888: gmd_debug.put_line('In GMD_API_GRP.validate_with_dep_entities - '||

884: IF (V_type = 'RECIPE') THEN
885: OPEN Cur_get_recp_sts(v_entity_id);
886: FETCH Cur_get_recp_sts INTO l_status;
887: IF (l_debug = 'Y') THEN
888: gmd_debug.put_line('In GMD_API_GRP.validate_with_dep_entities - '||
889: 'About to check for Recipe - Vr dep status = '||l_status);
890: END IF;
891: IF (Cur_get_recp_sts%FOUND) THEN
892: IF (NOT gmd_status_code.check_parent_status(v_type,v_entity_id)) THEN

Line 894: gmd_debug.put_line('In GMD_API_GRP.validate_with_dep_entities - '||

890: END IF;
891: IF (Cur_get_recp_sts%FOUND) THEN
892: IF (NOT gmd_status_code.check_parent_status(v_type,v_entity_id)) THEN
893: IF (l_debug = 'Y') THEN
894: gmd_debug.put_line('In GMD_API_GRP.validate_with_dep_entities - '||
895: ' There is VR dependency for this Recipe = '||v_entity_Id);
896: END IF;
897:
898: l_parent_check := TRUE;

Line 1223: X_entity_status OUT NOCOPY GMD_API_GRP.status_rec_type) IS

1219: --kkiallms 01-DEC-2004 Modified w.r.t. 4004501
1220: -------------------------------------------------------------------
1221: PROCEDURE get_status_details (V_entity_type IN VARCHAR2,
1222: V_orgn_id IN NUMBER,
1223: X_entity_status OUT NOCOPY GMD_API_GRP.status_rec_type) IS
1224:
1225: CURSOR cur_def_status(cp_orgn_id NUMBER,
1226: cp_parameter_name gmd_parameters_dtl.parameter_name%TYPE)IS
1227: SELECT st.status_code

Line 1512: l_default_vr_status GMD_API_GRP.status_rec_type;

1508: l_start_date DATE;
1509: l_end_date DATE;
1510: x_end_date DATE;
1511:
1512: l_default_vr_status GMD_API_GRP.status_rec_type;
1513: BEGIN
1514:
1515: OPEN c_get_vr_id;
1516: FETCH c_get_vr_id INTO l_vr_id;

Line 1737: l_default_recipe_status gmd_api_grp.status_rec_type;

1733: l_recipe_no VARCHAR2(32);
1734: l_orgn_ID NUMBER;
1735: l_item_id NUMBER;
1736: l_recipe_description GMD_RECIPES_TL.RECIPE_DESCRIPTION%TYPE; -- bug14480509
1737: l_default_recipe_status gmd_api_grp.status_rec_type;
1738:
1739: l_routing_no VARCHAR2(32) := NULL;
1740: l_routing_vers NUMBER := NULL;
1741: -- Exceptions

Line 2205: gmd_api_grp.log_message('GMD_MISSING', 'FORMULA_ID');

2201:
2202: EXCEPTION
2203: WHEN formula_missing THEN
2204: X_return_status := FND_API.g_ret_sts_error;
2205: gmd_api_grp.log_message('GMD_MISSING', 'FORMULA_ID');
2206: WHEN item_missing THEN
2207: X_return_status := FND_API.g_ret_sts_error;
2208: WHEN orgn_missing THEN
2209: X_return_status := FND_API.g_ret_sts_error;

Line 2210: gmd_api_grp.log_message('GMD_MISSING', 'ORGN_CODE');

2206: WHEN item_missing THEN
2207: X_return_status := FND_API.g_ret_sts_error;
2208: WHEN orgn_missing THEN
2209: X_return_status := FND_API.g_ret_sts_error;
2210: gmd_api_grp.log_message('GMD_MISSING', 'ORGN_CODE');
2211: WHEN OTHERS THEN
2212: X_return_status := FND_API.g_ret_sts_unexp_error;
2213: fnd_msg_pub.add_exc_msg (l_package_name, 'CHECK_ITEM_EXISTS');
2214: END check_item_exists;

Line 2604: GMD_API_GRP.fetch_parm_values(p_orgn_id => p_organization_id

2600: FROM mtl_parameters
2601: WHERE master_organization_id = p_organization_id);
2602: BEGIN
2603: /* First lets check if there is a value setup at org parameters level */
2604: GMD_API_GRP.fetch_parm_values(p_orgn_id => p_organization_id
2605: ,p_parm_name => 'GMD_RECIPE_TYPE'
2606: ,p_parm_value => l_recipe_type
2607: ,x_return_status => l_return_status);
2608: IF l_recipe_type IS NOT NULL THEN

Line 2640: l_entity_status gmd_api_grp.status_rec_type;

2636: --===================================================================== */
2637: FUNCTION get_def_status_code(p_entity_type varchar2,
2638: p_orgn_id NUMBER)
2639: RETURN NUMBER is
2640: l_entity_status gmd_api_grp.status_rec_type;
2641: BEGIN
2642: get_status_details(V_entity_type => p_entity_type,
2643: V_orgn_id =>p_orgn_id,
2644: X_entity_status => l_entity_status);

Line 2732: END gmd_api_grp;

2728: x_enable_revision := 'N';
2729: END IF;
2730: END validity_revision_check;
2731:
2732: END gmd_api_grp;