Oracle EBS 物料升级版本

DECLARE
  l_Item_Rec       inv_item_grp.item_rec_type;
  X_Item_Rec       inv_item_grp.item_rec_type;
  x_Error_Tbl      inv_item_grp.error_tbl_type;
  l_Revision_rec   inv_item_grp.Item_Revision_Rec_Type;
  x_Return_Status  Varchar2(1);
  l_user_id        Number := 0; --User ID, Sysadmin here
  l_cur_mfg_org_id Number := 122; --Current Inv Organization
  Cursor Cr Is
    Select MSI.SEGMENT1,
           MSI.DESCRIPTION,
           MSI.ITEM_TYPE,
           MSI.CREATION_DATE,
           MSI.ORGANIZATION_ID,
           MSI.INVENTORY_ITEM_STATUS_CODE,
           MSI.INVENTORY_ITEM_ID,
           MIR.REVISION_ID,
           MIR.REVISION_LABEL,
           MIR.IMPLEMENTATION_DATE,
           MIR.EFFECTIVITY_DATE
      From MTL_SYSTEM_ITEMS_B MSI, MTL_ITEM_REVISIONS_VL MIR
     Where MSI.INVENTORY_ITEM_ID = MIR.INVENTORY_ITEM_ID
       And MSI.ORGANIZATION_ID = MIR.ORGANIZATION_ID
       And MSI.ORGANIZATION_ID = l_cur_mfg_org_id