XSB: C:/dev/sandbox/xsb_release/XSB/emu/orastuff/desc_sli_xsb

00001 /*  -*-c-*-  Make sure this file comes up in the C mode of emacs */ 
00002 /* File:      desc_sli.i
00003 ** Author(s): Ernie Johnson
00004 ** Contact:   xsb-contact@cs.sunysb.edu
00005 ** 
00006 ** Copyright (C) The Research Foundation of SUNY, 1997-1998
00007 ** 
00008 ** XSB is free software; you can redistribute it and/or modify it under the
00009 ** terms of the GNU Library General Public License as published by the Free
00010 ** Software Foundation; either version 2 of the License, or (at your option)
00011 ** any later version.
00012 ** 
00013 ** XSB is distributed in the hope that it will be useful, but WITHOUT ANY
00014 ** WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
00015 ** FOR A PARTICULAR PURPOSE.  See the GNU Library General Public License for
00016 ** more details.
00017 ** 
00018 ** You should have received a copy of the GNU Library General Public License
00019 ** along with XSB; if not, write to the Free Software Foundation,
00020 ** Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
00021 **
00022 ** $Id: desc_sli_xsb_i.h,v 1.2 2000/10/03 15:47:37 ejohnson Exp $
00023 ** 
00024 */
00025 
00026 /*
00027  * DESCRIBE the SQL Statement's Select List Items
00028  * ----------------------------------------------
00029  *  Initilizes the select list descriptor after examining the select list
00030  *  items in the PREPAREd dynamic SQL statement to determine each item's
00031  *  name, datatype, constraints, length, scale, and precision.
00032  */
00033 
00034   switch (cursorHandle) {
00035   case 0:
00036     EXEC SQL DESCRIBE SELECT LIST FOR S0 INTO DESCRIPTOR descriptor;
00037     break;
00038   case 1:
00039     EXEC SQL DESCRIBE SELECT LIST FOR S1 INTO DESCRIPTOR descriptor;
00040     break;
00041   case 2:
00042     EXEC SQL DESCRIBE SELECT LIST FOR S2 INTO DESCRIPTOR descriptor;
00043     break;
00044   case 3:
00045     EXEC SQL DESCRIBE SELECT LIST FOR S3 INTO DESCRIPTOR descriptor;
00046     break;
00047   case 4:
00048     EXEC SQL DESCRIBE SELECT LIST FOR S4 INTO DESCRIPTOR descriptor;
00049     break;
00050   case 5:
00051     EXEC SQL DESCRIBE SELECT LIST FOR S5 INTO DESCRIPTOR descriptor;
00052     break;
00053   case 6:
00054     EXEC SQL DESCRIBE SELECT LIST FOR S6 INTO DESCRIPTOR descriptor;
00055     break;
00056   case 7:
00057     EXEC SQL DESCRIBE SELECT LIST FOR S7 INTO DESCRIPTOR descriptor;
00058     break;
00059   case 8:
00060     EXEC SQL DESCRIBE SELECT LIST FOR S8 INTO DESCRIPTOR descriptor;
00061     break;
00062   case 9:
00063     EXEC SQL DESCRIBE SELECT LIST FOR S9 INTO DESCRIPTOR descriptor;
00064     break;
00065   case 10:
00066     EXEC SQL DESCRIBE SELECT LIST FOR S10 INTO DESCRIPTOR descriptor;
00067     break;
00068   case 11:
00069     EXEC SQL DESCRIBE SELECT LIST FOR S11 INTO DESCRIPTOR descriptor;
00070     break;
00071   case 12:
00072     EXEC SQL DESCRIBE SELECT LIST FOR S12 INTO DESCRIPTOR descriptor;
00073     break;
00074   case 13:
00075     EXEC SQL DESCRIBE SELECT LIST FOR S13 INTO DESCRIPTOR descriptor;
00076     break;
00077   case 14:
00078     EXEC SQL DESCRIBE SELECT LIST FOR S14 INTO DESCRIPTOR descriptor;
00079     break;
00080   case 15:
00081     EXEC SQL DESCRIBE SELECT LIST FOR S15 INTO DESCRIPTOR descriptor;
00082     break;
00083   case 16:
00084     EXEC SQL DESCRIBE SELECT LIST FOR S16 INTO DESCRIPTOR descriptor;
00085     break;
00086   case 17:
00087     EXEC SQL DESCRIBE SELECT LIST FOR S17 INTO DESCRIPTOR descriptor;
00088     break;
00089   case 18:
00090     EXEC SQL DESCRIBE SELECT LIST FOR S18 INTO DESCRIPTOR descriptor;
00091     break;
00092   case 19:
00093     EXEC SQL DESCRIBE SELECT LIST FOR S19 INTO DESCRIPTOR descriptor;
00094     break;
00095   case 20:
00096     EXEC SQL DESCRIBE SELECT LIST FOR S20 INTO DESCRIPTOR descriptor;
00097     break;
00098   }