O que está errado?

DECLARE INTEGER SQLConfigDataSource IN ODBCCP32.DLL Integer, Short, String @, String @

LOCAL lcDriver, lcDSN, lnRC

#define ODBC_ADD_DSN 1
#define ODBC_CONFIG_DSN 2
#define ODBC_REMOVE_DSN 3
#define ODBC_ADD_SYS_DSN 4
#define ODBC_CONFIG_SYS_DSN 5
#define ODBC_REMOVE_SYS_DSN 6
#define ODBC_REMOVE_DEFAULT_DSN 7

lcDriver = "SQL Server" + CHR(0)
lcDSN = "SERVER=EVALUATION\MIDDLETIERGED" + CHR(0) +;
"DESCRIPTION=XXXXXXXXXX" + CHR(0) +;
"DSN=XXXXXXXXXX" + CHR(0) +;
"DATABASE=GDOCINTR" + CHR(0) +;
"UID=sa" + CHR(0) +;
"PWD=" + CHR(0)

lnRC = SQLConfigDataSource(0, ODBC_ADD_DSN, @lcDriver, @lcDSN)

RETURN

Um abraço,