Need SQL code for this logic - - From Serial and To serial no.

Question

In Forms 4.5 Screen I have two text boxes where i will be entering From Serial No
and to serial no.
I want the code which will check whether any number in between these from and to serial exists in a table or not ?
For Example
Select * from t; -- contains
serial number
321-456-789
123-456-654
321-569-986
321-569-987
When I enter from Serial no 321-456-789 and to serial no as 321-456-789.. I should get a message sayinig that 321-456-789 exists.
When I enter from Serial no 321-569-986 and to serial no as 321-569-988.
I should get a message sayinig that 321-456-986 exists.
I should get a message sayinig that 321-456-987 exists.
I should get a message sayinig that 321-456-988 not exists.
is it possible with a SQL query or do we need to go for procedure or temp table ?
If anybody ahving similar code please post it here.
Thanks in Advance
Devender

Answer 1

Hi Devender,
Try this :
SQL> select * from t;
SN
321-456-789
123-456-654
321-569-986
321-569-987
SQL> var sn1 varchar2(11)
SQL> exec :sn1 := '321-569-986'
Procédure PL/SQL terminée avec succès.
SQL> var sn2 varchar2(11)
SQL> exec :sn2 := '321-569-988'
Procédure PL/SQL terminée avec succès.
SQL>1  select a.sn, decode(t.sn,null,'does not exists','already exists')
  2  from
  3  (select substr(replace(:sn1,'-','')+rownum-1,1,3)||'-'
  4        ||substr(replace(:sn1,'-','')+rownum-1,4,3)||'-'
  5        ||substr(replace(:sn1,'-','')+rownum-1,7,3) as sn
  6  from (select level
  7        from dual
  8        connect by level <= (replace(:sn2,'-','')-replace(:sn1,'-',''))+1
  9       )
10  )a,
11  t
12* where a.sn=t.sn(+)
SQL> /
SN                            DECODE(T.SN,NUL
321-569-986                   already exists
321-569-987                   already exists
321-569-988                   does not exists
SQL> exec :sn1 := '321-456-789'
Procédure PL/SQL terminée avec succès.
SQL> exec :sn2 := '321-456-789'
Procédure PL/SQL terminée avec succès.
SQL> l
  1  select a.sn, decode(t.sn,null,'does not exists','already exists')
  2  from
  3  (select substr(replace(:sn1,'-','')+rownum-1,1,3)||'-'
  4        ||substr(replace(:sn1,'-','')+rownum-1,4,3)||'-'
  5        ||substr(replace(:sn1,'-','')+rownum-1,7,3) as sn
  6  from (select level
  7        from dual
  8        connect by level <= (replace(:sn2,'-','')-replace(:sn1,'-',''))+1
  9       )
10  )a,
11  t
12* where a.sn=t.sn(+)
SQL> /
SN                            DECODE(T.SN,NUL
321-456-789                   already exists
SQL> Nicolas.