%3 ::xotcl::Object ::xotcl::Object ::xo::db::sql::wp_presentation ::xo::db::sql::wp_presentation → delete → delete_audience → delete_background → get_ad_revision → get_audience → get_background → get_bg_revision → new → new_revision → set_live_revision ::xo::db::sql::wp_presentation->::xotcl::Object

Class ::xo::db::sql::wp_presentation

::xo::db::sql::wp_presentation[i] create ...
Defined in

Class Relations

  • class: ::xo::db::Class[i]
  • superclass: ::xotcl::Object[i]
::xo::db::Class create ::xo::db::sql::wp_presentation \
     -superclass ::xotcl::Object

Methods (to be applied on the object)

  • delete (scripted, public)

     xo::db::sql::wp_presentation[i] delete [ -dbn dbn ] \
    -pres_item_id pres_item_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -pres_item_id (required)

    Testcases:
    No testcase defined.
    #function_args: {PRES_ITEM_ID {}}
foreach var [list PRES_ITEM_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__delete($_PRES_ITEM_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • delete_audience (scripted, public)

     xo::db::sql::wp_presentation[i] delete_audience [ -dbn dbn ] \
    -audience_item_id audience_item_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -audience_item_id (required)

    Testcases:
    No testcase defined.
    #function_args: {AUDIENCE_ITEM_ID {}}
foreach var [list AUDIENCE_ITEM_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__delete_audience($_AUDIENCE_ITEM_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • delete_background (scripted, public)

     xo::db::sql::wp_presentation[i] delete_background [ -dbn dbn ] \
    -background_item_id background_item_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -background_item_id (required)

    Testcases:
    No testcase defined.
    #function_args: {BACKGROUND_ITEM_ID {}}
foreach var [list BACKGROUND_ITEM_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__delete_background($_BACKGROUND_ITEM_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_ad_revision (scripted, public)

     xo::db::sql::wp_presentation[i] get_ad_revision [ -dbn dbn ] \
    -pres_revision_id pres_revision_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -pres_revision_id (required)

    Testcases:
    No testcase defined.
    #function_args: {PRES_REVISION_ID {}}
foreach var [list PRES_REVISION_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__get_ad_revision($_PRES_REVISION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_audience (scripted, public)

     xo::db::sql::wp_presentation[i] get_audience [ -dbn dbn ] \
    -pres_item_id pres_item_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -pres_item_id (required)

    Testcases:
    No testcase defined.
    #function_args: {PRES_ITEM_ID {}}
foreach var [list PRES_ITEM_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__get_audience($_PRES_ITEM_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_background (scripted, public)

     xo::db::sql::wp_presentation[i] get_background [ -dbn dbn ] \
    -pres_item_id pres_item_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -pres_item_id (required)

    Testcases:
    No testcase defined.
    #function_args: {PRES_ITEM_ID {}}
foreach var [list PRES_ITEM_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__get_background($_PRES_ITEM_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_bg_revision (scripted, public)

     xo::db::sql::wp_presentation[i] get_bg_revision [ -dbn dbn ] \
    -pres_revision_id pres_revision_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -pres_revision_id (required)

    Testcases:
    No testcase defined.
    #function_args: {PRES_REVISION_ID {}}
foreach var [list PRES_REVISION_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__get_bg_revision($_PRES_REVISION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • new (scripted, public)

     xo::db::sql::wp_presentation[i] new [ -dbn dbn ] \
    -creation_date creation_date  -creation_user creation_user  \
    -creation_ip creation_ip  -pres_title pres_title  \
    -page_signature page_signature  \
    -copyright_notice copyright_notice  -style style  \
    -public_p public_p  -show_modified_p show_modified_p  -aud aud  \
    -back back  -parent_id parent_id  [ -childof childof ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -creation_date (required)
    -creation_user (required)
    -creation_ip (required)
    -pres_title (required)
    -page_signature (required)
    -copyright_notice (required)
    -style (required)
    -public_p (required)
    -show_modified_p (required)
    -aud (required)
    -back (required)
    -parent_id (required)
    -childof (optional)

    Testcases:
    No testcase defined.
    #function_args: {CREATION_DATE {}} {CREATION_USER {}} {CREATION_IP {}} {PRES_TITLE {}} {PAGE_SIGNATURE {}} {COPYRIGHT_NOTICE {}} {STYLE {}} {PUBLIC_P {}} {SHOW_MODIFIED_P {}} {AUD {}} {BACK {}} {PARENT_ID {}}
foreach var [list CREATION_DATE CREATION_USER CREATION_IP PRES_TITLE PAGE_SIGNATURE COPYRIGHT_NOTICE STYLE PUBLIC_P SHOW_MODIFIED_P AUD BACK PARENT_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__new($_CREATION_DATE, $_CREATION_USER, $_CREATION_IP, $_PRES_TITLE, $_PAGE_SIGNATURE, $_COPYRIGHT_NOTICE, $_STYLE, $_PUBLIC_P, $_SHOW_MODIFIED_P, $_AUD, $_BACK, $_PARENT_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • new_revision (scripted, public)

     xo::db::sql::wp_presentation[i] new_revision [ -dbn dbn ] \
    -creation_date creation_date  -creation_user creation_user  \
    -creation_ip creation_ip  -pres_item_id pres_item_id  \
    -pres_title pres_title  -page_signature page_signature  \
    -copyright_notice copyright_notice  -style style  \
    -public_p public_p  -show_modified_p show_modified_p  \
    -audience audience  -background background

    Automatically generated method

    Switches:
    -dbn (optional)
    -creation_date (required)
    -creation_user (required)
    -creation_ip (required)
    -pres_item_id (required)
    -pres_title (required)
    -page_signature (required)
    -copyright_notice (required)
    -style (required)
    -public_p (required)
    -show_modified_p (required)
    -audience (required)
    -background (required)

    Testcases:
    No testcase defined.
    #function_args: {CREATION_DATE {}} {CREATION_USER {}} {CREATION_IP {}} {PRES_ITEM_ID {}} {PRES_TITLE {}} {PAGE_SIGNATURE {}} {COPYRIGHT_NOTICE {}} {STYLE {}} {PUBLIC_P {}} {SHOW_MODIFIED_P {}} {AUDIENCE {}} {BACKGROUND {}}
foreach var [list CREATION_DATE CREATION_USER CREATION_IP PRES_ITEM_ID PRES_TITLE PAGE_SIGNATURE COPYRIGHT_NOTICE STYLE PUBLIC_P SHOW_MODIFIED_P AUDIENCE BACKGROUND]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__new_revision($_CREATION_DATE, $_CREATION_USER, $_CREATION_IP, $_PRES_ITEM_ID, $_PRES_TITLE, $_PAGE_SIGNATURE, $_COPYRIGHT_NOTICE, $_STYLE, $_PUBLIC_P, $_SHOW_MODIFIED_P, $_AUDIENCE, $_BACKGROUND) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • set_live_revision (scripted, public)

     xo::db::sql::wp_presentation[i] set_live_revision [ -dbn dbn ] \
    -revision_id revision_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)

    Testcases:
    No testcase defined.
    #function_args: {REVISION_ID {}}
foreach var [list REVISION_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select wp_presentation__set_live_revision($_REVISION_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}