Home > m > gui > ltpdaRepoGUI > callbacks > getFields.m

getFields

PURPOSE ^

Get a list of database fields

SYNOPSIS ^

function fields = getFields(conn)

DESCRIPTION ^

 Get a list of database fields
 
 M Hewitson
 
 $Id: getFields.m,v 1.3 2008/02/22 09:25:18 hewitson Exp $

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function fields = getFields(conn)
0002 
0003 % Get a list of database fields
0004 %
0005 % M Hewitson
0006 %
0007 % $Id: getFields.m,v 1.3 2008/02/22 09:25:18 hewitson Exp $
0008 %
0009 
0010 
0011 % get the selected table
0012 tblSel = findobj('Tag', 'tableSelect');
0013 tbls   = get(tblSel, 'String');
0014 tbl    = tbls{get(tblSel, 'Value')};
0015 
0016 if ~isempty(conn)
0017   % get the databases
0018   try
0019     q = sprintf('describe %s', tbl);
0020     curs = exec(conn, q);
0021     curs = fetch(curs);
0022     fields = curs.Data(:,1);
0023     close(curs);
0024   catch
0025     disp(sprintf('### Server returned: %s', curs.Message));
0026     warning('!!! Can not read from database');
0027     fields = {'-'};
0028   end
0029 else
0030   fields = {'-'};
0031 end
0032

Generated on Mon 08-Sep-2008 13:18:47 by m2html © 2003