CD Actual 8/CDACTUAL8.iso/progs/ite/ite10d1.exe/DATA.Z/PEOPLE.JFM

Text File | 1996-09-07 | 7.7 KB | 321 lines

/****************************************************************************\
*                                                                            *
* People.jfm  --  Contact Manager Data Entry Form                            *
*                                                                            *
* People.jfm is part of the Contact Manager solution application.  It is one *
* of two data entry forms the user encounters.  In this form, the user can   *
* add, delete, and modify people (or customers/clients).  They can record    *
* information about this persons address, and phone number.                  *
*                                                                            *
* Dependencies:  bkgnd.gif                                                   *
*                people-t.gif                                                *
*                logo.gif                                                    *
*                barsep.gif                                                  *
*                recnav.gif                                                  *
*                homenav.gif                                                 *
*                                                                            *
* Links to:      ibapps/contacts/index.htm                                   *
*                                                                            *
* Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
*                                                                            *
\****************************************************************************/
// {End Header} Do not remove this comment//
// Generated on 09/03/96
//
var f = new peopleForm();
f.open();
class peopleForm extends Form {
   with (this) {
      height = 27;
      left = 10.1667;
      top = 0;
      width = 90;
      title = "Form";
      background = "filename bkgnd.gif";
      onServerLoad = class::Form_onServerLoad;
      onDesignLoad = class::Form_onDesignLoad;
   }


   with (this.contactdb = new Database()){
      left = 8;
      top = 23;
      databaseName = "CONTACTS";
      active = true;
   }


   with (this.people1 = new Query()){
      left = 2;
      top = 23;
      database = parent.contactdb;
      sql = "SELECT * FROM People";
      active = true;
   }


   with (this.people1.rowset) {
   }


   with (this.firstnameLabel = new HTML(this)){
      height = 1;
      left = 1;
      top = 11;
      width = 23;
      color = "blue";
      fontBold = false;
      text = "First Name";
   }


   with (this.FirstName = new Text(this)){
      left = 1;
      top = 12;
      width = 23;
      dataLink = parent.people1.rowset.fields["FNAME"];
   }


   with (this.lastnameLabel = new HTML(this)){
      height = 1;
      left = 28;
      top = 11;
      width = 18;
      color = "blue";
      fontBold = false;
      text = "Last Name";
   }


   with (this.LastName = new Text(this)){
      left = 28;
      top = 12;
      width = 18;
      dataLink = parent.people1.rowset.fields["LNAME"];
   }


   with (this.addressLabel = new HTML(this)){
      height = 1;
      left = 1;
      top = 13;
      width = 33;
      color = "blue";
      fontBold = false;
      text = "Address";
   }


   with (this.Address1 = new Text(this)){
      left = 1;
      top = 14;
      width = 45;
      dataLink = parent.people1.rowset.fields["ADDRESS"];
   }


   with (this.cityLabel = new HTML(this)){
      height = 1;
      left = 1;
      top = 15;
      width = 23;
      color = "blue";
      fontBold = false;
      text = "City";
   }


   with (this.City = new Text(this)){
      left = 1;
      top = 16;
      width = 23;
      dataLink = parent.people1.rowset.fields["CITY"];
   }


   with (this.stateLabel = new HTML(this)){
      height = 1;
      left = 28;
      top = 15;
      width = 8;
      color = "blue";
      fontBold = false;
      text = "State";
   }


   with (this.State = new Text(this)){
      left = 28;
      top = 16;
      width = 8;
      dataLink = parent.people1.rowset.fields["STATE"];
   }


   with (this.zipcodeLabel = new HTML(this)){
      height = 1;
      left = 43;
      top = 15;
      width = 13;
      color = "blue";
      fontBold = false;
      text = "Zip Code";
   }


   with (this.ZipCode = new Text(this)){
      left = 43;
      top = 16;
      width = 13;
      dataLink = parent.people1.rowset.fields["ZIP"];
   }


   with (this.phoneLabel = new HTML(this)){
      height = 1;
      left = 1;
      top = 17;
      width = 18.5;
      color = "blue";
      fontBold = false;
      text = "Phone Number";
   }


   with (this.Phone = new Text(this)){
      left = 1;
      top = 18;
      width = 18.5;
      dataLink = parent.people1.rowset.fields["PHONE"];
   }


   with (this.custlogImage = new Image(this)){
      height = 2.7059;
      left = 1;
      top = 7;
      width = 24.3333;
      dataSource = "filename CUSTLOG.GIF";
      alignment = 4;
   }


   with (this.barsepImage1 = new Image(this)){
      height = 0.5882;
      left = 1;
      top = 10;
      width = 83.3333;
      dataSource = "filename BARSEP.GIF";
      alignment = 4;
   }


   with (this.barsepImage2 = new Image(this)){
      height = 0.5882;
      left = 1;
      top = 20;
      width = 83.3333;
      dataSource = "filename BARSEP.GIF";
      alignment = 4;
   }


   with (this.NavBar = new Image(this)){
      height = 1.4706;
      left = 1;
      top = 21;
      width = 31.3333;
      dataSource = "filename RECNAV.GIF";
      alignment = 4;
      onImageServerClick = class::NavBar_onImageServerClick;
   }


   with (this.NavHome = new Image(this)){
      height = 1.5294;
      left = 43;
      top = 7;
      width = 4.3333;
      dataSource = "filename HOMENAV.GIF";
      alignment = 4;
      onImageClick = class::NavHome_onImageClick;
   }


   with (this.logoImage = new Image(this)){
      height = 7.0588;
      left = 1;
      width = 83.5;
      dataSource = "filename LOGO.GIF";
      alignment = 4;
   }

   this.rowset = this.people1.rowset;

   function NavBar_onImageServerClick(nLeft, nTop)
   {
     if (nLeft >= 0 && nLeft <= 25)
     {
       // The user clicked "First"
       form.rowset.first();
     }
     else if (nLeft >= 27 && nLeft <= 52)
     {
       // The user clicked "Previous"
       if (!form.rowset.next(-1))
         form.rowset.next();
     }
     else if (nLeft >= 54 && nLeft <= 79)
     {
       // The user clicked "Next"
       if (!form.rowset.next())
       {
         form.rowset.next(-1);
         form.rowset.beginAppend();
       }
     }
     else if (nLeft >= 81 && nLeft <= 106)
     {
       // The user clicked "Last"
       form.rowset.last();
     }
     else if (nLeft >= 108 && nLeft <= 133)
     {
       // The user clicked "Add"
       form.rowset.beginAppend();
     }
     else if (nLeft >= 135 && nLeft <= 160)
     {
       // The user clicked "Save" (the floppy disk image)
       form.rowset.save();
     }
     else if (nLeft >= 162 && nLeft <= 188)
     {
       // The user clicked "Delete" (the big red X image)
       form.rowset.delete();
     }
   }

   function NavHome_onImageClick()
   {
     location.href = "/ibapps/contacts/index.htm";
   }

   function Form_onDesignLoad()
   {
     // Set the form's width and height properties
     // for designing the form
     this.height = 27;
     this.width = 90;
   }

   function Form_onServerLoad()
   {
     // Set the form's width and height properties
     this.height = 23;
     this.width = 86;
   }

}