Cobol : Embedded Sql

[the_ruthless]

Hello,

im doing a project for school.
We have to make a DB in access and contact it with EMBEDDED SQL
im trying to build a simple search engine now but i get an error.

ERROR MESSAGE

+0000000001

CODE

       zoek-gegevens.
            EXEC SQL
               select LidNaam, LidAdres, LidGeboortedatum,
               LidTelefoon INTO :lid-naam, :lid-adres,
               :lid-geboortedatum, :lid-telefoon
               from leden
               where LidNaam = :lid-naam
            END-EXEC.
               if sqlcode not = 0
                  if sqlcode = 100
                       display "deze naam bestaat helaas niet"
                        line lijn-nummer position 2
                  else
                       display "een error heeft zich voorgedaan"
                       display sqlcode
                       display sqlerrmc
                  end-if
               else
                  display "naam : " lid-naam line lijn-nummer position 2
                  compute lijn-nummer = lijn-nummer + 1
                  display "adres : " lid-adres
                   line lijn-nummer position 2
                  compute lijn-nummer = lijn-nummer + 1
                  display "telefoon : " lid-telefoon
                   line lijn-nummer position 2
               end-if
               accept lid-nummer.

sorry for the language i use here but im from belgium when you guys want i can translate the variables and text.

there are no error when i compile the project only when i run it and i typed in a name and i press enter to search