?- SqlCmd = 'INSERT INTO EMP (ENAME, JOB, DEPNO, SALARY) VALUES (:name,:dep,:sal) ', sql_declare(c2,SqlCmd,NoIn,NoOut,RC). NoIn = 3 NoOut = 0 RC = 0
?- sql_descr_in(c2, 1='SMITH',sal=29500.50,dep=20 ), sql_open(c2,RC). RC = 0
バインド変数に値が与えられました。
?- sql_open(c2,RC). RC = 0
'SMITH'のタプルを、テーブル'EMP'に加えました。指定されなかったコラムには、NULL値が割り当てられます。
?- sql_descr_in(c2, 1='SCOTT',sal='61098.0',dep='20' ), sql_open(c2,RC). RC = 0
バインド変数は、任意のアトミックな項で具体化することができます。
?- sql_open(c2,RC). RC = 0
2番目のタップルとして従業員'SCOTT'を加えました。
?- sql_commit(RC). RC = 0
データベースのトランザクションを完了し、変更内容をデータベースに書き込みました。以後、データベースの全てのユーザーが、新しいデータを使用することになります。