调用API验证货位的代码代码,OracleEBS代码库,德仔网

代码语言
代码分类
【OracleEBS】调用API验证货位的代码
作者:Dezai.CN / 发布于2013/1/5/ 855
fnd_profile.put('MFG_ORGANIZATION_ID',p_organization_id);
           
    l_locator_type := get_locator_type(p_sub_inv,p_organization_id);        
    IF l_locator_type != 1  THEN
                        
      l_locator  := p_sub_inv || '.' ||
                    p_project || '.' || 
                    p_task;

            
      inv_loc_wms_pub.create_locator(x_return_status            => l_status,
                                     x_msg_count                => l_msg_count,
                                     x_msg_data                 => l_msg_data,
                                     x_inventory_location_id    => l_locator_id,
                                     x_locator_exists           => l_locator_exists,
                                     p_organization_id          => p_organization_id,
                                     p_organization_code        => p_organization_code,
                                     p_concatenated_segments    => l_locator,
                                     p_description              => NULL,
                                     p_inventory_location_type  => l_locator_type,
                                     p_picking_order            => NULL,
                                     p_location_maximum_units   => NULL,
                                     p_subinventory_code        => p_sub_inv,
                                     p_location_weight_uom_code => NULL,
                                     p_max_weight               => NULL,
                                     p_volume_uom_code          => NULL,
                                     p_max_cubic_area           => NULL,
                                     p_x_coordinate             => NULL,
                                     p_y_coordinate             => NULL,
                                     p_z_coordinate             => NULL,
                                     p_physical_location_id     => NULL,
                                     p_pick_uom_code            => NULL,
                                     p_dimension_uom_code       => NULL,
                                     p_length                   => NULL,
                                     p_width                    => NULL,
                                     p_height                   => NULL,
                                     p_status_id                => 1,
                                     p_dropping_order           => NULL);
      IF l_locator_id IS NULL THEN
        o_err_code := g_error;
        o_err_msg  := '创建(获取)货位弹性域发生错误';
      ELSE
        o_locator_id := l_locator_id;
      END IF;
试试其它关键字
　验证货位　
同语言下
可能有用的
Dezai.CN贡献的其它代码(4037)