利用API更新资产标签号Demo

declare
  
    l_count         NUMBER;
    l_return_status VARCHAR2(100);
    l_msg_count     NUMBER := 0;
    l_msg_data      VARCHAR2(4000);
    l_request_id    NUMBER;
    reclass_err EXCEPTION;
    i NUMBER := 0;
    l_api_version CONSTANT NUMBER := 1.0;
    l_msg_list                 VARCHAR2(5) := fnd_api.g_false;
    l_commit_flag              VARCHAR2(5) := fnd_api.g_false;
    l_validation_level         VARCHAR2(5) := fnd_api.g_valid_level_full;
    l_debug_flag               VARCHAR2(5) := fnd_api.g_false;
    l_calling_fn               VARCHAR2(50) := 'Update Asset Desc Script';
    l_trans_rec                fa_api_types.trans_rec_type;
    l_asset_hdr_rec            fa_api_types.asset_hdr_rec_type;
    l_asset_desc_rec           fa_api_types.asset_desc_rec_type;
    l_asset_type_rec           fa_api_types.asset_type_rec_type;
    l_asset_cat_rec            fa_api_types.asset_cat_rec_type;
    l_asset_i