Creates an ECL "TRANSFORM" definition. A TRANSFORM defines the specific operations that must occur on a record-by-record basis.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | ## Not run:
transfrm <- ECLTransform$new(name="transfrm", outECLRecord=rec_revenueDef);
transfrm$addField("SELF.orderNumber", "RIGHT.orderNumber");
transfrm$addField("SELF.prodCode", "LEFT.productCode");
transfrm$addField("SELF.prodName", "LEFT.productName");
transfrm$addField("SELF.revenue", "RIGHT.priceEach * RIGHT.quantityOrdered");
joinCondition <- "LEFT.productCode=RIGHT.productCode"
ds_revenue <- ECLJoin$new(name="ds_revenue", leftRecordSet= ds_products,
rightRecordSet=ds_orderDetails, joinCondition = joinCondition,
joinType = "INNER", def=transfrm$print());
ecl1$add(ds_revenue)
output <- ECLOutput$new(name="output", def = ds_revenue$getName())
ecl$add(output)
ecl$print()
xmlContent <- ecl$execute()
data <- parseResults(xmlContent)
data
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.