xotcl.wu-wien.ac.at
Begin main content
Methods: Source: Variables:
[All Methods | Documented Methods | Hide Methods] [Display Source | Hide Source] [Show Variables | Hide Variables]

::xo::db::Class[i] ::xo::db::sql::content_revision

Class Hierarchy of ::xo::db::sql::content_revision

  • ::xotcl::Object[i]
    Meta-class:
    ::xotcl::Class[i]
    Methods for instances:
    __api_make_doc, __api_make_forward_doc, __timediff, abstract, ad_doc, ad_forward, ad_proc, appendC, arrayC, asHTML, autonameC, check, classC, cleanupC, configureC, containsC, copyC, db_0or1rowC, db_1rowC, debug, defaultmethodC, destroyC, destroy_on_cleanup, ds, evalC, existsC, extractConfigureArg, filterC, filterguardC, filtersearch, forward, hasclass, incrC, infoC, init, instvarC, invarC, isclass, ismetaclass, ismixin, isobject, istype, lappendC, log, method, mixinC, mixinguardC, moveC, msg, noinitC, objectparameter, parametercmdC, proc, procsearch, qn, requireNamespaceC, residualargsC, self, serialize, setC, set_instance_vars_defaults, show-object, substC, traceC, unknown, unsetC, uplevelC, upvarC, volatileC, vwait
    Methods to be applied on the class (in addition to the methods provided by the meta-class):
    getExitHandler, setExitHandler, unsetExitHandler

Class Relations

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

Methods

  • proc content_copy (public)

    ::xo::db::sql::content_revision[i] 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 (required)
    ::2078647 proc content_copy {{-dbn {}} -revision_id:required -revision_id_dest:required} {
            #function_args: {REVISION_ID {}} {REVISION_ID_DEST {}}
            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 ]
            }
          }
    
  • proc copy (public)

    ::xo::db::sql::content_revision[i] 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 (required)
    -target_item_id (required)
    -creation_user (required)
    -creation_ip (required)
    ::2078647 proc copy {{-dbn {}} -revision_id:required -copy_id:required -target_item_id:required -creation_user:required -creation_ip:required} {
            #function_args: {REVISION_ID {}} {COPY_ID {}} {TARGET_ITEM_ID {}} {CREATION_USER {}} {CREATION_IP {}}
            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 ]
            }
          }
    
  • proc copy_attributes (public)

    ::xo::db::sql::content_revision[i] 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)
    ::2078647 proc copy_attributes {{-dbn {}} -content_type:required -revision_id:required -copy_id:required} {
            #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 ]
            }
          }
    
  • proc del (public)

    ::xo::db::sql::content_revision[i] del [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc del {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc delete (public)

    ::xo::db::sql::content_revision[i] delete [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc delete {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc get_content (public)

    ::xo::db::sql::content_revision[i] get_content [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc get_content {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc get_number (public)

    ::xo::db::sql::content_revision[i] get_number [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc get_number {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc is_latest (public)

    ::xo::db::sql::content_revision[i] is_latest [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc is_latest {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc is_live (public)

    ::xo::db::sql::content_revision[i] is_live [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc is_live {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc new (public)

    ::xo::db::sql::content_revision[i] 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 (required)
    -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)
    ::2078647 proc new {{-dbn {}} -title:required -description {-publish_date now()} {-mime_type text/plain} -nls_language -text:required -item_id:required -revision_id {-creation_date now()} -creation_user -creation_ip -content_length -package_id -childof} {
            #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 ]
            }
          }
    
  • proc revision_name (public)

    ::xo::db::sql::content_revision[i] revision_name [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc revision_name {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc to_html (public)

    ::xo::db::sql::content_revision[i] to_html [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc to_html {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    
  • proc to_temporary_clob (public)

    ::xo::db::sql::content_revision[i] to_temporary_clob [ -dbn dbn ] \
        -revision_id revision_id 
    Automatically generated method

    Switches:
    -dbn (optional)
    -revision_id (required)
    ::2078647 proc to_temporary_clob {{-dbn {}} -revision_id:required} {
            #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 ]
            }
          }
    

Methods: Source: Variables:
[All Methods | Documented Methods | Hide Methods] [Display Source | Hide Source] [Show Variables | Hide Variables]