I'm now getting an error when I run the script in the D2006 IDE

---------------------------
Debugger Exception Notification
---------------------------
Project TfR.exe raised exception class EEDBException with message 'ElevateDB Error #1011 An error occurred with the value CV on file (A conversion error occurred with the value CV on file)'.
---------------------------
Break   Continue   Help  
---------------------------


I can only assume its coming from this bit of the script

   OPEN Peoples USING CpyID;
   FETCH FIRST FROM Peoples('_fkContacts') INTO ContactID;
   WHILE NOT EOF(Peoples) DO
    OPEN Contacts USING ContactID;
    FETCH FIRST FROM Contacts('_Status') INTO ContactStatus;
    WHILE NOT EOF(Contacts) DO
     IF (ContactStatus <> 'CV on file') AND (ContactStatus <> 'Hold') AND (ContactStatus <> 'Placed') THEN
      DELETE FROM Contacts;
      OPEN Alter1 USING ContactID;
      OPEN Alter4 USING ContactID;
      OPEN Alter6 USING ContactID;
     END IF;
     FETCH NEXT FROM Contacts('_Status') INTO ContactID;
    END WHILE;
    FETCH NEXT FROM Peoples('_fkContacts') INTO ContactID;
   END WHILE;

From the table  "_Status" VARCHAR(10) COLLATE "ANSI_CI",
and from the declarations DECLARE ContactStatus VARCHAR;

_Status can be null

Roy Lambert

Roy,

FETCH NEXT FROM Contacts('_Status') INTO ContactID;  <-------
END WHILE;
FETCH NEXT FROM Peoples('_fkContacts') INTO ContactID;

The marked line should be "... INTO ContactStatus, shouldn't it?

Uli

Uli

>FETCH NEXT FROM Contacts('_Status') INTO ContactID; <-------
>END WHILE;
>FETCH NEXT FROM Peoples('_fkContacts') INTO ContactID;
>
>The marked line should be "... INTO ContactStatus, shouldn't it?

Yes - this is what happens when you start foaming at the mouth, uttering strange curses and your eyes turn bright red - thanks

Roy Lambert