Deploying an app from export script stored in the database.

Question

I am in the situation where I want to deploy a copy of an application programatically into the current workspace, but each against a separate schema. The end game would be to have many copies of the same App in the same workspace (obviously with different application numbers assigned) but each app pointing to a different schema.
The workflow would be something like this:
<ol>
<li>Create a new tablespace for the new schema</li>
<li>Create the new Schema</li>
<li>create the required objects in the new schema (we're going to use DataPump for that)
</li>
<li>Assign the schema to the current workspace (make it available to use for a new APP)</li>
<li>Read the app.sql from a BLOB in the database and deploy it into the current workspace pointed to the new schema.</li>
</ol>
I was wondering if there are already API's in place that would help me do these things (especially steps 4 and 5).
I started poking around in the ApEx internals, looking specifically at the deployment of the SAMPLE apps to see if there was anything I could use, but it looks like the WWV_FLOW_SAMPLE_APP package is wrapped so I can't see what it's doing.
I also looked at the code behind the "COPY APPLICATION" function and it looks like I might be able to use wwv_flow_imp_parser.parse to install the application in the current schema, but would probably need some clarification on whether there are any "gotchas" there.
If that works, then it seems the hard part is assigning the new schema to the workspace as normally that is done from within the INTERNAL user's workspace.
Thanks in advance for the help.
Doug

Answer 1

Ok... For others who may be interested in this, I have figured out part of the answer...
To complete steps 2 and 4 mentioned in my original messages (Creating the user and makeing it available to a workspace) here is what I've come up with.
DECLARE
l_username varchar2(256);
l_password varchar2(256);
l_df_ts    varchar2(256);
l_tmp_ts   varchar2(256);
l_PCID     number;
l_workspace_name varchar2(255);
BEGIN
l_username := 'DOUG';
l_password := 'DOUG';
l_df_ts    := 'USERS';
l_tmp_ts   := 'TEMP';
l_workspace_name := 'HAAS';
-- CREATE THE USER AND THEN ADD THAT USER TO THE CORRECT WORKSPACE.
-- First make sure that
--  1. The name you're trying to create is not a "reserved" name like INTERNAL
--  2. We're not working in an installation that is "RUNTIME ONLY"
--  3. We're not working with a schema that is already in place or restricted.
IF  flows_030100.wwv_flow_provisioning.reserved_schema(p_schema => l_username) = false
and not (flows_030100.wwv_flow_provisioning.site_admin_is_restricted
          and
         flows_030100.wwv_flow_provisioning.restricted_schema(p_schema => l_username, p_workspace_name => l_worlkspace_name)
THEN
    -- CREATE THE USER
    flows_030100.wwv_flow_provision.create_user(
    p_username    => l_username,
    p_password    => l_password);
    -- ASSIGN THE TABLESPACEs
    flows_030100.wwv_flow_provision.set_user_tablespace(
    p_username    => l_username,
    p_default_ts  => l_df_ts,
    p_temp_ts     => l_tmp_ts);
    -- Grant the appropriate roles and privs to the user
    flows_030100.wwv_flow_provision.grant_initial_privs(l_username);
    -- Create the link between the workspace and the schema name.
     BEGIN
    -- FIRST get the Workspace ID (known as the PROVISIONING_COMPANY_ID) from the APEX Dictionary.
    -- This assumes that the workspace we're working in is HAAS
        select provisioning_company_id
          into l_PCID
          from flows_030100.wwv_flow_companies
         where short_name = l_workspace_name;
    -- Now insert a row into the company_schema table to line the schema to a workspace.   
        insert into flows_030100.wwv_flow_company_schemas (security_group_id, schema)
        values (l_pcid, upper(l_username));
        commit;
    EXCEPTION
       WHEN NO_DATA_FOUND then
            --IF things fail then we need to kill to drop the user that we created.
            flows_030100.wwv_flow_provision.drop_user(p_username => l_username);
            --Then rais the application error or do whatever...
            raise_application_error(-20100,'Trying to use an invalid worksapce - '|| l_workspace_name);
    END;
end if;
end;I'm still trying to work on deploying the APP stored in a BLOB to the workspace and so far have the following code, but get the message :
ORA-20001: You do not have privs on the DAVID schema.
ORA-06512: at "FLOWS_030100.WWV_FLOW_IMP_PARSER", line 1599
ORA-06512: at line 29
declare
  l_file_id   number := 2113831202674379;
  l_parse_as_schema varchar2(4000) := 'DAVID';
  l_new_ap_ID number;
  l_orig_ap_id number;
  l_workspace_name varchar2(255) := 'HAAS';
  l_PCID     number;
begin
    execute immediate 'alter session set current_schema = FLOWS_030100';
    flows_030100.wwv_flow_security.g_security_group_id := 10;
    flows_030100.wwv_flow_security.g_user := 'ADMIN';
  -- Import copy from application with new application ID and name
  -- First get the new Application ID
  l_new_ap_id := flows_030100.wwv_flow_utilities.minimum_free_flow;
  BEGIN
    select flow_id
      into l_orig_ap_id
      from flows_FILES.wwv_flow_file_objects$
     where id = l_file_id;
  end;
  flows_030100.wwv_flow_imp_parser.parse (
     p_file_id          => l_file_id,
     p_parse_as_schema  => l_parse_as_schema,   
     p_install_as_flow  => l_new_ap_id,
     p_original_flow_id => l_orig_ap_id,
     p_adjust_offset    => TRUE
  -- Get the Security group ID
      select provisioning_company_id
          into l_PCID
          from flows_030100.wwv_flow_companies
         where short_name = l_workspace_name;
  -- reset name with new application name
  update flows_030100.wwv_flows
  set name = 'TEST_NAME'
  where id = l_new_ap_id
  and security_group_id = l_PCID;
end;