
  PROCEDURE [XREF] fdp$xadd_form
    (VAR form_identifier: integer;
     VAR status: integer);

