Do you want the program unit to create a database link at runtime? In that case you can use the EXECUTE IMMEDIATE statement, followed by the DDL command:
Code:
create or replace procedure create_db_link as
begin
execute immediate 'create database link mydblink';
end;