::xo::db::Class ::xo::db::sql::alf_study

Class Hierarchy of ::xo::db::sql::alf_study

• ::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::alf_study

  Meta-class:

  ::xo::db::Class

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

  borrar_estado, borrar_estudio, borrar_funcion, borrar_lnegra, borrar_rol, recuperar_estado, recuperar_estudio, recuperar_funcion, recuperar_lnegra, recuperar_rol

Class Relations

• superclass: ::xotcl::Object

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

Methods

• proc borrar_estado (public)

  ::xo::db::sql::alf_study borrar_estado [ -dbn dbn ] \
      [ -p_cod_estado p_cod_estado ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_estado (optional)

  ::xo::db::sql::alf_study proc borrar_estado {{-dbn {}} -p_cod_estado} {
          #function_args: {P_COD_ESTADO NULL}
          set sql_args [list]
          foreach var [list P_COD_ESTADO]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.borrar_estado($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 borrar_estudio (public)

  ::xo::db::sql::alf_study borrar_estudio [ -dbn dbn ] \
      [ -p_cod_estudio p_cod_estudio ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_estudio (optional)

  ::xo::db::sql::alf_study proc borrar_estudio {{-dbn {}} -p_cod_estudio} {
          #function_args: {P_COD_ESTUDIO NULL}
          set sql_args [list]
          foreach var [list P_COD_ESTUDIO]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.borrar_estudio($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 borrar_funcion (public)

  ::xo::db::sql::alf_study borrar_funcion [ -dbn dbn ] \
      [ -p_cod_funcion p_cod_funcion ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_funcion (optional)

  ::xo::db::sql::alf_study proc borrar_funcion {{-dbn {}} -p_cod_funcion} {
          #function_args: {P_COD_FUNCION NULL}
          set sql_args [list]
          foreach var [list P_COD_FUNCION]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.borrar_funcion($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 borrar_lnegra (public)

  ::xo::db::sql::alf_study borrar_lnegra [ -dbn dbn ] \
      [ -p_cod_estudio p_cod_estudio ] \
      [ -p_cod_estudios_asignatura p_cod_estudios_asignatura ] \
      [ -p_curaca p_curaca ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_estudio (optional)

  -p_cod_estudios_asignatura (optional)

  -p_curaca (optional)

  ::xo::db::sql::alf_study proc borrar_lnegra {{-dbn {}} -p_cod_estudio -p_cod_estudios_asignatura -p_curaca} {
          #function_args: {P_COD_ESTUDIO NULL} {P_COD_ESTUDIOS_ASIGNATURA NULL} {P_CURACA NULL}
          set sql_args [list]
          foreach var [list P_COD_ESTUDIO P_COD_ESTUDIOS_ASIGNATURA P_CURACA]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.borrar_lnegra($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 borrar_rol (public)

  ::xo::db::sql::alf_study borrar_rol [ -dbn dbn ] \
      [ -p_cod_rol p_cod_rol ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_rol (optional)

  ::xo::db::sql::alf_study proc borrar_rol {{-dbn {}} -p_cod_rol} {
          #function_args: {P_COD_ROL NULL}
          set sql_args [list]
          foreach var [list P_COD_ROL]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.borrar_rol($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 recuperar_estado (public)

  ::xo::db::sql::alf_study recuperar_estado [ -dbn dbn ] \
      [ -p_cod_estado p_cod_estado ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_estado (optional)

  ::xo::db::sql::alf_study proc recuperar_estado {{-dbn {}} -p_cod_estado} {
          #function_args: {P_COD_ESTADO NULL}
          set sql_args [list]
          foreach var [list P_COD_ESTADO]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.recuperar_estado($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 recuperar_estudio (public)

  ::xo::db::sql::alf_study recuperar_estudio [ -dbn dbn ] \
      [ -p_cod_estudio p_cod_estudio ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_estudio (optional)

  ::xo::db::sql::alf_study proc recuperar_estudio {{-dbn {}} -p_cod_estudio} {
          #function_args: {P_COD_ESTUDIO NULL}
          set sql_args [list]
          foreach var [list P_COD_ESTUDIO]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.recuperar_estudio($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 recuperar_funcion (public)

  ::xo::db::sql::alf_study recuperar_funcion [ -dbn dbn ] \
      [ -p_cod_funcion p_cod_funcion ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_funcion (optional)

  ::xo::db::sql::alf_study proc recuperar_funcion {{-dbn {}} -p_cod_funcion} {
          #function_args: {P_COD_FUNCION NULL}
          set sql_args [list]
          foreach var [list P_COD_FUNCION]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.recuperar_funcion($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 recuperar_lnegra (public)

  ::xo::db::sql::alf_study recuperar_lnegra [ -dbn dbn ] \
      [ -p_cod_estudio p_cod_estudio ] \
      [ -p_cod_estudios_asignatura p_cod_estudios_asignatura ] \
      [ -p_curaca p_curaca ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_estudio (optional)

  -p_cod_estudios_asignatura (optional)

  -p_curaca (optional)

  ::xo::db::sql::alf_study proc recuperar_lnegra {{-dbn {}} -p_cod_estudio -p_cod_estudios_asignatura -p_curaca} {
          #function_args: {P_COD_ESTUDIO NULL} {P_COD_ESTUDIOS_ASIGNATURA NULL} {P_CURACA NULL}
          set sql_args [list]
          foreach var [list P_COD_ESTUDIO P_COD_ESTUDIOS_ASIGNATURA P_CURACA]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.recuperar_lnegra($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 recuperar_rol (public)

  ::xo::db::sql::alf_study recuperar_rol [ -dbn dbn ] \
      [ -p_cod_rol p_cod_rol ]

  Automatically generated method

  Switches:

  -dbn (optional)

  -p_cod_rol (optional)

  ::xo::db::sql::alf_study proc recuperar_rol {{-dbn {}} -p_cod_rol} {
          #function_args: {P_COD_ROL NULL}
          set sql_args [list]
          foreach var [list P_COD_ROL]  {
            set varname [string tolower $var]
            if {[info exists $varname]} {
              lappend sql_args "$varname => :$varname"
            } 
          }
          set sql_args [join $sql_args ,]
          set sql "BEGIN :1 := alf_study.recuperar_rol($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 "" ]
          }
        }