Class ::xo::db::sql::static_page

::xo::db::sql::static_page[i] create ...

Defined in

Class Relations

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

Methods (to be applied on the object)

  • delete (scripted, public)

     xo::db::sql::static_page[i] delete [ -dbn dbn ] \
        -static_page_id static_page_id 

    Automatically generated method

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

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

     xo::db::sql::static_page[i] delete_folder [ -dbn dbn ] \
        -folder_id folder_id 

    Automatically generated method

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

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

     xo::db::sql::static_page[i] delete_stale_items [ -dbn dbn ] \
        -session_id session_id  -package_id package_id 

    Automatically generated method

    Switches:
    -dbn (optional)
    -session_id (required)
    -package_id (required)

    Testcases:
    No testcase defined.
    #function_args: {SESSION_ID {}} {PACKAGE_ID {}}
    foreach var [list SESSION_ID 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 static_page__delete_stale_items($_SESSION_ID$_PACKAGE_ID) 
        "
    db_with_handle -dbn $dbn db {
      #ns_log notice "--sql=$sql"
      return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
    }
  • five_n_spaces (scripted, public)

     xo::db::sql::static_page[i] five_n_spaces [ -dbn dbn ] -n n 

    Automatically generated method

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

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

     xo::db::sql::static_page[i] get_root_folder [ -dbn dbn ] \
        -package_id package_id 

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {PACKAGE_ID {}}
    foreach var [list 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 static_page__get_root_folder($_PACKAGE_ID) 
        "
    db_with_handle -dbn $dbn db {
      #ns_log notice "--sql=$sql"
      return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
    }
  • get_show_comments_p (scripted, public)

     xo::db::sql::static_page[i] get_show_comments_p [ -dbn dbn ] \
        -item_id item_id 

    Automatically generated method

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

    Testcases:
    No testcase defined.
    #function_args: {ITEM_ID {}}
    foreach var [list 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 static_page__get_show_comments_p($_ITEM_ID) 
        "
    db_with_handle -dbn $dbn db {
      #ns_log notice "--sql=$sql"
      return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
    }
  • grant_permission (scripted, public)

     xo::db::sql::static_page[i] grant_permission [ -dbn dbn ] \
        -item_id item_id  -grantee_id grantee_id  -privilege privilege  \
        -recursive_p recursive_p 

    Automatically generated method

    Switches:
    -dbn (optional)
    -item_id (required)
    -grantee_id (required)
    -privilege (required)
    -recursive_p (required)

    Testcases:
    No testcase defined.
    #function_args: {ITEM_ID {}} {GRANTEE_ID {}} {PRIVILEGE {}} {RECURSIVE_P {}}
    foreach var [list ITEM_ID GRANTEE_ID PRIVILEGE RECURSIVE_P]  {
      set varname [string tolower $var]
      if {[info exists $varname]} {
        set $var [set $varname]
        set _$var :$var
      } else {
        set _$var null
      }
    }
    set sql "
    select static_page__grant_permission($_ITEM_ID$_GRANTEE_ID$_PRIVILEGE$_RECURSIVE_P) 
        "
    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::static_page[i] new [ -dbn dbn ] -folder_id folder_id  \
        -filename filename  -title title  -mtime mtime  \
        [ -childof childof ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -folder_id (required)
    -filename (required)
    -title (required)
    -mtime (required)
    -childof (optional)

    Testcases:
    No testcase defined.
    #function_args: {FOLDER_ID {}} {FILENAME {}} {TITLE {}} {MTIME {}}
    foreach var [list FOLDER_ID FILENAME TITLE MTIME]  {
      set varname [string tolower $var]
      if {[info exists $varname]} {
        set $var [set $varname]
        set _$var :$var
      } else {
        set _$var null
      }
    }
    set sql "
    select static_page__new($_FOLDER_ID$_FILENAME$_TITLE$_MTIME) 
        "
    db_with_handle -dbn $dbn db {
      #ns_log notice "--sql=$sql"
      return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
    }
  • new_folder (scripted, public)

     xo::db::sql::static_page[i] new_folder [ -dbn dbn ] -folder_id folder_id  \
        -name name  -label label  -description description  \
        -parent_id parent_id  -creation_date creation_date  \
        -creation_user creation_user  -creation_ip creation_ip  \
        -context_id context_id 

    Automatically generated method

    Switches:
    -dbn (optional)
    -folder_id (required)
    -name (required)
    -label (required)
    -description (required)
    -parent_id (required)
    -creation_date (required)
    -creation_user (required)
    -creation_ip (required)
    -context_id (required)

    Testcases:
    No testcase defined.
    #function_args: {FOLDER_ID {}} {NAME {}} {LABEL {}} {DESCRIPTION {}} {PARENT_ID {}} {CREATION_DATE {}} {CREATION_USER {}} {CREATION_IP {}} {CONTEXT_ID {}}
    foreach var [list FOLDER_ID NAME LABEL DESCRIPTION PARENT_ID CREATION_DATE CREATION_USER CREATION_IP CONTEXT_ID]  {
      set varname [string tolower $var]
      if {[info exists $varname]} {
        set $var [set $varname]
        set _$var :$var
      } else {
        set _$var null
      }
    }
    set sql "
    select static_page__new_folder($_FOLDER_ID$_NAME$_LABEL$_DESCRIPTION$_PARENT_ID$_CREATION_DATE$_CREATION_USER$_CREATION_IP$_CONTEXT_ID) 
        "
    db_with_handle -dbn $dbn db {
      #ns_log notice "--sql=$sql"
      return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
    }
  • revoke_permission (scripted, public)

     xo::db::sql::static_page[i] revoke_permission [ -dbn dbn ] \
        -item_id item_id  -grantee_id grantee_id  -privilege privilege  \
        -recursive_p recursive_p 

    Automatically generated method

    Switches:
    -dbn (optional)
    -item_id (required)
    -grantee_id (required)
    -privilege (required)
    -recursive_p (required)

    Testcases:
    No testcase defined.
    #function_args: {ITEM_ID {}} {GRANTEE_ID {}} {PRIVILEGE {}} {RECURSIVE_P {}}
    foreach var [list ITEM_ID GRANTEE_ID PRIVILEGE RECURSIVE_P]  {
      set varname [string tolower $var]
      if {[info exists $varname]} {
        set $var [set $varname]
        set _$var :$var
      } else {
        set _$var null
      }
    }
    set sql "
    select static_page__revoke_permission($_ITEM_ID$_GRANTEE_ID$_PRIVILEGE$_RECURSIVE_P) 
        "
    db_with_handle -dbn $dbn db {
      #ns_log notice "--sql=$sql"
      return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
    }
  • set_show_comments_p (scripted, public)

     xo::db::sql::static_page[i] set_show_comments_p [ -dbn dbn ] \
        -item_id item_id  -show_comments_p show_comments_p 

    Automatically generated method

    Switches:
    -dbn (optional)
    -item_id (required)
    -show_comments_p (required)

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