home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2000 April
/
Chip_2000-04_cd.bin
/
zkuste
/
Tango
/
data1.cab
/
Tango_Demos_TCFs
/
BusinessEventWriter.tcf
< prev
next >
Wrap
Extensible Markup Language
|
1999-09-21
|
6KB
|
162 lines
<?xml version="1.0" encoding="ISO-8859-1" ?>
<!DOCTYPE TAF SYSTEM "tango.dtd" >
<TCF Version="0x02000001">
<Comments />
<!--Defined Classes-->
<Classes>
<ClassDef>
<Name>BusinessEventWriter</Name>
<!--Class constructor-->
<On_Create>
<Implementation />
</On_Create>
<!--Class destructor-->
<On_Destroy>
<Implementation />
</On_Destroy>
<!--Methods of this class-->
<Methods>
<MethodDef>
<Name>WriteBusinessEvent</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PrmVisitorID</Name>
<Comments>ID of the visitor - can be obtained in the website activity tables</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PrmEbusinessEventID</Name>
<Comments>ID of the e-business event. Should be provided by the e-business application</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PrmCategory</Name>
<Comments>Category of the e-business event.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PrmComments</Name>
<Comments>Free-form text describing in plain English the event.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="Out">
<Name>PrmBusinessLogID</Name>
<Comments>Unique ID that identifies Business Event. Can be used by e-business application</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="BusinessEventWriter.WriteBusinessEvent.Begin_InsertBusEvent" />
<ActionRef Ref="BusinessEventWriter.WriteBusinessEvent.Insert" />
<ActionRef Ref="BusinessEventWriter.WriteBusinessEvent.Get_NewEventID" />
<ActionRef Ref="BusinessEventWriter.WriteBusinessEvent.End_InsertBusEvent" />
</Implementation>
<Comments>Creates a business event information for the specified Bolero visitor, time and e-commerce event ID. Returns business event identifier if the operation was performed successfully.</Comments>
</MethodDef>
</Methods>
<!--Instance variables for this class-->
<Variables />
</ClassDef>
</Classes>
<!--Program actions-->
<Actions>
<BeginTransactionAction DSID="TangoWA" DeploymentDSID="TangoWA" ID="BusinessEventWriter.WriteBusinessEvent.Begin_InsertBusEvent" Sig="bgnt">
<Isolation>Exclusive</Isolation>
</BeginTransactionAction>
<InsertAction DSID="TangoWA" DeploymentDSID="TangoWA" ID="BusinessEventWriter.WriteBusinessEvent.Insert" Sig="insr" AutoCommit="True">
<Tables>
<TableName>BusinessActivity</TableName>
</Tables>
<DataDictionary>
<Column DataType="tims" ColumnType="0">
<TableName>BusinessActivity</TableName>
<ColumnName>LogTimestamp</ColumnName>
</Column>
<Column DataType="long" ColumnType="0">
<TableName>BusinessActivity</TableName>
<ColumnName>VisitorID</ColumnName>
</Column>
<Column DataType="long" ColumnType="0">
<TableName>BusinessActivity</TableName>
<ColumnName>EbusinessEventID</ColumnName>
</Column>
<Column DataType="vcha" ColumnType="0">
<TableName>BusinessActivity</TableName>
<ColumnName>Category</ColumnName>
</Column>
<Column DataType="vcha" ColumnType="0">
<TableName>BusinessActivity</TableName>
<ColumnName>Comments</ColumnName>
</Column>
</DataDictionary>
<ValueList>
<ValueItem>
<Name>LogTimestamp</Name>
<Value><![CDATA[<@CURRENTTIMESTAMP>]]></Value>
<QuoteValue>true</QuoteValue>
<IncludeIfEmpty>true</IncludeIfEmpty>
<NullValue>false</NullValue>
</ValueItem>
<ValueItem>
<Name>VisitorID</Name>
<Value><![CDATA[<@VAR method$PrmVisitorID>]]></Value>
<QuoteValue>false</QuoteValue>
<IncludeIfEmpty>true</IncludeIfEmpty>
<NullValue>false</NullValue>
</ValueItem>
<ValueItem>
<Name>EbusinessEventID</Name>
<Value><![CDATA[<@VAR method$PrmEbusinessEventID>]]></Value>
<QuoteValue>false</QuoteValue>
<IncludeIfEmpty>true</IncludeIfEmpty>
<NullValue>false</NullValue>
</ValueItem>
<ValueItem>
<Name>Category</Name>
<Value><![CDATA[<@VAR method$PrmCategory>]]></Value>
<QuoteValue>true</QuoteValue>
<IncludeIfEmpty>true</IncludeIfEmpty>
<NullValue>false</NullValue>
</ValueItem>
<ValueItem>
<Name>Comments</Name>
<Value><![CDATA[<@VAR method$PrmComments>]]></Value>
<QuoteValue>true</QuoteValue>
<IncludeIfEmpty>true</IncludeIfEmpty>
<NullValue>false</NullValue>
</ValueItem>
</ValueList>
</InsertAction>
<DirectDBMSAction DSID="TangoWA" DeploymentDSID="TangoWA" ID="BusinessEventWriter.WriteBusinessEvent.Get_NewEventID" Sig="cust">
<Custom>SELECT <![CDATA[ MAX (BusLogID) AS BusLogID ]]> FROM BusinessActivity</Custom>
<ResultsOutput Ref="BusinessEventWriter.WriteBusinessEvent.Get_NewEventID.Results" />
<ErrorOutput Ref="BusinessEventWriter.WriteBusinessEvent.Get_NewEventID.Error" />
</DirectDBMSAction>
<EndTransactionAction ID="BusinessEventWriter.WriteBusinessEvent.End_InsertBusEvent" Sig="endt">
<EndType>Commit</EndType>
</EndTransactionAction>
</Actions>
<!--Data sources-->
<DataSources>
<DataSource ID="TangoWA">
<DSType>ODBC</DSType>
<DSN>TangoWA</DSN>
<DBMS />
<Host>TangoWA</Host>
<Database />
<UserInfo Encrypted="True">
<UserName />
<Password />
</UserInfo>
</DataSource>
</DataSources>
<!--Output blocks-->
<Outputs>
<Output ID="BusinessEventWriter.WriteBusinessEvent.Get_NewEventID.Results" Type="HTML"><![CDATA[<@ASSIGN method$PrmBusinessLogID <@COLUMN BusLogID>>]]></Output>
<Output ID="BusinessEventWriter.WriteBusinessEvent.Get_NewEventID.Error" Type="HTML"><![CDATA[<@ASSIGN method$PrmBusinessLogID "0">]]></Output>
</Outputs>
</TCF>