SQLIO Examples


9.5

The following example code shows a simple configuration for SQLIO.

Example of SQLIO settings in Plbwin INI file

 

[environment]

######################################################

# SQLIO errors are appended to log file 'sqldebug.txt'

#

PLB_SQLIO_DEBUG_LOG=>sqldebug.txt

#

######################################################

# SQLite Driver

#

PLB_SQLIO_HOST=c:\sunbelt\dbtest90\database\tsqlqa.db

PLB_SQLIO_DRIVER=1

#

######################################################

# SQL Server

#

#PLB_SQLIO_HOST=DBADO;;DSN=SqlIoDev

#PLB_SQLIO_DRIVER=2

#PLB_SQLIO_SQLTYPE=2

#DBADO=sunwado.dll

#

######################################################

 

Example of SQLIO Schema named 'orders.xml'

 

<?xml version="1.0" encoding="UTF-8"?>

<SqlioSchema>

    <Database>

        <name>SqLiteTest</name>

        <host>c:\sqlio_test\tsqlio.db</host>

        <driver>1</driver>

        <sql_type>1</sql_type>

        <description>Test database</description>

    </Database>

    <Database>

        <name>SqlSrvTest</name>

        <host>DBADO;;DSN=SqlIoDev</host>

        <driver>2</driver>

        <sql_type>2</sql_type>

        <description>Test database</description>

    </Database>

    <AFile>

        <name>Orders.aam</name>

        <file_name>Orders.txt</file_name>

        <key_info>5-9</key_info>

    </AFile>

    <IFile>

        <name>Orders.isi</name>

        <file_name>Orders.TXT</file_name>

        <index_name>Orders</index_name>

        <key_info>custid</key_info>

    </IFile>

    <File>

        <file_name>Orders.TXT</file_name>

        <table_name>Orders</table_name>

        <Column>

            <name>ORDERID</name>

            <offset>1</offset>

            <length>4</length>

            <type>0</type>

            <scale>0</scale>

            <sql_type>0</sql_type>

            <nullable>1</nullable>

            <zero_fill>0</zero_fill>

            <empty_null>0</empty_null>

            <format_mask></format_mask>

        </Column>

        <Column>

            <name>CUSTID</name>

            <offset>5</offset>

            <length>5</length>

            <type>0</type>

            <scale>0</scale>

            <sql_type>0</sql_type>

            <nullable>1</nullable>

            <zero_fill>0</zero_fill>

            <empty_null>0</empty_null>

            <format_mask></format_mask>

        </Column>

        <Column>

            <name>PRODID</name>

            <offset>10</offset>

            <length>3</length>

            <type>0</type>

            <scale>0</scale>

            <sql_type>0</sql_type>

            <nullable>1</nullable>

            <zero_fill>0</zero_fill>

            <empty_null>0</empty_null>

             <format_mask></format_mask>

        </Column>

        <Column>

            <name>ORDERDATE</name>

            <offset>13</offset>

            <length>8</length>

            <type>0</type>

            <scale>0</scale>

            <sql_type>0</sql_type>

            <nullable>1</nullable>

            <zero_fill>0</zero_fill>

            <empty_null>0</empty_null>

            <format_mask></format_mask>

        </Column>

        <Column>

            <name>ORDERTIME</name>

             <offset>21</offset>

            <length>8</length>

            <type>0</type>

            <scale>0</scale>

            <sql_type>0</sql_type>

             <nullable>1</nullable>

             <zero_fill>0</zero_fill>

             <empty_null>0</empty_null>

             <format_mask></format_mask>

        </Column>

        <Column>

            <name>QUANTITY</name>

            <offset>29</offset>

            <length>5</length>

            <type>0</type>

            <scale>0</scale>

            <sql_type>0</sql_type>

            <nullable>1</nullable>

            <zero_fill>0</zero_fill>

            <empty_null>0</empty_null>

            <format_mask></format_mask>

        </Column>

    </File>

</SqlioSchema>

Example of Program using SQLIO Schema to Create Orders SQL Table

 

OrdersIn FILE

OrdersOut FILE

.

SEQ FORM "-1"

D50 DIM 50

.

Schema INIT "orders.xml"

.

          SCHEMA "default", IMPORT="orders.xml":

                 FLAGS=10 ;Replace mode & SQLIO

.

          ERASE "orders.txt<sql>" ;Drop existing SQL table!

.

          OPEN OrdersIn, "orders.txt" ;Existing txt file!

          PREP OrdersOut, "orders.txt<sql>" ;SQL table!

.

          LOOP

          READ OrdersIn, SEQ; *LL, D50

          UNTIL OVER

          WRITE OrdersOut, SEQ; *LL, D50

          REPEAT

.

          CLOSE OrdersIn

          CLOSE OrdersOut

Example of Program to READKS Orders Table

 

Orders IFILE

.

Orderid DIM 4

Custid DIM 5

Prodid DIM 3

Orderdate DIM 8

Ordertime DIM 8

Quantity DIM 5

.

          SCHEMA "default", IMPORT="orders.xml":

                 FLAGS=10 ;Replace mode & SQLIO

.

. Open 'orders' table and cache 10 rows at a time.

.

          OPEN Orders, "orders.isi<sql records=10>"

.

          LOOP

          READKS Orders; Orderid: ;Readks SQL table!

                  Custid:

                  Prodid:

                  Orderdate:

                  Ordertime:

                  Quantity

          UNTIL OVER

          DISPLAY *LL, "Orderid...:", Orderid, "...":

                   "Custid....:", Custid

          REPEAT

.

          CLOSE Orders

 

 

See Also: SQLIO Overview, SQLIO Getting Started



PL/B Language Reference SQLIO Supported Tables