Пример #1
0
 /** Overridden method from Request, just so we display the subset of
  * request data we are interested in for QAMS.
  */
 function RenderDetails($ef)
 {
     global $session, $bigboxcols, $bigboxrows;
     $html = "";
     $html .= $ef->BreakLine("Project Details");
     if (!$this->new_record) {
         $html .= $ef->DataEntryLine("W/R #", "{$this->request_id}" . " &nbsp; &nbsp; <b>Requested:</b> " . nice_date($this->request_on) . " &nbsp; &nbsp; <b>Status:</b> " . $this->status_desc);
         $html .= $ef->BreakLine("Quality Assurance Details");
     } else {
         // QA Model
         // This determines which default approvals are set up initially..
         $html .= $ef->DataEntryLine("QA Model", "", "lookup", "qa_model_id", array("_sql" => "SELECT * FROM qa_model", "_null" => "--- choose a model ---", "title" => "The QA model most appropriate to this project"));
         // PROJECT ROLES
         // These are specific important roles to be assigned to the project for QA
         // purposes. Note, we also consider that anyone who has been ALLOCATED to
         // this project is a valid QA Reviewer (client or internal).
         // Project Manager
         $html .= $ef->DataEntryLine("Project Mgr", "{$this->fullname}", "lookup", "project_manager", array("_sql" => SqlSelectRequesters($session->org_code), "_null" => "--- select a person ---", "title" => "The project manager in charge of this project."));
         // QA Mentor
         $html .= $ef->DataEntryLine("QA Mentor", "{$this->fullname}", "lookup", "qa_mentor", array("_sql" => SqlSelectRequesters($session->org_code), "_null" => "--- select a person ---", "title" => "The QA mentor helping with quality assurance on this project."));
     }
     $html .= $ef->DataEntryLine("Brief", "%s", "text", "brief", array("size" => 70, "title" => "A brief description of the project."));
     // Organisation drop-down
     if ($session->AllowedTo("Admin") || $session->AllowedTo("Support") || $session->AllowedTo("Contractor")) {
         $html .= $ef->DataEntryLine("Organisation", "{$this->org_name}", "lookup", "org_code", array("_sql" => SqlSelectOrganisations($this->org_code), "_null" => "--- select an organisation ---", "onchange" => "OrganisationChanged();", "title" => "The organisation that this work will be done for."));
     } else {
         if ($this->new_record) {
             $this->org_name = $session->org_name;
         }
         $html .= $ef->DataEntryLine("Organisation", "{$this->org_name}", "", "");
     }
     // Person within Organisation drop-down
     $html .= $ef->DataEntryLine("Person", "{$this->fullname}", "lookup", "requester_id", array("_sql" => SqlSelectRequesters($this->org_code), "_null" => "--- select a person ---", "onchange" => "PersonChanged();", "title" => "The client who is requesting this, or who is in charge of ensuring it happens."));
     // System (within Organisation) drop-down
     $html .= $ef->DataEntryLine("System", "{$this->system_desc}", "lookup", "system_id", array("_sql" => SqlSelectSystems($this->org_code), "_null" => "--- select a system ---", "onchange" => "SystemChanged();", "title" => "The business system that this project applies to."));
     // Urgency of Request
     $html .= $ef->DataEntryLine("Urgency", $this->urgency_desc, "lookup", "urgency", array("_type" => "request|urgency", "title" => "The urgency of the project, separate from the long-term importance"));
     // Importance of Request
     $html .= $ef->DataEntryLine("Importance", $this->importance_desc, "lookup", "importance", array("_type" => "request|importance", "title" => "The relative long-term importance of the project, separate from the urgency"));
     // Requested By Date
     $html .= $ef->DataEntryLine("Requested By", $this->requested_by_date, "date", "requested_by_date", array("title" => "The date that you would like this project completed by", "onblur" => "this.value=CheckDate(this)"));
     // Agreed Due Date
     $html .= $ef->DataEntryLine("Agreed Due", $this->agreed_due_date, "date", "agreed_due_date", array("title" => "The date that has been agreed that the project will be completed by / on", "onblur" => "this.value=CheckDate(this)"));
     // Detailed description
     $html .= $ef->DataEntryLine("Details", str_replace('%', '%%', html_format($this->detailed)), "textarea", "detailed", array("title" => "Full details of the project", "rows" => $bigboxrows, "cols" => $bigboxcols));
     return $html;
 }
Пример #2
0
    }
    if (isset($choose_columns) && $choose_columns) {
        array_push($form_url_parameters, "choose_columns=1");
    }
    $form_url = "{$PHP_SELF}";
    for ($i = 0; $i < count($form_url_parameters) && $i < 20; $i++) {
        $form_url .= ($i == 0 ? '?' : '&') . $form_url_parameters[$i];
    }
    echo "<form name=\"search\" action=\"{$form_url}\" Method=\"POST\">";
    $systems = new PgQuery(SqlSelectSystems($org_code));
    $system_list = $systems->BuildOptionList($system_id, "requestlist");
    echo "<table border=0 cellspacing=2 cellpadding=0 align=center class=row0 width=100% style=\"border: 1px dashed #aaaaaa;\">\n<tr>\n";
    echo "<td width=100%><table border=0 cellspacing=0 cellpadding=0 width=100%><tr valign=middle>\n";
    echo "<td class=smb>&nbsp;System:</td><td class=\"sml\"><select class=\"sml\" name=system_id><option value=\".\">--- All Systems ---</option>{$system_list}</select></td>\n";
    if (is_member_of('Admin', 'Support', 'Contractor')) {
        $organisations = new PgQuery(SqlSelectOrganisations($org_code));
        $orglist = "<option value=\"\">--- All Organisations ---</option>\n" . $organisations->BuildOptionList("{$org_code}", "requestlist");
        echo "<td class=\"smb\">&nbsp;Organisation:</td><td class=\"sml\"><select class=\"sml\" name=\"org_code\">\n{$orglist}</select></td>\n";
    }
    echo "<td valign=middle class=smb align=center><input type=submit value=\"RUN\" alt=\"Run\" title=\"Run a query with these settings\" name=submit class=\"submit\">";
    echo "</tr></table></td></tr>\n";
    echo "</table></form>\n";
}
// if  not plain  or stripped style
/**
 * Now we build the statement that will find those requests...
 */
$query = "";
$maxresults = isset($maxresults) && intval($maxresults) > 0 ? intval($maxresults) : 100;
$flipped_columns = array_flip($columns);
$query .= "SELECT request.request_id, brief, usr.fullname, usr.email, request_on, status.lookup_desc AS status_desc, last_activity, detailed ";
Пример #3
0
function RenderSearchForm($target_url)
{
    global $session, $theme, $search_record;
    $html = "";
    $search_record = (object) array();
    $org_code = intval($GLOBALS['org_code']);
    if ($org_code > 0) {
        $search_record->org_code = $org_code;
    }
    //  $session->Log( 'DBG: isset($_POST[submit])=%s isset($_GET[saved_query])=%s', isset($_POST[submit]), isset($_GET['saved_query'] ) );
    if (!isset($_POST['submit']) && isset($_GET['saved_query'])) {
        $qry = new PgQuery("SELECT query_params FROM saved_queries WHERE (user_no = ? OR public ) AND lower(query_name) = lower(?);", $session->user_no, $_GET['saved_query']);
        if ($qry->Exec('RenderSearchForm') && $qry->rows == 1 && ($row = $qry->Fetch())) {
            $_POST = unserialize($row->query_params);
        }
    }
    $ef = new EntryForm($REQUEST_URI, $search_record, true);
    // We do the formatting fairly carefully here...
    $ef->SimpleForm('<span style="white-space: nowrap"><span class="srchp">%s:</span><span class="srchf">%s</span></span> ');
    $html .= $ef->StartForm(array("autocomplete" => "off", "onsubmit" => "return CheckSearchForm();"));
    $html .= "<table border=0 cellspacing=2 cellpadding=0 align=center class=row0 width=100% style=\"border: 1px dashed #aaaaaa;\">\n";
    $html .= "<tr><td width=100%><table border=0 cellspacing=0 cellpadding=0 width=100%><tr valign=middle><td width=100%>\n";
    if (isset($_GET['search_for']) && !isset($_POST['search_for'])) {
        $_POST['search_for'] = $_GET['search_for'];
    }
    $html .= $ef->DataEntryLine("Find", "%s", "text", "search_for", array("size" => 10, "class" => "srchf", "title" => "Search for free text in the request or notes.  Regular expressions are OK too."));
    // Organisation drop-down
    if ($session->AllowedTo("Admin") || $session->AllowedTo("Support") || $session->AllowedTo("Contractor")) {
        $html .= $ef->DataEntryLine("Organisation", "", "lookup", "org_code", array("_sql" => SqlSelectOrganisations($org_code), "_null" => "-- All Organisations --", "onchange" => "OrganisationChanged();", "title" => "The organisation that this work will be done for.", "class" => "srchf", "style" => "width: 18em"));
    }
    // System (within Organisation) drop-down
    $html .= $ef->DataEntryLine("System", "", "lookup", "system_id", array("_sql" => SqlSelectSystems($org_code), "_null" => "-- All Systems --", "onchange" => "SystemChanged();", "title" => "The business system that this request applies to.", "class" => "srchf", "style" => "width: 18em"));
    $html .= $ef->DataEntryLine("Requester", "", "lookup", "requested_by", array("_sql" => SqlSelectRequesters($org_code), "_null" => "-- Any Requester --", "onchange" => "PersonChanged();", "title" => "The client who is requesting this, or who is in charge of ensuring it happens.", "class" => "srchf", "style" => "width: 12em"));
    $html .= $ef->DataEntryLine("Watching", "", "lookup", "interested_in", array("_sql" => SqlSelectSubscribers($org_code), "_null" => "-- Any Interested User --", "title" => "The client who is requesting this, or who is in charge of ensuring it happens.", "class" => "srchf", "style" => "width: 12em"));
    // Person Assigned to W/R
    $html .= $ef->DataEntryLine("ToDo", "", "lookup", "allocated_to", array("_sql" => SqlSelectSubscribers($org_code), "_null" => "-- Any Assigned User --", "_nobody" => "-- Not Yet Allocated --", "class" => "srchf", "title" => "A person who has been assigned to work on requests.", "style" => "width: 12em"));
    // Date range
    $html .= $ef->DataEntryLine("Last Action", "%s", "date", "from_date", array("size" => 10, "class" => "srchf", "title" => "Only show requests with action after this date."));
    $html .= "<a href=\"javascript:show_calendar('forms.form.from_date');\" onmouseover=\"window.status='Date Picker';return true;\" onmouseout=\"window.status='';return true;\">" . $theme->Image("date-picker.gif") . "</a> &nbsp; \n";
    $html .= $ef->DataEntryLine("To", "%s", "date", "to_date", array("size" => 10, "class" => "srchf", "title" => "Only show requests with action before this date."));
    $html .= "<a href=\"javascript:show_calendar('forms.form.to_date');\" onmouseover=\"window.status='Date Picker';return true;\" onmouseout=\"window.status='';return true;\">" . $theme->Image("date-picker.gif") . "</a> &nbsp; \n";
    // Type of Request
    $html .= $ef->DataEntryLine("Type", "%s", "lookup", "type_code", array("_type" => "request|request_type", "_null" => "-- All Types --", "class" => "srchf", "style" => "width: 8em", "title" => "Only show this type of request"));
    if ($session->AllowedTo("Admin")) {
        //    $html .= "<div id=\"whereclause\">";
        $html .= $ef->DataEntryLine("Where", "%s", "text", "where_clause", array("size" => 60, "class" => "srchf", "title" => "Add an SQL 'WHERE' clause to further refine the search - you will need to know what you are doing..."));
        //    $html .= "</div>";
    }
    $html .= "<table border='0' cellspacing='0' cellpadding='0' width='100%'><tr>";
    $html .= "<td style=\"vertical-align: top; padding-top: 0.3em; white-space:wrap;\"><span class=\"srchp\">Status:</span></td><td valign='top'>\n";
    $sql = "SELECT * FROM lookup_code WHERE source_table='request' ";
    $sql .= " AND source_field='status_code' ";
    $sql .= " ORDER BY source_table, source_field, lookup_seq, lookup_code ";
    $qry = new PgQuery($sql);
    if ($qry->Exec("RenderSearchForm") && $qry->rows > 0) {
        $i = 0;
        while ($status = $qry->Fetch()) {
            $ef->record->incstat[$status->lookup_code] = strpos($GLOBALS['default_search_statuses'], $status->lookup_code) != false ? 1 : '';
            if ($i++ > 0) {
                $html .= " ";
            }
            $html .= $ef->DataEntryField("%s", "checkbox", "incstat[{$status->lookup_code}]", array("_label" => $status->lookup_desc, "class" => "srchf", "value" => 1));
            // if ( $i++  == round($qry->rows / 2) ) $html .= "<br />";
        }
        $html .= $ef->DataEntryField("%s", "checkbox", "inactive", array("_label" => "inactive", "class" => "srchf", "value" => 1));
        $html .= "</td>\n";
    }
    $html .= "</tr></table>\n";
    $html .= RenderTagsPanel($ef);
    $html .= RenderColumnSelections($ef);
    // style="display: block; float:right; clear: left;"
    $html .= '<div id="savesearch">';
    $html .= $ef->DataEntryLine("Save as", "%s", "text", "savelist", array("size" => 20, "class" => "srchf", "title" => "A name to use to refer to this query in the future."));
    $html .= $ef->DataEntryField("%s", "checkbox", "save_query_order", array("_label" => "With Order?", "class" => "srchf", "value" => 1));
    $html .= $ef->DataEntryField("%s", "checkbox", "save_public", array("_label" => "Public?", "class" => "srchf", "value" => 1));
    $search_record->save_hotlist = 't';
    $html .= $ef->DataEntryField("%s", "checkbox", "save_hotlist", array("_label" => "In my menu?", "class" => "srchf", "value" => 1));
    $html .= $ef->SubmitButton("submit", "Save Query", array("title" => "Save this query so you can run it again."));
    $html .= "</div>";
    $html .= $ef->DataEntryLine("Max results", "%s", "text", "maxresults", array("size" => 6, "class" => "srchf", "title" => "The maximum number of rows to show in the listing"));
    $html .= $ef->SubmitButton("submit", "Run Query", array("title" => "Run a query with these settings"));
    $html .= "</td></tr></table>\n";
    $html .= "</td></tr></table>\n";
    $html .= $ef->EndForm();
    return $html;
}