Function Call Protocol - Vba - Leica tps1100 Reference Manual

GeoCOM Reference Manual
Please refer to chapter 3.2.3 Basic GeoCOM Application Frame for C/C++ for this
information.
RC_TYPE
TMC_HZ_V_ANG
double
RetCode = TMC_GetSimpleMea( 1000, Angles,
if (RetCode == RC_OK)
{
// do something - use values
}
else
{
// handle error
}
2.4

FUNCTION CALL PROTOCOL - VBA

Here almost all is valid for VBA as for C/C++. Please refer to Chapter 2.3. The
only difference between VBA and C/C++ is that VBA has a different type system.
Hence, the defined data types differ slightly in their definition. Furthermore,
because of implementation reasons the RPC names must have an additional prefix,
which is "VB_" for the current implementation of GeoCOM.
Example:
We take the same example as in Chapter 2.3.
Dim RetCode
Dim Angles
Dim dSlopeDist
RetCode = VB_TMC_GetSimpleMea( 1000, Angles,
If RetCode = RC_OK Then
' do something - use values
Else
' handle error
End If
TPS1100 - Version 1.05
RetCode;
Angles;
dSlopeDist;
As Integer
As TMC_HZ_V_ANG
As Double
General Concepts of Using GeoCOM
dSlopeDist,
TMC_AUTO_INC );
dSlopeDist,
TMC_AUTO_INC )
2-5