Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask

Re^2: Sybperl 2.18 and temporary tables

by Redwing (Initiate)
on Feb 04, 2011 at 22:16 UTC ( #886311=note: print w/replies, xml ) Need Help??

in reply to Re: Sybperl 2.18 and temporary tables
in thread Sybperl 2.18 and temporary tables


Thank you for your reply.

Yikes indeed - I'm afraid in this new job I started I've gotten into a sort of an "Office of the Future in the Land That Time Forgot" type situation. One of the other technologies they're asking me to upgrade is 22 years old! (dtksh).

At any rate I remembered a similar problem with Sybase::CTlib from years ago and realized what I was doing wrong. For the edification of others who are putting in far too many hours:

My problem code looked like this:

&dbcmd($proc, "SELECT crdate into #tmp_table FROM sysobjects \n"); &dbcmd($proc, "SELECT * FROM #tmp_table \n"); &dbsqlexec($proc);

What I was forgetting was that when you're doing a select into a table followed by a select out of that table you need an additional &dbsqlexec($proc); in between the 2 statements the same way you need an intervening &executesql; when using Sybase::CTlib:

&dbcmd($proc, "SELECT crdate into #tmp_table FROM sysobjects \n"); &dbsqlexec($proc); &dbcmd($proc, "SELECT * FROM #tmp_table \n"); &dbsqlexec($proc);

Now I can gleefully return to upgrading those 22 year old dtksh CGI scripts to the latest 17 year old version!

Thanks very much for taking the time to respond! Redwing

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://886311]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (5)
As of 2021-01-17 19:04 GMT
Find Nodes?
    Voting Booth?