[delphi.com.ar]

procedure ProcA;
begin
  ....
  if EjecutaProcB Then
  begin
    ProcB;
    Exit; {Sale del ProcA}
  end;
  ....
end;

procedure ProcB;
begin
  ....
end;

¿¿Algo Asi??