DSXchange

i have written a routine to connect to db2

Equate RoutineName To "ConnectToDB2"
Equate DBNAME TO Arg1
Equate DBSCHEMA TO Arg2
DB2CntCmd = "db2 CONNECT TO ":DBNAME
ResultText = @Null

Call DSExecute("UNIX", DB2CntCmd, ResultText, SystemReturnCode)

If SystemReturnCode <> 0 Then
Ans = "1"
Return(Ans)
End

If SystemReturnCode = 0 Then
Ans = "0"
Return(Ans)
End

--------------------------------------------------------------------------------

The Ans=1
Please let me know why is the routine not connecting to DB2

In other words, you need to have the routine tell you what went wrong. Plus... Where is DBSCHEMA being used? What user/password is it connecting as?

Hi Craig
It would be very helpful if you could rewrite that routine for me

I'm sure it would. However, I don't know DB2 and don't have access to it in my environment. What did your DSLogInfo message show?

I have modified the routine to
Equate RoutineName To "ConnectToDB2"
Equate DBNAME TO Arg1
DB2CntCmd = "db2 CONNECT TO ":DBNAME
ResultText = @Null

Call DSExecute("UNIX", DB2CntCmd, ResultText, SystemReturnCode)

If SystemReturnCode <> 0 Then
Ans = ResultText
Return(Ans)
End

If SystemReturnCode = 0 Then
Ans = "0"
Return(Ans)
End


This is returning the error as "Could not load the db2 program "

This is the complete error message

Result = Could not load program /db2t/gtstinsa/sqllib/bin/db2:
Could not load module /db2t/gtstinsa/sqllib/lib/libdb2.a(shr_64.o).
Dependent module /usr/opt/db2_08_01/lib/libdb2trcapi.a(shr_64.o) could not be loaded.
Member shr_64.o is not found in archive
Could not load module db2.
Dependent module /db2t/gtstinsa/sqllib/lib/libdb2.a(shr_64.o) could not be loaded.
Could not load module .

Make sure the 32-bit libraries appear ahead of the 64-bit libraries in your shared library search path.

...which was advised in the very first place. And if you do that, then even your DB2 stage will work. No need for a routine.

It has been repeatedly advised.