Working with DIAdem REPORT in DIAdem SCRIPT

Question

Hello,
I am working with DIAdem 9.1 Advanced. I would like to create a report with a 2D graph object containing one curve (X,Y1) or (X,Y2). The user has to choose between (X,Y1) and (X,Y2) via a dialog box. I want to generate this report with a VBS script without loading a predefined TDR report.
I tried the following sample code:
'1. Load "Example.CSV" from the DIAdem DEMO folder
'2. Load a new blank report
Call GraphObjNew("2D-Axis","MyGraph") 'Creates a new 2D-graph object called -MyGraph- in the report
Call GraphObjOpen("MyGraph")      
  D2AXISSYSTEM     ="one system"
' The user selects which channels he wants to plot via a dialog box
' If the channel "Sine" is selected, we need to create a new curve on the 2D-graph
' Do I need to create a new object for the curve? Which type of object ?
  Call GRAPHObjOpen("2DObj1_Curve1") ' ERROR -Object 2DObj1_Curve1 unknown or not open-
    D2CCHNX          ="[1]/Time"
    D2CCHNY          ="[1]/Sine"
  Call GRAPHObjClose("2DObj1_Curve1")
Call GraphObjClose("MyGraph") 
Call PicUpdate
Is it possible in DIAdem to create dynamically a 2D-graph when we do not know before which channels will be plot?
Thanks in advance for your answer.
Matthieu G.
Eurilogic, France

Answer 1

Hello Matthieu
Variable: ObjType
The terms 2D-curve and 3D-curve are valid keywords for new 2D-curves and 3D-curves and the enumeration terms of the ReportObjType variable for all other objects.
I attached some topic of the DIAdem 10 help that descibe some variables that correspond to this topic.
The following script create a 2d-Axis system an a new curve and defines the data for this curve
Call GraphObjNew("2D-Axis","MyGraph") 'Creates a new 2D-graph object called -MyGraph- in the report
Call GraphObjOpen("MyGraph")      
  D2AXISSYSTEM     ="one system"
  Call GraphObjNew("2D-curve","MyCurve") 'Creates a new 2D-Curve object called -MyCurve- in the report
  Call GraphObjOpen("MyCurve")
    D2CCHNXNAME      ="[1]/Time"
    D2CCHNYNAME      ="[1]/Sine"
  Call GraphObjClose("MyCurve")
Call GraphObjClose("MyGraph") 
Call Picupdate()
Hope this helps
Winfried
Message Edited by winner on 02-27-2006 11:54 AM
Attachments:
report.zip ‏18 KB