Count: Integer;
The Count property returns number of values (fields) of a flat record.
Sub UserSub(Input: IEtlPlainRecordSets; Output: IEtlPlainRecordSets);
Var
RecordSetIn, RecordSetOut: IEtlPlainRecordSet;
RecordIn, RecordOut: IEtlPlainRecord;
i: Integer;
Begin
RecordSetIn:=Input.Item(0);
RecordSetOut:=Output.Item(0);
For i := 0 To RecordSetIn.Count - 1 Do
RecordSetOut.Add;
RecordIn:=RecordSetIn.Item(i);
RecordOut:=RecordSetOut.Item(i);
RecordOut.Value(0):=RecordIn.Count;
End For;
End Sub UserSub;
This example is a custom module macro, used to transform data in ETL task. After executing the ETL task in the first field of the consumer, all records contain number of source fields.
See also: