07-18-2008 11:03 AM
07-21-2008 10:24 AM
You can programmatically set the report scales by opening the report axis object, i.e. 2dAxis system
Dim Xscale, Yscale
Xscale=Array(-0.1,0.4,-0.1,0.05,0)
Yscale=Array(-50,10,-50,10,4)
Call GRAPHObjOpen("2DAxis1")
Call GRAPHObjOpen("2DXAxis1_1")
D2AXISXBEGIN = Xscale(0)
D2AXISXEND = Xscale(1)
D2AXISXORIGIN = Xscale(2)
D2AXISXTICK = Xscale(3)
D2AXISXMINITICK = Xscale(4)
D2AxisXFormat=GetdddFormat(D2AXISXTICK)
Call GRAPHObjClose("2DXAxis1_1")
Call GRAPHObjOpen("2DYAxis1_1")
D2AXISYBEGIN = Yscale(0)
D2AXISYEND = Yscale(1)
D2AXISYORIGIN = Yscale(2)
D2AXISYTICK = Yscale(3)
D2AXISYMINITICK = Yscale(4)
D2AxisYFormat=GetdddFormat(D2AXISYTICK)
Call GRAPHObjClose("2DYAxis1_1")
Call GRAPHObjClose("2DAxis1")
If you put the larger section in a user command file then you can change the scales programmatically very cleanly, and send the array contents from a script.
As far as a slider bar, this sounds like you should be using the VIEW module. Use the VIEW module to view and cursor through your data, use the REPORT module to print.