[Home] [Help]
595: BEGIN
596: IF (Entity = 'FORMULA') THEN
597: SELECT b.organization_code, b.organization_id
598: INTO l_owner_orgn_code, l_orgn_id
599: FROM fm_form_mst_b a, mtl_parameters b
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 */
770: l_status_type GMD_STATUS_B.status_type%TYPE;
771:
772: CURSOR Cur_get_fsttyp(pobject_id NUMBER) IS
773: SELECT s.status_type
774: FROM fm_form_mst_b f,gmd_Status_b s
775: WHERE f.formula_id = pobject_id AND
776: f.formula_status = s.status_code;
777:
778: CURSOR Cur_get_rsttyp(pobject_id NUMBER) IS
849:
850:
851: CURSOR Cur_get_form_sts(entity_id NUMBER) IS
852: SELECT formula_status
853: FROM fm_form_mst
854: WHERE formula_id = entity_id
855: AND ((formula_status between 700 and 799
856: OR formula_status between 400 and 499));
857:
960: IF (vEntity_id IS NOT NULL) THEN
961: IF (vEntity = 'FORMULA') THEN
962: Select formula_no, formula_vers, formula_no||' - '||formula_vers
963: INTO l_object_name, l_object_version, l_object_name_and_version
964: FROM fm_form_mst_b
965: WHere formula_id = vEntity_id;
966: ELSIF (vEntity = 'ROUTING') THEN
967: Select routing_no, routing_vers, routing_no||' - '||routing_vers
968: INTO l_object_name, l_object_version, l_object_name_and_version
1300: FROM gmd_operations
1301: WHERE oprn_id = V_entity_id
1302: AND operation_status >= V_entity_status;
1303: CURSOR Cur_get_def_formula_status IS
1304: SELECT formula_status FROM fm_form_mst
1305: WHERE formula_id = V_entity_id
1306: AND formula_status >= V_entity_status;
1307: CURSOR Cur_get_def_routing_status IS
1308: SELECT routing_status
1310: WHERE routing_id = V_entity_id
1311: AND routing_status >= V_entity_status;
1312: /* do we need this-not used*/
1313: l_operation_status gmd_operations.operation_status%TYPE;
1314: l_formula_status fm_form_mst.formula_status%TYPE;
1315: l_routing_status fm_rout_hdr.routing_status%TYPE;
1316: BEGIN
1317: /*Check all the operations inserted are of status APFLU or APFGU*/
1318: IF (V_entity_type = 'OPERATION') THEN
1456: FROM FND_DUAL;
1457:
1458: CURSOR c_get_formula IS
1459: SELECT creation_date, formula_status, owner_organization_id
1460: FROM fm_form_mst_b
1461: WHERE formula_id = p_formula_id;
1462: LocalDateRecord c_get_formula%ROWTYPE;
1463:
1464: CURSOR c_get_formula_item IS
1653: ** 01-dec-2004 kkillams orgn_code is replaced with organization_id/owner_organization_id w.r.t. 4004501
1654: ** 18-APR-2006 kmotupal Added check for default status while retrieving recipe details
1655: ** 30-MAY-2006 Kalyani Bug 5218106 Added code to default recipe_type from orgn parameters.
1656: ** 03-Jan-07 Kapil M LCF-GMO ME : Bug#5458666. Added routing_id to retrieve_recipe
1657: ** 13-FEB-2008 Uday Phadtare Bug 6758122. Retrive formula_desc1 from fm_form_mst_tl when formula_desc1 in fm_form_mst_b is NULL.
1658: **+==============================================================================================================================+*/
1659:
1660:
1661: PROCEDURE retrieve_recipe(p_formula_id IN NUMBER,
1667: -- Cursors
1668: CURSOR c_get_formula_info IS
1669: SELECT formula_no, formula_vers, formula_desc1,
1670: owner_organization_id, formula_status, owner_id
1671: FROM fm_form_mst_b
1672: WHERE formula_id = p_formula_id;
1673: LocalFormRecord c_get_formula_info%ROWTYPE;
1674:
1675: -- Kapil LCF-GMO ME : Bug#5458666
1717:
1718: --Bug 6758122
1719: CURSOR c_get_frmdesc IS
1720: SELECT formula_desc1
1721: FROM fm_form_mst_tl
1722: WHERE formula_id = p_formula_id
1723: AND language = USERENV('LANG');
1724:
1725: -- Local Variables