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:

schema design

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

Popular posts from this blog

ASP.NET/SQL find the element ID and update database -

c++ - Compiling static TagLib 1.6.3 libraries for Windows -

PostgreSQL 9.x - pg_read_binary_file & inserting files into bytea -