Finds the next nearest feature; called after successful GDLFN.
Syntax
05 GDL-FIND-NEXT.
10 GDL-FNX-HANDLE PIC S9(09) BINARY.
10 GDL-FNX-OUTPUT-SHAPE PIC S9(09) BINARY.
10 GDL-FNX-TYPE-SHAPE PIC S9(09) BINARY.
*
CALL "GDLFNX"
USING GDL-FIND-NEXT GDL-RETURN-CODE.
Arguments
GDL-FNX-HANDLE
The gdlFileHandle returned by GDLOSF (GDL-OSF- SPATIAL-HANDLE). Input.
GDL-FNX-OUTPUT-SHAPE
A pointer to the next nearest shape. Output. GDL-FNX-TYPE-SHAPEThe type of shape to find. Input.
Type options:
COBOL Shape Types |
---|
GDL-POINT |
GDL-LINE |
Return Values
GDL-OK | Success |
GDL-ERROR | An internal error occurred |
GDL-NOT-FOUND | No more features were found |
GDL-WRONG-TYPE | GDL-FNX-TYPE-SHAPE is not GDL-POINT or GDL-LINE |
Prerequisites
GDLFN
Alternates
None.
Notes
Following instances of this procedure, you should call GDLSF with the output shape (GDL- FNX-OUTPUT-SHAPE) when you are finished using the output shape to release system resources.