_news__c_db-news-revision-create (private)
_news__c_db-news-revision-create
Defined in packages/news/tcl/test/news-db-test-init.tcl
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: aa_export_vars {p_item_id p_full_details p_title p_text p_package_id p_make_active_revision_p p_description p_approval_user p_approval_ip p_approval_date p_archive_date revision_id} if {$p_full_details == "t"} { set p_approval_user [ad_conn "user_id"] set p_approval_ip [ad_conn "peeraddr"] set p_approval_date [dt_sysdate] set p_archive_date [dt_sysdate] } else { set p_approval_user "" set p_approval_ip "" set p_approval_date "" set p_archive_date "" } set revision_id [db_exec_plsql revision-create { begin :1 := news.revision_new( item_id => :p_item_id, text => :p_text, title => :p_title, package_id => :p_package_id, archive_date => :p_archive_date, approval_user => :p_approval_user, approval_date => :p_approval_date, approval_ip => :p_approval_ip, make_active_revision_p => :p_make_active_revision_p ); end; }]Generic XQL file: packages/news/tcl/test/news-db-test-init.xql
PostgreSQL XQL file: <fullquery name="_news__c_db-news-revision-create.revision-create"> <querytext> select news__revision_new( :p_item_id, current_timestamp, :p_text, :p_title, :p_description, 'text/plain', :p_package_id, :p_archive_date, :p_approval_user, :p_approval_date, :p_approval_ip, current_timestamp, null, null, :p_make_active_revision_p, null ); </querytext> </fullquery>packages/news/tcl/test/news-db-test-init-postgresql.xql
Oracle XQL file: <fullquery name="_news__c_db-news-revision-create.revision-create"> <querytext> begin :1 := news.revision_new( item_id => :p_item_id, text => :p_text, title => :p_title, description => :p_description, package_id => :p_package_id, archive_date => :p_archive_date, approval_user => :p_approval_user, approval_date => :p_approval_date, approval_ip => :p_approval_ip, make_active_revision_p => :p_make_active_revision_p ); end; </querytext> </fullquery>packages/news/tcl/test/news-db-test-init-oracle.xql