PdcApplication.ActiveCalculation

Declaration

ActiveCalculation as PdcCalculation

Description

Returns the active calculation object

Notes

The ActiveCalculation property contains the calculation currently opened in Plan-de-CAMpagne.

Code example

This code opens the active calculation as object and populates user field 1.

dim objCalc

  set objCalc = pdc.ActiveCalculation
  if IsValid(objCalc) then
    objCalc.SelectHeader
    objCalc.UserString(0) = "Userfield populated by script."
    objCalc.Refresh
  else 
    msgbox "No calculation open, script cannot proceed."
  end if 

  set objCalc = nothing

Availability

Available since June 2001 (From version 1.5).