 PROCEDURE [XREF] fdp$xopen_form (VAR form_name: string (*);
    VAR form_identifier: integer;
    VAR status: integer);
