Adrian .. thanks .. i have gone through the equates and put a blank line on them .. it appears to be ok now.
Not sure why this should ever happen .. even to the point of hanging the seesion during the compile BUT as long as I know. thanks again DSig David Tod Sigafoos SigsSolutions, Inc. > -------- Original Message -------- > Subject: RE: [U2] Include Equate record Errors Compiler > From: "Adrian Matthews" <[EMAIL PROTECTED]> > Date: Mon, March 14, 2005 9:32 am > To: <u2-users@listserver.u2ug.org> > > Make sure that the record SQL_DEFAULT_CONNECTION_INFO_INCLUDE.MV (or > whatever the last include in your program is) has a correct > end-of-marker. > > Editing and putting a blank line on the end will do it. > > Might not be your problem but I've had this several times in the past > and the description you give fits exactly. > > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of > [EMAIL PROTECTED] > Sent: 14 March 2005 16:25 > To: U2 Users List > Subject: [U2] Include Equate record Errors Compiler > > Okay .. this one has got me .. > > The program below will not compile. It compiler responds with .. > > *-- > 01 basic DAVES.BP DEMO.MV > > Compiling: Source = 'DAVES.BP/DEMO.MV', Object = 'DAVES.BP.O/DEMO.MV' > > ************************************************************************ > ?**** > > 000049 if not(assigned(odbcName)) then odbcName = '' > > ^ > > End of Line unexpected, Was expecting: '!', '=', "AND", "OR", "LT", > "LE", > "GT", "GE", "NE", "EQ", "MATCH", "ELSE" > > > > 1 Errors detected, No Object Code Produced. > *-- > > In the program you will see 2 equates .. > > $INCLUDE DAVES.BP SQL_ERRORS_EQUATES.MV > $include DAVES.BP SQL_DEFAULT_CONNECTION_INFO_INCLUDE.MV > > If these two equates are commented out and their associated lines > (immediently below them) are uncommented .. it works. Note that the > ODBC.H include works. Also the SQL_COMMON_INCLUDE is ok (simple label > common common /sql_common/ > comBaseEnv,comConnEnv,comSqlEnv,comErrorCheckEnv) > > Once again .. if either of these two equates are 'included' the program > fails compile. > > I really cant see what could be causing this. The 'equ' below the > includes are cut and paste of the include files > > Anyone see what could be going on here? > > ************************************************************************ > *************** > function SQL_INITENV(odbcName, odbcUser, odbcPass) > * > $INCLUDE DAVES.BP SQL_COMMON_INCLUDE > > EQU TRUE$ to 1 > EQU FALSE$ to 0 > EQU NULL$ to '' > > * UNIVERSES INCLUDE FOR DEALING WITH ODBC > $INCLUDE UNIVERSE.INCLUDE ODBC.H > > * LOCAL INCLUDES .. > $INCLUDE DAVES.BP SQL_ERRORS_EQUATES.MV > ** > ** Errors returned from the function (sql_write, sql_Read etc) will > return > ** with MV list of errors. mv1 will contain one of these codes > ** > ** NOTE: return will be NULL if ok .. else .. > ** > *EQU CONNECTION_ERROR$ TO -99 > *EQU UNABLE_TO_BIND_PARAMETERS$ TO -98 > *EQU UNABLE_TO_BIND_COLUMNS$ TO -97 > *EQU UNABLE_TO_PREPARE$ TO -96 > *EQU UNABLE_TO_READ$ TO -95 > *EQU UNABLE_TO_WRITE$ TO -94 > *EQU UNABLE_TO_FETCH$ TO -93 > *EQU UNABLE_TO_FREE_ENV$ TO -92 > *EQU INVALID_PARAMETER_PASSED$ TO -91 > *EQU CRITICAL_ERROR_CHECK$ TO -90 > > > $include DAVES.BP SQL_DEFAULT_CONNECTION_INFO_INCLUDE.MV > ** > **abstract: Simply holds the default login connection through > ** odbc. > ** > **author: dsig (David Tod Sigafoos) > **date: 03mar05 > ** > ** > *DEFAULTODBCNAME$ = 'FOOBAR' > *DEFAULTODBCUSER$ = 'FOOBAR' > *DEFAULTODBCPASS$ = 'FOOBAR' > > > * make sure it is assigned something .. > if not(assigned(odbcName)) then odbcName = NULL$ > if not(assigned(odbcUser)) then odbcUser = NULL$ > if not(assigned(odbcPass)) then odbcPass = NULL$ > > * set to default if necessary (see > SQL_DEFAULT_CONNECTION_INFO_INCLUDE) > if odbcName = NULL$ then odbcName = DEFAULTODBCNAME$ > if odbcUser = NULL$ then odbcUser = DEFAULTODBCUSER$ > if odbcPass = NULL$ then odbcPass = DEFAULTODBCPASS$ > > > initErrors = NULL$ > * > * > return (initErrors) > > > > > > > > > > > DSig > David Tod Sigafoos > SigsSolutions, Inc. > ------- > u2-users mailing list > u2-users@listserver.u2ug.org > To unsubscribe please visit http://listserver.u2ug.org/ > > > The information contained in this email is strictly confidential and for the > use of the addressee only, unless otherwise indicated. If you are not the > intended recipient, please do not read, copy, use or disclose to others this > message or any attachment. Please also notify the sender by replying to this > email or by telephone +44 (0)20 7896 0011 and then delete the email and any > copies of it. Opinions, conclusions (etc.) that do not relate to the official > business of this company shall be understood as neither given nor endorsed by > it. IG Markets Limited and IG Index Plc are authorised and regulated by the > Financial Services Authority and, in Australia, by the Australian Securities > and Investments Commission. > ------- > u2-users mailing list > u2-users@listserver.u2ug.org > To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
