dim pcurve as ipolycurve
set pcurve = [shape]
dim ppt as ipoint
set ppt = pcurve.frompoint
dim z as double
z = ppt.z

Listing 1: START_Z calculation



dim pcurve as ipolycurve
set pcurve = [shape]
dim ppt as ipoint
set ppt = pcurve.topoint
dim z as double
z = ppt.z

Listing 2: END_Z calculation



