# Regular Expression in ABAP

In an Upload file (Excel sheet ) I had a requirement to validate the amount ( currency ). Below were the validations to be considered for the string containing the amount

1. The string must contains numbers and decimal dot only(optional decimal).
2. There must be only 13 digits before decimal and 2 digits after decimal.
3. There should not be any special characters in the string apart from decimal point.
4. Only one decimal point should be used in the string.

To achieve this initially, I used the below logic on the sting <amount>.

1. <amount> contains only (1234567890.)
1. Separate the <amount> into <first_part> <second_part> <third_part> at ‘.’

Find the length of <first_part>.

Find the length of <second_part>.

Check <first_part> < 13 and <second_part> < 2.

Check <third_part> is initial.

1. <amount> is less than 0.

This all validation takes nearly around 25 – 30 lines of code.

But, after knowing the Regular expression concept I revised this 25 – 30 lines of code into just 1 line as below.

FIND ALL OCCURRENCES OF regex ‘^([0-9]\d{0,12})(\.[0-9]{0,2})?\$’ IN <amount> MATCH COUNT sy-tabix.

sy-tabix = 1 => its true/correct.

sy-tabix = 0 => its wrong/ incorrect.

Brief Explanation.

Syntax : FIND ALL OCCURRENCES OF regex <Expression> in <String> Match Count <Variable> .

Regular Expression : ^([0-9]\d{0,12})(\.[0-9]{0,2})?\$

^ : Matches the starting position within the string

() : The string matched within the parentheses can be recalled later.

[] : Matches a character that is contained within the brackets.

: Specifies a range.

{} : Number of characters.

\d : Digits.

\. : Mandatory dot.

: Indicates there is zero or one of the preceding element.

\$ : Matches the ending position of the string.

[0-9]       : Digits only any number between 0 to 9.

{0,12}     : Up to 13 characters allowed only before decimal.

{0,2}        : up to 2 characters allowed only after decimal.

Regards

Rounak

### Assigned Tags

You must be Logged on to comment or reply to a post.

You can avoid putting sy-tabix in write position.

Regular expression can be simplified as below and sy-subrc = 0 means correct:

FIND REGEX '^\d{0,13}\.\d{0,2}\$' IN lv_string.

Former Member
Blog Post Author

Thank U Manish..

ðŸ™‚

Hi Rounak,

Good one helped me in Validating PAN No... ðŸ™‚ ðŸ™‚

Regards,
MNK

Hi Rounak,

I have a requirement to get values of currency from non-currency fields and validate for valid currency by adding decimal, separators. I tried using your regular expression but that does not seem to work in my case. I made a small change since XREF1 is only 12 characters I changed to {0,9} but the sy-tabix is always 0.

Below is my code:

``````DATA: lv_tabix TYPE sy-tabix.

IF bseg-xref1 IS NOT INITIAL.
REPLACE ALL OCCURRENCES OF c_sep
IN bseg-xref1 WITH space.

CONDENSE bseg-xref1.
lv_aed_curr  = bseg-xref1.
lv_aed_curr1 = lv_aed_curr.

FIND ALL OCCURRENCES OF REGEX '^([0-9]\d{0,9})(\.[0-9]{0,2})?\$'
IN lv_aed_curr1 MATCH COUNT lv_tabix.

IF  lv_tabix = 1.
* Add separators to the acquired currency
CALL FUNCTION 'HRCM_AMOUNT_TO_STRING_CONVERT'
EXPORTING
betrg  = lv_aed_curr1
IMPORTING
string = bseg-xref1.
CONDENSE bseg-xref1.

ELSE.
MESSAGE e730(zzfn) WITH 'Please enter a valid amount currency'.
ENDIF.
*ENDIF.``````

Hi All,

I have a requirement to replace all occurrences of special characters in the string with space. Any character in the string which is not a number or character should be replaced with space.Can you please guide me how can this be acheived using REGEX.

Thanks

Regards,

Tulasi

Hi Tulasi,

you could try

``REPLACE ALL OCCURRENCES OF REGEX `[^A-Za-z0-9]+` IN text WITH | |``

this will replace all characters except for letters and numbers with space

Hi All,

I need to delete first line and last 2 lines from my document using regular expression.

Can anyone help me with that!

Thanks

Parmeet