Source position: xforms.pp line 2669
procedure fl_replace_folder_bynumber(
p1: PFL_OBJECT;
p2: LongInt;
p3: PFL_FORM
);