_news__c_db-news-archive (private)

 _news__c_db-news-archive

Defined in packages/news/tcl/test/news-db-test-init.tcl

Partial Call Graph (max 5 caller/called nodes):
%3 aa_export_vars aa_export_vars (public) db_exec_plsql db_exec_plsql (public) _news__c_db-news-archive _news__c_db-news-archive _news__c_db-news-archive->aa_export_vars _news__c_db-news-archive->db_exec_plsql

Testcases:
No testcase defined.
Source code:
    aa_export_vars {p_item_id p_archive_date}
    if {$p_archive_date eq ""} {
        db_exec_plsql archive-default {
            begin
            news.archive(:p_item_id, null);
            end;
        }
    } else {
        db_exec_plsql archive {
            begin
            news.archive(:p_item_id, :p_archive_date);
            end;
        }
    }
Generic XQL file:
packages/news/tcl/test/news-db-test-init.xql

PostgreSQL XQL file:
<fullquery name="_news__c_db-news-archive.archive-default">
    <querytext>
    select news__archive(:p_item_id);
  </querytext>
</fullquery>

<fullquery name="_news__c_db-news-archive.archive">
    <querytext>
    select news__archive(:p_item_id, :p_archive_date);
  </querytext>
</fullquery>
packages/news/tcl/test/news-db-test-init-postgresql.xql

Oracle XQL file:
<fullquery name="_news__c_db-news-archive.archive">
    <querytext>
    begin
      news.archive(item_id => :p_item_id,
                   archive_date => :p_archive_date);
    end;
  </querytext>
</fullquery>

<fullquery name="_news__c_db-news-archive.archive-default">
    <querytext>
    begin
      news.archive(item_id => :p_item_id);
    end;
  </querytext>
</fullquery>
packages/news/tcl/test/news-db-test-init-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: