eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GMD_SUBSTITUTION_PUB SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 7


    SELECT substitution_id
    FROM   gmd_item_substitution_hdr_b
    WHERE  substitution_name    = vSubstitution_name
    AND    substitution_version = vSubstitution_version;

Line: 14


    SELECT 1
    FROM   fm_matl_dtl
    WHERE  formula_id = vformula_id
    AND    inventory_item_id    = vOriginal_item_id
    AND    line_type  = -1
    AND    rownum = 1;

Line: 22


    SELECT 1
    FROM   fm_form_mst_b
    WHERE  formula_id     = vformula_id
    AND    delete_mark    = 0
    AND    formula_status <> 1000;

Line: 29


    SELECT  formula_no, Formula_vers
    FRom    fm_form_mst_b
    WHERE   FORMULA_id = vFormula_id;

Line: 34


    SELECT concatenated_segments, primary_uom_code
    FROM   mtl_system_items_kfv
    WHERE  inventory_item_id = vItem_id;

Line: 41


  /*   is_update_allowed                                             */
  /*                                                                 */
  /* DESCRIPTION: Private function                                   */
  /*                                                                 */
  /*                                                                 */
  /* History :                                                       */
  /* Raju   09-OCT-06   Initial implementation                      */
  /* =============================================================== */

  FUNCTION is_update_allowed(p_substitution_id  IN NUMBER)
  RETURN BOOLEAN IS
    CURSOR get_subs_info(vSubstitution_id NUMBER) IS
      SELECT  substitution_status
      FROM    gmd_item_substitution_hdr_b
      WHERE   substitution_id = p_substitution_id;

Line: 58


    l_delete_mark       NUMBER  := 0;

Line: 73


  END is_update_allowed;

Line: 105


      SELECT inventory_item_id, primary_uom_code
      FROM   mtl_system_items_kfv
      WHERE  inventory_item_id = vItem_id;

Line: 110


      SELECT inventory_item_id, primary_uom_code
      FROM   mtl_system_items_kfv
      WHERE  concatenated_segments = vItem_no;

Line: 115


      SELECT organization_code
      FROM   org_organization_definitions
      WHERE  organization_id = vOrgn_id;

Line: 124


      SELECT 1
      FROM  gmd_item_substitution_hdr_b
      WHERE substitution_id            <> vSubstitution_id
      AND   original_inventory_item_id = vOriginal_item_id
      AND   preference                 = vPreference
      AND   vStart_date                >= start_date
      AND   substitution_status        < 1000
      AND   (end_date IS NULL OR vEnd_date <= end_date);

Line: 135


      SELECT INVENTORY_ITEM_ID
      FROM   mtl_system_items_b
      WHERE  inventory_item_id = v_inventory_item_id
      AND    organization_id = v_organization_id
      AND    recipe_enabled_flag = 'Y';

Line: 216


    select  gmd_item_substitution_hdr_s.nextval
      into  l_substitution_id
     from   dual;

Line: 316


    l_substitution_hdr_rec.last_update_date   := sysdate;

Line: 317


    l_substitution_hdr_rec.last_updated_by    := gmd_api_grp.user_id;

Line: 318


    l_substitution_hdr_rec.last_update_login  := gmd_api_grp.login_id;

Line: 401


    select  gmd_item_substitution_dtl_s.nextval
      into  l_substitution_line_id
      from  dual;

Line: 460


    l_substitution_dtl_rec.last_update_date   := sysdate;

Line: 461


    l_substitution_dtl_rec.last_updated_by    := gmd_api_grp.user_id;

Line: 462


    l_substitution_dtl_rec.last_update_login  := gmd_api_grp.login_id;

Line: 602


      l_formula_substitution_rec.last_update_date   := sysdate;

Line: 603


      l_formula_substitution_rec.last_updated_by    := gmd_api_grp.user_id;

Line: 604


      l_formula_substitution_rec.last_update_login  := gmd_api_grp.login_id;

Line: 669


      Select 1
      From   gmd_formula_substitution
      Where  formula_id      = vformula_id
      AND    substitution_id = vSubstitution_id;

Line: 692


      SELECT original_inventory_item_id INTO l_item_id
      FROM   gmd_item_substitution_hdr_b
      Where  substitution_id = vSubstitution_id;

Line: 750


    IF NOT is_update_allowed(l_substitution_id) THEN
      RAISE substitution_creation_failure;

Line: 851


      l_formula_substitution_rec.last_update_date   := sysdate;

Line: 852


      l_formula_substitution_rec.last_updated_by    := gmd_api_grp.user_id;

Line: 853


      l_formula_substitution_rec.last_update_login  := gmd_api_grp.login_id;

Line: 895


  /*   Update_substitution_header                                    */
  /*                                                                 */
  /* DESCRIPTION:                                                    */
  /*                                                                 */
  /*                                                                 */
  /* History :                                                       */
  /*  Rajender Nalla    09-OCT-06   Initial implementation.          */
  /* =============================================================== */
  PROCEDURE Update_substitution_header
  ( p_api_version          IN          NUMBER
  , p_init_msg_list        IN          VARCHAR2
  , p_commit               IN          VARCHAR2
  , p_substitution_id      IN          NUMBER    Default NULL
  , p_substitution_name    IN          VARCHAR2  Default NULL
  , p_substitution_version IN          NUMBER    Default NULL
  , p_update_table         IN          update_tbl_type
  , x_message_count        OUT NOCOPY  NUMBER
  , x_message_list         OUT NOCOPY  VARCHAR2
  , x_return_status        OUT NOCOPY  VARCHAR2
  ) IS

    -- Cursor definition
    CURSOR get_old_substitution_rec(vSubstitution_id NUMBER) IS
      Select *
      From   gmd_item_substitution_hdr
      Where  substitution_id = vSubstitution_id;

Line: 925


    l_api_name    CONSTANT VARCHAR2(30) := 'Update_substitution_header';

Line: 931


    substitution_update_failure     EXCEPTION;

Line: 956


                                        ,'Update_substitution_header'
                                        ,gmd_substitution_pub.m_pkg_name) THEN
      RAISE invalid_version;

Line: 969


        RAISE substitution_update_failure;

Line: 977


            RAISE substitution_update_failure;

Line: 986


    IF NOT is_update_allowed(l_substitution_id) THEN
      RAISE substitution_update_failure;

Line: 997


        RAISE substitution_update_failure;

Line: 1002


    FOR i in 1 .. p_update_table.count LOOP
      -- Start date should be less than End date
      -- Convert the date from canonical format
      IF (Upper(p_update_table(i).p_col_to_update) = 'START_DATE') THEN
      	l_substitution_hdr_rec.start_date :=
      	               FND_DATE.canonical_to_date(p_update_table(i).p_value);

Line: 1012


            RAISE substitution_update_failure;

Line: 1015


      ELSIF (Upper(p_update_table(i).p_col_to_update) = 'SUBSTITUTION_DESCRIPTION') THEN
        l_substitution_hdr_rec.substitution_description := p_update_table(i).p_value;

Line: 1017


      ELSIF (Upper(p_update_table(i).p_col_to_update) = 'PREFERENCE') THEN
        IF (p_update_table(i).p_value < 0 ) THEN
          FND_MESSAGE.SET_NAME ('GMD', 'GMD_NEGATIVE_FIELDS');

Line: 1022


          RAISE substitution_update_failure;

Line: 1024


        l_substitution_hdr_rec.preference := p_update_table(i).p_value;

Line: 1025


      ELSIF (Upper(p_update_table(i).p_col_to_update) = 'END_DATE') THEN
      	l_substitution_hdr_rec.end_date :=
      	               FND_DATE.canonical_to_date(p_update_table(i).p_value);

Line: 1028


        IF (p_update_table(i).p_value IS NOT NULL)  THEN
          IF (l_substitution_hdr_rec.start_date > l_substitution_hdr_rec.end_date) THEN
            FND_MESSAGE.SET_NAME('GMD', 'QC_MIN_MAX_DATE');

Line: 1032


            RAISE substitution_update_failure;

Line: 1035


      ELSIF (Upper(p_update_table(i).p_col_to_update) = 'ORIGINAL_QTY') THEN
        IF  (p_update_table(i).p_value < 0) THEN
          FND_MESSAGE.SET_NAME ('GMD', 'GMD_NEGATIVE_FIELDS');

Line: 1040


          RAISE substitution_update_failure;

Line: 1042


        l_substitution_hdr_rec.original_qty := p_update_table(i).p_value;

Line: 1043


      ELSIF (Upper(p_update_table(i).p_col_to_update) = 'REPLACEMENT_UOM_TYPE') THEN
        -- replacement_uom_type -- Default it to value = 1 (original Item uom)
        IF  (p_update_table(i).p_value < 0) THEN
          FND_MESSAGE.SET_NAME ('GMD', 'GMD_NEGATIVE_FIELDS');

Line: 1049


          RAISE substitution_update_failure;

Line: 1050


        ELSIF (p_update_table(i).p_value > 2) THEN
          FND_MESSAGE.SET_NAME ('GMD', 'GMD_INV_REPLACEMENT_TYPE');

Line: 1053


          RAISE substitution_update_failure;

Line: 1055


        l_substitution_hdr_rec.replacement_uom_type := p_update_table(i).p_value;

Line: 1059


      ELSIF (Upper(p_update_table(i).p_col_to_update) IN
                                   ('ORIGINAL_UOM'
                                   ,'OWNER_ORGANIZATION_ID'
                                   ,'ORIGINAL_INVENTORY_ITEM_ID')) THEN
        FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_COL_UPDATES');

Line: 1064


        FND_MESSAGE.SET_TOKEN('NAME',p_update_table(i).p_col_to_update);

Line: 1066


        RAISE substitution_update_failure;

Line: 1067


      ELSIF (Upper(p_update_table(i).p_col_to_update) =
                                   ('SUBSTITUTION_STATUS')) THEN
        FND_MESSAGE.SET_NAME('GMD', 'GMD_NOT_USE_API_UPD_STATUS');

Line: 1071


        RAISE substitution_update_failure;

Line: 1072


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE1') THEN
          l_substitution_hdr_rec.ATTRIBUTE1 := p_update_table(i).p_value;

Line: 1074


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE2') THEN
          l_substitution_hdr_rec.ATTRIBUTE2 := p_update_table(i).p_value;

Line: 1076


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE3') THEN
          l_substitution_hdr_rec.ATTRIBUTE3 := p_update_table(i).p_value;

Line: 1078


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE4') THEN
          l_substitution_hdr_rec.ATTRIBUTE4 := p_update_table(i).p_value;

Line: 1080


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE5') THEN
          l_substitution_hdr_rec.ATTRIBUTE5 := p_update_table(i).p_value;

Line: 1082


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE6') THEN
          l_substitution_hdr_rec.ATTRIBUTE6 := p_update_table(i).p_value;

Line: 1084


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE7') THEN
          l_substitution_hdr_rec.ATTRIBUTE7 := p_update_table(i).p_value;

Line: 1086


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE8') THEN
          l_substitution_hdr_rec.ATTRIBUTE8 := p_update_table(i).p_value;

Line: 1088


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE9') THEN
          l_substitution_hdr_rec.ATTRIBUTE9 := p_update_table(i).p_value;

Line: 1090


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE10') THEN
          l_substitution_hdr_rec.ATTRIBUTE10 := p_update_table(i).p_value;

Line: 1092


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE11') THEN
          l_substitution_hdr_rec.ATTRIBUTE11 := p_update_table(i).p_value;

Line: 1094


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE12') THEN
          l_substitution_hdr_rec.ATTRIBUTE12 := p_update_table(i).p_value;

Line: 1096


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE13') THEN
          l_substitution_hdr_rec.ATTRIBUTE13 := p_update_table(i).p_value;

Line: 1098


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE14') THEN
          l_substitution_hdr_rec.ATTRIBUTE14 := p_update_table(i).p_value;

Line: 1100


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE15') THEN
          l_substitution_hdr_rec.ATTRIBUTE15 := p_update_table(i).p_value;

Line: 1102


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE16') THEN
          l_substitution_hdr_rec.ATTRIBUTE16 := p_update_table(i).p_value;

Line: 1104


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE17') THEN
          l_substitution_hdr_rec.ATTRIBUTE17 := p_update_table(i).p_value;

Line: 1106


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE18') THEN
          l_substitution_hdr_rec.ATTRIBUTE18 := p_update_table(i).p_value;

Line: 1108


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE19') THEN
          l_substitution_hdr_rec.ATTRIBUTE19 := p_update_table(i).p_value;

Line: 1110


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE20') THEN
          l_substitution_hdr_rec.ATTRIBUTE20 := p_update_table(i).p_value;

Line: 1112


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE21') THEN
          l_substitution_hdr_rec.ATTRIBUTE21 := p_update_table(i).p_value;

Line: 1114


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE22') THEN
          l_substitution_hdr_rec.ATTRIBUTE22 := p_update_table(i).p_value;

Line: 1116


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE23') THEN
          l_substitution_hdr_rec.ATTRIBUTE23 := p_update_table(i).p_value;

Line: 1118


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE24') THEN
          l_substitution_hdr_rec.ATTRIBUTE24 := p_update_table(i).p_value;

Line: 1120


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE25') THEN
          l_substitution_hdr_rec.ATTRIBUTE25 := p_update_table(i).p_value;

Line: 1122


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE26') THEN
          l_substitution_hdr_rec.ATTRIBUTE26 := p_update_table(i).p_value;

Line: 1124


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE27') THEN
          l_substitution_hdr_rec.ATTRIBUTE27 := p_update_table(i).p_value;

Line: 1126


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE28') THEN
          l_substitution_hdr_rec.ATTRIBUTE28 := p_update_table(i).p_value;

Line: 1128


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE29') THEN
          l_substitution_hdr_rec.ATTRIBUTE29 := p_update_table(i).p_value;

Line: 1130


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE30') THEN
          l_substitution_hdr_rec.ATTRIBUTE30 := p_update_table(i).p_value;

Line: 1132


      ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'ATTRIBUTE_CATEGORY') THEN
          l_substitution_hdr_rec.ATTRIBUTE_CATEGORY := p_update_table(i).p_value;

Line: 1136


        FND_MESSAGE.SET_TOKEN('NAME', p_update_table(i).p_col_to_update);

Line: 1138


        RAISE substitution_update_failure;

Line: 1142


      l_substitution_hdr_rec.last_update_date  := SYSDATE;

Line: 1143


      l_substitution_hdr_rec.last_updated_by   := gmd_api_grp.user_id;

Line: 1144


      l_substitution_hdr_rec.last_update_login := gmd_api_grp.login_id;

Line: 1148


    GMD_SUBSTITUTION_PVT.Update_substitution_header
    ( p_substitution_hdr_rec => l_substitution_hdr_rec
    , x_message_count        => x_message_count
    , x_message_list         => x_message_list
    , x_return_status        => x_return_status
    );

Line: 1156


      RAISE substitution_update_failure;

Line: 1164


    WHEN substitution_update_failure OR invalid_version OR setup_failure THEN
         fnd_msg_pub.count_and_get (
            p_count => x_message_count
           ,p_encoded => FND_API.g_false
           ,p_data => x_message_list);

Line: 1179


  END Update_substitution_header;

Line: 1184


  /*   Update_substitution_detail                                    */
  /*                                                                 */
  /* DESCRIPTION:                                                    */
  /*                                                                 */
  /*                                                                 */
  /* History :                                                       */
  /* Rajender Nalla    09-OCT-06   Initial implementation.                     */
  /* =============================================================== */
  PROCEDURE Update_substitution_detail
  ( p_api_version            IN          NUMBER
  , p_init_msg_list          IN          VARCHAR2
  , p_commit                 IN          VARCHAR2
  , p_substitution_line_id   IN          NUMBER           Default NULL
  , p_substitution_id        IN          NUMBER           Default NULL
  , p_substitution_name      IN          VARCHAR2         Default NULL
  , p_substitution_version   IN          NUMBER           Default NULL
  , p_update_table           IN          update_tbl_type
  , x_message_count          OUT NOCOPY  NUMBER
  , x_message_list           OUT NOCOPY  VARCHAR2
  , x_return_status          OUT NOCOPY  VARCHAR2
  ) IS
    CURSOR get_subsdtl_rec_using_line_id(vSubstitution_line_id NUMBER) IS
      Select *
      From   gmd_item_substitution_dtl
      Where  substitution_line_id = vSubstitution_line_id;

Line: 1211


      Select *
      From   gmd_item_substitution_dtl
      Where  substitution_id = vSubstitution_id;

Line: 1216


      Select original_inventory_item_id, replacement_uom_type
      From   gmd_item_substitution_hdr_b
      Where  substitution_id = vSubstitution_id;

Line: 1224


    l_api_name           CONSTANT   VARCHAR2(30) := 'Update_substitution_detail';

Line: 1236


    substitution_update_failure     EXCEPTION;

Line: 1261


                                        ,'Update_substitution_header'
                                        ,gmd_substitution_pub.m_pkg_name) THEN
      RAISE invalid_version;

Line: 1279


          RAISE substitution_update_failure;

Line: 1288


              RAISE substitution_update_failure;

Line: 1311


      RAISE substitution_update_failure;

Line: 1315


    IF NOT is_update_allowed(l_substitution_dtl_rec.substitution_id) THEN
      RAISE substitution_update_failure;

Line: 1319


    FOR i in 1 .. p_update_table.count LOOP
      -- If substitute item uom is being changed - check if it is convertible
      -- to the original item uom.
      IF UPPER(p_update_table(i).p_col_to_update) = 'DETAIL_UOM' THEN
        IF p_update_table(i).p_value IS NOT NULL THEN
          IF (NOT(gma_valid_grp.validate_um(p_update_table(i).p_value))) THEN
            FND_MESSAGE.SET_NAME('GMA', 'SY_INVALID_UM_CODE');

Line: 1327


            RAISE substitution_update_failure;

Line: 1350


                                              ,from_unit      => p_update_table(i).p_value
                                              ,to_unit        => l_substitute_prim_item_um
                                              ,from_name      => NULL
                                              ,to_name        => NULL);

Line: 1356


          FND_MESSAGE.SET_TOKEN('FROM_UOM', p_update_table(i).p_value);

Line: 1360


          RAISE substitution_update_failure;

Line: 1370


                                       ,from_unit      => p_update_table(i).p_value
                                       ,to_unit        => l_original_prim_item_um
                                       ,from_name      => NULL
                                       ,to_name        => NULL);

Line: 1376


          FND_MESSAGE.SET_TOKEN('FROM_UOM', p_update_table(i).p_value);

Line: 1380


          RAISE substitution_update_failure;

Line: 1386


        l_substitution_dtl_rec.detail_uom := p_update_table(i).p_value;

Line: 1388


      ELSIF UPPER(p_update_table(i).p_col_to_update) = 'UNIT_QTY' THEN
        IF p_update_table(i).p_value IS NULL THEN
          FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');

Line: 1393


          RAISE substitution_update_failure;

Line: 1394


        ELSIF (p_update_table(i).p_value < 0 ) THEN
          FND_MESSAGE.SET_NAME ('GMD', 'GMD_NEGATIVE_FIELDS');

Line: 1398


          RAISE substitution_update_failure;

Line: 1400


        l_substitution_dtl_rec.unit_qty := p_update_table(i).p_value;

Line: 1402


      ELSIF UPPER(p_update_table(i).p_col_to_update) = 'INVENTORY_ITEM_ID' THEN
        -- raise exception
        FND_MESSAGE.SET_NAME('GMD', 'GMD_INVALID_COL_UPDATES');

Line: 1405


        FND_MESSAGE.SET_TOKEN('NAME',p_update_table(i).p_col_to_update);

Line: 1407


        RAISE substitution_update_failure;

Line: 1410


        FND_MESSAGE.SET_TOKEN('NAME', p_update_table(i).p_col_to_update);

Line: 1412


        RAISE substitution_update_failure;

Line: 1416


      l_substitution_dtl_rec.last_update_date  := SYSDATE;

Line: 1417


      l_substitution_dtl_rec.last_updated_by   := gmd_api_grp.user_id;

Line: 1418


      l_substitution_dtl_rec.last_update_login := gmd_api_grp.login_id;

Line: 1422


    GMD_SUBSTITUTION_PVT.Update_substitution_detail
    ( p_substitution_dtl_rec  => l_substitution_dtl_rec
    , x_message_count         => x_message_count
    , x_message_list          => x_message_list
    , x_return_status         => x_return_status
    );

Line: 1430


      RAISE substitution_update_failure;

Line: 1437


    WHEN substitution_update_failure OR invalid_version OR setup_failure THEN
         fnd_msg_pub.count_and_get (
            p_count => x_message_count
           ,p_encoded => FND_API.g_false
           ,p_data => x_message_list);

Line: 1452


  END Update_substitution_detail;

Line: 1456


  /*   Delete_formula_association                                    */
  /*                                                                 */
  /* DESCRIPTION:                                                    */
  /*                                                                 */
  /*                                                                 */
  /* History :                                                       */
  /* Rajender Nalla    09-OCT-06   Initial implementation.                     */
  /* =============================================================== */
  PROCEDURE Delete_formula_association
  ( p_api_version              IN          NUMBER
  , p_init_msg_list            IN          VARCHAR2
  , p_commit                   IN          VARCHAR2
  , p_formula_substitution_id  IN          NUMBER    Default NULL
  , p_substitution_id          IN          NUMBER    Default NULL
  , p_substitution_name        IN          VARCHAR2  Default NULL
  , p_substitution_version     IN          NUMBER    Default NULL
  , p_formula_id               IN          NUMBER    Default NULL
  , p_formula_no               IN          VARCHAR2  Default NULL
  , p_formula_vers             IN          NUMBER    Default NULL
  , x_message_count            OUT NOCOPY  NUMBER
  , x_message_list             OUT NOCOPY  VARCHAR2
  , x_return_status            OUT NOCOPY  VARCHAR2
  ) IS

    CURSOR get_formula_substitution_id(vSubstitution_id    NUMBER
                                      ,vformula_id         NUMBER) IS
      SELECT formula_substitution_id
      FROM   gmd_formula_substitution
      WHERE  substitution_id  = vSubstitution_id
      AND    formula_id       = vformula_id;

Line: 1488


      SELECT substitution_id
      FROM   gmd_formula_substitution
      WHERE  formula_substitution_id  = vformula_Substitution_id;

Line: 1496


    l_api_name    CONSTANT VARCHAR2(30) := 'Delete_formula_association';

Line: 1499


    substitution_delete_failure     EXCEPTION;

Line: 1524


                                        ,'Delete_formula_association'
                                        ,gmd_substitution_pub.m_pkg_name) THEN
      RAISE invalid_version;

Line: 1540


        RAISE substitution_delete_failure;

Line: 1550


          RAISE substitution_delete_failure;

Line: 1563


        RAISE substitution_delete_failure;

Line: 1574


          RAISE substitution_delete_failure;

Line: 1589


          RAISE substitution_delete_failure;

Line: 1601


        RAISE substitution_delete_failure;

Line: 1608


    IF NOT is_update_allowed(l_substitution_id) THEN
      RAISE substitution_delete_failure;

Line: 1613


    GMD_SUBSTITUTION_PVT.Delete_formula_association
    ( p_formula_substitution_id  => l_formula_substitution_id
    , x_message_count            => x_message_count
    , x_message_list             => x_message_list
    , x_return_status            => x_return_status
    );

Line: 1621


      RAISE substitution_delete_failure;

Line: 1629


    WHEN substitution_delete_failure OR invalid_version OR setup_failure THEN
         fnd_msg_pub.count_and_get (
            p_count => x_message_count
           ,p_encoded => FND_API.g_false
           ,p_data => x_message_list);

Line: 1644


  END Delete_formula_association;