% INSERT inserts values into a single row of a table using JDBC driver
% specified by the input connection.
%
% Usage: message = insert(conn, table, 'field1', value1, 'field2', value2,...)
%
% M Hewitson
%
% 31-07-07
%
% $Id: insert.m,v 1.4 2009/09/16 13:38:58 hewitson Exp $
%

function message = insert(conn, table, varargin)

  message = '';
  q = sprintf('INSERT INTO %s SET ',  table);
  
  for j=1:2:length(varargin)
    
    col = varargin{j};
    val = varargin{j+1};
    if isnumeric(val)
      if ~any(isnan(val))
        q = [q col '=' num2str(val) ','];
      end
    elseif ischar(val)
      q = [q col '=' '''' val '''' ','];
    else
      error('### val class [%s]', class(val))
    end
        
  end
  
  q = deblank([q(1:end-1) ';']);

  if length(q) > 50
    qdisp = [q(1:50) '...'];
    utils.helper.msg(utils.const.msg.PROC1, 'running query %s', qdisp);
  else
    utils.helper.msg(utils.const.msg.PROC1, 'running query %s', q);
  end
  
  try
    stmt = conn.createStatement;
    stmt.execute(q);
  catch Me
    error('### insert: failed to execute query');
  end
end