| Tang Cheng | 31b9525 | 2014-10-23 09:22:35 +0800 | [diff] [blame^] | 1 | /* |
| 2 | * $Header: sqlda.h 08-may-2007.05:58:33 ardesai Exp $ sqlda.h |
| 3 | */ |
| 4 | |
| 5 | /*************************************************************** |
| 6 | * The SQLDA descriptor definition * |
| 7 | *--------------------------------------------------------------* |
| 8 | * VAX/3B Version * |
| 9 | * * |
| 10 | * Copyright (c) 1987, 2007, Oracle. All rights reserved. * |
| 11 | ***************************************************************/ |
| 12 | |
| 13 | |
| 14 | /* NOTES |
| 15 | ************************************************************** |
| 16 | *** *** |
| 17 | *** This file is SOSD. Porters must change the data types *** |
| 18 | *** appropriately on their platform. See notes/pcport.doc *** |
| 19 | *** for more information. *** |
| 20 | *** *** |
| 21 | ************************************************************** |
| 22 | */ |
| 23 | |
| 24 | /* MODIFIED |
| 25 | ardesai 05/08/07 - Bug[6037057] Undef Y |
| 26 | apopat 05/08/02 - [2362423] MVS PE to make lines shorter than 79 |
| 27 | apopat 07/31/99 - [707588] TAB to blanks for OCCS |
| 28 | lvbcheng 10/27/98 - change long to int for sqlda |
| 29 | lvbcheng 08/15/97 - Move sqlda protos to sqlcpr.h |
| 30 | lvbcheng 06/25/97 - Move sqlda protos to this file |
| 31 | jbasu 01/29/95 - correct typo |
| 32 | jbasu 01/27/95 - correct comment - ub2->sb2 |
| 33 | jbasu 12/12/94 - Bug 217878: note this is an SOSD file |
| 34 | Morse 12/01/87 - undef L and S for v6 include files |
| 35 | Richey 07/13/87 - change int defs to long |
| 36 | Clare 09/13/84 - Port: Ch types to match SQLLIB structs |
| 37 | Clare 10/02/86 - Add ifndef SQLDA |
| 38 | */ |
| 39 | |
| 40 | #ifndef SQLDA_ |
| 41 | #define SQLDA_ 1 |
| 42 | |
| 43 | #ifdef T |
| 44 | # undef T |
| 45 | #endif |
| 46 | #ifdef F |
| 47 | # undef F |
| 48 | #endif |
| 49 | |
| 50 | #ifdef S |
| 51 | # undef S |
| 52 | #endif |
| 53 | #ifdef L |
| 54 | # undef L |
| 55 | #endif |
| 56 | |
| 57 | #ifdef Y |
| 58 | # undef Y |
| 59 | #endif |
| 60 | |
| 61 | struct SQLDA { |
| 62 | /* ub4 */ int N; /* Descriptor size in number of entries */ |
| 63 | /* text** */ char **V; /* Ptr to Arr of addresses of main variables */ |
| 64 | /* ub4* */ int *L; /* Ptr to Arr of lengths of buffers */ |
| 65 | /* sb2* */ short *T; /* Ptr to Arr of types of buffers */ |
| 66 | /* sb2** */ short **I; /* Ptr to Arr of addresses of indicator vars */ |
| 67 | /* sb4 */ int F; /* Number of variables found by DESCRIBE */ |
| 68 | /* text** */ char **S; /* Ptr to Arr of variable name pointers */ |
| 69 | /* ub2* */ short *M; /* Ptr to Arr of max lengths of var. names */ |
| 70 | /* ub2* */ short *C; /* Ptr to Arr of current lengths of var. names */ |
| 71 | /* text** */ char **X; /* Ptr to Arr of ind. var. name pointers */ |
| 72 | /* ub2* */ short *Y; /* Ptr to Arr of max lengths of ind. var. names*/ |
| 73 | /* ub2* */ short *Z; /* Ptr to Arr of cur lengths of ind. var. names*/ |
| 74 | }; |
| 75 | |
| 76 | typedef struct SQLDA SQLDA; |
| 77 | |
| 78 | #endif |
| 79 | |
| 80 | /* ----------------- */ |
| 81 | /* defines for sqlda */ |
| 82 | /* ----------------- */ |
| 83 | |
| 84 | #define SQLSQLDAAlloc(arg1, arg2, arg3, arg4) sqlaldt(arg1, arg2, arg3, arg4) |
| 85 | |
| 86 | #define SQLSQLDAFree(arg1, arg2) sqlclut(arg1, arg2) |
| 87 | |
| 88 | |
| 89 | |