Agilent Technologies 86038A User Manual page 137

Recommended Control Sequence
N O TE
Agilent 86038A Optical Dispersion Analyzer, Third Edition
When the ODA takes the derivative of group delay to calculate chromatic
dispersion, the effective wavelength axis shifts one-half of a point spacing
upwards (and there is one less point.) So, the wavelength queries force
you to specify the measurement type, so you can query the correct
wavelengths. Gain, Group Delay, DGD, and PLDL share the same
wavelengths, CD is the only measurement with offset wavelengths.
This example queries the gain:
Dim gainData() As Double
' Get the data and figure out the wavelength axis
gainData = odaClient.Results.YData(eMeasurementType_Gain,
eODAPort_One)
npoin = UBound(gainData) - LBound(gainData)+1
xStart = odaClient.Results.XStart(eMeasurementType_Gain)
xStop = odaClient.Results.XStop(eMeasurementType_Gain)
xStep = (xStop - xStart) / (npoin - 1)
See Table 8, "ODA Enumerations," on page 141 for the other possible
values of the eMeasurementType enumeration.
When this code snippet finishes, the gain data will be in gainData, and you
can calculate the wavelength of any point from the xStart and xStep
variables.
9 Disconnect from the ODA
The ODA keeps track of who is connected to it. If one of the connections
quits responding, the ODA will go through a time-consuming clean-up
process to remove references to the dead connection. To avoid this, and to
avoid Visual Studio getting confused, it is very important to issue a
disconnect statement for every connect statement, even when debugging.
If you are debugging and decide to halt program execution, you should
either manually run the following statement, or run a function (such as
Form_Close) that executes it:
odaClient.Connectivity.Disconnect
In addition, it is necessary to terminate the session when your program is
closing down to allow clean up on both sides:
odaClient.Connectivity.TerminateSession
Remote Operation
137