Logic for correcting strings with different barckets

Question

can any one tell me the simple logic for correcting strings with different barckets
suppose say for eg.
(<{abc}>defgh) should evaluate to TRUE
(<{abc>} should evaluate to FALSE
Things to check is
1. number of opening brace and closing brace
2. Their position are correct or not
If the above two conditions are met than it is TRUE else FALSE
i guess string function with decode and lenght function or case should do but bit difficult to develop this logic in with sql
Thanks,
AAK

Answer 1

Hi,
Here is non REGEXP_REPLACE version ( Unfotunately dont have 10G to feel the power of REGEXP_REPLACE.
SQL> ed
Wrote file afiedt.buf
  1  SELECT DECODE(SUM(CASE
  2                    WHEN Left = '(' AND Right =')' THEN 0+Count_Bracket
  3                    WHEN Left = '<' AND Right ='>' THEN 0+Count_Bracket
  4                    WHEN Left = '{' AND Right ='}' THEN 0+Count_Bracket
  5                    WHEN Left = '[' AND Right =']' THEN 0+Count_Bracket
  6                    ELSE
  7                       1
  8                    END
  9                    )
10         ,0,'Valid','Invalid')
11  FROM
12  (
13     SELECT SUBSTR(str,(len+1 - level),1) Left, SUBSTR(str,(len + level),1) Right, MOD(LENGTH(str),2)
14     FROM
15     (
16      SELECT
17         REPLACE(translate('&exp','abcdefgh','        '),' ') str,
18         LENGTH(REPLACE(translate('&exp','abcdefgh','        '),' '))/2 len
19      FROM DUAL
20    )
21    CONNECT BY LEVEL <= LEN
22* )
SQL> /
Enter value for exp: (<{abc>} )
old  17:        REPLACE(translate('&exp','abcdefgh','        '),' ') str,
new  17:        REPLACE(translate('(<{abc>} )','abcdefgh','        '),' ') str,
Enter value for exp: (<{abc>} )
old  18:        LENGTH(REPLACE(translate('&exp','abcdefgh','        '),' '))/2 len
new  18:        LENGTH(REPLACE(translate('(<{abc>} )','abcdefgh','        '),' '))/2 len
DECODE(
Invalid
SQL>
SQL> /
Enter value for exp: <{[()]}>
old  17:        REPLACE(translate('&exp','abcdefgh','        '),' ') str,
new  17:        REPLACE(translate('<{[()]}>','abcdefgh','        '),' ') str,
Enter value for exp: <{[()]}>
old  18:        LENGTH(REPLACE(translate('&exp','abcdefgh','        '),' '))/2 len
new  18:        LENGTH(REPLACE(translate('<{[()]}>','abcdefgh','        '),' '))/2 len
DECODE(
Valid
SQL>
SQL> /
Enter value for exp: ([{<>}])
old  17:        REPLACE(translate('&exp','abcdefgh','        '),' ') str,
new  17:        REPLACE(translate('([{<>}])','abcdefgh','        '),' ') str,
Enter value for exp: ([{<>}])
old  18:        LENGTH(REPLACE(translate('&exp','abcdefgh','        '),' '))/2 len
new  18:        LENGTH(REPLACE(translate('([{<>}])','abcdefgh','        '),' '))/2 len
DECODE(
Valid
SQL>
SQL> /
Enter value for exp: (<{abc}>defgh)
old  17:        REPLACE(translate('&exp','abcdefgh','        '),' ') str,
new  17:        REPLACE(translate('(<{abc}>defgh)','abcdefgh','        '),' ') str,
Enter value for exp: (<{abc}>defgh)
old  18:        LENGTH(REPLACE(translate('&exp','abcdefgh','        '),' '))/2 len
new  18:        LENGTH(REPLACE(translate('(<{abc}>defgh)','abcdefgh','        '),' '))/2 len
DECODE(
Valid
SQL> Note: Only thing needs to care is " translate('<{[()]}>','abcdefgh',' ') " if string has some additional characters please include here.
Regards