cobol - Inserting data into SQL Server returns error code 00q -
first of all: biggest part of code working few weeks ago. in mean time, we've swapped mysql server sql server , we've changed schema design little.
i use percobol, utilizes opencobol compiler far i've read.
perform 2010-gebruiker-insert perform 2020-gebruiker-jointable 2010-gebruiker-insert. move "gebruiker" gebr_type exec sql insert gebruikers values ( trim( :login ), trim( :achternaam ), trim( :email ), trim( :projectcode ), trim( :gebr_type ), trim( :voornaam ), sha1( trim( :wachtwoord ) ) ) end-exec . 2020-gebruiker-jointable. exec sql insert leertrajectengebruikersjoin values (trim( :projectcode ), trim( :login)) end-exec .
whereas database design of these tables looks this:
when display values before insert
statement in 2010
, shown correctly. when try display them after insert
, aren't shown.
the error thrown (which getting caught in logger) tells me of errorcode 00q
. i've been doing searching can't seem find means. more so, far i've seen code starting 00
should indicate fine.
the fields used declared , populated csv file:
01 ws-input. 05 achternaam pic x(25) value spaces. 05 voornaam pic x(15) value spaces. 05 email pic x(50) value spaces. 05 login pic x(15) value spaces. 05 wachtwoord pic x(11) value spaces. 05 gebr_type pic x(20) value spaces. 05 projectcode pic x(10) value spaces.
what have overlooked return error? important: when change jdbc string or inputfile string, notified logger faulty connection. therefore i'm assuming both connection , reading of data working intended.
ok, since have done, according question, here comment answer :-)
define pic -(4)9 field. move sql error-code that, , print/display that. think you'll find q negative number, can track in sql documentation.
Comments
Post a Comment