Artifact 54c5c82c83223fc598c0b129e9ce1735030ec4b9
File
src/sample-config1.txt
part of check-in
[929d28e358]
- Added the "e" capability for viewing ticket submitter email addresses.
Additional tinkering toward the design of tickets. This check-in is only
thinly tested.
by
drh on
2007-11-05 02:42:58.
{Default Ticket Configuration} /config_title set
{type status subsystem priority severity contact title comment} setfields
{Code Build_Problem Documentation Feature_Request Incident} /type_choices set
{High Medium Low} /priority_choices set
{Critical Severe Important Minor Cosmetic} /severity_choices set
{
Open
Fixed
Rejected
Unable_To_Reproduce
Works_As_Designed
External_Bug
Not_A_Bug
Duplicate
Overcome_By_Events
Drive_By_Patch
} /resolution_choices set
{
Open
Verified
In_Process
Deferred
Fixed
Tested
Closed
} /status_choices set
######################################################################
{
<table cellpadding="5">
<tr>
<td cellpadding="2">
Enter a one-line summary of the problem:<br>
[/title 60 textedit]
</td>
</tr>
<tr>
<td align="right">Type:
[/type typechoices 20 combobox]
</td>
<td>What type of ticket is this?</td>
</tr>
<tr>
<td align="right">Version:
[/foundin 20 textedit]
</td>
<td>In what version or build number do you observer the problem?</td>
</tr>
<tr>
<td align="right">Severity:
[/severity {High Medium Low} 8 combobox]
</td>
<td>How debilitating is the problem? How badly does the problem
effect the operation of the product?</td>
</tr>
<tr>
<td colspan="2">
Enter a detailed description of the problem.
For code defects, be sure to provide details on exactly how
the problem can be reproduced. Provide as much detail as
possible.
<br>
[/cmpv 0 cgi_parameter enable_output]
[/comment wikiview]
<hr>
[1 enable_output]
[/comment 70 /comment linecount 15 max multilineedit]
<br>
[/cmpv {Preview} auxbutton]
</tr>
<tr>
<td align="right">
[submitbutton]
</td>
<td>After filling in the information above, press this button to create
the new ticket</td>
</tr>
</table>
[/status /Open default_value]
} /new setpage
######################################################################
{
[
# Extract the current information from the ticket table
{SELECT type, status, subsystem, priority,
severity, contact, title, comment
FROM ticket
WHERE tktid=:name} db_prepare
/name {} cgi_parameter {:name} db_bind
db_exec
if /title exists not {
{<i>No such ticket: } puts
/name {} cgi_parameter htmlize puts
{</i>} puts
return
} endif
/title title cgiparam /vtitle store
/status status cgiparam /vstatus store
/type type cgiparam /vtype store
if /submit cgiexists {
/name {} cgi_parameter login ticketchng_begin
if /apndcom cgiexists {
{+comment}
{<hr><i>Added by }
login htmlize concat
{ on } concat
datetime concat
{:</i><br} concat
/apndcom {} cgi_parameter htmlize concat
ticketchng_field
} else {
if vcomment comment eq not {/comment vcomment ticketchng_field} endif
} endif
if vtitle title eq not {/title vtitle ticketchng_field} endif
ticketchng_submit
baseurl /tktview?name= concat /name {} cgi_parameter concat redirect
} endif
]
<form method="POST" action="[baseurl]/tktedit">
<table cellpadding="5">
<tr><td align="right">Title:</td><td>
<input type="text" name="title" value="[vtitle htmlize puts] size=60">
</td></tr>
<tr><td align="right">Status:</td><td>
[vstatus /status status_choices 20 combobox]
</td></tr>
<tr><td align="right">Type:</td><td>
[vtype /type type_choices 20 combobox]
</td></tr>
<tr><td align="right">Severity:</td><td>
[vseverity /severity {High Medium Low} 10 combobox]
</td></tr>
<tr><td align="right">Priority:</td><td>
[vpriority /priority {High Medium Low} 10 combobox]
</td></tr>
<tr><td align="right">Resolution:</td><td>
[vresolution /resolution resolution_choices 20 combobox]
</td></tr>
<tr><td align="right">Subsystem:</td><td>
[vsubsystem /subsystem subsystem_choices 30 combobox]
</td></tr>
[{e} hascap enable_output]
<tr><td align="right">Contact:</td><td>
<input type="text" name="contact" size="40" value="[vcontact htmlize puts]">
</td></tr>
[1 enable_output]
<tr><td align="right">Version Found In:</td><td>
<input type="text" name="foundin" size="50" value="[foundin htmlize puts]">
</td></tr>
<tr><td colspan="2">
[w hascap /eall 0 paramget and /eall store]
[eall enable_output]
Description And Comments:<br>
<textarea name="comment" cols="80" rows="[comment linecount 15 max 10 min]"
wrap="virtual" class="wikiedit">[comment htmlize puts]</textarea><br>
<input type="submit" name="aonly" value="Append Remark">
[eall not enable_output]
Append Remark:<br>
[/comment /cmappnd 70 /cmappnd linecount 10 max multilineappend]<br>
[ok_wrtkt enable_output /eall {Edit All} auxbutton]
[1 enable_output]
</td></tr>
<tr><td align="right"></td><td>
[{Submit Changes} submitbutton]
</td></tr>
</table>
} /edit setpage
######################################################################
{
<table cellpadding="5">
<tr><td align="right">Title:</td><td>
[/title htmlize]
</td></tr>
<tr><td align="right">Status:</td><td>
[/status textview]
</td></tr>
<tr><td align="right">Type:</td><td>
[/type textview]
</td></tr>
<tr><td align="right">Severity:</td><td>
[/severity textview]
</td></tr>
<tr><td align="right">Priority:</td><td>
[/priority textview]
</td></tr>
<tr><td align="right">Resolution:</td><td>
[/priority textview]
</td></tr>
<tr><td align="right">Subsystem:</td><td>
[/subsystem textview]
</td></tr>
[{e} hascap enable_output]
<tr><td align="right">Contact:</td><td>
[/contact textview]
</td></tr>
[1 enable_output]
<tr><td align="right">Version Found In:</td><td>
[/foundin textview]
</td></tr>
<tr><td colspan="2">
Description And Comments:<br>
[/comment wikiview]
</td></tr>
</table>
} /view setpage
##############
# Verb list:
#
# CNEV
# **** VALUE NAME set
# *--- LIST setfields
#
# -*-- FIELD STRING default_value
# -**- FIELD WIDTH textedit
# -**- FIELD CHOICELIST WIDTH combobox
# -**- FIELD WIDTH HEIGHT multilineedit
# --*- FIELD CGIFIELD WIDTH HEIGHT multilineappend
# -**- CGIFIELD LABEL auxbutton
# -**- LABEL submitbutton
#
# -*** FIELD wikiview
# -*** FIELD textview
# -*** FIELD linecount INT
# -**- CGIFIELD DEFAULT paramget VALUE
# -*** BOOLEAN enable_output
# -*** ok_wrtkt BOOLEAN
# -*** is_anon BOOLEAN
#
# -*** INT INT max INT
# -*** BOOLEAN not BOOLEAN
# -*** BOOLEAN BOOLEAN and BOOLEAN