Source position: xforms.pp line 800
procedure fl_get_object_position(
p1: PFL_OBJECT;
p2: PFL_Coord;
p3: PFL_Coord
);