IDENTIFICATION DIVISION.
       PROGRAM-ID. connection.
       Environment division.

        input-output section.
        file-control.

        select parameterfile assign to
         "C:\Users\Nelis\Desktop\Project\Project\Back-End\parbest.csv"
        organization is line sequential
        access mode is sequential.

        select logfile assign to
        "C:\Users\Nelis\Desktop\Project\Project\Back-End\logfile.txt"
        organization is sequential
        access mode is sequential.

       DATA DIVISION.
       File section.
       FD logfile linage 60
       with footing at 56
       lines at bottom 3.
       01 logMessage pic x(100).

       FD parameterfile.
       01 viewingRecord.
        88 end-file             value high-values.
        02 readline             pic x(100).


       WORKING-STORAGE SECTION.
       EXEC SQL
         BEGIN DECLARE SECTION
       END-EXEC

      * SQLCODE is 0 for success, 100 for no data, -1 for failure
       01 SQLCODE PIC S9(3).

      * SQLSTATE is a 5 character communication code; 00xxx is success.
       01 SQLSTATE PIC X(5).

       01 JdbcString PIC X(255).

       EXEC SQL
         END DECLARE SECTION
       END-EXEC

       PROCEDURE DIVISION.
       Pgm.
       open output logfile
       perform do-connect
       exit program.

       MAIN-PARAGRAPH.
      * Initial code
       PERFORM DO-CONNECT

       DISPLAY "After connecting to the database:"

       DISPLAY "SQLCODE= " + SQLCODE.
       DISPLAY "SQLSTATE= " + SQLSTATE

      * Use the database

       PERFORM DO-DISCONNECT
       ACCEPT SQLSTATE
      * Terminate the program
       GOBACK

       DO-CONNECT.

       STRING "jdbc:sqlserver://localhost\SQLEXPRESS;"
         DELIMITED BY SIZE
         "databaseName=ProjectManagement;"
         DELIMITED BY SIZE
         "userName=Nelis;password=nelis"
         DELIMITED BY SIZE
         INTO JdbcString

       EXEC SQL
        CONNECT
          TO :JdbcString
          DRIVER "com.microsoft.sqlserver.jdbc.SQLServerDriver"
       END-EXEC.

       .
      * Disconnect from the SQL database connection.  This allows the
      * JDBC driver to free any resources required for the connection.

       DO-DISCONNECT.
       EXEC SQL
        DISCONNECT
       END-EXEC.