/********************************************************************************************************************************/
/* Created: 17-May-2011 10:41:55 by OpenVMS SDL EV2-3      */
/* Source:  17-MAY-2011 10:41:55 SQL$ALPHA_MV:[CODE]SQL_SQLCA.SDL;1 */
/********************************************************************************************************************************/
 
/*** MODULE SQLCA_DEFINITIONS ***/
 
%replace S_SQLCA by 128;
dcl 1 SQLCA  based,
     2 SQLCAID character(8),
     2 SQLCABC fixed binary(31),
     2 SQLCODE fixed binary(31),
     2 SQLERRM ,
      3 SQLERRML fixed binary(15),
      3 SQLERRMC character(70),
     2 SQLERRD (1:6) fixed binary(31),
     2 SQLWARN ,
      3 SQLWARN0 character(1),
      3 SQLWARN1 character(1),
      3 SQLWARN2 character(1),
      3 SQLWARN3 character(1),
      3 SQLWARN4 character(1),
      3 SQLWARN5 character(1),
      3 SQLWARN6 character(1),
      3 SQLWARN7 character(1),
     2 SQLEXT character(8);