interval-procs.tcl

Does not contain a contract.

Location:

/packages/notifications/tcl/interval-procs.tcl

Related Files

• packages/notifications/tcl/interval-procs.xql
• packages/notifications/tcl/interval-procs.tcl

[ hide source ] | [ make this the default ]

File Contents

ad_library {

    Notification Intervals Utilities.

    @creation-date 2002-05-24
    @author Ben Adida <ben@openforce.biz>
    @cvs-id $Id: interval-procs.tcl,v 1.5 2017/08/07 23:48:13 gustafn Exp $

}

namespace eval notification::interval {

    d_proc -public get_id_from_name {
        -name:required
    } {

        Returns the interval_id for a given interval_name

        @param name The name of interval (weekly, etc)
        @author Don Baccus (dhogaza@pacifier.com)

    } {

        return [db_string get_interval_id {}]

    }

}

# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: