Deliver Form 怎样确定 Lot Serial 使用的 LOV

根据业务类型动态选择Deliver Form中的Lot Serial LOV

原创于 2015-07-01 10:03:32 发布 · 752 阅读

0 ·

CC 4.0 BY-SA版权

EBS: Inventory 专栏收录该内容

37 篇文章

订阅专栏

在Deliver入库过程中，为适应不同业务场景对Lot和Serial的限制，需在代码层面而非Form上设定LOV。通过Form RCVTXERT的LOT_ENTRY块和LOT_NUMBER项，调用LOB_LIB.PICK_LOV(INVLTENT.pld)过程，依据业务类型动态确定Lot的Record Group，从而实现LOV的选择。可在FRD log中搜索SET_LOV_PROPERTY查看所选Record Group。

在做 Deliver 入库的时候, 需要选择可用的 Lot 和 Serial. 不同的业务场景下, 对 Lot Serial 的限制也不一样, 所以不能在 Form 上面确定要用哪个 LOV. 因此我们的 Form 是在代码里面, 根据业务类型来决定使用哪个 LOV.

确定 Lot 使用的 LOV:
WHEN-NEW-ITEM-INSTANCE Trigger Fired:
Form: RCVTXERT
Block: LOT_ENTRY
Item: LOT_NUMBER
Procedure: LOB_LIB.PICK_LOV (INVLTENT.pld)

      v1 := inv_rsvtrx.issue_receipt (to_number (name_in ('mtl_lot_reference.action_id')));
      copy (to_char (v1), ('lot_control.trx_act'));
      IF (to_number (name_in ('lot_control.trx_act')) IN (2, 28)) THEN
         inv_rsvtrx.set_rec_group (
            to_number (name_in ('mtl_lot_reference.source_type_id'))
          , to_number (name_in ('mtl_lot_reference.action_id'))
          , 'lot_number_lov_2'
         );
      ELSE
         inv_rsvtrx.set_rec_group (
            to_number (name_in ('mtl_lot_reference.source_type_id'))
          , to_number (name_in ('mtl_lot_reference.action_id'))
          , 'lot_number_lov'
         );
      END IF;