Power Builder - UN GRAN FAVOR ME PUDIERAN AYUDAR

UNA GRAN AYUDA SI ALGUIEN TUVIERA UN MANUAL O ALGO QUE ME PUDIERA AYUDAR SOBRE LAS CONEXIONES EN MODO NATIVO (INI)
SELO AGRADECERIA GRACIAS

crea un archivo .ini con el siguiente contenido

[SISTEMA]
DBMS=MSS Microsoft SQL Server 6.x
DataBase=SISTEMA_VENTAS
UserId=""
DBPass=""
LogID="SA"
LogPass=""
ServerName="."
DBParm=""

// lee el archivo ini.
// gs_path_directory es una variable general igual al getcurrentdirectory()

ls_dbms =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","DBMS","")
ls_datablse =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","DataBlse","")
ls_userId =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","UserId","")
ls_dbPass =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","DBPass","")
ls_LogId =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","LogID","")
ls_logPass =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","LogPass","")
ls_server =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","ServerName","")
ls_dbParm =ProfileString(gs_path_directory + "\sistema.ini","SISTEMA","DBParm","")

// crea la conexion
SQLCA.DBMS = ls_dbms
SQLCA.DataBase = ls_database
SQLCA.UserId = ls_userid
SQLCA.DBPass = ls_dbpass
SQLCA.LogId = ls_logid
SQLCA.LogPass = ls_logpass
SQLCA.ServerName = ls_server
SQLCA.DBParm = ls_dbparm
SQLCA.Lock = ls_lock
Choose case lower(ls_autocommit)
case "true", "1","on"
SQLCA.AutoCommit = True
case "false", "0", "of"
SQLCA.AutoCommit = False
case else
SQLCA.Autocommit = False
End Choose

Connect Using SQLCA;
If SQLCA.SQLCode <> 0 Then
MessageBox("No se puede conectar con la base de datos", &
SQLCA.SQLErrText)
return -1
End If

open(w_mdi_frame)

espero te de una idea es mi coneccion que utilizo