PC World Komputer 1997 May/Pcwk0597.iso/borland/ib/setups/intrabld/data.z/PHONEEMP.JRP

Text File | 1996-12-11 | 7.6 KB | 259 lines

/****************************************************************************\
*                                                                            *
* PhoneEmp.jrp  --  Employee Phone List                                      *
*                                                                            *
* PhoneEmp.jrp is part of the Phone Book solution application. It is used    *
* to view the employee phone book alphabetically by employee. The sorting of *
* the table is done in the employee.rowset.sql property. Each employee's     *
* name becomes a link to the employee.jfm file. This link includes a         *
* parameter containing the employeeID of the employee.                       *
*                                                                            *
* Dependencies:  phonbk31.gif                                                *
*                apps\shared\controls.cc                                     *
*                                                                            *
* Links to:      ibapps/index.htm                                            *
*                svr/intrasrv.isv?apps/phone/phonedep.jrp                    *
*                svr/intrasrv.isv?apps/phone/phoneemp.jrp                    *
*                svr/intrasrv.isv?apps/phone/update.jfm                      *
*                                                                            *
* Updated 11/06/96 by IntraBuilder Samples Group                             *
* $Revision:   1.20  $                                                       *
*                                                                            *
* Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
*                                                                            *
\****************************************************************************/
// {End Header} Do not remove this comment//
// Generated on 11/06/96
//
var r = new PHONEEMPReport();
if (PHONEEMP.arguments.length == 2) {
   r.startPage = PHONEEMP.arguments[0];
   r.endPage = PHONEEMP.arguments[1];
}
r.render();
class PHONEEMPReport extends Report {
   _sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC")
   with (this) {
      title = "Employee Phone List";
      linkText = "Next Page";
   }


   with (this.ibapps1 = new Database()){
      left = 47;
      top = 0;
      databaseName = "IBAPPS";
      active = true;
   }


   with (this.employee1 = new Query()){
      left = 53;
      top = 0;
      database = parent.ibapps1;
      sql = 'SELECT * FROM employee e ORDER by e."Full Name"';
      active = true;
   }


   with (this.employee1.rowset) {

   }


   with (this.department1 = new Query()){
      left = 59;
      top = 0;
      database = parent.ibapps1;
      sql = "select * from departmt";
      active = true;
   }


   with (this.department1.rowset) {
      masterRowset = parent.parent.employee1.rowset;
      masterFields = "Department";
   }


   with (this.pageTemplate1 = new PageTemplate(this)){
      height = 13000;
      width = 9000;
      marginTop = 0;
      marginLeft = 0;
      marginBottom = 0;
      marginRight = 0;
      gridLineWidth = 5;
      color = "cae4ff";
   }


   with (this.pageTemplate1.streamFrame1 = new StreamFrame(this.pageTemplate1)){
      height = 10000;
      top = 1700;
      width = 9000;
   }


   with (this.pageTemplate1.PhoneHeadingHTML = new HTML(this.pageTemplate1)){
      height = 280;
      top = 1400;
      width = 900;
      color = "black";
      text = "<H3>Phone</H3>";
   }


   with (this.pageTemplate1.FullnameHeadingHTML = new HTML(this.pageTemplate1)){
      height = 280;
      left = 900;
      top = 1400;
      width = 2100;
      color = "black";
      text = "<H3>Fullname</H3>";
   }


   with (this.pageTemplate1.DepartmentHeadingHTML = new HTML(this.pageTemplate1)){
      height = 280;
      left = 3000;
      top = 1400;
      width = 2000;
      color = "black";
      text = "<H3>Department</H3>";
   }


   with (this.pageTemplate1.PhonenoteHeadingHTML = new HTML(this.pageTemplate1)){
      height = 280;
      left = 5000;
      top = 1400;
      width = 4000;
      color = "black";
      text = "<H3>Phonenote</H3>";
   }


   with (this.pageTemplate1.PhoneBookLogo = new Image(this.pageTemplate1)){
      height = 1225;
      width = 1235;
      dataSource = "filename PHONBK31.GIF";
      alignment = 4;
   }


   with (this.pageTemplate1.ReportHeadingHTML = new HTML(this.pageTemplate1)){
      height = 1200;
      left = 1300;
      width = 7700;
      variableHeight = true;
      color = "853a1a";
      alignVertical = 1;
      alignHorizontal = 1;
      text = '<B><font size="+3"><CENTER>Employee Phone List</CENTER></font></B>';
      borderStyle = 3;
   }


   with (this.pageTemplate1.LinksHTML = new HTML(this.pageTemplate1)){
      height = 300;
      top = 12000;
      width = 9000;
      color = "black";
      fontBold = false;
      text = {||'</TABLE><A HREF="/ibapps/index.htm">[Home]</A> <A HREF="/svr/intrasrv.isv?apps/phone/phonedep.jrp">[List by Department]</A> <A HREF="/svr/intrasrv.isv?apps/phone/update.jfm">[Update Data]</A><HR>'};
   }


   with (this.pageTemplate1.generatedHTML = new GeneratedHTML(this.pageTemplate1)){
      height = 255;
      top = 12300;
      width = 9000;
   }


   with (this.streamSource1 = new StreamSource(this)){

   }


   with (this.streamSource1.detailBand) {
      height = 0;
   }


   with (this.streamSource1.detailBand.PhoneHTML = new HTML(this.streamSource1.detailBand)){
      height = 1;
      width = 900;
      variableHeight = true;
      color = "black";
      fontBold = false;
      text = {||'x'+this.parent.parent.rowset.fields["Phone"].value};
   }


   with (this.streamSource1.detailBand.FullnameHTML = new HTML(this.streamSource1.detailBand)){
      height = 1;
      left = 900;
      width = 2100;
      variableHeight = true;
      color = "black";
      fontBold = false;
      text = {||'<A HREF="/svr/intrasrv.isv?apps/phone/employee.jfm(' + parseInt(this.parent.parent.rowset.fields["Employee ID"].value) + ')">' + this.parent.parent.rowset.fields["Full Name"].value + '</A>'};
   }


   with (this.streamSource1.detailBand.DepartmentHTML = new HTML(this.streamSource1.detailBand)){
      height = 1;
      left = 3000;
      width = 2000;
      variableHeight = true;
      color = "black";
      fontBold = false;
      text = {||this.parent.parent.parent.department1.rowset.endOfSet ? "" : this.parent.parent.parent.department1.rowset.fields["Department"].value};
   }


   with (this.streamSource1.detailBand.PhoneNoteHTML = new HTML(this.streamSource1.detailBand)){
      height = 1;
      left = 5000;
      width = 4000;
      variableHeight = true;
      color = "black";
      fontBold = false;
      text = {||this.parent.parent.rowset.fields["Phone Note"].value};
   }


   with (this.printer) {
      duplex = 1;
      orientation = 1;
      paperSource = 15;
      paperSize = 1;
      resolution = 4;
      color = 2;
      trueTypeFonts = 2;
   }


   with (this.reportGroup) {
      groupBy = "";
   }


   with (this.reportGroup.headerBand) {
      height = 0;
   }


   with (this.reportGroup.footerBand) {
      height = 0;
   }

   this.firstPageTemplate = this.form.pageTemplate1
   this.form.pageTemplate1.nextPageTemplate = this.form.pageTemplate1
   this.form.pageTemplate1.streamFrame1.streamSource = this.form.streamSource1
   this.form.streamSource1.rowset = this.form.employee1.rowset

}