--- Roger Baklund <[EMAIL PROTECTED]> wrote: > * Arunachalam
> > Sent: Tuesday, January 13, 2004 10:39 PM
> > To: mySQL List
> > Subject: Re: mysql_init function issues :Connecting MySQL to COBOL
> >
> >
> > I have somehow managed to create the datatype in COBOL matching
> > to C datatype and passed as argument to mysql_init and
> > mysql_real_connect.
> >
> > My COBOL coding seems to working fine, but it could not able to
> > connect to MySQL and retrive Data. Instead it produce an error as;
>
> When you say "somehow managed", what does that mean? Have you ever connected
> to a mysql server with this code? Or is that what you are trying to do for
> the first time?
WHAT I MEANED HERE IS COBOL WOULDN'T ACCEPT EXISTING LIBMYSQL.LIB, FOR THAT
I HAVE CREATED THE COBOL COMPILER SPECIFIC LIBMYSQL.LIB, BY CONVERTING LIBMYSQL.DLL
INTO LIBMYSQL.DEF FILE USING AN UTILITY "PEXPORTS.EXE" AND THEN FROM THE .DEF FILE
I HAVE CREATED THE LIBMYSQL.LIB USING THE LIB:EXE OF MY COBOL COMPILER.
> > Unknown MySQL Server Host '"Ìž' (11001)
> >
> > It seems that MySQL Server Host identified by C API function
> > as '"Ìž'. I have given my MySQL server host nams as 'MySERVER'.
>
> How do you call the function? There seems to be a problem related to the
> parameters...
>
The actual calling routines in C is;
MYSQL *mysql_real_connect(MYSQL *mysql,
const char *host,
const char *user,
const char *passwd,
const char *db,
unsigned int port,
const char *unix_socket,
unsigned long client_flag)
I have declared the variables in COBOL with values are;
01 MYSQL pic x(1024).
01 DUMMY-POINTER pic 9(9) comp-5.
05 C-cMySQLHostName pointer
05 C-cMySQLHNData
06 filler pic x(7) value 'myHost'
06 filler pic x value LOW-VALUE
05 C-cMySQLUserID pointer
05 C-cMySQLUIData
06 filler pic x(4) value 'myUser'
06 filler pic x value LOW-VALUE
05 C-cMySQLPassword pointer
05 C-cMySQLPwdData
06 filler pic x(6) value 'myPwd'
06 filler pic x value LOW-VALUE
05 C-cMySQLDBName pointer
05 C-cMySQLDBNData
06 filler pic x(6) value 'myDB'
06 filler pic x value LOW-VALUE
05 C-cMySQLPort pic 9(4)
88 C-cMySQLPortData value 3306
05 C-cMySQLSocket pointer
05 C-cMySQLSktData
06 filler pic x(10) value 'mysql.sock'
06 filler pic x value LOW-VALUE
05 C-cMySQLFlag pic 9(9)
88 C-cMySQLFlagData value 0
It's equivalent COBOL coding is;
CALL "C_mysql_real_connect"
using by reference MySQL
by reference C-cMySQLHostName
by reference C-cMySQLUserId
by reference C-cMySQLPassword
by reference C-cMySQLDBName
by content C-cMySQLPort
by reference C-cMySQLSocket
by content C-cMySQLFlag
giving DUMMY-POINTER
I HAVE CLEARLY VERIFIED THAT THE DECLARATION EQIVALENT IN COBOL ARE CORRECT!!!!
> > Is this error message means what i write above? or anything else?
>
> I would guess there is something wrong with the way you pass the arguments
> to the function... "Ìž could be binary data.
>
> > If so, How could I resolve this issue?
>
> Change the first parameter or how you pass the parameters to the function.
>
> --
> Roger
I HAVE ALMOST SPENT 1 MONTH TILL NOW!!!!
My COBOL CODING DOES NOT PRODUCE ANY ERROR, BUT THE VARIABLE SPACE "MySQL" STORES THE
ERROR
MESSAGE FROM MySQL SERVER.
WHAT I THING IS IT CAN IDENTIFY MYSQL SERVER, BUT BEING SOME REASON IT WON'T PROCEED
FURTHER, I AM
IN THE POSITION TO IDENTIFY THE REASON AND CURE IT.
THANKS
ARUN.
________________________________________________________________________
Yahoo! India Mobile: Download the latest polyphonic ringtones.
Go to http://in.mobile.yahoo.com
--
MySQL General Mailing List
For list archives: http://lists.mysql.com/mysql
To unsubscribe: http://lists.mysql.com/[EMAIL PROTECTED]
