$PBExportHeader$u_tabpgtwo.sru forward global type u_tabpgtwo from u_tabpg end type type rb_allfiles from u_rb within u_tabpgtwo end type type rb_findfiles from u_rb within u_tabpgtwo end type type gb_1 from u_gb within u_tabpgtwo end type type rb_between from u_rb within u_tabpgtwo end type type rb_prevmonths from u_rb within u_tabpgtwo end type type rb_prevdays from u_rb within u_tabpgtwo end type type em_startdate from u_em within u_tabpgtwo end type type em_enddate from u_em within u_tabpgtwo end type type st_1 from u_st within u_tabpgtwo end type type em_months from u_em within u_tabpgtwo end type type em_days from u_em within u_tabpgtwo end type type st_2 from u_st within u_tabpgtwo end type type st_3 from u_st within u_tabpgtwo end type end forward global type u_tabpgtwo from u_tabpg int Width=1532 int Height=537 long BackColor=77571519 long TabBackColor=77571519 string Text="Date Modified" rb_allfiles rb_allfiles rb_findfiles rb_findfiles gb_1 gb_1 rb_between rb_between rb_prevmonths rb_prevmonths rb_prevdays rb_prevdays em_startdate em_startdate em_enddate em_enddate st_1 st_1 em_months em_months em_days em_days st_2 st_2 st_3 st_3 end type global u_tabpgtwo u_tabpgtwo on u_tabpgtwo.create int iCurrent call u_tabpg::create this.rb_allfiles=create rb_allfiles this.rb_findfiles=create rb_findfiles this.gb_1=create gb_1 this.rb_between=create rb_between this.rb_prevmonths=create rb_prevmonths this.rb_prevdays=create rb_prevdays this.em_startdate=create em_startdate this.em_enddate=create em_enddate this.st_1=create st_1 this.em_months=create em_months this.em_days=create em_days this.st_2=create st_2 this.st_3=create st_3 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=rb_allfiles this.Control[iCurrent+2]=rb_findfiles this.Control[iCurrent+3]=gb_1 this.Control[iCurrent+4]=rb_between this.Control[iCurrent+5]=rb_prevmonths this.Control[iCurrent+6]=rb_prevdays this.Control[iCurrent+7]=em_startdate this.Control[iCurrent+8]=em_enddate this.Control[iCurrent+9]=st_1 this.Control[iCurrent+10]=em_months this.Control[iCurrent+11]=em_days this.Control[iCurrent+12]=st_2 this.Control[iCurrent+13]=st_3 end on on u_tabpgtwo.destroy call u_tabpg::destroy destroy(this.rb_allfiles) destroy(this.rb_findfiles) destroy(this.gb_1) destroy(this.rb_between) destroy(this.rb_prevmonths) destroy(this.rb_prevdays) destroy(this.em_startdate) destroy(this.em_enddate) destroy(this.st_1) destroy(this.em_months) destroy(this.em_days) destroy(this.st_2) destroy(this.st_3) end on event constructor;call super::constructor;////////////////////////////////////////////////////////////////////////////// // // Event: // constructor // // Description: // Initializes the values in the controls. // ////////////////////////////////////////////////////////////////////////////// // // Revision History // // Version // 6.0 Initial version // ////////////////////////////////////////////////////////////////////////////// // /* * Open Source PowerBuilder Foundation Class Libraries * * Copyright (c) 2004-2005, All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted in accordance with the GNU Lesser General * Public License Version 2.1, February 1999 * * http://www.gnu.org/copyleft/lesser.html * * ==================================================================== * * This software consists of voluntary contributions made by many * individuals and was originally based on software copyright (c) * 1996-2004 Sybase, Inc. http://www.sybase.com. For more * information on the Open Source PowerBuilder Foundation Class * Libraries see http://pfc.codexchange.sybase.com */ // ////////////////////////////////////////////////////////////////////////////// em_days.text = "1" em_months.text = "1" em_startdate.text = String(Today()) em_enddate.text = String(RelativeDate(Today(), 30)) end event type rb_allfiles from u_rb within u_tabpgtwo int X=51 int Y=41 int TabOrder=10 string Text="&All files" boolean Checked=true end type event clicked;call super::clicked;////////////////////////////////////////////////////////////////////////////// // // Event: // clicked // // Description: // Disables the controls in the group box. // ////////////////////////////////////////////////////////////////////////////// // // Revision History // // Version // 6.0 Initial version // ////////////////////////////////////////////////////////////////////////////// // /* * Open Source PowerBuilder Foundation Class Libraries * * Copyright (c) 2004-2005, All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted in accordance with the GNU Lesser General * Public License Version 2.1, February 1999 * * http://www.gnu.org/copyleft/lesser.html * * ==================================================================== * * This software consists of voluntary contributions made by many * individuals and was originally based on software copyright (c) * 1996-2004 Sybase, Inc. http://www.sybase.com. For more * information on the Open Source PowerBuilder Foundation Class * Libraries see http://pfc.codexchange.sybase.com */ // ////////////////////////////////////////////////////////////////////////////// em_startdate.enabled = false em_enddate.enabled = false em_months.enabled = false em_days.enabled = false end event type rb_findfiles from u_rb within u_tabpgtwo int X=51 int Y=137 int Width=787 int TabOrder=30 boolean BringToTop=true string Text="Find all files created or &modified:" end type event clicked;call super::clicked;////////////////////////////////////////////////////////////////////////////// // // Event: // clicked // // Description: // Enables the controls in the groupbox. // ////////////////////////////////////////////////////////////////////////////// // // Revision History // // Version // 6.0 Initial version // ////////////////////////////////////////////////////////////////////////////// // /* * Open Source PowerBuilder Foundation Class Libraries * * Copyright (c) 2004-2005, All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted in accordance with the GNU Lesser General * Public License Version 2.1, February 1999 * * http://www.gnu.org/copyleft/lesser.html * * ==================================================================== * * This software consists of voluntary contributions made by many * individuals and was originally based on software copyright (c) * 1996-2004 Sybase, Inc. http://www.sybase.com. For more * information on the Open Source PowerBuilder Foundation Class * Libraries see http://pfc.codexchange.sybase.com */ // ////////////////////////////////////////////////////////////////////////////// em_startdate.enabled = true em_enddate.enabled = true em_months.enabled = true em_days.enabled = true end event type gb_1 from u_gb within u_tabpgtwo int X=83 int Y=177 int Width=1390 int Height=325 int TabOrder=20 boolean Visible=false end type type rb_between from u_rb within u_tabpgtwo int X=138 int Y=217 int Width=293 boolean BringToTop=true string Text="&between" boolean Checked=true end type type rb_prevmonths from u_rb within u_tabpgtwo int X=138 int Y=313 int Width=517 boolean BringToTop=true string Text="during the previou&s" end type type rb_prevdays from u_rb within u_tabpgtwo int X=138 int Y=409 int Width=517 boolean BringToTop=true string Text="&during the previous" end type type em_startdate from u_em within u_tabpgtwo int X=458 int Y=217 int Width=371 int TabOrder=40 boolean Enabled=false MaskDataType MaskDataType=DateMask! string DisplayData="" double Increment=0 string MinMax="" end type type em_enddate from u_em within u_tabpgtwo int X=979 int Y=217 int Width=371 int TabOrder=50 boolean Enabled=false boolean BringToTop=true MaskDataType MaskDataType=DateMask! string DisplayData="" double Increment=0 string MinMax="" end type type st_1 from u_st within u_tabpgtwo int X=860 int Y=225 int Width=110 string Text="and" end type type em_months from u_em within u_tabpgtwo int X=673 int Y=313 int TabOrder=60 boolean Enabled=false boolean BringToTop=true string Mask="####" boolean Spin=true string DisplayData="Øh" string MinMax="1~~30" end type type em_days from u_em within u_tabpgtwo int X=673 int Y=409 int TabOrder=70 boolean Enabled=false boolean BringToTop=true string Mask="####" boolean Spin=true string DisplayData="" string MinMax="1~~30" end type type st_2 from u_st within u_tabpgtwo int X=933 int Y=321 int Width=206 boolean BringToTop=true string Text="month(s)" end type type st_3 from u_st within u_tabpgtwo int X=933 int Y=405 int Width=151 boolean BringToTop=true string Text="day(s)" end type
File: u_tabpgtwo.sru
Size: 9161
Date: Tue, 22 Jan 2008 23:27:11 +0100
Size: 9161
Date: Tue, 22 Jan 2008 23:27:11 +0100
- u_tabpg u_tabpgtwo(sru)
- u_rb rb_allfiles
- u_rb rb_findfiles
- u_gb gb_1
- u_rb rb_between
- u_rb rb_prevmonths
- u_rb rb_prevdays
- u_em em_startdate
- u_em em_enddate
- u_st st_1
- u_em em_months
- u_em em_days
- u_st st_2
- u_st st_3