paradox 4.5 & oracle 10g

We are in the process of migrating our applications to Oracle10g database, but in order to achieve this first we have to configure one vintage Paradox 4.5 (for win) application to use 10g database.
The guys who wrote it are long time gone from our firm and none of us knows Paradox or the way it works.

'till now I've managed to find out the following:
The application used to work with interbase but was reconfigured to use Oracle8.0 later.
It runs on win98 machine with sql*net V2 Lite installed along with PCTCP (don't know if that's mandatory - or what it's for).
The network protocol installed is "TCP/IP Stack. FTP Software, Inc.".

I've scanned trough some source code files and have come upon Oracle's sql*net v1 strings:

ConnectBase = "@t:192.168.4.8/1521:pp80"

I've replaced IP and Oracle SID in connect string with 10g database's properties and the application even managed to obtain connection with database, but it hangs right after that because sql*net v2 and Net8 are incompatibile.

I've even installed Oracle8i client and tried to replace sql*net v1 connect string with entry in tnsnames.ora but I get database connection error.

I suppose what we are dealing with here is ObjectPAL language (from what I've read on net).

Can some of you guys please point me out some references or info about connecting with Paradox to OracleDB, through native or ODBC calls.

Or any kind of advice/explanation/suggestion about what to change to make it work.

Here is relevant (I think) code from two source files:


PROC OILGLogin()
PRIVATE RetValue, User, Pass, nW1, nW2,
OILGSola, OILGUser, OILGPass, OILGIdle

OILGSola = IIF(ConnectType=0,""," æOLSKA BAZA")
SWITCH
CASE ConnectProduct = "INTERBAS":
OILGSola = "*IB*"+OILGSola
CASE ConnectProduct = "ORACLE":
OILGSola = "*OR*"+OILGSola
OTHERWISE:
OILGSola = "*?*"+OILGSola
ENDSWITCH


; OILGSola =
IIF(StrRight(ConnectBase,5)="o.gdb","","SOLSKA BAZA")
OILGUser = ""
OILGPass = ""
OILGIdle = TICKS() ; IDLE loop counter

WHILE True
RetValue = OILGLoginDlg()
SWITCH
CASE RetValue = 0: ; OK in preverjen
RETURN True
CASE RetValue = 1: ; CANCEL
RETURN False
CASE RetValue = 2: ; Help
ENDSWITCH
ENDWHILE
RETURN False
ENDPROC ; OILGLogin - prijavljanje na sistem

KEYDISABLE -130, -131


SETCANVAS DEFAULT
CLEAR
ConnectType = 1
IF NOT ISRUNTIME() THEN
Message "SYS001: Ne morem se vkljuciti v program"
Sleep 5000
Message ""
QUIT
ENDIF
ConnectType = 0
ConnectName = "onko"
ConnectPass = "onko"
ConnectProduct = "ORACLE"
ConnectBase = "@t:192.168.4.8/1521:pp80"


PROC DBConnect(aName,aPass,aBase)
PRIVATE OILGcDir

OILGcDir = DIRECTORY()
SETDIR OI_PdoxPath
; MESSAGE "Pripravljam povezavo z bazo podatkov"
SQLRELEASE
; sqlclearconnect
SQLSELECTCONNECT PRODUCT ConnectProduct
VALUES aName, aPass, aBase
SETDIR OILGcDir

IF NOT RetVal THEN
MESSAGE "Napaka na datoteŸnem stre§niku:
"+ConnectProduct+"/"+aBase
SLEEP 2000
RETURN False
ENDIF

RETURN True
ENDPROC

WRITELIB LibName DBConnect
RELEASE PROCS DBConnect

SETCANVAS? CLEAR? WRITELIB? RELEASE PROCS?

That sure looks like Paradox DOS.

Why do you say 4.5 *Win*?

I've checked readme file in /pdoxrun directory and it also said something like this:


TABLE OF CONTENTS
-----------------

1. Contacting Borland
2. Using Paradox Runtime with Windows or OS/2
3. Notes on TUTILITY


... I guess I've made wrong assumption.