::xo::db::sql::content_folder
copy [ -dbn dbn ] -folder_id folder_id \
-target_folder_id target_folder_id -creation_user creation_user \
[ -creation_ip creation_ip ] [ -name name ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -target_folder_id (required)
- -creation_user (required)
- -creation_ip (optional)
- -name (optional)
::1296639 proc copy {{-dbn {}} -folder_id:required -target_folder_id:required -creation_user:required -creation_ip -name} {
#function_args: {FOLDER_ID {}} {TARGET_FOLDER_ID {}} {CREATION_USER {}} {CREATION_IP null} {NAME null}
foreach var [list FOLDER_ID TARGET_FOLDER_ID CREATION_USER CREATION_IP NAME] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__copy($_FOLDER_ID, $_TARGET_FOLDER_ID, $_CREATION_USER, $_CREATION_IP, $_NAME)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
del [ -dbn dbn ] -folder_id folder_id \
[ -cascade_p cascade_p ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -cascade_p (defaults to
"f"
) (optional)
::1296639 proc del {{-dbn {}} -folder_id:required {-cascade_p f}} {
#function_args: {FOLDER_ID {}} {CASCADE_P f}
foreach var [list FOLDER_ID CASCADE_P] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__del($_FOLDER_ID, $_CASCADE_P)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
delete [ -dbn dbn ] \
-folder_id folder_id [ -cascade_p cascade_p ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -cascade_p (defaults to
"f"
) (optional)
::1296639 proc delete {{-dbn {}} -folder_id:required {-cascade_p f}} {
#function_args: {FOLDER_ID {}} {CASCADE_P f}
foreach var [list FOLDER_ID CASCADE_P] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__delete($_FOLDER_ID, $_CASCADE_P)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
edit_name [ -dbn dbn ] \
-folder_id folder_id -name name -label label \
-description description
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -name (required)
- -label (required)
- -description (required)
::1296639 proc edit_name {{-dbn {}} -folder_id:required -name:required -label:required -description:required} {
#function_args: {FOLDER_ID {}} {NAME {}} {LABEL {}} {DESCRIPTION {}}
foreach var [list FOLDER_ID NAME LABEL DESCRIPTION] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__edit_name($_FOLDER_ID, $_NAME, $_LABEL, $_DESCRIPTION)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
get_index_page [ -dbn dbn ] \
-folder_id folder_id
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
::1296639 proc get_index_page {{-dbn {}} -folder_id:required} {
#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 content_folder__get_index_page($_FOLDER_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
get_label [ -dbn dbn ] \
-folder_id folder_id
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
::1296639 proc get_label {{-dbn {}} -folder_id:required} {
#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 content_folder__get_label($_FOLDER_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
is_empty [ -dbn dbn ] \
-folder_id folder_id
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
::1296639 proc is_empty {{-dbn {}} -folder_id:required} {
#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 content_folder__is_empty($_FOLDER_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
is_folder [ -dbn dbn ] -item_id item_id
Automatically generated method
- Switches:
- -dbn (optional)
- -item_id (required)
::1296639 proc is_folder {{-dbn {}} -item_id:required} {
#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 content_folder__is_folder($_ITEM_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
is_registered [ -dbn dbn ] \
-folder_id folder_id -content_type content_type \
[ -include_subtypes include_subtypes ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -content_type (required)
- -include_subtypes (defaults to
"f"
) (optional)
::1296639 proc is_registered {{-dbn {}} -folder_id:required -content_type:required {-include_subtypes f}} {
#function_args: {FOLDER_ID {}} {CONTENT_TYPE {}} {INCLUDE_SUBTYPES f}
foreach var [list FOLDER_ID CONTENT_TYPE INCLUDE_SUBTYPES] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__is_registered($_FOLDER_ID, $_CONTENT_TYPE, $_INCLUDE_SUBTYPES)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
is_root [ -dbn dbn ] \
-folder_id folder_id
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
::1296639 proc is_root {{-dbn {}} -folder_id:required} {
#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 content_folder__is_root($_FOLDER_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
is_sub_folder [ -dbn dbn ] \
-folder_id folder_id -target_folder_id target_folder_id
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -target_folder_id (required)
::1296639 proc is_sub_folder {{-dbn {}} -folder_id:required -target_folder_id:required} {
#function_args: {FOLDER_ID {}} {TARGET_FOLDER_ID {}}
foreach var [list FOLDER_ID TARGET_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 content_folder__is_sub_folder($_FOLDER_ID, $_TARGET_FOLDER_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
move [ -dbn dbn ] -folder_id folder_id \
-target_folder_id target_folder_id [ -name name ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -target_folder_id (required)
- -name (optional)
::1296639 proc move {{-dbn {}} -folder_id:required -target_folder_id:required -name} {
#function_args: {FOLDER_ID {}} {TARGET_FOLDER_ID {}} {NAME null}
foreach var [list FOLDER_ID TARGET_FOLDER_ID NAME] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__move($_FOLDER_ID, $_TARGET_FOLDER_ID, $_NAME)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
new [ -dbn dbn ] -name name \
-label label -description description -parent_id parent_id \
-context_id context_id -folder_id folder_id \
[ -creation_date creation_date ] -creation_user creation_user \
-creation_ip creation_ip \
[ -security_inherit_p security_inherit_p ] -package_id package_id \
[ -childof childof ]
Automatically generated method
- Switches:
- -dbn (optional)
- -name (required)
- -label (required)
- -description (required)
- -parent_id (required)
- -context_id (required)
- -folder_id (required)
- -creation_date (defaults to
"now"
) (optional) - -creation_user (required)
- -creation_ip (required)
- -security_inherit_p (defaults to
"t"
) (optional) - -package_id (required)
- -childof (optional)
::1296639 proc new {{-dbn {}} -name:required -label:required -description:required -parent_id:required -context_id:required -folder_id:required {-creation_date now} -creation_user:required -creation_ip:required {-security_inherit_p t} -package_id:required -childof} {
#function_args: {NAME {}} {LABEL {}} {DESCRIPTION {}} {PARENT_ID {}} {CONTEXT_ID {}} {FOLDER_ID {}} {CREATION_DATE now} {CREATION_USER {}} {CREATION_IP {}} {SECURITY_INHERIT_P t} {PACKAGE_ID {}}
foreach var [list NAME LABEL DESCRIPTION PARENT_ID CONTEXT_ID FOLDER_ID CREATION_DATE CREATION_USER CREATION_IP SECURITY_INHERIT_P 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_folder__new($_NAME, $_LABEL, $_DESCRIPTION, $_PARENT_ID, $_CONTEXT_ID, $_FOLDER_ID, $_CREATION_DATE, $_CREATION_USER, $_CREATION_IP, $_SECURITY_INHERIT_P, $_PACKAGE_ID)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
register_content_type [ -dbn dbn ] \
-folder_id folder_id -content_type content_type \
[ -include_subtypes include_subtypes ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -content_type (required)
- -include_subtypes (defaults to
"f"
) (optional)
::1296639 proc register_content_type {{-dbn {}} -folder_id:required -content_type:required {-include_subtypes f}} {
#function_args: {FOLDER_ID {}} {CONTENT_TYPE {}} {INCLUDE_SUBTYPES f}
foreach var [list FOLDER_ID CONTENT_TYPE INCLUDE_SUBTYPES] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__register_content_type($_FOLDER_ID, $_CONTENT_TYPE, $_INCLUDE_SUBTYPES)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}
::xo::db::sql::content_folder
unregister_content_type [ -dbn dbn ] \
-folder_id folder_id -content_type content_type \
[ -include_subtypes include_subtypes ]
Automatically generated method
- Switches:
- -dbn (optional)
- -folder_id (required)
- -content_type (required)
- -include_subtypes (defaults to
"f"
) (optional)
::1296639 proc unregister_content_type {{-dbn {}} -folder_id:required -content_type:required {-include_subtypes f}} {
#function_args: {FOLDER_ID {}} {CONTENT_TYPE {}} {INCLUDE_SUBTYPES f}
foreach var [list FOLDER_ID CONTENT_TYPE INCLUDE_SUBTYPES] {
set varname [string tolower $var]
if {[info exists $varname]} {
set $var [set $varname]
set _$var :$var
} else {
set _$var null
}
}
set sql "
select content_folder__unregister_content_type($_FOLDER_ID, $_CONTENT_TYPE, $_INCLUDE_SUBTYPES)
"
db_with_handle -dbn $dbn db {
#ns_log notice "--sql=$sql"
return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}
}