Please enable JavaScript to view this site.

QPR Knowledge Base 2023.1

  •      

    • Navigation: Developer's Guide > QPR Scripting > Example Scripts

    Change Period Level

    		 Scroll Prev Top Next More

    <QPR_SCRIPT_FILE language = vbscript>

    Option Explicit

     

    Sub Main()

     

     Dim oModel

     Dim SCError

     

     'do not authenticate, use already logged in user instead

     SCError=SCApplication.OpenModel("Dentorex Group Scorecard", oModel)

     if SCError<0 then Exit Sub

     

     Dim ElementId

     

     SCError=oModel.GetElementId("DENGROUP", "FINANCIAL", ElementId)

     if SCError<0 then Exit Sub

     

     SCError=oModel.SetProperty(ElementId, "PeriodLevelId", 44313)

     if SCError<0 then Exit Sub

     

    End Sub