Raul wrote:
> Currently, the expression ('')=:'' produces an error.
Did you try this?
''=:''
('')=:''
(0$a:)=:''
(0$a:)=:0$a:
'`'=:i.0
The problem is that 'dsn=' ddcon@,L:0 need isn't what you think it is. That
is, the RHS of your assignment isn't '' .
dbs=: (#~ 'DB' (1 e. E.)S:0]) {."1 ddsrc'' NB. this is also
0$a: for me.
need=: (0 ~: nc dbs)#dbs
(need)=: rhs =: 'dsn=' ddcon@,L:0 need NB. same problem you
had
|ill-formed name
| (need) =:rhs=:'dsn='ddcon@,L:0 need
''-:rhs NB. aye, there's the
rub
0
rhs
_1
ddcon NB. why?
ddcon_jdd_
ddcon_jdd_
3 : 0
NB. [snip]
if. -.iscl y do. errret ISI08 return. end.
iscl_jdd_ need NB. ah..
0
errret_jdd_ ISI08_jdd_ NB. ..ha
_1
iscl_jdd_ NB. what is the test?
2&=@(3!:0) *. 1: >: [: # $
(need) =:'dsn='ddcon@,L:0"_ 0 need Nb. pass it
Note that I haven't tested this last line with nominal data.
-Dan
PS: http://www.jsoftware.com/pipermail/programming/2006-May/002205.html
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
