File: nntpf_subs_edit.vspx

package info (click to toggle)
virtuoso-opensource 7.2.5.1%2Bdfsg1-0.3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 285,240 kB
  • sloc: ansic: 641,220; sql: 490,413; xml: 269,570; java: 83,893; javascript: 79,900; cpp: 36,927; sh: 31,653; cs: 25,702; php: 12,690; yacc: 10,227; lex: 7,601; makefile: 7,129; jsp: 4,523; awk: 1,697; perl: 1,013; ruby: 1,003; python: 326
file content (129 lines) | stat: -rw-r--r-- 4,559 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
<?xml version="1.0"?>
<!--
 -
 -  $Id$
 -
 -  This file is part of the OpenLink Software Virtuoso Open-Source (VOS)
 -  project.
 -
 -  Copyright (C) 1998-2018 OpenLink Software
 -
 -  This project is free software; you can redistribute it and/or modify it
 -  under the terms of the GNU General Public License as published by the
 -  Free Software Foundation; only version 2 of the License, dated June 1991.
 -
 -  This program is distributed in the hope that it will be useful, but
 -  WITHOUT ANY WARRANTY; without even the implied warranty of
 -  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 -  General Public License for more details.
 -
 -  You should have received a copy of the GNU General Public License along
 -  with this program; if not, write to the Free Software Foundation, Inc.,
 -  51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
 -
-->
<v:page xmlns:vm="http://www.openlinksw.com/vspx/weblog/"
  	xmlns:v="http://www.openlinksw.com/vspx/"
	name="nntpf_thread_view"
	style="main.xsl"
	on-error-redirect="nntpf_error.vspx"
	on-deadlock-retry="3"
	doctype="-//W3C//DTD XHTML 1.0 Transitional//EN"
	doctype-system="http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
	<v:variable name="grp" type="int" default="null" param-name="grp" />
	<v:variable name="thr" type="varchar" default="''" param-name="thr" />

	<v:variable name="grp_name" type="varchar" default="null" persist="temp" />
	<v:variable name="thr_subj" type="varchar" default="null" persist="temp" />
	<v:variable name="subs_type" type="varchar" default="null" persist="temp" />
	<v:variable name="sub_e_mail" type="varchar" default="null" persist="temp" />
  <html>
    <head>
      <base href="<?V WA_GET_PROTOCOL() || WA_GET_HOST () || http_path () ?>" />
      <v:include url="virtuoso_app_links.xhtml"/>
      <link rel="stylesheet" type="text/css" href="nntpf.css"/>
      <title>ODS Discussion</title>
    </head>
    <body>
      <vm:js/>
      <vm:page>
	<v:form name="nnv" method="POST" type="simple">
	  <v:before-data-bind><![CDATA[
		  declare continue handler for not found;
		  select NG_NAME, NS_TYPE, NS_MAIL into
		  self.grp_name, self.subs_type, self.sub_e_mail
		  from NNTPF_SUBS, NEWS_GROUPS where
		   NG_GROUP = NS_GROUP and NS_USER = self.u_id and NS_GROUP = self.grp and NS_THREAD_ID = self.thr;
		  if (self.thr <> '')
		    {
		      select FTHR_SUBJ into self.thr_subj from NNFE_THR where FTHR_GROUP = self.grp and FTHR_MESS_ID = self.thr;
		      self.thr_subj := '"' || self.thr_subj || '"' ;
		    }
		  else
		    {
		      self.thr_subj := 'all threads';
		    }
	    ]]></v:before-data-bind>
          <vm:nntpf-title/>
          <div class="menu">
            <vm:menu-bar/>
          </div>
          <div id="PC">
            <div id="LT">
              <div class="login">
                <vm:login/>
	      </div>
	      <div>
	      <div class="error"><v:error-summary /></div>
	      <br/>
	      <table width="100%"
		  class="news_summary_encapsul"
		  cellspacing="0"
		  border="0"
		  cellpadding="0">
		  <tr>
		      <td>
			  <h2>Subscription settings for: group <b><?V self.grp_name ?></b> about <b><?V self.thr_subj ?></b>
			  </h2>
			  <label>E-mail: </label><v:text value="--self.sub_e_mail" name="sub_email" xhtml_size="70" error-glyph="*">
			      <v:validator name="vv_e_mail"
				  test="regexp" regexp="[^@]+@([^\.]+.)*[^\.]+" message="Invalid e-mail address" />
			  </v:text>
			  <br />
			  <v:check-box name="sub_cb" value="1" xhtml_id="sub_cb" initial-checked="--self.subs_type" />
			  <label for="sub_cb">Send digests</label>
			  <br />
			  <br />
			  <v:button name="cancel_bt" value="Cancel" action="simple">
			      <v:on-post><![CDATA[
				  self.vc_redirect ('nntpf_subs.vspx');
			        ]]></v:on-post>
			  </v:button>
			  <v:button name="ok_bt" value="Save" action="simple">
			      <v:on-post><![CDATA[
				  if (not self.vc_is_valid)
				    return;

				  update NNTPF_SUBS set NS_MAIL = self.sub_email.ufl_value,
				    NS_TYPE = self.sub_cb.ufl_selected
				    where NS_USER = self.u_id and NS_GROUP = self.grp and NS_THREAD_ID = self.thr;

				  self.vc_redirect ('nntpf_subs.vspx');
				  ]]></v:on-post>
			  </v:button>
		      </td>
		  </tr>
	      </table>
	      </div>
            </div> <!-- LT -->
            <div id="RT">
              <div class="calctr">
                  <vm:nntp-cal />
                </div>
            </div> <!-- RT -->
          </div> <!-- PC -->
        </v:form>
      </vm:page>
    </body>
  </html>
</v:page>