DTSTransformStat_ExceptionRow
Hi.
I have a DTS package that uses an ActiveX script for transferring data from a text file to a SQL 2000 table. I'm testing a DTSSource column for spaces and exiting the routine if it's spaces.
I set MAIN = DTStRansformStat_ExceptionRow and Exit the function.
It worksd fine, I get the error row in the log but I don't get a meaningful error message.
I tried to set MAIN = DTSTransformStat_ExceptionRow("My Error Message") but I got an error in the log saying "Wrong number of arguments".
How do I pass along a meaningful error message when I set
MAIN = DTSTransformStat_ExceptionRow?
Here's my code:
Function Main()
If (Trim(DTSSource(6)) = "" Or Trim(DTSSource(7)) = "") Then
Main = DTSTransformStat_ExceptionRow
Exit Function
End If
DTSDestination("RecordType") = DTSSource(1)
Etc...
TIA.
Rita
|