23: /* */
24: /* DESCRIPTION: */
25: /* */
26: /* API returns (x_return_code) = 'S' if the insert into routing */
27: /* details (fm_rout_dtl) table is successfully. */
28: /* */
29: /* History : */
30: /* Shyam 07/29/2002 Initial implementation */
31: /* KMOTUPAL 21/4/2006 Bug# 3558478 Commented the code for */
38: , p_commit IN BOOLEAN := FALSE
39: , p_routing_id IN gmd_routings.routing_id%TYPE := NULL
40: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
41: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
42: , p_routing_step_rec IN fm_rout_dtl%ROWTYPE
43: , p_routings_step_dep_tbl IN GMD_ROUTINGS_PUB.gmd_routings_step_dep_tab
44: , x_message_count OUT NOCOPY NUMBER
45: , x_message_list OUT NOCOPY VARCHAR2
46: , x_return_status OUT NOCOPY VARCHAR2
53:
54: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
55: l_return_from_routing_step_dep VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
56: l_routing_id gmd_routings.routing_id%TYPE;
57: l_routingStep_id fm_rout_dtl.routingStep_id%TYPE;
58: l_enforce_flag GMD_ROUTINGS.enforce_step_dependency%TYPE;
59: l_steprelease_type fm_rout_dtl.steprelease_type%TYPE;
60: l_oprn_no gmd_operations.oprn_no%TYPE;
61: l_oprn_vers gmd_operations.oprn_vers%TYPE;
55: l_return_from_routing_step_dep VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
56: l_routing_id gmd_routings.routing_id%TYPE;
57: l_routingStep_id fm_rout_dtl.routingStep_id%TYPE;
58: l_enforce_flag GMD_ROUTINGS.enforce_step_dependency%TYPE;
59: l_steprelease_type fm_rout_dtl.steprelease_type%TYPE;
60: l_oprn_no gmd_operations.oprn_no%TYPE;
61: l_oprn_vers gmd_operations.oprn_vers%TYPE;
62: l_rout_eff_start_date DATE;
63: l_rout_eff_end_date DATE;
62: l_rout_eff_start_date DATE;
63: l_rout_eff_end_date DATE;
64:
65: /* define record type */
66: l_routing_step_rec fm_rout_dtl%ROWTYPE;
67:
68: /* define table type */
69: l_step_dep_tab GMD_ROUTINGS_PUB.gmd_routings_step_dep_tab;
70:
74: From gmd_routings_b
75: Where routing_id = vRouting_id;
76:
77: /* gets the operation no and version associated to the routing detail/Step */
78: Cursor Get_oprn_details(vOprn_id fm_rout_dtl.oprn_id%TYPE) IS
79: Select oprn_no, oprn_vers
80: From gmd_operations_b
81: Where oprn_id = vOprn_id;
82:
226: END IF;
227:
228: /* Validation : Enforcing step dependency
229: If this flag at Routing header level is set to Yes,
230: then fm_rout_dtl.steprelease type is set to manual = 1.*/
231: IF l_routing_id IS NOT NULL THEN
232: OPEN get_enforce_flag(l_routing_id);
233: FETCH get_enforce_flag INTO l_enforce_flag;
234: IF get_enforce_flag%NOTFOUND THEN
466: , p_commit IN BOOLEAN := FALSE
467: , p_routing_id IN gmd_routings.routing_id%TYPE := NULL
468: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
469: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
470: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
471: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
472: , p_routings_step_dep_tbl IN GMD_ROUTINGS_PUB.gmd_routings_step_dep_tab
473: , x_message_count OUT NOCOPY NUMBER
474: , x_message_list OUT NOCOPY VARCHAR2
467: , p_routing_id IN gmd_routings.routing_id%TYPE := NULL
468: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
469: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
470: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
471: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
472: , p_routings_step_dep_tbl IN GMD_ROUTINGS_PUB.gmd_routings_step_dep_tab
473: , x_message_count OUT NOCOPY NUMBER
474: , x_message_list OUT NOCOPY VARCHAR2
475: , x_return_status OUT NOCOPY VARCHAR2
729: /* */
730: /* DESCRIPTION: */
731: /* */
732: /* API returns (x_return_code) = 'S' if the update into routing */
733: /* details (fm_rout_dtl table) is success. */
734: /* */
735: /* History : */
736: /* Shyam 07/29/2002 Initial implementation */
737: /* =============================================================== */
738: PROCEDURE update_routing_steps
739: ( p_api_version IN NUMBER := 1
740: , p_init_msg_list IN BOOLEAN := TRUE
741: , p_commit IN BOOLEAN := FALSE
742: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
743: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
744: , p_routing_id IN gmd_routings.routing_id%TYPE := NULL
745: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
746: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
739: ( p_api_version IN NUMBER := 1
740: , p_init_msg_list IN BOOLEAN := TRUE
741: , p_commit IN BOOLEAN := FALSE
742: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
743: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
744: , p_routing_id IN gmd_routings.routing_id%TYPE := NULL
745: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
746: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
747: , p_update_table IN GMD_ROUTINGS_PUB.update_tbl_type
752:
753: /* Local variable section */
754: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_ROUTING_STEPS';
755: l_routing_id gmd_routings.routing_id%TYPE;
756: l_routingstep_id fm_rout_dtl.routingStep_id%TYPE;
757: l_routingstep_no fm_rout_dtl.routingStep_no%TYPE;
758: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
759: l_oprn_id gmd_operations.oprn_id%TYPE;
760:
753: /* Local variable section */
754: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_ROUTING_STEPS';
755: l_routing_id gmd_routings.routing_id%TYPE;
756: l_routingstep_id fm_rout_dtl.routingStep_id%TYPE;
757: l_routingstep_no fm_rout_dtl.routingStep_no%TYPE;
758: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
759: l_oprn_id gmd_operations.oprn_id%TYPE;
760:
761: /* Define record type that hold the routing data */
758: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
759: l_oprn_id gmd_operations.oprn_id%TYPE;
760:
761: /* Define record type that hold the routing data */
762: l_old_routingStep_rec fm_rout_dtl%ROWTYPE;
763:
764: /* Cursor defn section */
765: CURSOR get_oprn_id(vRoutingStep_id fm_rout_dtl.routingstep_id%TYPE) IS
766: Select oprn_id
761: /* Define record type that hold the routing data */
762: l_old_routingStep_rec fm_rout_dtl%ROWTYPE;
763:
764: /* Cursor defn section */
765: CURSOR get_oprn_id(vRoutingStep_id fm_rout_dtl.routingstep_id%TYPE) IS
766: Select oprn_id
767: From fm_rout_dtl
768: Where routingStep_id = vRoutingStep_id;
769:
763:
764: /* Cursor defn section */
765: CURSOR get_oprn_id(vRoutingStep_id fm_rout_dtl.routingstep_id%TYPE) IS
766: Select oprn_id
767: From fm_rout_dtl
768: Where routingStep_id = vRoutingStep_id;
769:
770: Cursor get_routing_owner_orgn_code(vRouting_id Number) IS
771: Select owner_orgn_code
1057: ( p_api_version IN NUMBER := 1
1058: , p_init_msg_list IN BOOLEAN := TRUE
1059: , p_commit IN BOOLEAN := FALSE
1060: , p_routingstep_no IN fm_rout_dep.routingstep_no%TYPE := NULL
1061: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
1062: , p_dep_routingstep_no IN fm_rout_dep.routingstep_no%TYPE
1063: , p_routing_id IN fm_rout_dep.routing_id%TYPE := NULL
1064: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
1065: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
1072: /* Local variable section */
1073: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_STEP_DEPENDENCIES';
1074: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1075:
1076: l_routingstep_no fm_rout_dtl.routingStep_no%TYPE;
1077: l_routingstep_id fm_rout_dtl.routingStep_id%TYPE;
1078: l_routing_id fm_rout_dep.routing_id%TYPE;
1079: l_transfer_pct NUMBER;
1080: l_dep_type NUMBER;
1073: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_STEP_DEPENDENCIES';
1074: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1075:
1076: l_routingstep_no fm_rout_dtl.routingStep_no%TYPE;
1077: l_routingstep_id fm_rout_dtl.routingStep_id%TYPE;
1078: l_routing_id fm_rout_dep.routing_id%TYPE;
1079: l_transfer_pct NUMBER;
1080: l_dep_type NUMBER;
1081: l_std_delay NUMBER;
1346: PROCEDURE delete_routing_step
1347: ( p_api_version IN NUMBER := 1
1348: , p_init_msg_list IN BOOLEAN := TRUE
1349: , p_commit IN BOOLEAN := FALSE
1350: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
1351: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
1352: , p_routing_id IN fm_rout_dtl.routing_id%TYPE := NULL
1353: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
1354: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
1347: ( p_api_version IN NUMBER := 1
1348: , p_init_msg_list IN BOOLEAN := TRUE
1349: , p_commit IN BOOLEAN := FALSE
1350: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
1351: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
1352: , p_routing_id IN fm_rout_dtl.routing_id%TYPE := NULL
1353: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
1354: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
1355: , x_message_count OUT NOCOPY NUMBER
1348: , p_init_msg_list IN BOOLEAN := TRUE
1349: , p_commit IN BOOLEAN := FALSE
1350: , p_routingstep_id IN fm_rout_dtl.routingstep_id%TYPE := NULL
1351: , p_routingstep_no IN fm_rout_dtl.routingstep_no%TYPE := NULL
1352: , p_routing_id IN fm_rout_dtl.routing_id%TYPE := NULL
1353: , p_routing_no IN gmd_routings.routing_no%TYPE := NULL
1354: , p_routing_vers IN gmd_routings.routing_vers%TYPE := NULL
1355: , x_message_count OUT NOCOPY NUMBER
1356: , x_message_list OUT NOCOPY VARCHAR2
1361: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_ROUTING_STEP';
1362: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1363: l_return_from_routing_step_dep VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1364: l_routingstep_no fm_rout_dep.routingStep_no%TYPE;
1365: l_routingStep_id fm_rout_dtl.routingStep_id%TYPE;
1366: l_routing_id gmd_routings.routing_id%TYPE;
1367: l_dep_routingstep_no fm_rout_dep.dep_routingStep_no%TYPE;
1368:
1369: /* Define Cursors */
1410: RAISE invalid_version;
1411: END IF;
1412:
1413: /* Get routing id if it is not passed in as a parameter */
1414: /* Routing id may be used to get the routingStep_id (PK for fm_rout_dtl) */
1415: /* Get the routing_id value */
1416: IF (l_debug = 'Y') THEN
1417: gmd_debug.put_line('Validation : Check if routing header exists in the database ');
1418: END IF;
1632: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_STEP_DEPENDENCIES';
1633: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1634:
1635: l_routingstep_no fm_rout_dep.routingStep_no%TYPE;
1636: l_routingStep_id fm_rout_dtl.routingStep_id%TYPE;
1637: l_dep_routingstep_no fm_rout_dep.dep_routingStep_no%TYPE;
1638: l_routing_id fm_rout_dep.routing_id%TYPE;
1639:
1640: /* Define Exceptions */