 PROCEDURE [XREF] fdp$xset_cursor_position (VAR form_identifier: integer;
    VAR object_name: ost$name;
    VAR object_occurrence: integer;
    VAR object_character_position: integer;
    VAR status: integer);
