REPORT ZCS_STR2.
DATA: AMT TYPE PC207-BETRG VALUE 98564765,
AMT_WORDS TYPE C LENGTH 100.
AMT = AMT / 7.
CALL FUNCTION 'HR_IN_CHG_INR_WRDS'
EXPORTING
AMT_IN_NUM = AMT
IMPORTING
AMT_IN_WORDS = AMT_WORDS
EXCEPTIONS
DATA_TYPE_MISMATCH = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ELSE.
REPLACE ALL OCCURRENCES OF 'Rupees' IN AMT_WORDS WITH ' '.
CONCATENATE 'Rupees' AMT_WORDS INTO AMT_WORDS.
WRITE :/ AMT,
/ AMT_WORDS.
ENDIF.