home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / ib / setups / intrabld / data.z / KBDOC.JFM < prev    next >
Text File  |  1996-12-11  |  9KB  |  308 lines

  1. /****************************************************************************\
  2. *                                                                            *
  3. * KBDoc.jfm  --  Knowledge Base Document Form                                *
  4. *                                                                            *
  5. * KBDoc.jfm is part of the Knowledge Base solution application. It is used   *
  6. * to display a single Knowledge Base document. The documentID number can     *
  7. * be passed to this script. If no number is passed, the first document is    *
  8. * displayed.                                                                 *
  9. *                                                                            *
  10. * Dependencies:  knowbs31.gif                                                *
  11. *                homepg31.gif                                                *
  12. *                paper_22.gif                                                *
  13. *                database.cc                                                 *
  14. *                apps\shared\controls.cc                                     *
  15. *                                                                            *
  16. * Links to:      ibapps/index.htm                                            *
  17. *                svr/intrasrv.isv?apps/kbase_ib/kbsearch.jfm                 *
  18. *                                                                            *
  19. * Updated 11/13/96 by IntraBuilder Samples Group                             *
  20. * $Revision:   1.22  $                                                       *
  21. *                                                                            *
  22. * Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
  23. *                                                                            *
  24. \****************************************************************************/
  25. /* 
  26.    This header section is used to duplicate the normal
  27.    process of opening the form. One additional line is 
  28.    added to store the arguments passed to the form.
  29.    The code between the return and the class is never 
  30.    executed.
  31. */
  32. var f = new kbdocForm();
  33. f.argv = KBDOC.arguments;
  34. f.open();
  35. return;
  36. // {End Header} Do not remove this comment//
  37. // Generated on 11/13/96
  38. //
  39. var f = new kbdocForm();
  40. f.open();
  41. class kbdocForm extends Form {
  42.    _sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC")
  43.    _sys.scripts.load("DATABASE.CC")
  44.    with (this) {
  45.       onServerLoad = class::Form_onServerLoad;
  46.       color = "ffffdb";
  47.       height = 12.625;
  48.       left = 0;
  49.       top = 0;
  50.       width = 73.25;
  51.       title = "Knowledge Base Document";
  52.    }
  53.  
  54.  
  55.    with (this.ibapps1 = new KbaseDatabase()){
  56.       left = 18;
  57.       top = 2;
  58.       active = true;
  59.    }
  60.  
  61.  
  62.    with (this.query1 = new Query()){
  63.       left = 26;
  64.       top = 2;
  65.       database = parent.ibapps1;
  66.       sql = "@kbase.sql";
  67.       requestLive = false;
  68.       active = true;
  69.    }
  70.  
  71.  
  72.    with (this.query1.rowset) {
  73.  
  74.    }
  75.  
  76.  
  77.    with (this.rule1 = new Rule(this)){
  78.       top = 4;
  79.       size = 2;
  80.       right = 76;
  81.       pageno = 0;
  82.    }
  83.  
  84.  
  85.    with (this.rule2 = new Rule(this)){
  86.       top = 8;
  87.       size = 2;
  88.       right = 76;
  89.    }
  90.  
  91.  
  92.    with (this.rule4 = new Rule(this)){
  93.       top = 15.5;
  94.       size = 2;
  95.       right = 76;
  96.       pageno = 0;
  97.    }
  98.  
  99.  
  100.    with (this.rule5 = new Rule(this)){
  101.       top = 24;
  102.       size = 2;
  103.       right = 76;
  104.       pageno = 0;
  105.    }
  106.  
  107.  
  108.    with (this.KnowledgeBaseLogo = new Image(this)){
  109.       height = 3.4167;
  110.       width = 10.25;
  111.       dataSource = "filename KNOWBS31.GIF";
  112.       alignment = 4;
  113.       pageno = 0;
  114.    }
  115.  
  116.  
  117.    with (this.HeadingHTML = new HTML(this)){
  118.       height = 2;
  119.       left = 12;
  120.       width = 64;
  121.       color = "navy";
  122.       text = {||'<H1><FONT SIZE="+4"><FONT COLOR="maroon">K</FONT></FONT>nowledge <FONT SIZE="+4"><FONT COLOR="maroon">B</FONT></FONT>ase <FONT SIZE="+4"><FONT COLOR="maroon">D</FONT></FONT>ocument <FONT SIZE="+2"><FONT COLOR="maroon">' + parseInt(this.parent.query1.rowset.fields["DocumentID"].value) + '</FONT></FONT></H1>'};
  123.       pageno = 0;
  124.    }
  125.  
  126.  
  127.    with (this.TitleHTML = new HTML(this)){
  128.       height = 0.75;
  129.       top = 4.5;
  130.       width = 14;
  131.       color = "black";
  132.       text = "Title";
  133.    }
  134.  
  135.  
  136.    with (this.TitleFieldHTML = new HTML(this)){
  137.       height = 0.75;
  138.       left = 14;
  139.       top = 4.5;
  140.       width = 62;
  141.       color = "black";
  142.       text = {||this.parent.query1.rowset.fields["Title"].value};
  143.    }
  144.  
  145.  
  146.    with (this.ProductHTML = new HTML(this)){
  147.       height = 0.75;
  148.       top = 5.25;
  149.       width = 14;
  150.       color = "black";
  151.       text = "Product";
  152.    }
  153.  
  154.  
  155.    with (this.ProdDescriptFieldHTML = new HTML(this)){
  156.       height = 0.75;
  157.       left = 14;
  158.       top = 5.25;
  159.       width = 62;
  160.       color = "black";
  161.       text = {||this.parent.query1.rowset.fields["ProdDescript"].value};
  162.    }
  163.  
  164.  
  165.    with (this.CategoryHTML = new HTML(this)){
  166.       height = 0.75;
  167.       top = 6;
  168.       width = 14;
  169.       color = "black";
  170.       text = "Category";
  171.    }
  172.  
  173.  
  174.    with (this.CatDescriptFieldHTML = new HTML(this)){
  175.       height = 0.75;
  176.       left = 14;
  177.       top = 6;
  178.       width = 62;
  179.       color = "black";
  180.       text = {||this.parent.query1.rowset.fields["CatDescript"].value};
  181.    }
  182.  
  183.  
  184.    with (this.DocumentFieldHTML = new HTML(this)){
  185.       height = 6.5;
  186.       top = 8.5;
  187.       width = 76;
  188.       fixed = true;
  189.       color = "black";
  190.       fontBold = false;
  191.       text = {||((this.parent.query1.rowset.fields['reformat'].value == 1) ? "" : "<PRE>") + this.parent.query1.rowset.fields["Document"].value + ((this.parent.query1.rowset.fields['reformat'].value == 1) ? "" : "</PRE>")};
  192.    }
  193.  
  194.  
  195.    with (this.KeyWordsHTML = new HTML(this)){
  196.       height = 0.75;
  197.       top = 6.75;
  198.       width = 14;
  199.       color = "black";
  200.       text = "Key Words: ";
  201.    }
  202.  
  203.  
  204.    with (this.KeyWordFieldHTML = new HTML(this)){
  205.       height = 0.75;
  206.       left = 14;
  207.       top = 6.75;
  208.       width = 62;
  209.       color = "black";
  210.       text = {||this.parent.query1.rowset.fields["Keyword"].value};
  211.    }
  212.  
  213.  
  214.    with (this.SearchLinkImage = new Image(this)){
  215.       onImageClick = class::link_to_search_page;
  216.       height = 3.4167;
  217.       top = 16;
  218.       width = 10.25;
  219.       dataSource = "filename KNOWBS31.GIF";
  220.       alignment = 4;
  221.       pageno = 0;
  222.    }
  223.  
  224.  
  225.    with (this.SearchLinkHTML = new HTML(this)){
  226.       height = 1;
  227.       left = 12;
  228.       top = 16;
  229.       width = 64;
  230.       color = "black";
  231.       text = "<A HREF='/svr/intrasrv.isv?apps/kbase_ib/kbsearch.jfm'>Start a new search</A>";
  232.       pageno = 0;
  233.    }
  234.  
  235.  
  236.    with (this.HomePageLinkImage = new Image(this)){
  237.       onImageClick = class::link_to_home_page;
  238.       height = 3.4167;
  239.       top = 20;
  240.       width = 10.25;
  241.       dataSource = "filename HOMEPG31.GIF";
  242.       alignment = 4;
  243.       pageno = 0;
  244.    }
  245.  
  246.  
  247.    with (this.HomePageLinkHTML = new HTML(this)){
  248.       height = 1;
  249.       left = 12;
  250.       top = 20;
  251.       width = 64;
  252.       color = "black";
  253.       text = "<A HREF='/ibapps/index.htm'>Return to Home Page</A>";
  254.       pageno = 0;
  255.    }
  256.  
  257.  
  258.    with (this.GeneratedHTML = new GeneratedHTML(this)){
  259.       height = 1;
  260.       top = 24.5;
  261.       width = 76;
  262.       pageno = 0;
  263.    }
  264.  
  265.  
  266.    with (this.NotFoundHTML = new HTML(this)){
  267.       height = 3;
  268.       top = 5;
  269.       width = 76;
  270.       color = "navy";
  271.       text = "<H2>The requested document was not found. Please try again.</H2>";
  272.       pageno = 2;
  273.    }
  274.  
  275.    this.rowset = this.query1.rowset;
  276.  
  277.    function Form_onServerLoad()
  278.    {
  279.       // look for specific document
  280.       if (form.argv.length == 1) {
  281.          if (form.rowset.applyLocate("documentid=" + form.argv[0])) {
  282.             // redisplay each of the HTML fields
  283.             form.HeadingHTML.text = form.HeadingHTML.text;
  284.             form.TitleFieldHTML.text = form.TitleFieldHTML.text;
  285.             form.ProdDescriptFieldHTML.text = form.ProdDescriptFieldHTML.text;
  286.             form.CatDescriptFieldHTML.text = form.CatDescriptFieldHTML.text;
  287.             form.DocumentFieldHTML.text = form.DocumentFieldHTML.text;
  288.             form.KeyWordFieldHTML.text = form.KeyWordFieldHTML.text;
  289.          }
  290.          else {
  291.             form.HeadingHTML.text = '<H1><FONT SIZE="+4"><FONT COLOR="maroon">K</FONT></FONT>nowledge <FONT SIZE="+4"><FONT COLOR="maroon">B</FONT></FONT>ase <FONT SIZE="+4"><FONT COLOR="maroon">D</FONT></FONT>ocument</H1>';
  292.             form.pageno = 2; // this has the document not found text
  293.          }
  294.       }
  295.    }
  296.  
  297.    function link_to_home_page()
  298.    {
  299.       location.href="/ibapps/index.htm";
  300.    }
  301.  
  302.    function link_to_search_page()
  303.    {
  304.       location.href="/svr/intrasrv.isv?apps/kbase_ib/kbsearch.jfm";
  305.    }
  306.  
  307. }
  308.