---

Class ::xo::db::sql::content_revision

::xo::db::sql::content_revision create ...

Class Relations

• class: ::xo::db::Class
• superclass: ::xotcl::Object

::xo::db::Class create ::xo::db::sql::content_revision \
     -superclass ::xotcl::Object

Methods (to be applied on the object)

• content_copy (scripted, public)

   xo::db::sql::content_revision content_copy [ -dbn dbn ] \
      -revision_id revision_id  [ -revision_id_dest revision_id_dest ]

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  -revision_id_dest

  (optional)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

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

• copy (scripted, public)

   xo::db::sql::content_revision copy [ -dbn dbn ] \
      -revision_id revision_id  [ -copy_id copy_id ] \
      [ -target_item_id target_item_id ] \
      [ -creation_user creation_user ] [ -creation_ip creation_ip ]

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  -copy_id

  (optional)

  -target_item_id

  (optional)

  -creation_user

  (optional)

  -creation_ip

  (optional)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {REVISION_ID {}} {COPY_ID null} {TARGET_ITEM_ID null} {CREATION_USER null} {CREATION_IP null}
  foreach var [list REVISION_ID COPY_ID TARGET_ITEM_ID CREATION_USER CREATION_IP]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select content_revision__copy($_REVISION_ID, $_COPY_ID, $_TARGET_ITEM_ID, $_CREATION_USER, $_CREATION_IP) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• copy_attributes (scripted, public)

   xo::db::sql::content_revision copy_attributes [ -dbn dbn ] \
      -content_type content_type  -revision_id revision_id  \
      -copy_id copy_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -content_type

  (required)

  -revision_id

  (required)

  -copy_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {CONTENT_TYPE {}} {REVISION_ID {}} {COPY_ID {}}
  foreach var [list CONTENT_TYPE REVISION_ID COPY_ID]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select content_revision__copy_attributes($_CONTENT_TYPE, $_REVISION_ID, $_COPY_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• del (scripted, public)

   xo::db::sql::content_revision del [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__del($_REVISION_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• delete (scripted, public)

   xo::db::sql::content_revision delete [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__delete($_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_content (scripted, public)

   xo::db::sql::content_revision get_content [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__get_content($_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_number (scripted, public)

   xo::db::sql::content_revision get_number [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__get_number($_REVISION_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• is_latest (scripted, public)

   xo::db::sql::content_revision is_latest [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__is_latest($_REVISION_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• is_live (scripted, public)

   xo::db::sql::content_revision is_live [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__is_live($_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::content_revision new [ -dbn dbn ] -title title  \
      [ -description description ] [ -publish_date publish_date ] \
      [ -mime_type mime_type ] [ -nls_language nls_language ] \
      [ -text text ] -item_id item_id  [ -revision_id revision_id ] \
      [ -creation_date creation_date ] [ -creation_user creation_user ] \
      [ -creation_ip creation_ip ] [ -content_length content_length ] \
      [ -package_id package_id ] [ -childof childof ]

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -title

  (required)

  -description

  (optional)

  -publish_date

  (defaults to "now()") (optional)

  -mime_type

  (defaults to "text/plain") (optional)

  -nls_language

  (optional)

  -text

  (defaults to " ") (optional)

  -item_id

  (required)

  -revision_id

  (optional)

  -creation_date

  (defaults to "now()") (optional)

  -creation_user

  (optional)

  -creation_ip

  (optional)

  -content_length

  (optional)

  -package_id

  (optional)

  -childof

  (optional)

  Partial Call Graph (max 5 caller/called nodes):

  Testcases:

  No testcase defined.

  #function_args: {TITLE {}} {DESCRIPTION null} {PUBLISH_DATE now()} {MIME_TYPE text/plain} {NLS_LANGUAGE null} {TEXT { }} {ITEM_ID {}} {REVISION_ID null} {CREATION_DATE now()} {CREATION_USER null} {CREATION_IP null} {CONTENT_LENGTH null} {PACKAGE_ID null}
  foreach var [list TITLE DESCRIPTION PUBLISH_DATE MIME_TYPE NLS_LANGUAGE TEXT ITEM_ID REVISION_ID CREATION_DATE CREATION_USER CREATION_IP CONTENT_LENGTH PACKAGE_ID]  {
    set varname [string tolower $var]
    if {[info exists $varname]} {
      set $var [set $varname]
      set _$var :$var
    } else {
      set _$var null
    }
  }
  set sql "
  select content_revision__new($_TITLE, $_DESCRIPTION, $_PUBLISH_DATE, $_MIME_TYPE, $_NLS_LANGUAGE, $_TEXT, $_ITEM_ID, $_REVISION_ID, $_CREATION_DATE, $_CREATION_USER, $_CREATION_IP, $_CONTENT_LENGTH, $_PACKAGE_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• revision_name (scripted, public)

   xo::db::sql::content_revision revision_name [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__revision_name($_REVISION_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• to_html (scripted, public)

   xo::db::sql::content_revision to_html [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__to_html($_REVISION_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

• to_temporary_clob (scripted, public)

   xo::db::sql::content_revision to_temporary_clob [ -dbn dbn ] \
      -revision_id revision_id 

  Automatically generated method

  Switches:

  -dbn

  (optional)

  -revision_id

  (required)

  Partial Call Graph (max 5 caller/called nodes):

  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 content_revision__to_temporary_clob($_REVISION_ID) 
      "
  db_with_handle -dbn $dbn db {
    #ns_log notice "--sql=$sql"
    return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
  }

---