Artifact Content
Not logged in

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&nbsp;Found&nbsp;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&nbsp;Found&nbsp;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