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

::xo::db::Class ::xo::db::sql::quiz

Class Hierarchy of ::xo::db::sql::quiz
::xotcl::Object
Meta-class:

::xotcl::Class

Methods for instances:

__api_make_doc, __api_make_forward_doc, __next^C, __timediff, abstract, ad_doc, ad_forward, ad_proc, append^C, array^C, asHTML, autoname^C, check^C, class^C, cleanup^C, configure^C, contains, copy, db_1row^C, debug, defaultmethod, destroy^C, destroy_on_cleanup, eval^C, exists^C, extractConfigureArg, filter^C, filterguard^C, filtersearch^C, forward^C, hasclass, incr^C, info^C, init, instvar^C, invar^C, isclass^C, ismetaclass^C, ismixin^C, isobject^C, istype^C, lappend^C, log, method, mixin^C, mixinguard^C, move, msg, noinit^C, parametercmd^C, proc^C, procsearch^C, qn, requireNamespace^C, self, serialize, set^C, subst^C, trace^C, unset^C, uplevel^C, upvar^C, volatile^C, vwait^C
Methods to be applied on the class (in addition to the methods provided by the meta-class):

__exitHandler, getExitHandler, setExitHandler, unsetExitHandler
::xo::db::sql::quiz
Meta-class:

::xo::db::Class

Methods to be applied on the class (in addition to the methods provided by the meta-class):

del, del_option, del_question, del_section, name, new
Class Relations

superclass: ::xotcl::Object

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

Methods

proc del (public)

::xo::db::sql::quiz del [ -dbn dbn ] [ -quiz_id quiz_id ]

Automatically generated method

Switches:

-dbn (optional)
-quiz_id (optional)

::xo::db::sql::quiz proc del {{-dbn {}} -quiz_id} {
        #function_args: {QUIZ_ID NULL}
        set sql_args [list]
        foreach var [list QUIZ_ID]  {
          set varname [string tolower $var]
          if {[info exists $varname]} {
            lappend sql_args "$varname => :$varname"
          } 
        }
        set sql_args [join $sql_args ,]
        set sql "BEGIN :1 := quiz.del($sql_args); END;"
        db_with_handle -dbn $dbn db {
          #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
          return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
        }
      }

proc del_option (public)

::xo::db::sql::quiz del_option [ -dbn dbn ] [ -option_id option_id ] \
    [ -question_id question_id ]

Automatically generated method

Switches:

-dbn (optional)
-option_id (optional)
-question_id (optional)

::xo::db::sql::quiz proc del_option {{-dbn {}} -option_id -question_id} {
        #function_args: {OPTION_ID NULL} {QUESTION_ID NULL}
        set sql_args [list]
        foreach var [list OPTION_ID QUESTION_ID]  {
          set varname [string tolower $var]
          if {[info exists $varname]} {
            lappend sql_args "$varname => :$varname"
          } 
        }
        set sql_args [join $sql_args ,]
        set sql "BEGIN :1 := quiz.del_option($sql_args); END;"
        db_with_handle -dbn $dbn db {
          #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
          return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
        }
      }

proc del_question (public)

::xo::db::sql::quiz del_question [ -dbn dbn ] \
    [ -question_id question_id ]

Automatically generated method

Switches:

-dbn (optional)
-question_id (optional)

::xo::db::sql::quiz proc del_question {{-dbn {}} -question_id} {
        #function_args: {QUESTION_ID NULL}
        set sql_args [list]
        foreach var [list QUESTION_ID]  {
          set varname [string tolower $var]
          if {[info exists $varname]} {
            lappend sql_args "$varname => :$varname"
          } 
        }
        set sql_args [join $sql_args ,]
        set sql "BEGIN :1 := quiz.del_question($sql_args); END;"
        db_with_handle -dbn $dbn db {
          #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
          return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
        }
      }

proc del_section (public)

::xo::db::sql::quiz del_section [ -dbn dbn ] \
    [ -section_id section_id ]

Automatically generated method

Switches:

-dbn (optional)
-section_id (optional)

::xo::db::sql::quiz proc del_section {{-dbn {}} -section_id} {
        #function_args: {SECTION_ID NULL}
        set sql_args [list]
        foreach var [list SECTION_ID]  {
          set varname [string tolower $var]
          if {[info exists $varname]} {
            lappend sql_args "$varname => :$varname"
          } 
        }
        set sql_args [join $sql_args ,]
        set sql "BEGIN :1 := quiz.del_section($sql_args); END;"
        db_with_handle -dbn $dbn db {
          #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
          return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
        }
      }

proc name (public)

::xo::db::sql::quiz name [ -dbn dbn ] [ -quiz_id quiz_id ]

Automatically generated method

Switches:

-dbn (optional)
-quiz_id (optional)

::xo::db::sql::quiz proc name {{-dbn {}} -quiz_id} {
        #function_args: {QUIZ_ID NULL}
        set sql_args [list]
        foreach var [list QUIZ_ID]  {
          set varname [string tolower $var]
          if {[info exists $varname]} {
            lappend sql_args "$varname => :$varname"
          } 
        }
        set sql_args [join $sql_args ,]
        set sql "BEGIN :1 := quiz.name($sql_args); END;"
        db_with_handle -dbn $dbn db {
          #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
          return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
        }
      }

proc new (public)

::xo::db::sql::quiz new [ -dbn dbn ] [ -quiz_id quiz_id ] \
    [ -name name ] [ -type type ] [ -password password ] \
    [ -description description ] [ -consent_text consent_text ] \
    [ -instructions instructions ] [ -exit_text exit_text ] \
    [ -redirect_url redirect_url ] [ -attempt attempt ] \
    [ -enabled_p enabled_p ] [ -start_date start_date ] \
    [ -end_date end_date ] [ -show_results_date show_results_date ] \
    [ -start_evaluation_date start_evaluation_date ] \
    [ -duration duration ] [ -wait_for_retry wait_for_retry ] \
    [ -feedback_ok feedback_ok ] [ -feedback_error feedback_error ] \
    [ -points points ] [ -cut_off_points cut_off_points ] \
    [ -auto_eval_show_answers_p auto_eval_show_answers_p ] \
    [ -community_id community_id ] \
    [ -negative_result_p negative_result_p ] \
    [ -creation_date creation_date ] [ -creation_user creation_user ] \
    [ -creation_ip creation_ip ] [ -context_id context_id ]

Automatically generated method

Switches:

-dbn (optional)
-quiz_id (optional)
-name (optional)
-type (optional)
-password (optional)
-description (optional)
-consent_text (optional)
-instructions (optional)
-exit_text (optional)
-redirect_url (optional)
-attempt (optional)
-enabled_p (optional)
-start_date (optional)
-end_date (optional)
-show_results_date (optional)
-start_evaluation_date (optional)
-duration (optional)
-wait_for_retry (optional)
-feedback_ok (optional)
-feedback_error (optional)
-points (optional)
-cut_off_points (optional)
-auto_eval_show_answers_p (optional)
-community_id (optional)
-negative_result_p (optional)
-creation_date (optional)
-creation_user (optional)
-creation_ip (optional)
-context_id (optional)

::xo::db::sql::quiz proc new {{-dbn {}} -quiz_id -name -type -password -description -consent_text -instructions -exit_text -redirect_url -attempt -enabled_p -start_date -end_date -show_results_date -start_evaluation_date -duration -wait_for_retry -feedback_ok -feedback_error -points -cut_off_points -auto_eval_show_answers_p -community_id -negative_result_p -creation_date -creation_user -creation_ip -context_id} {
        #function_args: {QUIZ_ID NULL} {NAME NULL} {TYPE NULL} {PASSWORD NULL} {DESCRIPTION NULL} {CONSENT_TEXT NULL} {INSTRUCTIONS NULL} {EXIT_TEXT NULL} {REDIRECT_URL NULL} {ATTEMPT NULL} {ENABLED_P NULL} {START_DATE NULL} {END_DATE NULL} {SHOW_RESULTS_DATE NULL} {START_EVALUATION_DATE NULL} {DURATION NULL} {WAIT_FOR_RETRY NULL} {FEEDBACK_OK NULL} {FEEDBACK_ERROR NULL} {POINTS NULL} {CUT_OFF_POINTS NULL} {AUTO_EVAL_SHOW_ANSWERS_P NULL} {COMMUNITY_ID NULL} {NEGATIVE_RESULT_P NULL} {CREATION_DATE NULL} {CREATION_USER NULL} {CREATION_IP NULL} {CONTEXT_ID NULL}
        set sql_args [list]
        foreach var [list QUIZ_ID NAME TYPE PASSWORD DESCRIPTION CONSENT_TEXT INSTRUCTIONS EXIT_TEXT REDIRECT_URL ATTEMPT ENABLED_P START_DATE END_DATE SHOW_RESULTS_DATE START_EVALUATION_DATE DURATION WAIT_FOR_RETRY FEEDBACK_OK FEEDBACK_ERROR POINTS CUT_OFF_POINTS AUTO_EVAL_SHOW_ANSWERS_P COMMUNITY_ID NEGATIVE_RESULT_P CREATION_DATE CREATION_USER CREATION_IP CONTEXT_ID]  {
          set varname [string tolower $var]
          if {[info exists $varname]} {
            lappend sql_args "$varname => :$varname"
          } 
        }
        set sql_args [join $sql_args ,]
        set sql "BEGIN :1 := quiz.new($sql_args); END;"
        db_with_handle -dbn $dbn db {
          #my log "sql=$sql, sql_command=ns_ora exec_plsql_bind $db $sql 1 """
          return [ ns_ora exec_plsql_bind $db $sql 1 "" ]
        }
      }

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