How to find out the projects with status "Invalid"?

Question

I'm new to Oracle Projects -OP. We are on 12.0.4. This' my new job.
I have a task of "Remove projects with status 'Invalid' ".
Questions:
How to access the OP forms to verify the existent of the invalid projects?
What are the PA tables having the status info -- I mean those showing the status with 'Invalid'?
Thanks A lot.
an apps dba

Answer 1

I could not find a sample for the DELETE_PROJECT. I have coded the delete project by modifying the sample of the CREATE_PROJECT.
-- delete a project with the status INVALID shown in pa_project_statuses.project_status_name
--set serveroutput on size 20000
DECLARE
  -- Variables needed for API standard parameters
  l_api_version_number          NUMBER := 1.0;
  l_commit               VARCHAR2(1) := 'F';
  l_return_status          VARCHAR2(1);
  l_init_msg_list          VARCHAR2(1) := 'F';
  l_msg_count               NUMBER;
  l_msg_index_out          NUMBER;
  l_msg_data               VARCHAR2(2000);
  l_data               VARCHAR2(2000);
  l_pm_product_code          VARCHAR2(10);
  l_responsibiity_id          NUMBER;
  l_user_id               NUMBER;
  l_pm_project_reference     PA_PROJECT_PUB.PROJECT_IN_REC_TYPE;
  l_pa_project_id          PA_PROJECT_PUB.PROJECT_IN_REC_TYPE;
  API_ERROR               EXCEPTION;
BEGIN
-- GET GLOBAL VALUES
  select user_id, responsibility_id
    into l_user_id, l_responsibiity_id
    from pa_user_resp_v
   where user_name = 'J23N';          -- need to get from Apps
--SET GLOBAL VALUES
    pa_interface_utils_pub.set_global_info(
    p_api_version_number     => 1.0,
       p_responsibility_id     => l_responsibiity_id,
       p_user_id          => l_user_id,
    p_msg_count          => l_msg_count,
       p_msg_data          => l_msg_data,
       p_return_status          => l_return_status);
-- PRODUCT RELATED DATA
  l_pm_product_code := 'R_INVALID';           -- can be user defined
-- PRODUCT DATA (PROJECT_IN_REC_TYPE)
   l_pm_project_reference.pm_project_reference := null;
   l_pa_project_id.pa_project_id := 1001;
--INIT_CREATE_PROJECT
  --pa_project_pub.init_project;
  dbms_output.put_line('Before delete_project');
--DELETE_PROJECT
  pa_project_pub.delete_project(
     p_api_version_number => l_api_version_number,
     p_commit                    => l_commit,
     p_init_msg_list         => l_init_msg_list,
     p_msg_count                => l_msg_count,
     p_msg_data                  => l_msg_data,
     p_return_status         => l_return_status,
     p_pm_project_code       => l_pm_product_code,
  p_pm_project_reference => l_pm_project_reference,
  p_pa_project_id         => l_pa_project_id 
-- Check for errors
  if l_return_status != 'S'
  then
    raise API_ERROR;
  end if;
  dbms_output.put_line('Deleted Project Id: ' || l_pa_project_id.pa_project_id);
  --dbms_output.put_line('Deleted Project Number: ' || l_project_out.pa_project_number);
  Commit;
--HANDLE EXCEPTIONS
-- Get the error message that were returned if it did not complete sucessfully
  EXCEPTION
  When API_ERROR then
    dbms_output.put_line('An API_ERROR occurred');
    if l_msg_count >= 1
    then
      for i in 1..l_msg_count loop
        pa_interface_utils_pub.get_messages(
          p_msg_data      => l_msg_data,
          p_encoded     => 'F',
          p_data           => l_data,
          p_msg_count      => l_msg_count,
          p_msg_index_out => l_msg_index_out);
        dbms_output.put_line('error message: ' || l_data);
      end loop;
      rollback;
    end if;
  When OTHERS then
    dbms_output.put_line('An error occured, sqlcode = ' || sqlcode);
    if l_msg_count >= 1
      then
      for i in 1..l_msg_count loop
        pa_interface_utils_pub.get_messages(
          p_msg_count      => l_msg_count,
          p_encoded     => 'F',
          p_msg_data      => l_msg_data,
          p_data           => l_data,
          p_msg_index_out => l_msg_index_out);
        dbms_output.put_line('error message: ' || l_data);
      end loop;
      rollback;
    end if;
END;Can anyone with the experience of PA_PROJECT_PUB make comment on this Delete Project block? On the struncture level is it correct?
I run it and get
  pa_project_pub.delete_project(
ERROR at line 48:
ORA-06550: line 48, column 3:
PLS-00306: wrong number or types of arguments in call to 'DELETE_PROJECT'
ORA-06550: line 48, column 3:
PL/SQL: Statement ignored
Please make your comment on the structure (the logic)  of the delete project before providing the advice on the debug.
I would like to make sure the logic is correct first.
TIA