DBA Data[Home] [Help]

APPS.GMD_STATUS_PUB dependencies on GMD_STATUS

Line 1: PACKAGE BODY GMD_STATUS_PUB AS

1: PACKAGE BODY GMD_STATUS_PUB AS
2: /* $Header: GMDPSTSB.pls 120.7.12020000.2 2013/01/08 02:30:06 qzeng ship $ */
3:
4: --Bug 3222090, NSRIVAST 20-FEB-2004, BEGIN
5: --Forward declaration.

Line 110: l_from_status gmd_status_b.status_code%TYPE;

106: l_form_id NUMBER;
107: l_org_id NUMBER;
108: l_prod_exec_enabled VARCHAR2(1);
109:
110: l_from_status gmd_status_b.status_code%TYPE;
111: l_from_status_type gmd_status_b.status_type%TYPE;
112: l_from_status_desc gmd_status.description%TYPE;
113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;

Line 111: l_from_status_type gmd_status_b.status_type%TYPE;

107: l_org_id NUMBER;
108: l_prod_exec_enabled VARCHAR2(1);
109:
110: l_from_status gmd_status_b.status_code%TYPE;
111: l_from_status_type gmd_status_b.status_type%TYPE;
112: l_from_status_desc gmd_status.description%TYPE;
113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;
115:

Line 112: l_from_status_desc gmd_status.description%TYPE;

108: l_prod_exec_enabled VARCHAR2(1);
109:
110: l_from_status gmd_status_b.status_code%TYPE;
111: l_from_status_type gmd_status_b.status_type%TYPE;
112: l_from_status_desc gmd_status.description%TYPE;
113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;
115:
116: l_target_status gmd_status_next.target_status%TYPE;

Line 113: l_to_status_type gmd_status_b.status_type%TYPE;

109:
110: l_from_status gmd_status_b.status_code%TYPE;
111: l_from_status_type gmd_status_b.status_type%TYPE;
112: l_from_status_desc gmd_status.description%TYPE;
113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;
115:
116: l_target_status gmd_status_next.target_status%TYPE;
117: l_rework_status gmd_status_next.rework_status%TYPE;

Line 114: l_to_status_desc gmd_status.description%TYPE;

110: l_from_status gmd_status_b.status_code%TYPE;
111: l_from_status_type gmd_status_b.status_type%TYPE;
112: l_from_status_desc gmd_status.description%TYPE;
113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;
115:
116: l_target_status gmd_status_next.target_status%TYPE;
117: l_rework_status gmd_status_next.rework_status%TYPE;
118: l_pending_status gmd_status_next.pending_status%TYPE;

Line 116: l_target_status gmd_status_next.target_status%TYPE;

112: l_from_status_desc gmd_status.description%TYPE;
113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;
115:
116: l_target_status gmd_status_next.target_status%TYPE;
117: l_rework_status gmd_status_next.rework_status%TYPE;
118: l_pending_status gmd_status_next.pending_status%TYPE;
119: l_mesg_text VARCHAR2(1000);
120:

Line 117: l_rework_status gmd_status_next.rework_status%TYPE;

113: l_to_status_type gmd_status_b.status_type%TYPE;
114: l_to_status_desc gmd_status.description%TYPE;
115:
116: l_target_status gmd_status_next.target_status%TYPE;
117: l_rework_status gmd_status_next.rework_status%TYPE;
118: l_pending_status gmd_status_next.pending_status%TYPE;
119: l_mesg_text VARCHAR2(1000);
120:
121: l_eSignature_status VARCHAR2(10);

Line 118: l_pending_status gmd_status_next.pending_status%TYPE;

114: l_to_status_desc gmd_status.description%TYPE;
115:
116: l_target_status gmd_status_next.target_status%TYPE;
117: l_rework_status gmd_status_next.rework_status%TYPE;
118: l_pending_status gmd_status_next.pending_status%TYPE;
119: l_mesg_text VARCHAR2(1000);
120:
121: l_eSignature_status VARCHAR2(10);
122: l_check_vr NUMBER;

Line 136: FROM gmd_status a, gmd_status_next b

132: -- Checks if there is a target status for current status */
133: CURSOR validate_To_status(vStatus_to VARCHAR2
134: ,vStatus_from VARCHAR2) IS
135: SELECT a.status_type, a.description, b.target_status
136: FROM gmd_status a, gmd_status_next b
137: WHERE a.status_code = vStatus_from
138: AND b.target_status = vStatus_to
139: AND a.status_code = b.current_status;
140:

Line 143: FROM gmd_status

139: AND a.status_code = b.current_status;
140:
141: CURSOR get_To_status_details(vStatus_to VARCHAR2) IS
142: SELECT status_type, description
143: FROM gmd_status
144: WHERE status_code = vStatus_to;
145:
146: -- Gets the recipe details and its current status code
147: CURSOR get_curr_recipe_status(vRecipe_id NUMBER

Line 221: FROM gmd_status s, gmd_recipe_validity_rules v

217: Cursor check_val_rules_800(vEntity_id NUMBER) IS
218: SELECT 1 from sys.dual
219: WHERE EXISTS (
220: SELECT recipe_validity_rule_id
221: FROM gmd_status s, gmd_recipe_validity_rules v
222: WHERE recipe_id = vEntity_id
223: AND v.validity_rule_status = s.status_code
224: AND (to_number(s.status_type) < to_number('800')
225: OR s.status_type = '900') );

Line 232: FROM gmd_status s, gmd_recipe_validity_rules v

228: Cursor check_val_rules_900(vEntity_id NUMBER) IS
229: SELECT 1 from sys.dual
230: WHERE EXISTS (
231: SELECT recipe_validity_rule_id
232: FROM gmd_status s, gmd_recipe_validity_rules v
233: WHERE recipe_id = vEntity_id
234: AND v.validity_rule_status = s.status_code
235: AND to_number(s.status_type) < to_number('800') );
236:

Line 242: FROM gmd_status s, gmd_recipe_validity_rules v

238: Cursor check_val_rules_1000(vEntity_id NUMBER) IS
239: SELECT 1 from sys.dual
240: WHERE EXISTS (
241: SELECT recipe_validity_rule_id
242: FROM gmd_status s, gmd_recipe_validity_rules v
243: WHERE recipe_id = vEntity_id
244: AND v.validity_rule_status = s.status_code
245: AND to_number(s.status_type) < to_number('1000') );
246:

Line 292: FROM gmd_status

288: -- defining internal functions
289: FUNCTION get_status_meaning(P_status_code IN VARCHAR2) RETURN VARCHAR2 IS
290: CURSOR Cur_get IS
291: SELECT meaning
292: FROM gmd_status
293: WHERE status_code = P_status_code;
294:
295: l_meaning gmd_status.meaning%TYPE;
296: BEGIN

Line 295: l_meaning gmd_status.meaning%TYPE;

291: SELECT meaning
292: FROM gmd_status
293: WHERE status_code = P_status_code;
294:
295: l_meaning gmd_status.meaning%TYPE;
296: BEGIN
297: OPEN Cur_get;
298: FETCH Cur_get INTO l_meaning;
299: CLOSE Cur_get;

Line 329: IF NOT FND_API.compatible_api_call ( GMD_STATUS_PUB.m_api_version

325: RAISE setup_failure;
326: END IF;
327:
328: /* Make sure we have call compatibility */
329: IF NOT FND_API.compatible_api_call ( GMD_STATUS_PUB.m_api_version
330: ,p_api_version
331: ,l_api_name
332: ,GMD_STATUS_PUB.m_pkg_name) THEN
333: x_return_status := FND_API.G_RET_STS_ERROR;

Line 332: ,GMD_STATUS_PUB.m_pkg_name) THEN

328: /* Make sure we have call compatibility */
329: IF NOT FND_API.compatible_api_call ( GMD_STATUS_PUB.m_api_version
330: ,p_api_version
331: ,l_api_name
332: ,GMD_STATUS_PUB.m_pkg_name) THEN
333: x_return_status := FND_API.G_RET_STS_ERROR;
334: RAISE invalid_version;
335: END IF;
336:

Line 626: IF (NOT gmd_status_code.check_parent_status(l_entity_name

622: IF (l_debug = 'Y') THEN
623: gmd_debug.put_line('Checking the Parent status dependency for '||l_entity_name);
624: END IF;
625: IF (to_number(l_to_status_type) IN (800, 1000)) THEN
626: IF (NOT gmd_status_code.check_parent_status(l_entity_name
627: ,l_entity_id)) THEN
628: SELECT DECODE(l_entity_name,
629: 'FORMULA','GMD_FORMULA_INUSE',
630: 'RECIPE','GMD_RECIPE_BTCH_DEP',

Line 666: IF NOT ( GMD_STATUS_CODE.CHECK_DEPENDENT_STATUS

662: 'ROUTING',4,
663: 'VALIDITY',5) INTO l_entity_value
664: FROM sys.dual;
665:
666: IF NOT ( GMD_STATUS_CODE.CHECK_DEPENDENT_STATUS
667: (l_entity_value,
668: l_entity_id,
669: l_from_status,
670: P_to_status) ) THEN

Line 678: FND_MESSAGE.SET_NAME('GMD', 'GMD_STATUS_DEPEND_NOT_APPROVED');

674: * least one operation which is not approved. The function
675: * returns TRUE if entity does not have dependents (formula,
676: * operation) or if to_status does not require the check
677: * (frozen, on-hold, obsolete, some version of New). */
678: FND_MESSAGE.SET_NAME('GMD', 'GMD_STATUS_DEPEND_NOT_APPROVED');
679: FND_MSG_PUB.ADD;
680: x_return_status := FND_API.g_ret_sts_error;
681: RAISE status_update_failure;
682: ELSE

Line 766: l_pending_status := GMD_STATUS_CODE.get_pending_status

762: IF (l_debug = 'Y') THEN
763: gmd_debug.put_line('About to get the pending and rework status ');
764: END IF;
765: /* Added the following code as part of ERES Implementation */
766: l_pending_status := GMD_STATUS_CODE.get_pending_status
767: (p_from_status => l_from_status
768: ,p_to_status => P_to_status);
769:
770: l_rework_status := GMD_STATUS_CODE.get_rework_status

Line 770: l_rework_status := GMD_STATUS_CODE.get_rework_status

766: l_pending_status := GMD_STATUS_CODE.get_pending_status
767: (p_from_status => l_from_status
768: ,p_to_status => P_to_status);
769:
770: l_rework_status := GMD_STATUS_CODE.get_rework_status
771: (p_from_status => l_from_status
772: ,p_to_status => P_to_status);
773:
774: IF (l_debug = 'Y') THEN

Line 799: gmd_debug.put_line('In GMD Status Pub - About call ERES Util for update Recipe ');

795:
796: ELSIF (l_entity_name = 'RECIPE') THEN
797:
798: IF l_debug = 'Y' THEN
799: gmd_debug.put_line('In GMD Status Pub - About call ERES Util for update Recipe ');
800: END IF;
801:
802: GMD_ERES_UTILS.update_recipe_status
803: (p_recipe_id => l_entity_id

Line 814: gmd_debug.put_line('In GMD Status Pub - After call ERES Util for update Recipe ');

810: ,p_called_from_form => 'T'
811: ,x_return_status => l_eSignature_status);
812:
813: IF l_debug = 'Y' THEN
814: gmd_debug.put_line('In GMD Status Pub - After call ERES Util for update Recipe ');
815: END IF;
816:
817: ELSIF(l_entity_name = 'OPERATION') THEN
818:

Line 857: gmd_debug.put_line('In GMD Status Pub - About call ERES Util for update substitution ');

853: -- Bug 5394532
854: ELSIF (l_entity_name = 'SUBSTITUTION') THEN
855:
856: IF l_debug = 'Y' THEN
857: gmd_debug.put_line('In GMD Status Pub - About call ERES Util for update substitution ');
858: END IF;
859:
860: GMD_ERES_UTILS.update_substitution_status
861: (p_substitution_id => l_entity_id

Line 870: gmd_debug.put_line('In GMD Status Pub - After call ERES Util for update substitution ');

866: ,p_called_from_form => 'T'
867: ,x_return_status => l_eSignature_status);
868:
869: IF l_debug = 'Y' THEN
870: gmd_debug.put_line('In GMD Status Pub - After call ERES Util for update substitution ');
871: END IF;
872: END IF;
873:
874: IF (l_debug = 'Y') THEN

Line 961: fnd_msg_pub.add_exc_msg (gmd_status_pub.m_pkg_name, l_api_name);

957: ,p_encoded => FND_API.g_false
958: ,p_data => x_message_list);
959: WHEN OTHERS THEN
960: ROLLBACK TO SAVEPOINT modify_status;
961: fnd_msg_pub.add_exc_msg (gmd_status_pub.m_pkg_name, l_api_name);
962: IF (l_debug = 'Y') THEN
963: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
964: END IF;
965: fnd_msg_pub.count_and_get (

Line 972: END GMD_STATUS_PUB;

968: ,p_data => x_message_list);
969: x_return_status := FND_API.g_ret_sts_unexp_error;
970: END Modify_status;
971:
972: END GMD_STATUS_PUB;