1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
$NetBSD: patch-ab,v 1.1 2004/05/14 18:49:52 wiz Exp $
--- dbdimp.c.orig 2001-12-13 02:05:26.000000000 +0100
+++ dbdimp.c
@@ -1970,23 +1970,23 @@ static int syb_st_describe_proc(imp_sth,
PerlIO_printf(DBILOGFP, " describe_proc: %s %s %s\n", db, owner, proc);
if(db && *db) {
- sprintf(sql, "
-select c.colid, c.name, c.usertype, c.prec, c.scale
- from %s..sysobjects o, %s..syscolumns c, %s..sysusers u
- where c.id = o.id
- and o.name = '%s'
- and o.type = 'P'
- and o.uid = u.uid
- and u.name = '%s'
+ sprintf(sql, "\
+select c.colid, c.name, c.usertype, c.prec, c.scale \
+ from %s..sysobjects o, %s..syscolumns c, %s..sysusers u\
+ where c.id = o.id \
+ and o.name = '%s'\
+ and o.type = 'P'\
+ and o.uid = u.uid\
+ and u.name = '%s'\
", db, db, db, proc, owner);
} else {
- sprintf(sql, "
-select c.colid, c.name, c.usertype, c.prec, c.scale
- from sysobjects o, syscolumns c
- where c.id = o.id
- and o.name = '%s'
- and o.type = 'P'
- and o.uid = user_id(u.uid
+ sprintf(sql, "\
+select c.colid, c.name, c.usertype, c.prec, c.scale \
+ from sysobjects o, syscolumns c\
+ where c.id = o.id \
+ and o.name = '%s'\
+ and o.type = 'P'\
+ and o.uid = user_id(u.uid\
and u.name = '%s'", proc, owner);
}
#endif
|
