! ********************************************************************************************************************************
!  Created: 17-May-2011 10:07:56 by OpenVMS SDL EV2-3      
!  Source:  17-MAY-2011 10:07:56 SQL$IA64_MV:[CODE]SQL_SQLCA.SDL;1 
! ********************************************************************************************************************************
 
!*** MODULE SQLCA_DEFINITIONS ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
	STRUCTURE /SQLCA/
	    CHARACTER*8 SQLCAID
	    INTEGER*4 SQLCABC
	    INTEGER*4 SQLCODE
	        INTEGER*2 SQLERRML
	        CHARACTER*70 SQLERRMC
	    INTEGER*4 SQLERRD(1:6)
	        CHARACTER*1 SQLWARN0
	        CHARACTER*1 SQLWARN1
	        CHARACTER*1 SQLWARN2
	        CHARACTER*1 SQLWARN3
	        CHARACTER*1 SQLWARN4
	        CHARACTER*1 SQLWARN5
	        CHARACTER*1 SQLWARN6
	        CHARACTER*1 SQLWARN7
	    CHARACTER*8 SQLEXT
	END STRUCTURE	! SQLCA
!DEC$ END OPTIONS