Use CONNECT or CREATE DATABASE to specify a database
SQL> connect 'inet4://localhost:3054/test' user sysdba password 'masterkey';
Database: 'inet4://localhost:3054/test', User: SYSDBA
SQL> select current_time from rdb$database;

                                  CURRENT_TIME
==============================================
18:06:50.0000 Europe/Moscow

SQL>

SQLCODE: -902
GDSCODE: 335545167

Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements.
Could not find acceptable ICU library.
Missing entrypoint u_setDataDirectory in ICU library.

CREATE PROCEDURE P_EXCESS (A_ID INT, A_TRAN INT = NULL, A_CONN INT = NULL)
  RETURNS (ID INT, TRAN INT, CONN INT)
AS
DECLARE S VARCHAR(255);
DECLARE W VARCHAR(255) = '';
BEGIN
  S = 'SELECT * FROM TTT WHERE ID = :ID';

  IF (A_TRAN IS NOT NULL)
  THEN W = W || ' AND TRAN = :a';

  IF (A_CONN IS NOT NULL)
  THEN W = W || ' AND CONN = :b';

  IF (W <> '')
  THEN S = S || W;

  -- could raise error if TRAN or CONN is null
  -- FOR EXECUTE STATEMENT (:S) (a := :A_TRAN, b := A_CONN, id := A_ID)

  -- OK in all cases
  FOR EXECUTE STATEMENT (:S) (EXCESS a := :A_TRAN, EXCESS b := A_CONN, id := A_ID)
      INTO :ID, :TRAN, :CONN
      DO SUSPEND;
END

CREATE OR ALTER PACKAGE MY_PACKAGE
SQL SECURITY DEFINER
AS
BEGIN
-- выводит вот так
PROCEDURE FILL_MARE (
    CODE_ROLL   INTEGER,
    DATE_BEGIN  DATE,
    DATE_END    DATE);

    -- хочу чтобы у процедур и функций был отступ от края
    PROCEDURE FILL_STALL (
        CODE_ROLL   INTEGER,
        DATE_BEGIN  DATE,
        DATE_END    DATE);

END