Re: What's wrong with this RUNSQLSTM?

[rob@xxxxxxxxx]

The error message was pointing to the wrong spot.  I had an extra comma 
after the last field.

Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 




rob@xxxxxxxxx
Sent by: midrange-l-bounces@xxxxxxxxxxxx
02/25/2003 11:34 AM
Please respond to Midrange Systems Technical Discussion
 
        To:     Midrange Systems Technical Discussion 
<midrange-l@xxxxxxxxxxxx>
        cc: 
        Fax to: 
        Subject:        What's wrong with this RUNSQLSTM?


Create table GDWEB/FTPUSER
       (
       LOGIN character varying(100) not null
        constraint FTPUSER_NonUpperLogin check((LOGIN<>' ') and
                                               (LOGIN=UPPER(LOGIN))),
       LOGINPWD character varying(100) not null
        constraint FTPUSER_NonUpperPassword check((LOGINPWD<>' ' ) and
 (LOGINPWD=UPPER(LOGINPWD))),
       INITCOMPANY char (2) not null
        constraint FTPUSER_InvalidCompany
         Foreign key (COMPANY)
         References GDWEB/FTPCOMPANY (COMPANY),

       IPADDRESS character varying(30) not null
        constraint FTPUSER_BlankIPAddress check(IPADDRESS<>' '),
       );

>From the printout:
...
 9        INITCOMPANY char (2) not null 
10         constraint FTPUSER_InvalidCompany 
11          Foreign key (COMPANY) 
12          References GDWEB/FTPCOMPANY (COMPANY),
...
MSG ID  SEV  RECORD  TEXT 
SQL0199  30      11  Position 10 Keyword FOREIGN not expected. Valid 
tokens:
                     CHECK UNIQUE PRIMARY REFERENCES. 


Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing 
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.