/********************************************************************************************************************************/ /* Created: 17-May-2011 10:40:03 by OpenVMS SDL EV2-3 */ /* Source: 14-OCT-2010 12:27:21 SQL$SRC_72:[CODE]SQL_SQLDA.SDL;1 */ /********************************************************************************************************************************/ /* Copyright (c) 1996, 2010, Oracle Corporation. All Rights Reserved. */ /*** MODULE SQLDA_DEFINITIONS ***/ #pragma __member_alignment __save #pragma __nomember_alignment /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ /* */ /* S Q L D A . S D L Defines the SQL data area */ /* */ /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ /* */ /* FACILITY: Rdb/SQL */ /* */ /* ABSTRACT: Defines the SQLDA and SQLDA2 structures. */ /* */ /* AUTHOR: Jack Raitto CREATION DATE: 24-APR-1996 */ /* MODIFICATION HISTORY: */ /* */ /* Version 7.2 */ /* 14-Oct-10 05646 (IES) Add constant for the header and entry sizes */ /* Version 7.1 */ /* 25-Sep-07 05340 (NJL) Change copyright symbol. */ /* Version 7.0 */ /* 24-APR-1996 JDR Created. */ /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ #if defined (VAXC) || defined (__DECC) #pragma member_alignment save #if defined (VMS) || defined (__VMS) #pragma nomember_alignment #else #pragma member_alignment #endif #endif #ifdef _WIN32 #pragma pack (push, sql_sqlda_noalign, 1) #endif typedef struct _SQL_T_SQLVAR { short int SQLTYPE; short int SQLLEN; char *SQLDATA; short int *SQLIND; short int SQLNAME_LEN; char SQLNAME [30]; } SQL_T_SQLVAR; typedef struct _SQL_T_SQLDA { char SQLDAID [8]; int SQLDABC; short int SQLN; short int SQLD; SQL_T_SQLVAR SQLVAR [1]; /* occurs SQLLN times */ } SQL_T_SQLDA; typedef struct _SQL_T_SQLVAR2 { short int SQLTYPE; int SQLLEN; int SQLOCTET_LEN; char *SQLDATA; int *SQLIND; int SQLCHRONO_SCALE; int SQLCHRONO_PRECISION; short int SQLNAME_LEN; char SQLNAME [128]; char SQLCHAR_SET_NAME [128]; char SQLCHAR_SET_SCHEMA [128]; char SQLCHAR_SET_CATALOG [128]; } SQL_T_SQLVAR2; typedef struct _SQL_T_SQLDA2 { char SQLDAID [8]; int SQLDABC; short int SQLN; short int SQLD; SQL_T_SQLVAR2 SQLVAR [1]; /* occurs SQLLN times */ } SQL_T_SQLDA2; typedef struct _SQL_T_SQLVAR_FULL { short int SQLTYPE; union { short int SQLLEN; struct { char SQLPRCSN; char SQLSCALE; } SQLLEN_ALT; } SQLLEN_UNION; union { char *SQLDATA; struct { union { short int SQLFLAGS; struct { unsigned SQLFLAGS_VALID : 1; unsigned SQLPARAM_IN : 1; unsigned SQLPARAM_OUT : 1; unsigned SQLFLAGS$$V_FILL_0_ : 5; } SQLFLAGS_BITS; } SQLFLAGS_UNION; short int SQLARGPOS; } SQLDATA_ALT; } SQLDATA_UNION; short int *SQLIND; short int SQLNAME_LEN; char SQLNAME [30]; } SQL_T_SQLVAR_FULL; #define SQLDA_ENTRY_SIZE 44 typedef struct _SQL_T_SQLDA_FULL { char SQLDAID [8]; int SQLDABC; short int SQLN; short int SQLD; SQL_T_SQLVAR_FULL SQLVAR [1]; /* occurs SQLLN times */ } SQL_T_SQLDA_FULL; #define SQLDA_HEADER_SIZE 16 typedef struct _SQL_T_SQLVAR2_FULL { short int SQLTYPE; union { int SQLLEN; struct { short int SQLPRCSN; short int SQLSCALE; } SQLLEN_ALT; } SQLLEN_UNION; int SQLOCTET_LEN; union { char *SQLDATA; struct { union { short int SQLFLAGS; struct { unsigned SQLFLAGS_VALID : 1; unsigned SQLPARAM_IN : 1; unsigned SQLPARAM_OUT : 1; unsigned SQLFLAGS$$V_FILL_1_ : 5; } SQLFLAGS_BITS; } SQLFLAGS_UNION; short int SQLARGPOS; } SQLDATA_ALT; } SQLDATA_UNION; int *SQLIND; int SQLCHRONO_SCALE; int SQLCHRONO_PRECISION; short int SQLNAME_LEN; char SQLNAME [128]; char SQLCHAR_SET_NAME [128]; char SQLCHAR_SET_SCHEMA [128]; char SQLCHAR_SET_CATALOG [128]; } SQL_T_SQLVAR2_FULL; #define SQLDA2_ENTRY_SIZE 540 typedef struct _SQL_T_SQLDA2_FULL { char SQLDAID [8]; int SQLDABC; short int SQLN; short int SQLD; SQL_T_SQLVAR2_FULL SQLVAR [1]; /* occurs SQLLN times */ } SQL_T_SQLDA2_FULL; #define SQLDA2_HEADER_SIZE 16 #if defined (VAXC) || defined (__DECC) #pragma member_alignment restore #endif #ifdef _WIN32 #pragma pack (pop, sql_sqlda_noalign) #endif #pragma __member_alignment __restore