Moin moin,

ich habe ein Service Programm (ILE RPG) in welchem ich sämtliche I/O Operationen auf eine bestimmte Datei durch führe.
Nun brauch ich aus n Datensätzen den Datensatz zwischen welchen ein bestimmtes Datum fällt.
Beispiel:

Satz A gültig vonDat 01.01.2001 bisDat 01.01.2002
Satz B gültig vonDat 02.01.2002 bisDat 01.01.2003
Satz C gültig vonDat 02.01.2003 bisDat 01.01.2004

Angefordertes Datum : 07.05.2002 (folglich Satz B)

Ich habe mir auch ein nettes SQL Statement zusammen gebastelt was (meiner Meinung nach) funktionieren sollte.

PHP-Code:
   c/exec sql                                                        
 c+   select * from Datei where                                   
 c+                                 Gebiet  =  :In_Gebiet and      
 c+                                 Ort     =  :In_Ort    and      
 c+                                 Hotel   =  :In_Hotel  and      
 c+                                 ReiArt  =  :In_ReiArt and      
 c+                                 VonDat  >  :In_ReiDat and      
 c+                                 BisDat  <  :In_ReiDat          
 c/end-exec 
Problem ist nun die Umwandlung Es soll ein *SRVPGM werden aus einem Modul erstellt. Das Statement befindet sich übrigens in einer internen Prozedur innerhalb des Service Programmes.
Da meine Kenntnisse im Bereich SQL bisher eher ...... bescheiden (um es mal nett zu formulieren) sind bekomme ich es einfach nicht hin.
Ich habe probiert:
QSYS/CRTSQLRPGI OBJ(SRV_OB_ORA) COMMIT(*NONE)
und
QSYS/CRTSQLPKG PGM(SRV_OB_ORA) OBJTYPE(*SRVPGM) MODULE(*ALL)
leider führten keiner der Wege nach Rom.....
Gibt es hier jemanden der mir einen kurzen Klaps auf den Hinterkopf geben kann?