Pricing
No edit summary
No edit summary
Line 11: Line 11:
   let mserv=tk.MDrivenServerIds->orderby(lastSeenTransaction)->last in
   let mserv=tk.MDrivenServerIds->orderby(lastSeenTransaction)->last in
   (
   (
let p=PriceSingleton.oclSingleton.CurrentPrice in
      let p=PriceSingleton.oclSingleton.CurrentPrice in
    (
        let cost=mserv.classCountA0*p.DailyPerSitePerClass +
                mserv.viewCountA0*p.DailyPerSitePerView +
                p.DailyPricePerGigaByte*tk.UsedData+
                p.DailyPricePerSite+
                p.PerEndUserVolumePrices->collect(x|x.GetPricePartIfApplicable(tk.EndUserCount))->sum in


(
        (
 
            self.MCoinAccount.Credit(-cost,'Execution '+tk.IdName+' classes:'+mserv.classCountA0.asstring+' views:'+mserv.viewCountA0.asstring+' users:'+tk.EndUserCount.asstring+' data:'+tk.UsedData.asstring,false)
let cost=mserv.classCountA0*p.DailyPerSitePerClass +
        )
 
      )
mserv.viewCountA0*p.DailyPerSitePerView +
    )
 
)
p.DailyPricePerGigaByte*tk.UsedData+
 
p.DailyPricePerSite+
 
p.PerEndUserVolumePrices->collect(x|x.GetPricePartIfApplicable(tk.EndUserCount))->sum
 
in
 
(
 
self.MCoinAccount.Credit(-cost,'Execution '+tk.IdName+' classes:'+mserv.classCountA0.asstring+' views:'+mserv.viewCountA0.asstring+' users:'+tk.EndUserCount.asstring+' data:'+tk.UsedData.asstring,false)
 
)
 
)
 
)
 
)

Revision as of 12:00, 20 August 2018

MDriven Turnkey price and pricing is available in portal.mdriven.net

Pricing model is explained in this video:

The billing run takes 2 runs. The first run looks at Site/MDriven Server usage:

self.EffectivePayerFor->collect(tk|
  let mserv=tk.MDrivenServerIds->orderby(lastSeenTransaction)->last in
  (
     let p=PriceSingleton.oclSingleton.CurrentPrice in
    (
       let cost=mserv.classCountA0*p.DailyPerSitePerClass +
                mserv.viewCountA0*p.DailyPerSitePerView +
                p.DailyPricePerGigaByte*tk.UsedData+
                p.DailyPricePerSite+
                p.PerEndUserVolumePrices->collect(x|x.GetPricePartIfApplicable(tk.EndUserCount))->sum in
       (
           self.MCoinAccount.Credit(-cost,'Execution '+tk.IdName+' classes:'+mserv.classCountA0.asstring+' views:'+mserv.viewCountA0.asstring+' users:'+tk.EndUserCount.asstring+' data:'+tk.UsedData.asstring,false)
        )
     )
   )
)
This page was edited 96 days ago on 02/10/2024. What links here