pkg://neotcl7.6.tar.gz:5879738/
itcl2.2/
neo7.6.0/
doc/postgres95.html
downloads
<html><body bgcolor=#ffffff>
<h2><a name="TOC">Table of Contents</h2><p>
<a href="#clock_to_precise_sql_time">clock_to_precise_sql_time</a><br>
<a href="#clock_to_sql_time">clock_to_sql_time</a><br>
<a href="#gen_sql_insert_from_array">gen_sql_insert_from_array</a><br>
<a href="#perform_sql_insert_from_array">perform_sql_insert_from_array</a><br>
<a href="#quote_sql">quote_sql</a><br>
<a href="#sql_time_to_clock">sql_time_to_clock</a><br>
<p><hr><p>
<a name="clock_to_precise_sql_time">
<a href="#clock_to_sql_time">[next]</a>
<a href="#TOC">[TOC]</a>
<h2>Command</h2>
<p>clock_to_precise_sql_time<p>
<p><h3>Synopsis</h3><p>
<b>clock_to_precise_sql_time</b><i> clock</i><p>
<p><h3>Description</h3><p><pre>
return [fmtclock $clock "%b %d %H:%M:%S %Y GMT"]
</pre>
<hr>
<a name="clock_to_sql_time">
<a href="#gen_sql_insert_from_array">[next]</a>
<a href="#clock_to_precise_sql_time">[prev]</a>
<a href="#TOC">[TOC]</a>
<h2>Command</h2>
<p>clock_to_sql_time<p>
<p><h3>Synopsis</h3><p>
<b>clock_to_sql_time</b><i> clock</i><p>
<p><h3>Description</h3><p><pre>#
# convert a clock value (integer seconds since 1970) to a sql standard
# abstime value.
#
# Month Day [ Hour : Minute : Second ] Year [ Timezone ]
#
return [fmtclock $clock "%b %d %Y"]
</pre>
<hr>
<a name="gen_sql_insert_from_array">
<a href="#perform_sql_insert_from_array">[next]</a>
<a href="#clock_to_sql_time">[prev]</a>
<a href="#TOC">[TOC]</a>
<h2>Command</h2>
<p>gen_sql_insert_from_array<p>
<p><h3>Synopsis</h3><p>
<b>gen_sql_insert_from_array</b><i> tableName arrayName</i><p>
<p><h3>Description</h3><p><pre>#
# generate a sql insert command based on contents of an array
#
upvar $arrayName array
set nameList [array names array]
set result "insert into $tableName ([join $nameList ","]) values ("
foreach name $nameList {
append result "[quote_sql $array($name)],"
}
return "[crange $result 0 end-1]);"
</pre>
<hr>
<a name="perform_sql_insert_from_array">
<a href="#quote_sql">[next]</a>
<a href="#gen_sql_insert_from_array">[prev]</a>
<a href="#TOC">[TOC]</a>
<h2>Command</h2>
<p>perform_sql_insert_from_array<p>
<p><h3>Synopsis</h3><p>
<b>perform_sql_insert_from_array</b><i> session tableName arrayName</i><p>
<p><h3>Description</h3><p><pre>#
# generate a sql insert command based on contents of an array and
# send it to the database
#
upvar $arrayName array
set result [pg_exec $session [gen_sql_insert_from_array $tableName array]]
set status [pg_result $result -status]
pg_result $result -clear
return $status
</pre>
<hr>
<a name="quote_sql">
<a href="#sql_time_to_clock">[next]</a>
<a href="#perform_sql_insert_from_array">[prev]</a>
<a href="#TOC">[TOC]</a>
<h2>Command</h2>
<p>quote_sql<p>
<p><h3>Synopsis</h3><p>
<b>quote_sql</b><i> string</i><p>
<p><h3>Description</h3><p><pre>#@package: postgres-basic quote_sql gen_sql_insert_from_array perform_sql_insert_from_array clock_to_sql_time clock_to_precise_sql_time sql_time_to_clock
#
# Copyright (C) 1996 NeoSoft.
#
# Permission to use, copy, modify, and distribute this software and its
# documentation for any purpose and without fee is hereby granted, provided
# that the above copyright notice appear in all copies. NeoSoft makes no
# representations about the suitability of this software for any purpose.
# It is provided "as is" without express or implied warranty.
#
# postgres95 interface stuff
#
# $Id: postgres95.html,v 1.1.1.1 1997/01/15 23:54:55 kunkee Exp $
#
#
# make string mostly legally quoted for postgres95
#
set string [join [split $string "\n"] "\\n"]
regsub -all "(')" $string "\\'" string
regsub -all {(\\)} $string "\\\\" string
return '$string'
</pre>
<hr>
<a name="sql_time_to_clock">
<a href="#quote_sql">[prev]</a>
<a href="#TOC">[TOC]</a>
<h2>Command</h2>
<p>sql_time_to_clock<p>
<p><h3>Synopsis</h3><p>
<b>sql_time_to_clock</b><i> date</i><p>
<p><h3>Description</h3><p><pre>#
# convert a sql standard abstime value to a clock value (integer
# seconds since 1970)
#
if {$date == ""} {
return 0
}
return [convertclock $date]
</pre>
<hr>
</body></html>