ABAP 代码中如何取到含税单价

在 ABAP 代码中，可以使用以下公式来计算含税单价：

含税单价 = 未税单价 * (1 + 税率)

其中，未税单价是指商品的实际价格，不包含税费。税率是指商品的税率，可以使用函数模块 `J_1B_GET_TAXRATE` 来获取。

以下是一个简单的 ABAP 代码示例，演示如何使用公式计算含税单价：

DATA: lv_netprice TYPE ekpo-netpr,  " 未税单价
      lv_taxcode  TYPE j_1btxcode-tax_code,  " 税码
      lv_taxrate  TYPE j_1btxcode-taxrate,   " 税率
      lv_grossprice TYPE ekpo-netpr.         " 含税单价

* 假设未税单价为 100，税码为 'VAT1'
lv_netprice = 100.
lv_taxcode = 'VAT1'.

* 调用函数模块获取税率
CALL FUNCTION 'J_1B_GET_TAXRATE'
  EXPORTING
    tax_code = lv_taxcode
  IMPORTING
    taxrate  = lv_taxrate.

* 计算含税单价
lv_grossprice = lv_netprice * (1 + lv_taxrate / 100).

WRITE: / 'The gross price for net price', lv_netprice, 'and tax code', lv_taxcode, 'is', lv_grossprice.

在上面的示例中，首先定义了四个变量：

- `lv_netprice`：未税单价，假设为 100。
- `lv_taxcode`：税码，假设为 'VAT1'。
- `lv_taxrate`：税率，通过函数模块 `J_1B_GET_TAXRATE` 获取。
- `lv_grossprice`：含税单价，根据公式计算得出。

然后，先调用函数模块 `J_1B_GET_TAXRATE` 获取税率信息，并将结果存储在 `lv_taxrate` 变量中。

最后，使用公式计算含税单价，并使用 `WRITE` 语句输出结果。

需要注意的是，在实际应用中，还需要考虑税率的舍入方式、小数位数等因素，以及可能存在的折扣、运费等额外费用。