Для расчета налога в SAP принято пользоваться кодами налогов. Это очень удобно, т.к. в код зашита не только ставка, но и прочие параметры, используемые для работы с налогом.


Функция, возвращающая сумму налога по коду: CALCULATE_TAX_FROM_NET_AMOUNT, кроме суммы функция возвращает еще ряд параметров, связанных с кодом налога, но сегодня мы рассмотрим базовый вариант – возврат суммы налога.

Для иллюстрации работы функции напишем следующий код:

REPORT  ZFM_TAX.

data:
E_FWNAV LIKE  BSETFWSTE,
E_FWNVV LIKE  BSETFWSTE,
E_FWSTE LIKE  BSETFWSTE,
E_FWAST LIKE  BSETFWSTE,

BUKRS   like  bsegBUKRS,
WAERS   like  bkpfwaers,
WRBTR   like  bsegWRBTR,
MWSKZ   like  bsegMWSKZ.

DATA lt_mwdat  TYPE STANDARD TABLE OF rtax1u15.

BUKRS   ‘5000’.
WAERS   ‘RUB’.
WRBTR   ‘1000.00’.
MWSKZ   ‘ZA’.

CALL FUNCTION ‘CALCULATE_TAX_FROM_NET_AMOUNT’
EXPORTING
I_BUKRS                 BUKRS
I_MWSKZ                 MWSKZ
*   I_TXJCD                 = ‘ ‘
I_WAERS                 WAERS
I_WRBTR                 WRBTR
*   I_ZBD1P                 = 0
*   I_PRSDT                 =
*   I_PROTOKOLL             =
*   I_TAXPS                 =
*   I_ACCNT_EXT             =
*   I_ACCDATA               =
IMPORTING
E_FWNAV                 E_FWNAV
E_FWNVV                 E_FWNVV
E_FWSTE                 E_FWSTE
E_FWAST                 E_FWAST
TABLES
T_MWDAT                 lt_mwdat
* EXCEPTIONS
*   BUKRS_NOT_FOUND         = 1
*   COUNTRY_NOT_FOUND       = 2
*   MWSKZ_NOT_DEFINED       = 3
*   MWSKZ_NOT_VALID         = 4
*   KTOSL_NOT_FOUND         = 5
*   KALSM_NOT_FOUND         = 6
*   PARAMETER_ERROR         = 7
*   KNUMH_NOT_FOUND         = 8
*   KSCHL_NOT_FOUND         = 9
*   UNKNOWN_ERROR           = 10
*   ACCOUNT_NOT_FOUND       = 11
*   TXJCD_NOT_VALID         = 12
*   OTHERS                  = 13
.
IF SYSUBRC <> 0.
* Implement suitable error handling here
ENDIF.

break-point.

 

Итак, запустив данную программу, мы сможем увидеть отклик функции в отладчике. Смотрим…

Импортируемые параметры:

Мы видим, что сумма налога возвращается в поле E_FWSTE и E_FWAST

Заполненная таблица:

Позже, я еще вернусь к данной функции, для того чтобы рассмотреть её возможности более подробно.

[/paid_content]

   
© 2013 sap-blog.ru
Яндекс.Метрика