Hi,
Your label must start in column 0.
Is the case ?
Bye!
In article <374af5bf.16759488_at_news.pwgsc.gc.ca>,
NeedaHoliday wrote:
> I keep getting a compilation error with the following code. This code
> resides in two programs. One program compiles and the other doesn't.
> Makes no sense. Can someone help.
>
> The compilation message is "end_of_email_list" label not found.
>
> void error_msg()
> {
> char lc_err_string[151];
>
> EXEC SQL WHENEVER SQLERROR DO sql_error("ORACLE error poll
> error_msg() address--\n");
> EXEC SQL DECLARE cemail_cur CURSOR FOR
> SELECT EML_USR_ID
> FROM EMPLOYEE
> WHERE UPPER(USR_LAN_ID) = 'CIMSERR'
> AND EXP_DT IS NULL;
>
> EXEC SQL OPEN cemail_cur; /* open cinv_cur cursor */
> while (TRUE) /* while loop */
> {
> strcpy(email_addr, " ");
> EXEC SQL WHENEVER NOT FOUND GOTO end_of_email_list;
> EXEC SQL FETCH cemail_cur INTO
> :email_addr;
>
> if(email_addr != NULL)
> strcpy(lc_err_string, "");
> strcpy(lc_err_string, "echo \"Please verify ERRTBL \"");
> strcat(lc_err_string, MAIL);
> strcat(lc_err_string, "\" CIMS error has ocurred \"");
> strncat(lc_err_string, COLSPACE, 1);
> strcat(lc_err_string, email_addr);
> system(lc_err_string);
> }
> end_of_email_list:
> EXEC SQL CLOSE cemail_cur;
>
> } /* error_msg() */
>
>
--== Sent via Deja.com http://www.deja.com/ ==--
---Share what you know. Learn what you don't.---
Received on Wed May 26 1999 - 04:34:30 CDT
