Oracle EBS EGO新增物资

declare
  l_Item_Tbl_Typ  EGO_Item_PUB.Item_Tbl_Type;
  x_Item_Table    EGO_Item_PUB.Item_Tbl_Type;
  x_Return_Status VARCHAR2(240);
  x_Msg_Count     NUMBER;
  X_MSG           VARCHAR2(240);
begin
  l_Item_Tbl_Typ(1).Transaction_Type := 'CREATE';
  l_Item_Tbl_Typ(1).Item_Number := 'LS00000001';
  l_Item_Tbl_Typ(1).Segment1 := 'LS00000001';
  l_Item_Tbl_Typ(1).Item_Catalog_Group_Id := 10002;
  l_Item_Tbl_Typ(1).Description := '函数生成';
  l_Item_Tbl_Typ(1).Primary_Uom_Code := '件';
  l_Item_Tbl_Typ(1).Organization_Id := 82;
  l_Item_Tbl_Typ(1).Organization_Code := 'WL';
  l_Item_Tbl_Typ(1).Language_Code := 'ZHS';
  l_Item_Tbl_Typ(1).INVENTORY_ITEM_STATUS_CODE := 'Active';

  Dbms_Output.Put_Line('Ego_Item_Pub.Process_Items API call start ' ||
                       To_Char(SYSDATE, 'DD-MON-RRRR HH24:MI:SS'));
  Ego_Item_Pub.Proc