home *** CD-ROM | disk | FTP | other *** search
- /****************************************************************************\
- * *
- * EmpProf.jfm -- Employee Security Profile Form *
- * *
- * EmpProf.jfm is part of the Phone Book prebuilt business solution. It is *
- * called by the udpate form to allow the user to update their security *
- * profile. The real logic of the profile form is in the base class. *
- * The base class is smUserProfileForm in the file Shared\security.jcf. *
- * This form simply provides a user interface compatible with the rest of the *
- * Phone Book solution. * *
- * *
- * Dependencies: phonbk31.gif *
- * apps\shared\profile.jcf *
- * apps\shared\controls.cc *
- * *
- * Updated 11/12/96 by IntraBuilder Samples Group *
- * $Revision: 1.4 $ *
- * *
- * Copyright (c) 1996, Borland International, Inc. All rights reserved. *
- * *
- \****************************************************************************/
- // {End Header} Do not remove this comment//
- // Generated on 11/12/96
- //
- var f = new empprofForm();
- f.open();
- class empprofForm extends smUserProfileForm from (_sys.env.home() + "APPS\\SHARED\\PROFILE.JCF") {
- _sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC")
- with (this) {
- color = "cae4ff";
- height = 14.6667;
- left = 0;
- top = 0;
- width = 76;
- title = "Security Profile Update";
- }
-
-
- with (this.rule1 = new Rule(this)){
- top = 4;
- size = 2;
- right = 70;
-
- }
-
- with (this.rule2 = new Rule(this)){
- top = 19.5;
- size = 2;
- right = 70;
-
- }
-
- with (this.PhoneBookLogo = new Image(this)){
- height = 3.4167;
- width = 10.25;
- dataSource = "filename PHONBK31.GIF";
- alignment = 4;
- pageno = 0;
-
- }
-
- with (this.HeadingHTML = new HTML(this)){
- height = 2;
- left = 12;
- width = 57;
- color = "853a1a";
- text = "<H1>Security Profile Update</H1>";
- pageno = 0;
-
- }
-
- with (this.GeneratedHTML1 = new GeneratedHTML(this)){
- height = 1;
- top = 20;
- width = 70;
-
- }
-
- }
-