F110的替代问题

我现在准备用替代的方式，替换F110的Payment 的会计凭证的BKPF-XBLNR和BSEG-SGTXT。

但是却遇到一些问题：

1. BKPF-XBLNR我准备取原始凭证的编号。比如付款的是供应商的发票，那么就取发票的凭证号。

我的替代的程序如下：

  data: e_belnr like bseg-belnr,

        i_laufi like regup-laufi,

        i_bktxt like bkpf-bktxt.

  clear: i_laufi, i_bktxt.

  split bkpf-bktxt at '-' into i_bktxt i_laufi.

  select single belnr into e_xblnr

    from regup

    where laufi = i_laufi

      and vblnr = bkpf-belnr

      and blart = 'RE'

      and koart = 'K'.

执行后，没有任何结果。我怀疑执行替代的时候BKPF-BELNR没有记录。有什么办法可以解决这个问题呢？

2. BSEG-SGTXT的问题和BKPF-XBLNR类似。

多谢各位！